|
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: 155050 (0x25daa)
Notes: pts_type(SC)
Names: »DRPL01.SC«
└─⟦928b1fd3e⟧ Bits:30009671 Philips computer tape "600131"
└─⟦this⟧ »PTMON/DRPL01.SC«
IDENT DRPL01 REL 11.1 82-08-19 870105041110 =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 * SB050 EQU * . =16 LD A1,DWTLD1,A6 BUFFER ALREADY ALLOCATED? ABL(NZ) NDREPO YES, SET OK & RETURN CF A15,GETLCS A1 := STATUS & INH RF(NZ) SBERR2 ERROR, RETURN 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 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 82-08-19 870105041110 «, t00=0x0000, t01=0x0004}
0x00036…0003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x0003e…0005e Head {h00=0x001c, h01=0x0050, text=» =17,BLOCKING IMPROVED«, t00=0x0000, t01=0x0042}
0x0005e…0007a Head {h00=0x0018, h01=0x0050, text=» REL 11.1 82-08-13«, t00=0x0000, t01=0x0062}
0x0007a…000a4 Head {h00=0x0026, h01=0x0050, text=» =16,CHANGED BLOCKING OF OUTPUT «, t00=0x0000, t01=0x007e}
0x000a4…000c0 Head {h00=0x0018, h01=0x0050, text=» REL 11.1 82-07-08«, t00=0x0000, t01=0x00a8}
0x000c0…000e2 Head {h00=0x001e, h01=0x0050, text=» =15,COMPARE ADDR. CORR.«, t00=0x0000, t01=0x00c4}
0x000e2…000fe Head {h00=0x0018, h01=0x0050, text=» REL 11.1 82-02-12«, t00=0x0000, t01=0x00e6}
0x000fe…0011a Head {h00=0x0018, h01=0x0050, text=» =14,SET CR CORR. «, t00=0x0000, t01=0x0102}
0x0011a…00136 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-10-20«, t00=0x0000, t01=0x011e}
0x00136…00158 Head {h00=0x001e, h01=0x0050, text=» =13,ADAPTED FOR PTS8000«, t00=0x0000, t01=0x013a}
0x00158…00174 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-10-14«, t00=0x0000, t01=0x015c}
0x00174…00196 Head {h00=0x001e, h01=0x0050, text=» =12,DIAGNOSTIC FOR RWSI«, t00=0x0000, t01=0x0178}
0x00196…001b2 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-08-27«, t00=0x0001, t01=0x000a}
0x001b2…001d2 Head {h00=0x001c, h01=0x0050, text=» =11,CH. OF PARAMETERS«, t00=0x0001, t01=0x0026}
0x001d2…001ee Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-08-10«, t00=0x0001, t01=0x0046}
0x001ee…0020a Head {h00=0x0018, h01=0x0050, text=» =10,CORR. OF RWSI«, t00=0x0001, t01=0x0062}
0x0020a…00226 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-08-10«, t00=0x0001, t01=0x007e}
0x00226…0024c Head {h00=0x0022, h01=0x0050, text=» =9,CORR. OF INTERRUPT ENTRY«, t00=0x0001, t01=0x009a}
0x0024c…00268 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-24«, t00=0x0001, t01=0x00c0}
0x00268…0028e Head {h00=0x0022, h01=0x0050, text=» =8,OPEN LINE PARAM. CHANGED«, t00=0x0001, t01=0x00dc}
0x0028e…002aa Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-23«, t00=0x0001, t01=0x0102}
0x002aa…002cc Head {h00=0x001e, h01=0x0050, text=» =7,CORR. OF CWT-DISPL. «, t00=0x0001, t01=0x011e}
0x002cc…002e8 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-06-11«, t00=0x0001, t01=0x0140}
0x002e8…00314 Head {h00=0x0028, h01=0x0050, text=» =6,LENGTH OF LONG BUFFERS CHANGED«, t00=0x0001, t01=0x015c}
0x00314…00330 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-27«, t00=0x0001, t01=0x0188}
0x00330…00354 Head {h00=0x0020, h01=0x0050, text=» =5,CORR. OF RWSI-CWT:S , «, t00=0x0002, t01=0x0014}
0x00354…0037c Head {h00=0x0024, h01=0x0050, text=» OPEN LINE PROC. & COND. ASS. «, t00=0x0002, t01=0x0038}
0x0037c…00398 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-22«, t00=0x0002, t01=0x0060}
0x00398…003ba Head {h00=0x001e, h01=0x0050, text=» =4,CORR. OF CWT-DISPL. «, t00=0x0002, t01=0x007c}
0x003ba…003d6 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-05-20«, t00=0x0002, t01=0x009e}
0x003d6…003f8 Head {h00=0x001e, h01=0x0050, text=» =3,CORR. OF TIMER NAME «, t00=0x0002, t01=0x00ba}
0x003f8…00414 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-04-29«, t00=0x0002, t01=0x00dc}
0x00414…0043e Head {h00=0x0026, h01=0x0050, text=» =2,CORR. OF OPEN LINE PROCEDURE«, t00=0x0002, t01=0x00f8}
0x0043e…0045a Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-04-21«, t00=0x0002, t01=0x0122}
0x0045a…0047c Head {h00=0x001e, h01=0x0050, text=» GENERAL UPDATE FOR RWSI«, t00=0x0002, t01=0x013e}
0x0047c…00498 Head {h00=0x0018, h01=0x0050, text=» REL 11.0 81-01-26«, t00=0x0002, t01=0x0160}
0x00498…004c4 Head {h00=0x0028, h01=0x0050, text=» =1,OPEN LINE PARAM. AREA EXPANDED«, t00=0x0002, t01=0x017c}
0x004c4…004e0 Head {h00=0x0018, h01=0x0050, text=» PRR 11.0 80-11-19«, t00=0x0003, t01=0x0018}
0x004e0…004ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0034}
0x004ee…004f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0042}
0x004f8…00502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x004c}
0x00502…0050c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0056}
0x0050c…00516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0060}
0x00516…0055a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0003, t01=0x006a}
0x0055a…00564 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ae}
0x00564…0058c Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0003, t01=0x00b8}
0x0058c…00596 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e0}
0x00596…005d0 Head {h00=0x0036, h01=0x0050, text=»* DRPL01 = DRIVER PROCESSOR FOR LINE CONTROL, «, t00=0x0003, t01=0x00ea}
0x005d0…00602 Head {h00=0x002e, h01=0x0050, text=»* LOCAL & REMOTE CONNECTIONS«, t00=0x0003, t01=0x0124}
0x00602…0060c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0156}
0x0060c…00616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0160}
0x00616…00620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016a}
0x00620…00664 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0003, t01=0x0174}
0x00664…0066e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0028}
0x0066e…00678 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0032}
0x00678…006ae Head {h00=0x0032, h01=0x0050, text=»* THIS PROGRAM HANDLES I/O OPERATIONS ON THE«, t00=0x0004, t01=0x003c}
0x006ae…006e2 Head {h00=0x0030, h01=0x0050, text=»* PROCESSOR FOR LINE CONTROL (PLC). IT IS «, t00=0x0004, t01=0x0072}
0x006e2…00716 Head {h00=0x0030, h01=0x0050, text=»* CALLED FROM THE TERMINAL DEVICE DRIVERS.«, t00=0x0004, t01=0x00a6}
0x00716…00720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00da}
0x00720…00756 Head {h00=0x0032, h01=0x0050, text=»* INPUT AND OUTPUT OF CHARACTERS FROM/TO THE«, t00=0x0004, t01=0x00e4}
0x00756…00790 Head {h00=0x0036, h01=0x0050, text=»* TERMINAL DEVICE DRIVERS ARE MADE ON CHARACTER «, t00=0x0004, t01=0x011a}
0x00790…007c8 Head {h00=0x0034, h01=0x0050, text=»* BASIS. BLOCKING AND DEBLOCKING OF CHARACTERS«, t00=0x0004, t01=0x0154}
0x007c8…00800 Head {h00=0x0034, h01=0x0050, text=»* IN DATA PACKETS ARE HANDLED BY THIS DRIVER. «, t00=0x0004, t01=0x018c}
0x00800…0080a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0034}
0x0080a…00818 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x003e}
0x00818…00822 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004c}
0x00822…00860 Head {h00=0x003a, h01=0x0050, text=»* THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. «, t00=0x0005, t01=0x0056}
0x00860…00898 Head {h00=0x0034, h01=0x0050, text=»* SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED«, t00=0x0005, t01=0x0094}
0x00898…008ce Head {h00=0x0032, h01=0x0050, text=»* INTO ROUTINES. THE ROUTINES ARE LISTED AT «, t00=0x0005, t01=0x00cc}
0x008ce…00906 Head {h00=0x0034, h01=0x0050, text=»* BEGINNING OF EACH SECTION. THE SECTIONS, IN «, t00=0x0005, t01=0x0102}
0x00906…00934 Head {h00=0x002a, h01=0x0050, text=»* ORDER OF APPEARANCE IN LIST, ARE: «, t00=0x0005, t01=0x013a}
0x00934…0093e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0168}
0x0093e…00958 Head {h00=0x0016, h01=0x0050, text=»* NAME FUNCTION«, t00=0x0005, t01=0x0172}
0x00958…00962 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x018c}
0x00962…0098c Head {h00=0x0026, h01=0x0050, text=»* ENTRIES DECLARE ENTRY POINTS «, t00=0x0006, t01=0x0008}
0x0098c…009be Head {h00=0x002e, h01=0x0050, text=»* EXTERNALS DECLARE EXTERNAL REFERENCES «, t00=0x0006, t01=0x0032}
0x009be…009f8 Head {h00=0x0036, h01=0x0050, text=»* CONDITION SET CONDITIONAL ASSEMBLY PARAMETERS «, t00=0x0006, t01=0x0064}
0x009f8…00a22 Head {h00=0x0026, h01=0x0050, text=»* CONSTANTS SET CONSTANT VALUES «, t00=0x0006, t01=0x009e}
0x00a22…00a3e Head {h00=0x0018, h01=0x0050, text=»* DATA DATA AREAS«, t00=0x0006, t01=0x00c8}
0x00a3e…00a48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e4}
0x00a48…00a7c Head {h00=0x0030, h01=0x0050, text=»* REQUEST DEVICE DRIVER REQUEST ROUTINES «, t00=0x0006, t01=0x00ee}
0x00a7c…00aa4 Head {h00=0x0024, h01=0x0050, text=»* INTERRUPT INTERRUPT ENTRIES «, t00=0x0006, t01=0x0122}
0x00aa4…00ae0 Head {h00=0x0038, h01=0x0050, text=»* RECOVERY SYSTEM START, POWER FAIL AND RECOVERY «, t00=0x0006, t01=0x014a}
0x00ae0…00b0a Head {h00=0x0026, h01=0x0050, text=»* DISPATCH LOCAL PLC DISPATCHER«, t00=0x0006, t01=0x0186}
0x00b0a…00b36 Head {h00=0x0028, h01=0x0050, text=»* ROUTINE COMMON SERVICE ROUTINES«, t00=0x0007, t01=0x0020}
0x00b36…00b66 Head {h00=0x002c, h01=0x0050, text=»* SUBROUTIN COMMON SERVICE SUBROUTINES«, t00=0x0007, t01=0x004c}
0x00b66…00b94 Head {h00=0x002a, h01=0x0050, text=»* TBUFF BUFFER HANDLING SUBROUTINES«, t00=0x0007, t01=0x007c}
0x00b94…00b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00aa}
0x00b9e…00bac Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00b4}
0x00bac…00bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c2}
0x00bb6…00bca Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x00cc}
0x00bca…00bde Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0007, t01=0x00e0}
0x00bde…00bf2 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0007, t01=0x00f4}
0x00bf2…00bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0108}
0x00bfc…00c16 Head {h00=0x0016, h01=0x0050, text=»* I/O REQUESTS «, t00=0x0007, t01=0x0112}
0x00c16…00c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012c}
0x00c20…00c46 Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCHRI CHARACTER INPUT «, t00=0x0007, t01=0x0136}
0x00c46…00c78 Head {h00=0x002e, h01=0x0050, text=» ENTRY PLSTBL DEFINE START OF OUTPUT BLOCK«, t00=0x0007, t01=0x015c}
0x00c78…00c9e Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCHRO CHARACTER OUTPUT«, t00=0x0007, t01=0x018e}
0x00c9e…00cce Head {h00=0x002c, h01=0x0050, text=» ENTRY PLENBL DEFINE END OF OUTPUT BLOCK«, t00=0x0008, t01=0x0024}
0x00cce…00cf4 Head {h00=0x0022, h01=0x0050, text=» ENTRY PLDISP LOCAL DISPATCHER«, t00=0x0008, t01=0x0054}
0x00cf4…00d1a Head {h00=0x0022, h01=0x0050, text=» ENTRY PRCHRI CHR INP REMOTE «, t00=0x0008, t01=0x007a}
0x00d1a…00d4a Head {h00=0x002c, h01=0x0050, text=» ENTRY PRSTBL START OUTP BLOCK, REMOTE «, t00=0x0008, t01=0x00a0}
0x00d4a…00d72 Head {h00=0x0024, h01=0x0050, text=» ENTRY PRCHRO CHR OUTP. REMOTE «, t00=0x0008, t01=0x00d0}
0x00d72…00da0 Head {h00=0x002a, h01=0x0050, text=» ENTRY PRENBL END OUTP BLOCK, REMOTE «, t00=0x0008, t01=0x00f8}
0x00da0…00dca Head {h00=0x0026, h01=0x0050, text=» ENTRY PRDISP LOCAL DSIP. REMOTE «, t00=0x0008, t01=0x0126}
0x00dca…00dee Head {h00=0x0020, h01=0x0050, text=» ENTRY PLTEST TEST COMMANDS «, t00=0x0008, t01=0x0150}
0x00dee…00e0e Head {h00=0x001c, h01=0x0050, text=» ENTRY CWTPLC CWT TABLE «, t00=0x0008, t01=0x0174}
0x00e0e…00e36 (9, 0, 400) Head {h00=0x0024, h01=0x0050, text=» ENTRY GETDWT GET DWT SUBROUTINE«, t00=0x0009, t01=0x0004}
0x00e36…00e5c Head {h00=0x0022, h01=0x0050, text=» ENTRY PLCLOG LOGG POINTER =11«, t00=0x0009, t01=0x002c}
0x00e5c…00e86 Head {h00=0x0026, h01=0x0050, text=» ENTRY TIMACT INACTIVITY TIMER =11«, t00=0x0009, t01=0x0052}
0x00e86…00ebc Head {h00=0x0032, h01=0x0050, text=» ENTRY POLRTL POLL FREQ. & NO OF RETRANSM =11 «, t00=0x0009, t01=0x007c}
0x00ebc…00eec Head {h00=0x002c, h01=0x0050, text=» ENTRY POLRTR POLL FR. & NO OF RETR. =11«, t00=0x0009, t01=0x00b2}
0x00eec…00efa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00e2}
0x00efa…00f04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00f0}
0x00f04…00f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00fa}
0x00f0e…00f26 Head {h00=0x0014, h01=0x0050, text=»* INTERRUPTS «, t00=0x0009, t01=0x0104}
0x00f26…00f30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x011c}
0x00f30…00f52 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL01 PLC NUMBER 1«, t00=0x0009, t01=0x0126}
0x00f52…00f74 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL02 PLC NUMBER 2«, t00=0x0009, t01=0x0148}
0x00f74…00f96 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL03 PLC NUMBER 3«, t00=0x0009, t01=0x016a}
0x00f96…00fb8 Head {h00=0x001e, h01=0x0050, text=» ENTRY IHPL04 PLC NUMBER 4«, t00=0x0009, t01=0x018c}
0x00fb8…00fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x001e}
0x00fc2…00fec Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR01 PLC NUMBER 5,REMOTE «, t00=0x000a, t01=0x0028}
0x00fec…01016 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR02 6,REMOTE «, t00=0x000a, t01=0x0052}
0x01016…01040 Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR03 7,REMOTE «, t00=0x000a, t01=0x007c}
0x01040…0106a Head {h00=0x0026, h01=0x0050, text=» ENTRY IHPR04 8,REMOTE «, t00=0x000a, t01=0x00a6}
0x0106a…01074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d0}
0x01074…01098 Head {h00=0x0020, h01=0x0050, text=»* RECOVERY AT TC POWER UP«, t00=0x000a, t01=0x00da}
0x01098…010a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00fe}
0x010a2…010d0 Head {h00=0x002a, h01=0x0050, text=» ENTRY PLON RECOVER ALL DEFINED PLC:S «, t00=0x000a, t01=0x0108}
0x010d0…010da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0136}
0x010da…010e8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0140}
0x010e8…010f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014e}
0x010f2…01108 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0158}
0x01108…0111e Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x000a, t01=0x016e}
0x0111e…01134 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0184}
0x01134…0113e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000a}
0x0113e…01158 Head {h00=0x0016, h01=0x0050, text=»* TOSS MONITOR «, t00=0x000b, t01=0x0014}
0x01158…01162 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x002e}
0x01162…0117a Head {h00=0x0014, h01=0x0050, text=»* ROUTINES «, t00=0x000b, t01=0x0038}
0x0117a…0119e Head {h00=0x0020, h01=0x0050, text=» EXTRN TDISP TOSS DISPATCHER«, t00=0x000b, t01=0x0050}
0x0119e…011c4 Head {h00=0x0022, h01=0x0050, text=» EXTRN QMJOB QUEUE MONITOR JOB«, t00=0x000b, t01=0x0074}
0x011c4…011ee Head {h00=0x0026, h01=0x0050, text=» EXTRN MEXIT EXIT FROM MONITOR JOB«, t00=0x000b, t01=0x009a}
0x011ee…01216 Head {h00=0x0024, h01=0x0050, text=» EXTRN GETBLK GET MONITOR BLOCK «, t00=0x000b, t01=0x00c4}
0x01216…01240 Head {h00=0x0026, h01=0x0050, text=» EXTRN FREBLK RETURN MONITOR BLOCK«, t00=0x000b, t01=0x00ec}
0x01240…0126c Head {h00=0x0028, h01=0x0050, text=» EXTRN SAVE8 PUSH A1-A8 ON A15 STACK«, t00=0x000b, t01=0x0116}
0x0126c…0128c Head {h00=0x001c, h01=0x0050, text=» EXTRN SETIME SET TIMER «, t00=0x000b, t01=0x0142}
0x0128c…012a6 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x000b, t01=0x0162}
0x012a6…012cc Head {h00=0x0022, h01=0x0050, text=» EXTRN PFPOST POWER FAIL FLAG «, t00=0x000b, t01=0x017c}
0x012cc…012fc Head {h00=0x002c, h01=0x0050, text=» EXTRN INTSAV LATEST INTERRUPT SAVE AREA«, t00=0x000c, t01=0x0012}
0x012fc…01306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0042}
0x01306…01310 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004c}
0x01310…01334 Head {h00=0x0020, h01=0x0050, text=»* DRND01 SERVICE ROUTINES«, t00=0x000c, t01=0x0056}
0x01334…0133e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x007a}
0x0133e…0136c Head {h00=0x002a, h01=0x0050, text=» EXTRN NDSAV8 SAVE A3-A5, A7-A8 IN DWT«, t00=0x000c, t01=0x0084}
0x0136c…0139c Head {h00=0x002c, h01=0x0050, text=» EXTRN NDGET8 GET A3-A5, A7-A8 FROM DWT «, t00=0x000c, t01=0x00b2}
0x0139c…013d2 Head {h00=0x0032, h01=0x0050, text=» EXTRN NDREWS CALL RECOVERY FOR ALL DEV ON WS «, t00=0x000c, t01=0x00e2}
0x013d2…013fe Head {h00=0x0028, h01=0x0050, text=» EXTRN NDREDW CALL RECOVERY FOR DWT «, t00=0x000c, t01=0x0118}
0x013fe…01430 Head {h00=0x002e, h01=0x0050, text=» EXTRN NDGEDN GET HIGEST DWT NUMBER ON WS «, t00=0x000c, t01=0x0144}
0x01430…01456 Head {h00=0x0022, h01=0x0050, text=» EXTRN NDGEDW GET DWT ADDRESS «, t00=0x000c, t01=0x0176}
0x01456…01460 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x000c}
0x01460…0146e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0016}
0x0146e…01478 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0024}
0x01478…014b0 Head {h00=0x0034, h01=0x0050, text=»* DRND01 ROUTINES FOR RETURN TO DEVICE DRIVER«, t00=0x000d, t01=0x002e}
0x014b0…014ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0066}
0x014ba…014e0 Head {h00=0x0022, h01=0x0050, text=» EXTRN NDREPO POP, OK & RETURN«, t00=0x000d, t01=0x0070}
0x014e0…01502 Head {h00=0x001e, h01=0x0050, text=» EXTRN NDRETO OK & RETURN «, t00=0x000d, t01=0x0096}
0x01502…01524 Head {h00=0x001e, h01=0x0050, text=» EXTRN NDREP POP & RETURN «, t00=0x000d, t01=0x00b8}
0x01524…01540 Head {h00=0x0018, h01=0x0050, text=» EXTRN NDRET RETURN «, t00=0x000d, t01=0x00da}
0x01540…0154a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f6}
0x0154a…01554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0100}
0x01554…01572 Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS«, t00=0x000d, t01=0x010a}
0x01572…0157c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0128}
0x0157c…015a4 Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTCHP CHANNEL PARAMETERS«, t00=0x000d, t01=0x0132}
0x015a4…015c6 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTST STATUS FLAGS «, t00=0x000d, t01=0x015a}
0x015c6…015ee Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTOR ORDER (RIGHT BYTE) «, t00=0x000d, t01=0x017c}
0x015ee…01620 Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK ADDRESS«, t00=0x000e, t01=0x0014}
0x01620…01640 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTOTQ QUEUE LINK«, t00=0x000e, t01=0x0046}
0x01640…01674 Head {h00=0x0030, h01=0x0050, text=» EXTRN DWTCP2 SECOND CHANNEL PARAMETER WORD «, t00=0x000e, t01=0x0066}
0x01674…016a6 Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTLD1 PLC INPUT/OUTPUT BUFFER ADDR«, t00=0x000e, t01=0x009a}
0x016a6…016d6 Head {h00=0x002c, h01=0x0050, text=» EXTRN DWTLD2 PLC FLOW CONTROL COUNTERS «, t00=0x000e, t01=0x00cc}
0x016d6…0170a Head {h00=0x0030, h01=0x0050, text=» EXTRN DWTTBU PLC TEST COMMANDS BUFFER ADDR «, t00=0x000e, t01=0x00fc}
0x0170a…01740 Head {h00=0x0032, h01=0x0050, text=» EXTRN DWTTLN PLC TEST COMMANDS BUFFER LENGTH «, t00=0x000e, t01=0x0130}
0x01740…01776 Head {h00=0x0032, h01=0x0050, text=» EXTRN DWTTCW PLC TEST COMMANDS SPECIAL PARAM «, t00=0x000e, t01=0x0166}
0x01776…017a2 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTWAT WAIT/ACT INDICATOR =16«, t00=0x000f, t01=0x000c}
0x017a2…017ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0038}
0x017ac…017ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0042}
0x017ba…017c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0050}
0x017c4…017e4 Head {h00=0x001c, h01=0x0050, text=»* WORK STATION TABLES«, t00=0x000f, t01=0x005a}
0x017e4…017ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007a}
0x017ee…0180a Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL1 PLC 1 «, t00=0x000f, t01=0x0084}
0x0180a…01826 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL2 PLC 2 «, t00=0x000f, t01=0x00a0}
0x01826…01842 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL3 PLC 3 «, t00=0x000f, t01=0x00bc}
0x01842…0185e Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPL4 PLC 4 «, t00=0x000f, t01=0x00d8}
0x0185e…01868 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f4}
0x01868…01884 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR1 REMOTE«, t00=0x000f, t01=0x00fe}
0x01884…018a0 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR2 REMOTE«, t00=0x000f, t01=0x011a}
0x018a0…018bc Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR3 REMOTE«, t00=0x000f, t01=0x0136}
0x018bc…018d8 Head {h00=0x0018, h01=0x0050, text=» EXTRN INTPR4 REMOTE«, t00=0x000f, t01=0x0152}
0x018d8…018e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x016e}
0x018e2…018fc Head {h00=0x0016, h01=0x0050, text=»* MISCELLANEOUS«, t00=0x000f, t01=0x0178}
0x018fc…01906 (16, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0004}
0x01906…01940 Head {h00=0x0036, h01=0x0050, text=» EXTRN INTADR INTERRUPT ADDR IN DRIVER ADDR BLOCK «, t00=0x0010, t01=0x000e}
0x01940…0194a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0048}
0x0194a…01958 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0052}
0x01958…01962 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0060}
0x01962…01982 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x006a}
0x01982…019a2 Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x0010, t01=0x008a}
0x019a2…019c2 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0010, t01=0x00aa}
0x019c2…019cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ca}
0x019cc…019d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d4}
0x019d6…01a10 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0010, t01=0x00de}
0x01a10…01a42 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0010, t01=0x0118}
0x01a42…01a4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x014a}
0x01a4c…01a60 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0010, t01=0x0154}
0x01a60…01a6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0168}
0x01a6a…01a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0172}
0x01a74…01abc Head {h00=0x0044, h01=0x0050, text=»* PLCNRL DEFINES NUMBER OF LOCAL PLC:S ACTUALLY CONNECTED (0-4) «, t00=0x0010, t01=0x017c}
0x01abc…01ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0034}
0x01ac6…01ad8 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x0011, t01=0x003e}
0x01ad8…01aee Head {h00=0x0012, h01=0x0050, text=»PLCNRL EQU X:A«, t00=0x0011, t01=0x0050}
0x01aee…01af8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0066}
0x01af8…01b40 Head {h00=0x0044, h01=0x0050, text=»* PLCNRR DEFINES THE NUMBER OF REMOTE PLC:S ACTUALLY CONN. (0-4)«, t00=0x0011, t01=0x0070}
0x01b40…01b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b8}
0x01b4a…01b5c Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0011, t01=0x00c2}
0x01b5c…01b70 Head {h00=0x0010, h01=0x0050, text=»PLCNRR EQU 1«, t00=0x0011, t01=0x00d4}
0x01b70…01b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e8}
0x01b7a…01b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f2}
0x01b84…01b92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x00fc}
0x01b92…01b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010a}
0x01b9c…01bb2 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0011, t01=0x0114}
0x01bb2…01bc8 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0011, t01=0x012a}
0x01bc8…01bde Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0011, t01=0x0140}
0x01bde…01be8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0156}
0x01be8…01c10 Head {h00=0x0024, h01=0x0050, text=»* SYSTEM PARAMETER DEFINITION«, t00=0x0011, t01=0x0160}
0x01c10…01c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0188}
0x01c1a…01c4a (18, 0, 400) Head {h00=0x002c, h01=0x0050, text=»* LEVEL 3 FLOW CONTROL WINDOW SIZE (1-7)«, t00=0x0012, t01=0x0004}
0x01c4a…01c5e Head {h00=0x0010, h01=0x0050, text=»WINDOW EQU 2«, t00=0x0012, t01=0x0034}
0x01c5e…01c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0048}
0x01c68…01ca0 Head {h00=0x0034, h01=0x0050, text=»* MAXIMAL NUMBER OF WORK STATIONS PER PLC (1-32)«, t00=0x0012, t01=0x0052}
0x01ca0…01cb4 Head {h00=0x0010, h01=0x0050, text=»MAXWS EQU 32«, t00=0x0012, t01=0x008a}
0x01cb4…01cbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x009e}
0x01cbe…01d00 Head {h00=0x003e, h01=0x0050, text=»* DELAY BEFORE EXECUTING "TEST CU" AT RESTART. (IN 100 MS)«, t00=0x0012, t01=0x00a8}
0x01d00…01d22 Head {h00=0x001e, h01=0x0050, text=»STADLY EQU 100 10 SECONDS «, t00=0x0012, t01=0x00ea}
0x01d22…01d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x010c}
0x01d2c…01d72 Head {h00=0x0042, h01=0x0050, text=»* LENGTH OF USER PART OF SHORT OUTPUT BUFFER IN WORDS (1-128) «, t00=0x0012, t01=0x0116}
0x01d72…01d86 Head {h00=0x0010, h01=0x0050, text=»SOBUFU EQU 3«, t00=0x0012, t01=0x015c}
0x01d86…01d90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0170}
0x01d90…01dd6 Head {h00=0x0042, h01=0x0050, text=»* LENGTH OF USER PART OF GENERAL READ BUFFER IN WORDS (1-128) «, t00=0x0012, t01=0x017a}
0x01dd6…01dec Head {h00=0x0012, h01=0x0050, text=»GRBUFU EQU 70 «, t00=0x0013, t01=0x0030}
0x01dec…01df6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0046}
0x01df6…01e22 Head {h00=0x0028, h01=0x0050, text=»* INACTIVITY TIMER (MINUTES) «, t00=0x0013, t01=0x0050}
0x01e22…01e3c Head {h00=0x0016, h01=0x0050, text=»TIMACT EQU 3 U =8 «, t00=0x0013, t01=0x007c}
0x01e3c…01e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0096}
0x01e46…01e94 Head {h00=0x004a, h01=0x0050, text=»* POLLING FREQUENCY (L BYTE) & NUMBER OF RETRANSMISSIONS (R BYTE) =11 «, t00=0x0013, t01=0x00a0}
0x01e94…01eb6 Head {h00=0x001e, h01=0x0050, text=»POLRTL EQU /1805 LOCAL =11«, t00=0x0013, t01=0x00ee}
0x01eb6…01eda Head {h00=0x0020, h01=0x0050, text=»POLRTR EQU /0D05 REMOTE =11 «, t00=0x0013, t01=0x0110}
0x01eda…01ee4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0134}
0x01ee4…01f24 Head {h00=0x003c, h01=0x0050, text=»* IF PLCTST IS 1 THE PLC DIAGNOSTIC COMMANDS ARE HANDLED«, t00=0x0013, t01=0x013e}
0x01f24…01f3e Head {h00=0x0016, h01=0x0050, text=»* BY THIS DRIVER. «, t00=0x0013, t01=0x017e}
0x01f3e…01f48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0008}
0x01f48…01f5c Head {h00=0x0010, h01=0x0050, text=»PLCTST EQU 0«, t00=0x0014, t01=0x0012}
0x01f5c…01f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0026}
0x01f66…01f70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0030}
0x01f70…01fb8 Head {h00=0x0044, h01=0x0050, text=»* A TEST VERSION OF THE DRIVER IS OBTAINED BY SETTING UTTEST><0 «, t00=0x0014, t01=0x003a}
0x01fb8…01ffc Head {h00=0x0040, h01=0x0050, text=»* IF UTTEST=1 THE TEST CODE IS INCLUDUD BUT TRAP IS NOT USED«, t00=0x0014, t01=0x0082}
0x01ffc…0203c Head {h00=0x003c, h01=0x0050, text=»* IF UTTEST=2 THE TEST CODE IS INCLUDED AND TRAP IS USED«, t00=0x0014, t01=0x00c6}
0x0203c…02046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0106}
0x02046…0205a Head {h00=0x0010, h01=0x0050, text=»UTTEST EQU 0«, t00=0x0014, t01=0x0110}
0x0205a…02064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0124}
0x02064…0206e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x012e}
0x0206e…020a8 Head {h00=0x0036, h01=0x0050, text=»* LOBUFN IS THE NUMBER OF LONG OUTPUT BUFFERS USED«, t00=0x0014, t01=0x0138}
0x020a8…020c6 Head {h00=0x001a, h01=0x0050, text=»* FOR EACH PLC (1-32) «, t00=0x0014, t01=0x0172}
0x020c6…020d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0190}
0x020d0…020e4 Head {h00=0x0010, h01=0x0050, text=»LOBUFN EQU 3«, t00=0x0015, t01=0x000a}
0x020e4…020ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x001e}
0x020ee…020f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0028}
0x020f8…02132 Head {h00=0x0036, h01=0x0050, text=»* LOBUFU IS THE LENGTH OF THE USER PART OF A LONG «, t00=0x0015, t01=0x0032}
0x02132…0215a Head {h00=0x0024, h01=0x0050, text=»* OUTPUT BUFFER IN WORDS (1-128)«, t00=0x0015, t01=0x006c}
0x0215a…02164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0094}
0x02164…02184 Head {h00=0x001c, h01=0x0050, text=»LOBUFU EQU 128 U =6,=16 «, t00=0x0015, t01=0x009e}
0x02184…0218e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00be}
0x0218e…0219c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x00c8}
0x0219c…021a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d6}
0x021a6…021cc Head {h00=0x0022, h01=0x0050, text=»* HARDWARE INTERRUPT LEVELS«, t00=0x0015, t01=0x00e0}
0x021cc…02200 Head {h00=0x0030, h01=0x0050, text=»* THESE LEVELS MUST CORRESPOND TO INTERRUPT «, t00=0x0015, t01=0x0106}
0x02200…0221a Head {h00=0x0016, h01=0x0050, text=»* VECTOR IN SYSTAB«, t00=0x0015, t01=0x013a}
0x0221a…02224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0154}
0x02224…02246 Head {h00=0x001e, h01=0x0050, text=»INTLV0 EQU 26 PLC NUMBER 1«, t00=0x0015, t01=0x015e}
0x02246…02268 Head {h00=0x001e, h01=0x0050, text=»INTLV1 EQU 27 PLC NUMBER 2«, t00=0x0015, t01=0x0180}
0x02268…0228a Head {h00=0x001e, h01=0x0050, text=»INTLV2 EQU 24 PLC NUMBER 3«, t00=0x0016, t01=0x0012}
0x0228a…022ac Head {h00=0x001e, h01=0x0050, text=»INTLV3 EQU 25 PLC NUMBER 4«, t00=0x0016, t01=0x0034}
0x022ac…022d6 Head {h00=0x0026, h01=0x0050, text=»INTRV0 EQU 18 PLC NUMBER 5, REMOTE«, t00=0x0016, t01=0x0056}
0x022d6…02300 Head {h00=0x0026, h01=0x0050, text=»INTRV1 EQU 19 6, REMOTE«, t00=0x0016, t01=0x0080}
0x02300…0232a Head {h00=0x0026, h01=0x0050, text=»INTRV2 EQU 20 7, REMOTE«, t00=0x0016, t01=0x00aa}
0x0232a…02354 Head {h00=0x0026, h01=0x0050, text=»INTRV3 EQU 21 8, REMOTE«, t00=0x0016, t01=0x00d4}
0x02354…0235e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00fe}
0x0235e…02388 Head {h00=0x0026, h01=0x0050, text=»* CHANNEL UNIT DEVICE ADDRESSES«, t00=0x0016, t01=0x0108}
0x02388…02392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0132}
0x02392…023ae Head {h00=0x0018, h01=0x0050, text=»PLCDA0 EQU /06 PLC 1«, t00=0x0016, t01=0x013c}
0x023ae…023ca Head {h00=0x0018, h01=0x0050, text=»PLCDA1 EQU /07 PLC 2«, t00=0x0016, t01=0x0158}
0x023ca…023e6 Head {h00=0x0018, h01=0x0050, text=»PLCDA2 EQU /26 PLC 3«, t00=0x0016, t01=0x0174}
0x023e6…02402 Head {h00=0x0018, h01=0x0050, text=»PLCDA3 EQU /27 PLC 4«, t00=0x0016, t01=0x0190}
0x02402…0241e Head {h00=0x0018, h01=0x0050, text=»PLCDA4 EQU /3A PLC 5«, t00=0x0017, t01=0x001c}
0x0241e…0243a Head {h00=0x0018, h01=0x0050, text=»PLCDA5 EQU /3B PLC 6«, t00=0x0017, t01=0x0038}
0x0243a…02456 Head {h00=0x0018, h01=0x0050, text=»PLCDA6 EQU /2A PLC 7«, t00=0x0017, t01=0x0054}
0x02456…02472 Head {h00=0x0018, h01=0x0050, text=»PLCDA7 EQU /2B PLC 8«, t00=0x0017, t01=0x0070}
0x02472…0247c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x008c}
0x0247c…0248a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0096}
0x0248a…02494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00a4}
0x02494…024c2 Head {h00=0x002a, h01=0x0050, text=»* BUFFER AREA PARAMETER DEFINITION «, t00=0x0017, t01=0x00ae}
0x024c2…024cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00dc}
0x024cc…024fe Head {h00=0x002e, h01=0x0050, text=»HEADLW EQU 4 BUFFER HEADER LENGTH (WORDS) «, t00=0x0017, t01=0x00e6}
0x024fe…02534 Head {h00=0x0032, h01=0x0050, text=»FLOWLW EQU 2 FLOW CONTROL FIELD LENGTH (WORDS)«, t00=0x0017, t01=0x0118}
0x02534…0256a Head {h00=0x0032, h01=0x0050, text=»SYSTLW EQU HEADLW+FLOWLW SYSTEM PART OF BUFFER«, t00=0x0017, t01=0x014e}
0x0256a…02574 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0184}
0x02574…02596 Head {h00=0x001e, h01=0x0050, text=»* LONG OUTPUT BUFFERS«, t00=0x0017, t01=0x018e}
0x02596…025d4 Head {h00=0x003a, h01=0x0050, text=»LOBUF1 EQU SYSTLW+LOBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0018, t01=0x0020}
0x025d4…025fe Head {h00=0x0026, h01=0x0050, text=»LOBUF2 EQU LOBUF1+LOBUF1 2 BUFFERS«, t00=0x0018, t01=0x005e}
0x025fe…0261e Head {h00=0x001c, h01=0x0050, text=»LOBUF3 EQU LOBUF2+LOBUF1«, t00=0x0018, t01=0x0088}
0x0261e…0263e Head {h00=0x001c, h01=0x0050, text=»LOBUF4 EQU LOBUF3+LOBUF1«, t00=0x0018, t01=0x00a8}
0x0263e…0265e Head {h00=0x001c, h01=0x0050, text=»LOBUF5 EQU LOBUF4+LOBUF1«, t00=0x0018, t01=0x00c8}
0x0265e…0267e Head {h00=0x001c, h01=0x0050, text=»LOBUF6 EQU LOBUF5+LOBUF1«, t00=0x0018, t01=0x00e8}
0x0267e…026a4 Head {h00=0x0022, h01=0x0050, text=»LOBUF7 EQU LOBUF6+LOBUF1 . =17«, t00=0x0018, t01=0x0108}
0x026a4…026ca Head {h00=0x0022, h01=0x0050, text=»LOBUF8 EQU LOBUF7+LOBUF1 . =17«, t00=0x0018, t01=0x012e}
0x026ca…026f0 Head {h00=0x0022, h01=0x0050, text=»LOBUF9 EQU LOBUF8+LOBUF1 . =17«, t00=0x0018, t01=0x0154}
0x026f0…02716 Head {h00=0x0022, h01=0x0050, text=»LOBU10 EQU LOBUF9+LOBUF1 . =17«, t00=0x0018, t01=0x017a}
0x02716…0273c Head {h00=0x0022, h01=0x0050, text=»LOBU11 EQU LOBU10+LOBUF1 . =17«, t00=0x0019, t01=0x0010}
0x0273c…02762 Head {h00=0x0022, h01=0x0050, text=»LOBU12 EQU LOBU11+LOBUF1 . =17«, t00=0x0019, t01=0x0036}
0x02762…02788 Head {h00=0x0022, h01=0x0050, text=»LOBU13 EQU LOBU12+LOBUF1 . =17«, t00=0x0019, t01=0x005c}
0x02788…027ae Head {h00=0x0022, h01=0x0050, text=»LOBU14 EQU LOBU13+LOBUF1 . =17«, t00=0x0019, t01=0x0082}
0x027ae…027d4 Head {h00=0x0022, h01=0x0050, text=»LOBU15 EQU LOBU14+LOBUF1 . =17«, t00=0x0019, t01=0x00a8}
0x027d4…027fa Head {h00=0x0022, h01=0x0050, text=»LOBU16 EQU LOBU15+LOBUF1 . =17«, t00=0x0019, t01=0x00ce}
0x027fa…02820 Head {h00=0x0022, h01=0x0050, text=»LOBU17 EQU LOBU16+LOBUF1 . =17«, t00=0x0019, t01=0x00f4}
0x02820…02846 Head {h00=0x0022, h01=0x0050, text=»LOBU18 EQU LOBU17+LOBUF1 , =17«, t00=0x0019, t01=0x011a}
0x02846…0286c Head {h00=0x0022, h01=0x0050, text=»LOBU19 EQU LOBU18+LOBUF1 . =17«, t00=0x0019, t01=0x0140}
0x0286c…02892 Head {h00=0x0022, h01=0x0050, text=»LOBU20 EQU LOBU19+LOBUF1 . =17«, t00=0x0019, t01=0x0166}
0x02892…028b8 Head {h00=0x0022, h01=0x0050, text=»LOBU21 EQU LOBU20+LOBUF1 . =17«, t00=0x0019, t01=0x018c}
0x028b8…028de Head {h00=0x0022, h01=0x0050, text=»LOBU22 EQU LOBU21+LOBUF1 . =17«, t00=0x001a, t01=0x0022}
0x028de…02904 Head {h00=0x0022, h01=0x0050, text=»LOBU23 EQU LOBU22+LOBUF1 . =17«, t00=0x001a, t01=0x0048}
0x02904…0292a Head {h00=0x0022, h01=0x0050, text=»LOBU24 EQU LOBU23+LOBUF1 . =17«, t00=0x001a, t01=0x006e}
0x0292a…02950 Head {h00=0x0022, h01=0x0050, text=»LOBU25 EQU LOBU24+LOBUF1 . =17«, t00=0x001a, t01=0x0094}
0x02950…02976 Head {h00=0x0022, h01=0x0050, text=»LOBU26 EQU LOBU25+LOBUF1 . =17«, t00=0x001a, t01=0x00ba}
0x02976…0299c Head {h00=0x0022, h01=0x0050, text=»LOBU27 EQU LOBU26+LOBUF1 . =17«, t00=0x001a, t01=0x00e0}
0x0299c…029c2 Head {h00=0x0022, h01=0x0050, text=»LOBU28 EQU LOBU27+LOBUF1 . =17«, t00=0x001a, t01=0x0106}
0x029c2…029e8 Head {h00=0x0022, h01=0x0050, text=»LOBU29 EQU LOBU28+LOBUF1 . =17«, t00=0x001a, t01=0x012c}
0x029e8…02a0e Head {h00=0x0022, h01=0x0050, text=»LOBU30 EQU LOBU29+LOBUF1 . =17«, t00=0x001a, t01=0x0152}
0x02a0e…02a34 Head {h00=0x0022, h01=0x0050, text=»LOBU31 EQU LOBU30+LOBUF1 . =17«, t00=0x001a, t01=0x0178}
0x02a34…02a5a Head {h00=0x0022, h01=0x0050, text=»LOBU32 EQU LOBU31+LOBUF1 . =17«, t00=0x001b, t01=0x000e}
0x02a5a…02a70 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=1 «, t00=0x001b, t01=0x0034}
0x02a70…02aa8 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF1 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001b, t01=0x004a}
0x02aa8…02ab4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0082}
0x02ab4…02aca Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=2 «, t00=0x001b, t01=0x008e}
0x02aca…02b02 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF2 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001b, t01=0x00a4}
0x02b02…02b0e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00dc}
0x02b0e…02b24 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=3 «, t00=0x001b, t01=0x00e8}
0x02b24…02b5c Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF3 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001b, t01=0x00fe}
0x02b5c…02b68 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0136}
0x02b68…02b7e Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=4 «, t00=0x001b, t01=0x0142}
0x02b7e…02bb6 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF4 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001b, t01=0x0158}
0x02bb6…02bc2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0190}
0x02bc2…02bd8 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=5 «, t00=0x001c, t01=0x000c}
0x02bd8…02c10 Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF5 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001c, t01=0x0022}
0x02c10…02c1c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x005a}
0x02c1c…02c32 Head {h00=0x0012, h01=0x0050, text=» IFT LOBUFN=6 «, t00=0x001c, t01=0x0066}
0x02c32…02c6a Head {h00=0x0034, h01=0x0050, text=»LOBUFS EQU LOBUF6 LENGTH OF BUFFER AREA (WORDS) «, t00=0x001c, t01=0x007c}
0x02c6a…02c76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00b4}
0x02c76…02c92 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=7 . =17 «, t00=0x001c, t01=0x00c0}
0x02c92…02cb2 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBUF7 . =17 «, t00=0x001c, t01=0x00dc}
0x02cb2…02cbe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00fc}
0x02cbe…02cda Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=8 . =17 «, t00=0x001c, t01=0x0108}
0x02cda…02cfa Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBUF8 . =17 «, t00=0x001c, t01=0x0124}
0x02cfa…02d06 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0144}
0x02d06…02d22 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=9 . =17 «, t00=0x001c, t01=0x0150}
0x02d22…02d42 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBUF9 . =17 «, t00=0x001c, t01=0x016c}
0x02d42…02d4e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x018c}
0x02d4e…02d6a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=10 . =17«, t00=0x001d, t01=0x0008}
0x02d6a…02d8a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU10 . =17 «, t00=0x001d, t01=0x0024}
0x02d8a…02d96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0044}
0x02d96…02db2 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=11 . =17«, t00=0x001d, t01=0x0050}
0x02db2…02dd2 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU11 . =17 «, t00=0x001d, t01=0x006c}
0x02dd2…02dde Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x008c}
0x02dde…02dfa Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=12 . =17«, t00=0x001d, t01=0x0098}
0x02dfa…02e1a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU12 . =17 «, t00=0x001d, t01=0x00b4}
0x02e1a…02e26 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x00d4}
0x02e26…02e42 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=13 . =17«, t00=0x001d, t01=0x00e0}
0x02e42…02e62 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU13 . =17 «, t00=0x001d, t01=0x00fc}
0x02e62…02e6e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x011c}
0x02e6e…02e8a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=14 . =17«, t00=0x001d, t01=0x0128}
0x02e8a…02eaa Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU14 . =17 «, t00=0x001d, t01=0x0144}
0x02eaa…02eb6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0164}
0x02eb6…02ed2 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=15 . =17«, t00=0x001d, t01=0x0170}
0x02ed2…02ef2 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU15 . =17 «, t00=0x001d, t01=0x018c}
0x02ef2…02efe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x001c}
0x02efe…02f1a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=16 . =17«, t00=0x001e, t01=0x0028}
0x02f1a…02f3a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU16 . =17 «, t00=0x001e, t01=0x0044}
0x02f3a…02f46 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0064}
0x02f46…02f62 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=17 . =17«, t00=0x001e, t01=0x0070}
0x02f62…02f82 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU17 . =17 «, t00=0x001e, t01=0x008c}
0x02f82…02f8e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00ac}
0x02f8e…02faa Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=18 . =17«, t00=0x001e, t01=0x00b8}
0x02faa…02fca Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU18 . =17 «, t00=0x001e, t01=0x00d4}
0x02fca…02fd6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00f4}
0x02fd6…02ff2 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=19 . =17«, t00=0x001e, t01=0x0100}
0x02ff2…03012 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU19 . =17 «, t00=0x001e, t01=0x011c}
0x03012…0301e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x013c}
0x0301e…0303a Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=20 . =17«, t00=0x001e, t01=0x0148}
0x0303a…0305a Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU20 . =17 «, t00=0x001e, t01=0x0164}
0x0305a…03066 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0184}
0x03066…03082 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=21 . =17«, t00=0x001e, t01=0x0190}
0x03082…030a2 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU21 . =17 «, t00=0x001f, t01=0x001c}
0x030a2…030ae Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x003c}
0x030ae…030ca Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=22 . =17«, t00=0x001f, t01=0x0048}
0x030ca…030ea Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU22 . =17 «, t00=0x001f, t01=0x0064}
0x030ea…030f6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0084}
0x030f6…03110 Head {h00=0x0016, h01=0x0050, text=» IFT LOBUFN=23 .17«, t00=0x001f, t01=0x0090}
0x03110…03130 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU23 . =17 «, t00=0x001f, t01=0x00aa}
0x03130…0313c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00ca}
0x0313c…03158 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=24 . =17«, t00=0x001f, t01=0x00d6}
0x03158…03178 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU24 . =17 «, t00=0x001f, t01=0x00f2}
0x03178…03184 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0112}
0x03184…031a0 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=25 . =17«, t00=0x001f, t01=0x011e}
0x031a0…031c0 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU25 . =17 «, t00=0x001f, t01=0x013a}
0x031c0…031cc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x015a}
0x031cc…031e8 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=26 . =17«, t00=0x001f, t01=0x0166}
0x031e8…03208 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU26 . =17 «, t00=0x001f, t01=0x0182}
0x03208…03214 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0012}
0x03214…03230 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=27 . =17«, t00=0x0020, t01=0x001e}
0x03230…03250 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU27 . =17 «, t00=0x0020, t01=0x003a}
0x03250…0325c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x005a}
0x0325c…03278 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=28 . =17«, t00=0x0020, t01=0x0066}
0x03278…03298 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU28 . =17 «, t00=0x0020, t01=0x0082}
0x03298…032a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00a2}
0x032a4…032c0 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=29 . =17«, t00=0x0020, t01=0x00ae}
0x032c0…032e0 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU29 . =17 «, t00=0x0020, t01=0x00ca}
0x032e0…032ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00ea}
0x032ec…03308 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=30 . =17«, t00=0x0020, t01=0x00f6}
0x03308…03328 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU30 . =17 «, t00=0x0020, t01=0x0112}
0x03328…03334 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0132}
0x03334…03350 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=31 . =17«, t00=0x0020, t01=0x013e}
0x03350…03370 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU31 . =17 «, t00=0x0020, t01=0x015a}
0x03370…0337c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x017a}
0x0337c…03398 Head {h00=0x0018, h01=0x0050, text=» IFT LOBUFN=32 . =17«, t00=0x0020, t01=0x0186}
0x03398…033b8 Head {h00=0x001c, h01=0x0050, text=»LOBUFS EQU LOBU32 . =17 «, t00=0x0021, t01=0x0012}
0x033b8…033c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0032}
0x033c4…033ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x003e}
0x033ce…033dc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0048}
0x033dc…033e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0056}
0x033e6…0340a Head {h00=0x0020, h01=0x0050, text=»* SHORT OUTPUT BUFFERS «, t00=0x0021, t01=0x0060}
0x0340a…03448 Head {h00=0x003a, h01=0x0050, text=»SOBUF1 EQU SYSTLW+SOBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0021, t01=0x0084}
0x03448…03472 Head {h00=0x0026, h01=0x0050, text=»SOBUF2 EQU SOBUF1+SOBUF1 2 BUFFERS«, t00=0x0021, t01=0x00c2}
0x03472…03492 Head {h00=0x001c, h01=0x0050, text=»SOBUF4 EQU SOBUF2+SOBUF2«, t00=0x0021, t01=0x00ec}
0x03492…034b2 Head {h00=0x001c, h01=0x0050, text=»SOBUF8 EQU SOBUF4+SOBUF4«, t00=0x0021, t01=0x010c}
0x034b2…034ea Head {h00=0x0034, h01=0x0050, text=»SOBUFS EQU SOBUF8 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0021, t01=0x012c}
0x034ea…034f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0164}
0x034f4…03518 Head {h00=0x0020, h01=0x0050, text=»* GENERAL READ BUFFERS «, t00=0x0021, t01=0x016e}
0x03518…03556 (34, 0, 398) Head {h00=0x003a, h01=0x0050, text=»GRBUF1 EQU SYSTLW+GRBUFU LENGTH OF ONE BUFFER (WORDS) «, t00=0x0022, t01=0x0004}
0x03556…03576 Head {h00=0x001c, h01=0x0050, text=»GRBUF2 EQU GRBUF1+GRBUF1«, t00=0x0022, t01=0x0042}
0x03576…035ae Head {h00=0x0034, h01=0x0050, text=»GRBUFS EQU GRBUF2 LENGTH OF BUFFER AREA (WORDS) «, t00=0x0022, t01=0x0062}
0x035ae…035b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x009a}
0x035b8…035ee Head {h00=0x0032, h01=0x0050, text=»* LENGTHS OF USER PART OF BUFFERS (BYTES)«, t00=0x0022, t01=0x00a4}
0x035ee…03624 Head {h00=0x0032, h01=0x0050, text=»SOBUFL EQU SOBUFU+SOBUFU SHORT OUTPUT BUFFERS «, t00=0x0022, t01=0x00da}
0x03624…03658 Head {h00=0x0030, h01=0x0050, text=»LOBUFL EQU LOBUFU+LOBUFU LONG OUTPUT BUFFERS«, t00=0x0022, t01=0x0110}
0x03658…0368e Head {h00=0x0032, h01=0x0050, text=»GRBUFL EQU GRBUFU+GRBUFU GENERAL READ BUFFERS «, t00=0x0022, t01=0x0144}
0x0368e…03698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x017a}
0x03698…036a6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0184}
0x036a6…036b0 (35, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0004}
0x036b0…036e4 Head {h00=0x0030, h01=0x0050, text=»* CONTROLLER COMMAND RECORD (CCR) LAYOUT «, t00=0x0023, t01=0x000e}
0x036e4…036ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0042}
0x036ee…0371a Head {h00=0x0028, h01=0x0050, text=»CCRDLS EQU 0 DATA LINK STATION INDEX«, t00=0x0023, t01=0x004c}
0x0371a…0373c Head {h00=0x001e, h01=0x0050, text=»CCRCMD EQU 1 COMMAND CODE «, t00=0x0023, t01=0x0078}
0x0373c…03762 Head {h00=0x0022, h01=0x0050, text=»CCRSU1 EQU 2 SUBCOMMAND BYTE 1«, t00=0x0023, t01=0x009a}
0x03762…03788 Head {h00=0x0022, h01=0x0050, text=»CCRSU2 EQU 3 SUBCOMMAND BYTE 2«, t00=0x0023, t01=0x00c0}
0x03788…037ac Head {h00=0x0020, h01=0x0050, text=»CCRSUB EQU 2 SUBCOMMAND WORD«, t00=0x0023, t01=0x00e6}
0x037ac…037cc Head {h00=0x001c, h01=0x0050, text=»CCRSTA EQU 4 STATUS WORD«, t00=0x0023, t01=0x010a}
0x037cc…037f6 Head {h00=0x0026, h01=0x0050, text=»CCRIDB EQU 7 IDENTITY, BYTE FIELD «, t00=0x0023, t01=0x012a}
0x037f6…03820 Head {h00=0x0026, h01=0x0050, text=»CCRIDW EQU 8 IDENTITY, WORD FIELD «, t00=0x0023, t01=0x0154}
0x03820…0384c Head {h00=0x0028, h01=0x0050, text=»CCRLEN EQU 10 BUFFER LENGTH (BYTES) «, t00=0x0023, t01=0x017e}
0x0384c…03886 Head {h00=0x0036, h01=0x0050, text=»CCRC1B EQU 12 DATA CHAINING CTRL & MSB BUFFER ADDR«, t00=0x0024, t01=0x001a}
0x03886…038aa Head {h00=0x0020, h01=0x0050, text=»CCRBUF EQU 14 BUFFER ADDRESS«, t00=0x0024, t01=0x0054}
0x038aa…038b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0078}
0x038b4…038be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0082}
0x038be…038d8 Head {h00=0x0016, h01=0x0050, text=»* BUFFER LAYOUT«, t00=0x0024, t01=0x008c}
0x038d8…038e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00a6}
0x038e2…038fe Head {h00=0x0018, h01=0x0050, text=»* HEADER LENGTH«, t00=0x0024, t01=0x00b0}
0x038fe…0392e Head {h00=0x002c, h01=0x0050, text=»BUFHLN EQU HEADLW+HEADLW LENGTH (BYTES) «, t00=0x0024, t01=0x00cc}
0x0392e…0394a Head {h00=0x0018, h01=0x0050, text=»* HEADER LAYOUT«, t00=0x0024, t01=0x00fc}
0x0394a…0396e Head {h00=0x0020, h01=0x0050, text=»BUFLNK EQU -8 FREE LIST LINK«, t00=0x0024, t01=0x0118}
0x0396e…03990 Head {h00=0x001e, h01=0x0050, text=»BUFDWT EQU -6 DWT ADDRESS «, t00=0x0024, t01=0x013c}
0x03990…039be Head {h00=0x002a, h01=0x0050, text=»BUFLEN EQU -4 LENGTH OF TEXT IN BUFFER«, t00=0x0024, t01=0x015e}
0x039be…039de Head {h00=0x001c, h01=0x0050, text=»BUFBIX EQU -2 BYTE INDEX«, t00=0x0024, t01=0x018c}
0x039de…03a06 Head {h00=0x0024, h01=0x0050, text=»* X25 CONTROL FIELD LAYOUT «, t00=0x0025, t01=0x001c}
0x03a06…03a38 Head {h00=0x002e, h01=0x0050, text=»X25LGN EQU 0 LOGICAL CHANNEL GROUP NUMBER «, t00=0x0025, t01=0x0044}
0x03a38…03a64 Head {h00=0x0028, h01=0x0050, text=»X25LCN EQU 1 LOGICAL CHANNEL NUMBER «, t00=0x0025, t01=0x0076}
0x03a64…03a92 Head {h00=0x002a, h01=0x0050, text=»X25FLW EQU 2 FLOW CONTROL INFORMATION «, t00=0x0025, t01=0x00a2}
0x03a92…03aba Head {h00=0x0024, h01=0x0050, text=»X25DAT EQU 3 START OF USER DATA «, t00=0x0025, t01=0x00d0}
0x03aba…03ac4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00f8}
0x03ac4…03ad2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0102}
0x03ad2…03adc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0110}
0x03adc…03afa Head {h00=0x001a, h01=0x0050, text=»* PLC COMMAND CODES«, t00=0x0025, t01=0x011a}
0x03afa…03b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0138}
0x03b04…03b2c Head {h00=0x0024, h01=0x0050, text=»CMDTC EQU /80 TEST CHANNEL UNIT «, t00=0x0025, t01=0x0142}
0x03b2c…03b4c Head {h00=0x001c, h01=0x0050, text=»CMDOP EQU /86 OPEN LINE «, t00=0x0025, t01=0x016a}
0x03b4c…03b6a Head {h00=0x001a, h01=0x0050, text=»CMDOD EQU /85 OPEN DLS«, t00=0x0025, t01=0x018a}
0x03b6a…03b94 Head {h00=0x0026, h01=0x0050, text=»CMDPS EQU /84 GET LINE STATISTICS «, t00=0x0026, t01=0x0018}
0x03b94…03bbc Head {h00=0x0024, h01=0x0050, text=»CMDDS EQU /83 GET DLS STATISTICS«, t00=0x0026, t01=0x0042}
0x03bbc…03be4 Head {h00=0x0024, h01=0x0050, text=»CMDRM EQU /87 READ LOCAL MEMORY «, t00=0x0026, t01=0x006a}
0x03be4…03c08 Head {h00=0x0020, h01=0x0050, text=»CMDSW EQU /40 STANDARD WRITE«, t00=0x0026, t01=0x0092}
0x03c08…03c28 Head {h00=0x001c, h01=0x0050, text=»CMDFW EQU /41 FAST WRITE«, t00=0x0026, t01=0x00b6}
0x03c28…03c4a Head {h00=0x001e, h01=0x0050, text=»CMDGR EQU /20 GENERAL READ«, t00=0x0026, t01=0x00d6}
0x03c4a…03c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f8}
0x03c54…03c5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0102}
0x03c5e…03c8a Head {h00=0x0028, h01=0x0050, text=»* APPLICATION TEST COMMAND CODES «, t00=0x0026, t01=0x010c}
0x03c8a…03c94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0138}
0x03c94…03cbc Head {h00=0x0024, h01=0x0050, text=»ORDPS EQU 1 GET LINE STATISTICS «, t00=0x0026, t01=0x0142}
0x03cbc…03ce2 Head {h00=0x0022, h01=0x0050, text=»ORDDS EQU 2 GER DLS STATISTICS«, t00=0x0026, t01=0x016a}
0x03ce2…03d08 Head {h00=0x0022, h01=0x0050, text=»ORDRM EQU 3 READ LOCAL MEMORY «, t00=0x0026, t01=0x0190}
0x03d08…03d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0026}
0x03d12…03d1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0030}
0x03d1c…03d36 Head {h00=0x0016, h01=0x0050, text=»* MESSAGE TYPES«, t00=0x0027, t01=0x003a}
0x03d36…03d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0054}
0x03d40…03d6a Head {h00=0x0026, h01=0x0050, text=»TYERR EQU 0 ILLEGAL TYPE OR ERROR «, t00=0x0027, t01=0x005e}
0x03d6a…03da0 Head {h00=0x0032, h01=0x0050, text=»TYNFLO EQU 2 DATA PACKET WITH NO FLOW CONTROL «, t00=0x0027, t01=0x0088}
0x03da0…03dca Head {h00=0x0026, h01=0x0050, text=»TYSTAT EQU 4 DEVICE STATUS MESSAGE«, t00=0x0027, t01=0x00be}
0x03dca…03df2 Head {h00=0x0024, h01=0x0050, text=»TYDATA EQU 6 NORMAL DATA PACKET «, t00=0x0027, t01=0x00e8}
0x03df2…03e1a Head {h00=0x0024, h01=0x0050, text=»TYRR EQU 8 RECIEVE READY PACKET «, t00=0x0027, t01=0x0110}
0x03e1a…03e3c Head {h00=0x001e, h01=0x0050, text=»TYRES EQU 10 RESET PACKET «, t00=0x0027, t01=0x0138}
0x03e3c…03e6c Head {h00=0x002c, h01=0x0050, text=»TYRESC EQU 12 RESET CONFIRMATION PACKET «, t00=0x0027, t01=0x015a}
0x03e6c…03e76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x018a}
0x03e76…03e84 (40, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0004}
0x03e84…03e8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0012}
0x03e8e…03eb4 Head {h00=0x0022, h01=0x0050, text=»* DWT STATUS FLAGS (DWTST) «, t00=0x0028, t01=0x001c}
0x03eb4…03ebe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0042}
0x03ebe…03ee6 Head {h00=0x0024, h01=0x0050, text=»DWFBSY EQU /8000 DEVICE NOT BUSY«, t00=0x0028, t01=0x004c}
0x03ee6…03f08 Head {h00=0x001e, h01=0x0050, text=»DWFECH EQU /2000 ECHO MODE«, t00=0x0028, t01=0x0074}
0x03f08…03f30 Head {h00=0x0024, h01=0x0050, text=»DWFINP EQU /0020 INPUT REQUESTED«, t00=0x0028, t01=0x0096}
0x03f30…03f5e Head {h00=0x002a, h01=0x0050, text=»DWFRES EQU /0008 RESET SEQUENCE ACTIVE«, t00=0x0028, t01=0x00be}
0x03f5e…03f8e Head {h00=0x002c, h01=0x0050, text=»DWFAK3 EQU /0004 WAITING FOR LEVEL 3 ACK«, t00=0x0028, t01=0x00ec}
0x03f8e…03fb8 Head {h00=0x0026, h01=0x0050, text=»DWFPLC EQU DWFRES+DWFAK3 PLC FLAGS«, t00=0x0028, t01=0x011c}
0x03fb8…03fee Head {h00=0x0032, h01=0x0050, text=»DWFTY1 EQU /0002 USE ONLY TYPE 1 DATA PACKETS «, t00=0x0028, t01=0x0146}
0x03fee…0401c Head {h00=0x002a, h01=0x0050, text=»DWFSAC EQU /0001 WAIT FOR LEVEL 3 ACK «, t00=0x0028, t01=0x017c}
0x0401c…04026 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x001a}
0x04026…04030 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0024}
0x04030…04056 Head {h00=0x0022, h01=0x0050, text=»* PLC STATUS FLAGS (CCRSTA)«, t00=0x0029, t01=0x002e}
0x04056…04060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0054}
0x04060…04086 Head {h00=0x0022, h01=0x0050, text=»STANOC EQU /0001 NO CONNECTION«, t00=0x0029, t01=0x005e}
0x04086…040aa Head {h00=0x0020, h01=0x0050, text=»STALIR EQU /0004 LINK RESET «, t00=0x0029, t01=0x0084}
0x040aa…040d4 Head {h00=0x0026, h01=0x0050, text=»STADNO EQU /1000 DCE NOT OPERABLE «, t00=0x0029, t01=0x00a8}
0x040d4…040fa Head {h00=0x0022, h01=0x0050, text=»STAE1 EQU STANOC+STALIR DUMMY «, t00=0x0029, t01=0x00d2}
0x040fa…04130 Head {h00=0x0032, h01=0x0050, text=»STAERR EQU STAE1+STADNO ERROR IN COMMUNICATION«, t00=0x0029, t01=0x00f8}
0x04130…0413a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x012e}
0x0413a…04160 Head {h00=0x0022, h01=0x0050, text=»STAREQ EQU /8000 REQUEST ERROR«, t00=0x0029, t01=0x0138}
0x04160…0418c Head {h00=0x0028, h01=0x0050, text=»STANOB EQU /0800 NO BUFFERS FOR CCR «, t00=0x0029, t01=0x015e}
0x0418c…041b4 Head {h00=0x0024, h01=0x0050, text=»STAPOL EQU /0100 POLLING STOPPED«, t00=0x0029, t01=0x018a}
0x041b4…041e8 Head {h00=0x0030, h01=0x0050, text=»STACOM EQU /0080 COMMUNICATION REESTABLISHED«, t00=0x002a, t01=0x0022}
0x041e8…04210 Head {h00=0x0024, h01=0x0050, text=»STASEQ EQU /0010 SEQUENCE ERROR «, t00=0x002a, t01=0x0056}
0x04210…04238 Head {h00=0x0024, h01=0x0050, text=»STAILL EQU /0008 ILLEGAL LENGTH «, t00=0x002a, t01=0x007e}
0x04238…0425c Head {h00=0x0020, h01=0x0050, text=»STALER EQU /0002 LINK ERROR «, t00=0x002a, t01=0x00a6}
0x0425c…04266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ca}
0x04266…04274 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x00d4}
0x04274…0427e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e2}
0x0427e…042a4 Head {h00=0x0022, h01=0x0050, text=»* WORK STATION STATUS FLAGS«, t00=0x002a, t01=0x00ec}
0x042a4…042ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0112}
0x042ae…042d8 Head {h00=0x0026, h01=0x0050, text=»WSFERR EQU /01 COMMUNICATION ERROR«, t00=0x002a, t01=0x011c}
0x042d8…042e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0146}
0x042e2…042ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0150}
0x042ec…04316 Head {h00=0x0026, h01=0x0050, text=»* MASKS FOR CHANNEL PARAMETERS «, t00=0x002a, t01=0x015a}
0x04316…04320 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0184}
0x04320…0434c Head {h00=0x0028, h01=0x0050, text=»MASKPL EQU /0F PLC NUMBER (0-3 USED)«, t00=0x002a, t01=0x018e}
0x0434c…04382 Head {h00=0x0032, h01=0x0050, text=»MASKWS EQU /3F WORK STATION NUMBER (1-32 USED)«, t00=0x002b, t01=0x002a}
0x04382…043b4 Head {h00=0x002e, h01=0x0050, text=»MASKLC EQU /3F LOGICAL CHANNEL (0-7 USED) «, t00=0x002b, t01=0x0060}
0x043b4…043be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0092}
0x043be…043c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x009c}
0x043c8…043e2 Head {h00=0x0016, h01=0x0050, text=»* RETURN CODES «, t00=0x002b, t01=0x00a6}
0x043e2…043ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00c0}
0x043ec…0440c Head {h00=0x001c, h01=0x0050, text=»* AT REQUEST RETURN«, t00=0x002b, t01=0x00ca}
0x0440c…04432 Head {h00=0x0022, h01=0x0050, text=»NOTOPR EQU /0001 NOT OPERABLE «, t00=0x002b, t01=0x00ea}
0x04432…04456 Head {h00=0x0020, h01=0x0050, text=»LINERR EQU /0004 LINK ERROR «, t00=0x002b, t01=0x0110}
0x04456…0447e Head {h00=0x0024, h01=0x0050, text=»PLSERR EQU /0001 SOFTWARE ERROR «, t00=0x002b, t01=0x0134}
0x0447e…0449e Head {h00=0x001c, h01=0x0050, text=»* AT RECOVERY ENTRY«, t00=0x002b, t01=0x015c}
0x0449e…044c2 Head {h00=0x0020, h01=0x0050, text=»RETCP EQU /0001 TC POWER UP «, t00=0x002b, t01=0x017c}
0x044c2…044ee Head {h00=0x0028, h01=0x0050, text=»RESECP EQU /0002 SECONDARY POWER UP «, t00=0x002c, t01=0x0010}
0x044ee…04512 Head {h00=0x0020, h01=0x0050, text=»RELINE EQU /0004 LINK ERROR «, t00=0x002c, t01=0x003c}
0x04512…0451c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0060}
0x0451c…04526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x006a}
0x04526…04540 Head {h00=0x0016, h01=0x0050, text=»* MISCELLANEOUS«, t00=0x002c, t01=0x0074}
0x04540…0454a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x008e}
0x0454a…04578 Head {h00=0x002a, h01=0x0050, text=»PLCERR EQU /F1 SOP ERROR CODE AT TRAP «, t00=0x002c, t01=0x0098}
0x04578…045ac Head {h00=0x0030, h01=0x0050, text=»CIDINT EQU 8 OFFSET TO INTERRUPT DESCRIPTOR «, t00=0x002c, t01=0x00c6}
0x045ac…045e2 Head {h00=0x0032, h01=0x0050, text=»MAXFR EQU 4 MAX OUTSTANDING FRAMES ON LEVEL 2 «, t00=0x002c, t01=0x00fa}
0x045e2…04612 Head {h00=0x002c, h01=0x0050, text=»CHABLO EQU /80 FLAG CHANGED BLOCKING =16«, t00=0x002c, t01=0x0130}
0x04612…0461c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0160}
0x0461c…0462a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x016a}
0x0462a…04634 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0178}
0x04634…0464a Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x002c, t01=0x0182}
0x0464a…04660 Head {h00=0x0012, h01=0x0050, text=»* DATA AREAS *«, t00=0x002d, t01=0x0008}
0x04660…04676 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x002d, t01=0x001e}
0x04676…04680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0034}
0x04680…0469e Head {h00=0x001a, h01=0x0050, text=»* CWT ADDRESS TABLE«, t00=0x002d, t01=0x003e}
0x0469e…046a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x005c}
0x046a8…046bc Head {h00=0x0010, h01=0x0050, text=»CWTPLC EQU *«, t00=0x002d, t01=0x0066}
0x046bc…046d0 Head {h00=0x0010, h01=0x0050, text=»TABCWT EQU *«, t00=0x002d, t01=0x007a}
0x046d0…046e6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x002d, t01=0x008e}
0x046e6…0470c Head {h00=0x0022, h01=0x0050, text=» DATA PL0CWT CWT FOR PLC NR 1 «, t00=0x002d, t01=0x00a4}
0x0470c…04722 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x002d, t01=0x00ca}
0x04722…04748 Head {h00=0x0022, h01=0x0050, text=» DATA PL1CWT CWT FOR PLC NR 2 «, t00=0x002d, t01=0x00e0}
0x04748…0475e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x002d, t01=0x0106}
0x0475e…04784 Head {h00=0x0022, h01=0x0050, text=» DATA PL2CWT CWT FOR PLC NR 3 «, t00=0x002d, t01=0x011c}
0x04784…0479a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x002d, t01=0x0142}
0x0479a…047c0 Head {h00=0x0022, h01=0x0050, text=» DATA PL3CWT CWT FOR PLC NR 4 «, t00=0x002d, t01=0x0158}
0x047c0…047cc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x017e}
0x047cc…047d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x018a}
0x047d6…047ec (46, 0, 398) Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=4 «, t00=0x002e, t01=0x0004}
0x047ec…04812 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 4 NOT CONNECTED«, t00=0x002e, t01=0x001a}
0x04812…04828 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x002e, t01=0x0040}
0x04828…0484e Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 3 NOT CONNECTED«, t00=0x002e, t01=0x0056}
0x0484e…04864 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x002e, t01=0x007c}
0x04864…0488a Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 2 NOT CONNECTED«, t00=0x002e, t01=0x0092}
0x0488a…048a4 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=1 =5 «, t00=0x002e, t01=0x00b8}
0x048a4…048ce Head {h00=0x0026, h01=0x0050, text=» DATA 0 PLC NR 1 NOT CONNECTED =5 «, t00=0x002e, t01=0x00d2}
0x048ce…048da Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x00fc}
0x048da…048e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0108}
0x048e4…048fa Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x002e, t01=0x0112}
0x048fa…04926 Head {h00=0x0028, h01=0x0050, text=» DATA PR1CWT CWT FOR PLC NR. 5, REM.«, t00=0x002e, t01=0x0128}
0x04926…0493c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002e, t01=0x0154}
0x0493c…04968 Head {h00=0x0028, h01=0x0050, text=» DATA PR2CWT CWT FOR PLC NR. 6, REM.«, t00=0x002e, t01=0x016a}
0x04968…0497e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002f, t01=0x0008}
0x0497e…049aa Head {h00=0x0028, h01=0x0050, text=» DATA PR3CWT CWT FOR PLC NR. 7, REM.«, t00=0x002f, t01=0x001e}
0x049aa…049c0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002f, t01=0x004a}
0x049c0…049ec Head {h00=0x0028, h01=0x0050, text=» DATA PR4CWT CWT FOR PLC NR. 8, REM.«, t00=0x002f, t01=0x0060}
0x049ec…049f8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x008c}
0x049f8…04a02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0098}
0x04a02…04a18 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=4 «, t00=0x002f, t01=0x00a2}
0x04a18…04a3e Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 8 NOT CONNECTED«, t00=0x002f, t01=0x00b8}
0x04a3e…04a54 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x002f, t01=0x00de}
0x04a54…04a7a Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 7 NOT CONNECTED«, t00=0x002f, t01=0x00f4}
0x04a7a…04a90 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x002f, t01=0x011a}
0x04a90…04ab6 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 6 NOT CONNECTED«, t00=0x002f, t01=0x0130}
0x04ab6…04acc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x002f, t01=0x0156}
0x04acc…04af2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 PLC NR 5 NOT CONNECTED«, t00=0x002f, t01=0x016c}
0x04af2…04afe (48, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0004}
0x04afe…04b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0010}
0x04b08…04b16 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x001a}
0x04b16…04b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0028}
0x04b20…04b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0032}
0x04b2a…04b3e Head {h00=0x0010, h01=0x0050, text=»OPARR1 EQU *«, t00=0x0030, t01=0x003c}
0x04b3e…04b58 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0030, t01=0x0050}
0x04b58…04b74 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR10 LINE 0 «, t00=0x0030, t01=0x006a}
0x04b74…04b90 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR11 LINE 1 «, t00=0x0030, t01=0x0086}
0x04b90…04bac Head {h00=0x0018, h01=0x0050, text=» DATA OPNR12 LINE 2 «, t00=0x0030, t01=0x00a2}
0x04bac…04bc8 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR13 LINE 3 «, t00=0x0030, t01=0x00be}
0x04bc8…04bd4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00da}
0x04bd4…04be8 Head {h00=0x0010, h01=0x0050, text=»OPARR2 EQU *«, t00=0x0030, t01=0x00e6}
0x04be8…04c02 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0030, t01=0x00fa}
0x04c02…04c1c Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0030, t01=0x0114}
0x04c1c…04c38 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR20 LINE 0 «, t00=0x0030, t01=0x012e}
0x04c38…04c54 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR21 LINE 1 «, t00=0x0030, t01=0x014a}
0x04c54…04c70 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR22 LINE 2 «, t00=0x0030, t01=0x0166}
0x04c70…04c8c Head {h00=0x0018, h01=0x0050, text=» DATA OPNR23 LINE 3 «, t00=0x0030, t01=0x0182}
0x04c8c…04c98 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x000e}
0x04c98…04cac Head {h00=0x0010, h01=0x0050, text=»OPARR3 EQU *«, t00=0x0031, t01=0x001a}
0x04cac…04cc6 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0031, t01=0x002e}
0x04cc6…04ce0 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0031, t01=0x0048}
0x04ce0…04cfa Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =5«, t00=0x0031, t01=0x0062}
0x04cfa…04d16 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR30 LINE 0 «, t00=0x0031, t01=0x007c}
0x04d16…04d32 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR31 LINE 1 «, t00=0x0031, t01=0x0098}
0x04d32…04d4e Head {h00=0x0018, h01=0x0050, text=» DATA OPNR32 LINE 2 «, t00=0x0031, t01=0x00b4}
0x04d4e…04d6a Head {h00=0x0018, h01=0x0050, text=» DATA OPNR33 LINE 3 «, t00=0x0031, t01=0x00d0}
0x04d6a…04d76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x00ec}
0x04d76…04d8a Head {h00=0x0010, h01=0x0050, text=»OPARR4 EQU *«, t00=0x0031, t01=0x00f8}
0x04d8a…04da4 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=0 U =5«, t00=0x0031, t01=0x010c}
0x04da4…04dbe Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=1 U =5«, t00=0x0031, t01=0x0126}
0x04dbe…04dd8 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =5«, t00=0x0031, t01=0x0140}
0x04dd8…04df2 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=3 U =5«, t00=0x0031, t01=0x015a}
0x04df2…04e0e Head {h00=0x0018, h01=0x0050, text=» DATA OPNR40 LINE 0 «, t00=0x0031, t01=0x0174}
0x04e0e…04e2a Head {h00=0x0018, h01=0x0050, text=» DATA OPNR41 LINE 1 «, t00=0x0031, t01=0x0190}
0x04e2a…04e46 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR42 LINE 2 «, t00=0x0032, t01=0x001c}
0x04e46…04e62 Head {h00=0x0018, h01=0x0050, text=» DATA OPNR43 LINE 3 «, t00=0x0032, t01=0x0038}
0x04e62…04e6e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0054}
0x04e6e…04e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0060}
0x04e78…04e92 Head {h00=0x0016, h01=0x0050, text=»OPARL1 EQU * U =5 «, t00=0x0032, t01=0x006a}
0x04e92…04eb6 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL10 LOCAL PLC 1 =5 «, t00=0x0032, t01=0x0084}
0x04eb6…04ed0 Head {h00=0x0016, h01=0x0050, text=»OPARL2 EQU * U =5 «, t00=0x0032, t01=0x00a8}
0x04ed0…04ef4 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL20 LOCAL PLC 2 =5 «, t00=0x0032, t01=0x00c2}
0x04ef4…04f0e Head {h00=0x0016, h01=0x0050, text=»OPARL3 EQU * U =5 «, t00=0x0032, t01=0x00e6}
0x04f0e…04f32 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL30 LOCAL PLC 3 =5 «, t00=0x0032, t01=0x0100}
0x04f32…04f4c Head {h00=0x0016, h01=0x0050, text=»OPARL4 EQU * U =5 «, t00=0x0032, t01=0x0124}
0x04f4c…04f70 Head {h00=0x0020, h01=0x0050, text=» DATA OPNL40 LOCAL PLC 4 =5 «, t00=0x0032, t01=0x013e}
0x04f70…04f7e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0162}
0x04f7e…04f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0170}
0x04f88…04fb2 Head {h00=0x0026, h01=0x0050, text=»* OPEN LINE PARAMETER AREAS, LOCAL«, t00=0x0032, t01=0x017a}
0x04fb2…04fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0014}
0x04fbc…04fd8 Head {h00=0x0018, h01=0x0050, text=»* STANDARD AREAS :«, t00=0x0033, t01=0x001e}
0x04fd8…04ff2 Head {h00=0x0016, h01=0x0050, text=»* PRIMARY STATION «, t00=0x0033, t01=0x003a}
0x04ff2…05008 Head {h00=0x0012, h01=0x0050, text=»* FULL DUPLEX «, t00=0x0033, t01=0x0054}
0x05008…05020 Head {h00=0x0014, h01=0x0050, text=»* 96000 BITS/SEC«, t00=0x0033, t01=0x006a}
0x05020…0503a Head {h00=0x0016, h01=0x0050, text=»* NO NRZI ENCODING«, t00=0x0033, t01=0x0082}
0x0503a…05056 Head {h00=0x0018, h01=0x0050, text=»* POLLING 24HZ U =8 «, t00=0x0033, t01=0x009c}
0x05056…05072 Head {h00=0x0018, h01=0x0050, text=»* 5 RETRANSMISSIONS «, t00=0x0033, t01=0x00b8}
0x05072…0508c Head {h00=0x0016, h01=0x0050, text=»* 3 MIN. TIME OUT «, t00=0x0033, t01=0x00d4}
0x0508c…05096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00ee}
0x05096…050a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00f8}
0x050a0…050c8 Head {h00=0x0024, h01=0x0050, text=»OPNL40 EQU * LOCAL PLC 4, LINE 0«, t00=0x0033, t01=0x0102}
0x050c8…050de Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0033, t01=0x012a}
0x050de…050f4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0033, t01=0x0140}
0x050f4…0510a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0033, t01=0x0156}
0x0510a…05120 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0033, t01=0x016c}
0x05120…05156 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0033, t01=0x0182}
0x05156…05162 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x0028}
0x05162…0518a Head {h00=0x0024, h01=0x0050, text=»OPNL30 EQU * LOCAL PLC 3, LINE 0«, t00=0x0034, t01=0x0034}
0x0518a…051a0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0034, t01=0x005c}
0x051a0…051b6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0034, t01=0x0072}
0x051b6…051cc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x0034, t01=0x0088}
0x051cc…05202 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0034, t01=0x009e}
0x05202…0520e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x00d4}
0x0520e…05236 Head {h00=0x0024, h01=0x0050, text=»OPNL20 EQU * LOCAL PLC 2, LINE 0«, t00=0x0034, t01=0x00e0}
0x05236…0524c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0034, t01=0x0108}
0x0524c…05262 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0034, t01=0x011e}
0x05262…05298 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0034, t01=0x0134}
0x05298…052a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0034, t01=0x016a}
0x052a4…052cc Head {h00=0x0024, h01=0x0050, text=»OPNL10 EQU * LOCAL PLC 1, LINE 0«, t00=0x0034, t01=0x0176}
0x052cc…052e2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0035, t01=0x000e}
0x052e2…05318 Head {h00=0x0032, h01=0x0050, text=» DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11«, t00=0x0035, t01=0x0024}
0x05318…05324 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x005a}
0x05324…0532e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0066}
0x0532e…0535a Head {h00=0x0028, h01=0x0050, text=»* END OF LOCAL LINE PARAMETER AREAS «, t00=0x0035, t01=0x0070}
0x0535a…05364 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x009c}
0x05364…05372 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0035, t01=0x00a6}
0x05372…0537c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00b4}
0x0537c…053a8 Head {h00=0x0028, h01=0x0050, text=»* OPEN LINE PARAMETER AREAS, REMOTE «, t00=0x0035, t01=0x00be}
0x053a8…053b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00ea}
0x053b2…053ce Head {h00=0x0018, h01=0x0050, text=»* STANDARD AREAS :«, t00=0x0035, t01=0x00f4}
0x053ce…053e8 Head {h00=0x0016, h01=0x0050, text=»* PRIMARY STATION «, t00=0x0035, t01=0x0110}
0x053e8…053fe Head {h00=0x0012, h01=0x0050, text=»* FULL DUPLEX «, t00=0x0035, t01=0x012a}
0x053fe…05416 Head {h00=0x0014, h01=0x0050, text=»* 2400 BITS/SEC «, t00=0x0035, t01=0x0140}
0x05416…05430 Head {h00=0x0016, h01=0x0050, text=»* NO NRZI ENCODING«, t00=0x0035, t01=0x0158}
0x05430…05446 Head {h00=0x0012, h01=0x0050, text=»* POLLING 13HZ«, t00=0x0035, t01=0x0172}
0x05446…05462 Head {h00=0x0018, h01=0x0050, text=»* 5 RETRANSMISSIONS «, t00=0x0035, t01=0x0188}
0x05462…0547c Head {h00=0x0016, h01=0x0050, text=»* 5 MIN. TIME OUT «, t00=0x0036, t01=0x0014}
0x0547c…05486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x002e}
0x05486…05490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0038}
0x05490…054a6 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 4«, t00=0x0036, t01=0x0042}
0x054a6…054c2 Head {h00=0x0018, h01=0x0050, text=»OPNR40 EQU * LINE 0 «, t00=0x0036, t01=0x0058}
0x054c2…054d8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0036, t01=0x0074}
0x054d8…054ee Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0036, t01=0x008a}
0x054ee…05504 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0036, t01=0x00a0}
0x05504…0551a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0036, t01=0x00b6}
0x0551a…0554e Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x0036, t01=0x00cc}
0x0554e…0555a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0100}
0x0555a…05576 Head {h00=0x0018, h01=0x0050, text=»OPNR41 EQU * LINE 1 «, t00=0x0036, t01=0x010c}
0x05576…0558c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0036, t01=0x0128}
0x0558c…055a2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0036, t01=0x013e}
0x055a2…055b8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0036, t01=0x0154}
0x055b8…055ce Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0036, t01=0x016a}
0x055ce…05602 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x0036, t01=0x0180}
0x05602…0560e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0024}
0x0560e…0562a Head {h00=0x0018, h01=0x0050, text=»OPNR42 EQU * LINE 2 «, t00=0x0037, t01=0x0030}
0x0562a…05640 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0037, t01=0x004c}
0x05640…05656 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0037, t01=0x0062}
0x05656…0566c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0037, t01=0x0078}
0x0566c…05682 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0037, t01=0x008e}
0x05682…056ba Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x0037, t01=0x00a4}
0x056ba…056c6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00dc}
0x056c6…056e2 Head {h00=0x0018, h01=0x0050, text=»OPNR43 EQU * LINE 3 «, t00=0x0037, t01=0x00e8}
0x056e2…056f8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0037, t01=0x0104}
0x056f8…0570e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0037, t01=0x011a}
0x0570e…05724 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0037, t01=0x0130}
0x05724…0573a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0037, t01=0x0146}
0x0573a…05772 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x0037, t01=0x015c}
0x05772…0577e (56, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0004}
0x0577e…05794 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 3«, t00=0x0038, t01=0x0010}
0x05794…057b0 Head {h00=0x0018, h01=0x0050, text=»OPNR30 EQU * LINE 0 «, t00=0x0038, t01=0x0026}
0x057b0…057c6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0038, t01=0x0042}
0x057c6…057dc Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0038, t01=0x0058}
0x057dc…057f2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0038, t01=0x006e}
0x057f2…05826 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x0038, t01=0x0084}
0x05826…05832 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x00b8}
0x05832…0584e Head {h00=0x0018, h01=0x0050, text=»OPNR31 EQU * LINE 1 «, t00=0x0038, t01=0x00c4}
0x0584e…05864 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0038, t01=0x00e0}
0x05864…0587a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0038, t01=0x00f6}
0x0587a…05890 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0038, t01=0x010c}
0x05890…058c4 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x0038, t01=0x0122}
0x058c4…058d0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0156}
0x058d0…058ec Head {h00=0x0018, h01=0x0050, text=»OPNR32 EQU * LINE 2 «, t00=0x0038, t01=0x0162}
0x058ec…05902 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0038, t01=0x017e}
0x05902…05918 (57, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0039, t01=0x0004}
0x05918…0592e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0039, t01=0x001a}
0x0592e…05966 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x0039, t01=0x0030}
0x05966…05972 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0068}
0x05972…0598e Head {h00=0x0018, h01=0x0050, text=»OPNR33 EQU * LINE 3 «, t00=0x0039, t01=0x0074}
0x0598e…059a4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0039, t01=0x0090}
0x059a4…059ba Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0039, t01=0x00a6}
0x059ba…059d0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0039, t01=0x00bc}
0x059d0…05a08 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x0039, t01=0x00d2}
0x05a08…05a14 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x010a}
0x05a14…05a1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0116}
0x05a1e…05a34 Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 2«, t00=0x0039, t01=0x0120}
0x05a34…05a50 Head {h00=0x0018, h01=0x0050, text=»OPNR20 EQU * LINE 0 «, t00=0x0039, t01=0x0136}
0x05a50…05a66 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0039, t01=0x0152}
0x05a66…05a7c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x0039, t01=0x0168}
0x05a7c…05ab0 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x0039, t01=0x017e}
0x05ab0…05abc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0022}
0x05abc…05ad8 Head {h00=0x0018, h01=0x0050, text=»OPNR21 EQU * LINE 1 «, t00=0x003a, t01=0x002e}
0x05ad8…05aee Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003a, t01=0x004a}
0x05aee…05b04 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x003a, t01=0x0060}
0x05b04…05b38 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x003a, t01=0x0076}
0x05b38…05b44 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x00aa}
0x05b44…05b60 Head {h00=0x0018, h01=0x0050, text=»OPNR22 EQU * LINE 2 «, t00=0x003a, t01=0x00b6}
0x05b60…05b76 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003a, t01=0x00d2}
0x05b76…05b8c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x003a, t01=0x00e8}
0x05b8c…05bc4 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x003a, t01=0x00fe}
0x05bc4…05bd0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0136}
0x05bd0…05bec Head {h00=0x0018, h01=0x0050, text=»OPNR23 EQU * LINE 3 «, t00=0x003a, t01=0x0142}
0x05bec…05c02 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003a, t01=0x015e}
0x05c02…05c18 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x003a, t01=0x0174}
0x05c18…05c50 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x003a, t01=0x018a}
0x05c50…05c5c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0032}
0x05c5c…05c66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x003e}
0x05c66…05c7c Head {h00=0x0012, h01=0x0050, text=»* REMOTE PLC 1«, t00=0x003b, t01=0x0048}
0x05c7c…05c98 Head {h00=0x0018, h01=0x0050, text=»OPNR10 EQU * LINE 0 «, t00=0x003b, t01=0x005e}
0x05c98…05cae Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003b, t01=0x007a}
0x05cae…05ce2 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 «, t00=0x003b, t01=0x0090}
0x05ce2…05cee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x00c4}
0x05cee…05d0a Head {h00=0x0018, h01=0x0050, text=»OPNR11 EQU * LINE 1 «, t00=0x003b, t01=0x00d0}
0x05d0a…05d20 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003b, t01=0x00ec}
0x05d20…05d54 Head {h00=0x0030, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 «, t00=0x003b, t01=0x0102}
0x05d54…05d60 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0136}
0x05d60…05d7c Head {h00=0x0018, h01=0x0050, text=»OPNR12 EQU * LINE 2 «, t00=0x003b, t01=0x0142}
0x05d7c…05d92 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003b, t01=0x015e}
0x05d92…05dca Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 «, t00=0x003b, t01=0x0174}
0x05dca…05dd6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x001c}
0x05dd6…05df2 Head {h00=0x0018, h01=0x0050, text=»OPNR13 EQU * LINE 3 «, t00=0x003c, t01=0x0028}
0x05df2…05e08 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x003c, t01=0x0044}
0x05e08…05e40 Head {h00=0x0034, h01=0x0050, text=» DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 «, t00=0x003c, t01=0x005a}
0x05e40…05e4c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0092}
0x05e4c…05e78 Head {h00=0x0028, h01=0x0050, text=»* END OF REMOTE LINE PARAMETER AREAS«, t00=0x003c, t01=0x009e}
0x05e78…05e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00ca}
0x05e82…05e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00d4}
0x05e8c…05ebc Head {h00=0x002c, h01=0x0050, text=»PLCPFP DATA 0 PLC LOCAL POWER FAIL FLAG «, t00=0x003c, t01=0x00de}
0x05ebc…05ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x010e}
0x05ec6…05ef2 Head {h00=0x0028, h01=0x0050, text=» IFF UTTEST=0 TEST VERSION OF DRIVER«, t00=0x003c, t01=0x0118}
0x05ef2…05efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0144}
0x05efc…05f0a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x014e}
0x05f0a…05f14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x015c}
0x05f14…05f40 Head {h00=0x0028, h01=0x0050, text=»UTTST DATA UTTEST 1 = TRAP NOT USED «, t00=0x003c, t01=0x0166}
0x05f40…05f4a (61, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0004}
0x05f4a…05f54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x000e}
0x05f54…05f7a Head {h00=0x0022, h01=0x0050, text=»* QUEUE STATISTICS COUNTERS«, t00=0x003d, t01=0x0018}
0x05f7a…05fa4 Head {h00=0x0026, h01=0x0050, text=»* EACH COUNTER HAS ONE WORD / PLC «, t00=0x003d, t01=0x003e}
0x05fa4…05fae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0068}
0x05fae…05fc2 Head {h00=0x0010, h01=0x0050, text=»STATAR EQU *«, t00=0x003d, t01=0x0072}
0x05fc2…05fe4 Head {h00=0x001e, h01=0x0050, text=»WIQSTA RES 8 WINDOW QUEUE «, t00=0x003d, t01=0x0086}
0x05fe4…0600c Head {h00=0x0024, h01=0x0050, text=»SBQSTA RES 8 SHORT BUFFERS QUEUE«, t00=0x003d, t01=0x00a8}
0x0600c…06034 Head {h00=0x0024, h01=0x0050, text=»LBQSTA RES 8 LONG BUFFERS QUEUE «, t00=0x003d, t01=0x00d0}
0x06034…06052 Head {h00=0x001a, h01=0x0050, text=»CCQSTA RES 8 CCA QUEUE«, t00=0x003d, t01=0x00f8}
0x06052…0607a Head {h00=0x0024, h01=0x0050, text=»STATLN EQU *-STATAR TABLE LENGTH«, t00=0x003d, t01=0x0116}
0x0607a…06084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x013e}
0x06084…06090 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0148}
0x06090…0609e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003d, t01=0x0154}
0x0609e…060a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0162}
0x060a8…060b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x016c}
0x060b2…060d0 Head {h00=0x001a, h01=0x0050, text=»* CWT DISPLACEMENTS «, t00=0x003d, t01=0x0176}
0x060d0…060da (62, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0004}
0x060da…060fc Head {h00=0x001e, h01=0x0050, text=»CWTOPR EQU /00 CU OPERABLE«, t00=0x003e, t01=0x000e}
0x060fc…0611c Head {h00=0x001c, h01=0x0050, text=»CWTCCB EQU /02 CCA BUSY «, t00=0x003e, t01=0x0030}
0x0611c…06148 Head {h00=0x0028, h01=0x0050, text=»CWTGR EQU /04 GENERAL READ ALLOWED «, t00=0x003e, t01=0x0050}
0x06148…0616e Head {h00=0x0022, h01=0x0050, text=»CWTPNR EQU /06 CU NUMBER (0-7)«, t00=0x003e, t01=0x007c}
0x0616e…06190 Head {h00=0x001e, h01=0x0050, text=»CWTABW EQU /08 WS TO ABORT«, t00=0x003e, t01=0x00a2}
0x06190…061bc Head {h00=0x0028, h01=0x0050, text=»CWTPLS EQU /0A LATEST PLC RCA STATUS«, t00=0x003e, t01=0x00c4}
0x061bc…061e4 Head {h00=0x0024, h01=0x0050, text=»CWTLNO EQU /0C LINE NO INDICATOR«, t00=0x003e, t01=0x00f0}
0x061e4…06214 Head {h00=0x002c, h01=0x0050, text=»CWTPAR EQU /0E INDEX TO PARAMETER AREA «, t00=0x003e, t01=0x0118}
0x06214…0624e Head {h00=0x0036, h01=0x0050, text=»CWTOPP EQU /10 OPEN LINE PARAMETER AREA ADDRESS =2«, t00=0x003e, t01=0x0148}
0x0624e…06276 Head {h00=0x0024, h01=0x0050, text=»CWTINT EQU /12 WS TABLE ADDRESS «, t00=0x003e, t01=0x0182}
0x06276…062a2 Head {h00=0x0028, h01=0x0050, text=»CWTBUF EQU /14 INP. BUFFER ADDRESS «, t00=0x003f, t01=0x001a}
0x062a2…062d8 Head {h00=0x0032, h01=0x0050, text=»CWTSBQ EQU /16 QUEUE FOR SHORT OUTP. BUFFERS «, t00=0x003f, t01=0x0046}
0x062d8…0630c Head {h00=0x0030, h01=0x0050, text=»CWTLBQ EQU /18 QUEUE FOR LONG OUTP. BUFFERS «, t00=0x003f, t01=0x007c}
0x0630c…06336 Head {h00=0x0026, h01=0x0050, text=»CWTCCQ EQU /1A QUEUE FOR CCA FREE «, t00=0x003f, t01=0x00b0}
0x06336…0636c Head {h00=0x0032, h01=0x0050, text=»CWTMBQ EQU /1C QUEUE OF ALLOCATED MON. BLOCKS «, t00=0x003f, t01=0x00da}
0x0636c…06392 Head {h00=0x0022, h01=0x0050, text=»CWTTPR EQU /1E TIMER POINTER «, t00=0x003f, t01=0x0110}
0x06392…063ba Head {h00=0x0024, h01=0x0050, text=»CWTCIO EQU /20 CIO START INSTR. «, t00=0x003f, t01=0x0136}
0x063ba…063dc Head {h00=0x001e, h01=0x0050, text=»CWTST3 EQU /22 SST INSTR. «, t00=0x003f, t01=0x015e}
0x063dc…0640e Head {h00=0x002e, h01=0x0050, text=»CWTCSD EQU /24 CTRL UNIT START DESCRIPTOR «, t00=0x003f, t01=0x0180}
0x0640e…0643e Head {h00=0x002c, h01=0x0050, text=»CWTCID EQU /2A CTRL UNIT INTERF. DESCR. «, t00=0x0040, t01=0x0022}
0x0643e…06468 Head {h00=0x0026, h01=0x0050, text=»CWTCCA EQU /34 COMMAND CTRL AREA «, t00=0x0040, t01=0x0052}
0x06468…06492 Head {h00=0x0026, h01=0x0050, text=»CWTRCA EQU /44 RESPONSE CTRL AREA «, t00=0x0040, t01=0x007c}
0x06492…064c6 Head {h00=0x0030, h01=0x0050, text=»CWTPBS EQU /54 POOLBL. SHORT OUTP. BUFFERS «, t00=0x0040, t01=0x00a6}
0x064c6…064fa Head {h00=0x0030, h01=0x0050, text=»CWTPBL EQU /5E POOLBL. LONG OUTP. BUFFERS =2«, t00=0x0040, t01=0x00da}
0x064fa…0652e Head {h00=0x0030, h01=0x0050, text=»CWTPBG EQU /68 POOLBL. GENERAL READ BUFFERS «, t00=0x0040, t01=0x010e}
0x0652e…06550 Head {h00=0x001e, h01=0x0050, text=»CWTWSS EQU /72 WS STATUS «, t00=0x0040, t01=0x0142}
0x06550…06588 Head {h00=0x0034, h01=0x0050, text=»CWTSOB EQU MAXWS+MAXWS+/74 SH. OUTP. BUFFERS =4 «, t00=0x0040, t01=0x0164}
0x06588…065ae Head {h00=0x0022, h01=0x0050, text=»CWTLB1 EQU CWTSOB+SOBUFS U =7 «, t00=0x0041, t01=0x000c}
0x065ae…065e4 Head {h00=0x0032, h01=0x0050, text=»CWTLOB EQU CWTLB1+SOBUFS LONG OUTP. BUFFERS =7«, t00=0x0041, t01=0x0032}
0x065e4…0660a Head {h00=0x0022, h01=0x0050, text=»CWTGR1 EQU CWTLOB+LOBUFS U =7 «, t00=0x0041, t01=0x0068}
0x0660a…06640 Head {h00=0x0032, h01=0x0050, text=»CWTGRB EQU CWTGR1+LOBUFS GEN. READ BUFFERS =7 «, t00=0x0041, t01=0x008e}
0x06640…0664e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x00c4}
0x0664e…06658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00d2}
0x06658…06670 Head {h00=0x0014, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0041, t01=0x00dc}
0x06670…06692 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 1 «, t00=0x0041, t01=0x00f4}
0x06692…0669c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0116}
0x0669c…066b0 Head {h00=0x0010, h01=0x0050, text=»PL0CWT EQU *«, t00=0x0041, t01=0x0120}
0x066b0…066ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0134}
0x066ba…066ce Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0041, t01=0x013e}
0x066ce…066ee Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0041, t01=0x0152}
0x066ee…06714 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0041, t01=0x0172}
0x06714…06744 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0042, t01=0x0008}
0x06744…0674e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0038}
0x0674e…06768 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0042, t01=0x0042}
0x06768…06788 Head {h00=0x001c, h01=0x0050, text=» DATA 0 PLC NUMBER (0-3)«, t00=0x0042, t01=0x005c}
0x06788…067ba Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0042, t01=0x007c}
0x067ba…067e0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0042, t01=0x00ae}
0x067e0…06802 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0042, t01=0x00d4}
0x06802…06826 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INDEX PARAMETER AREA«, t00=0x0042, t01=0x00f6}
0x06826…06830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x011a}
0x06830…06858 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0042, t01=0x0124}
0x06858…0688a Head {h00=0x002e, h01=0x0050, text=» DATA OPARL1 OPEN LINE PARAMETER AREA ADDR«, t00=0x0042, t01=0x014c}
0x0688a…068ba Head {h00=0x002c, h01=0x0050, text=» DATA INTPL1 WORK STATION TABLE ADDRESS «, t00=0x0042, t01=0x017e}
0x068ba…068de Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0043, t01=0x001e}
0x068de…0690c Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0043, t01=0x0042}
0x0690c…06938 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0043, t01=0x0070}
0x06938…0695a Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0043, t01=0x009c}
0x0695a…0698c Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0043, t01=0x00be}
0x0698c…069bc Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0043, t01=0x00f0}
0x069bc…069c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0120}
0x069c6…069e2 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0043, t01=0x012a}
0x069e2…06a0e Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA0 START I/O OPERATION«, t00=0x0043, t01=0x0146}
0x06a0e…06a44 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA0 RELEASE RCA AND RESET INTERRUPT«, t00=0x0043, t01=0x0172}
0x06a44…06a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0018}
0x06a4e…06a6e Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0044, t01=0x0022}
0x06a6e…06aa0 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0044, t01=0x0042}
0x06aa0…06ac4 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0044, t01=0x0074}
0x06ac4…06aec Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTCID CID ADDRESS «, t00=0x0044, t01=0x0098}
0x06aec…06b10 Head {h00=0x0020, h01=0x0050, text=» DATA INTLV0 INTERRUPT LEVEL«, t00=0x0044, t01=0x00c0}
0x06b10…06b46 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0044, t01=0x00e4}
0x06b46…06b6a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0044, t01=0x011a}
0x06b6a…06b92 Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTCCA CCA ADDRESS «, t00=0x0044, t01=0x013e}
0x06b92…06bb6 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0044, t01=0x0166}
0x06bb6…06bde Head {h00=0x0024, h01=0x0050, text=» DATA PL0CWT+CWTRCA RCA ADDRESS «, t00=0x0044, t01=0x018a}
0x06bde…06c06 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0045, t01=0x0022}
0x06c06…06c2a Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0045, t01=0x004a}
0x06c2a…06c4e Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0045, t01=0x006e}
0x06c4e…06c58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0092}
0x06c58…06c72 Head {h00=0x0016, h01=0x0050, text=»* POOLBLOCKS «, t00=0x0045, t01=0x009c}
0x06c72…06c92 Head {h00=0x001c, h01=0x0050, text=» DATA 'SO',0 ID & FLAGS «, t00=0x0045, t01=0x00b6}
0x06c92…06cca Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0045, t01=0x00d6}
0x06cca…06cf2 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0045, t01=0x010e}
0x06cf2…06d06 Head {h00=0x0010, h01=0x0050, text=» DATA 'LO',0«, t00=0x0045, t01=0x0136}
0x06d06…06d24 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0045, t01=0x014a}
0x06d24…06d40 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0045, t01=0x0168}
0x06d40…06d54 Head {h00=0x0010, h01=0x0050, text=» DATA 'GR',0«, t00=0x0045, t01=0x0184}
0x06d54…06d72 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0046, t01=0x0008}
0x06d72…06d8e Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0046, t01=0x0026}
0x06d8e…06d98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0042}
0x06d98…06dce Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0046, t01=0x004c}
0x06dce…06e04 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0046, t01=0x0082}
0x06e04…06e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x00b8}
0x06e0e…06e2a Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0046, t01=0x00c2}
0x06e2a…06e52 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0046, t01=0x00de}
0x06e52…06e7a Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0046, t01=0x0106}
0x06e7a…06ea2 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0046, t01=0x012e}
0x06ea2…06eac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0156}
0x06eac…06eb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0160}
0x06eb6…06ec2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x016a}
0x06ec2…06ed8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x0046, t01=0x0176}
0x06ed8…06ee2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x018c}
0x06ee2…06ef0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0047, t01=0x0008}
0x06ef0…06efa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0016}
0x06efa…06f1c Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 2 «, t00=0x0047, t01=0x0020}
0x06f1c…06f26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0042}
0x06f26…06f3a Head {h00=0x0010, h01=0x0050, text=»PL1CWT EQU *«, t00=0x0047, t01=0x004c}
0x06f3a…06f44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0060}
0x06f44…06f58 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0047, t01=0x006a}
0x06f58…06f78 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0047, t01=0x007e}
0x06f78…06f9e Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0047, t01=0x009e}
0x06f9e…06fce Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0047, t01=0x00c4}
0x06fce…06fd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00f4}
0x06fd8…06ff2 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0047, t01=0x00fe}
0x06ff2…07012 Head {h00=0x001c, h01=0x0050, text=» DATA 1 PLC NUMBER (0-3)«, t00=0x0047, t01=0x0118}
0x07012…07044 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0047, t01=0x0138}
0x07044…0706a Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0047, t01=0x016a}
0x0706a…0708c Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0047, t01=0x0190}
0x0708c…070b4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x0048, t01=0x0022}
0x070b4…070be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x004a}
0x070be…070e6 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0048, t01=0x0054}
0x070e6…07118 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL2 OPEN LINE PARAMETER AREA ADDR«, t00=0x0048, t01=0x007c}
0x07118…07148 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL2 WORK STATION TABLE ADDRESS «, t00=0x0048, t01=0x00ae}
0x07148…0716c Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0048, t01=0x00de}
0x0716c…0719a Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0048, t01=0x0102}
0x0719a…071c6 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0048, t01=0x0130}
0x071c6…071e8 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0048, t01=0x015c}
0x071e8…0721a Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0048, t01=0x017e}
0x0721a…0724a Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0049, t01=0x0020}
0x0724a…07254 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0050}
0x07254…07270 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0049, t01=0x005a}
0x07270…0729c Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA1 START I/O OPERATION«, t00=0x0049, t01=0x0076}
0x0729c…072d2 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA1 RELEASE RCA AND RESET INTERRUPT«, t00=0x0049, t01=0x00a2}
0x072d2…072dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00d8}
0x072dc…072fc Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0049, t01=0x00e2}
0x072fc…0732e Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0049, t01=0x0102}
0x0732e…07352 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0049, t01=0x0134}
0x07352…0737a Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTCID CID ADDRESS «, t00=0x0049, t01=0x0158}
0x0737a…0739e Head {h00=0x0020, h01=0x0050, text=» DATA INTLV1 INTERRUPT LEVEL«, t00=0x0049, t01=0x0180}
0x0739e…073d4 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x004a, t01=0x0014}
0x073d4…073f8 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004a, t01=0x004a}
0x073f8…07420 Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTCCA CCA ADDRESS «, t00=0x004a, t01=0x006e}
0x07420…07444 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004a, t01=0x0096}
0x07444…0746c Head {h00=0x0024, h01=0x0050, text=» DATA PL1CWT+CWTRCA RCA ADDRESS «, t00=0x004a, t01=0x00ba}
0x0746c…07494 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x004a, t01=0x00e2}
0x07494…074b8 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x004a, t01=0x010a}
0x074b8…074dc Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x004a, t01=0x012e}
0x074dc…074e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0152}
0x074e6…07512 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x004a, t01=0x015c}
0x07512…07542 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x004a, t01=0x0188}
0x07542…0757a Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x004b, t01=0x0028}
0x0757a…075a2 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x004b, t01=0x0060}
0x075a2…075ca Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x004b, t01=0x0088}
0x075ca…075e8 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x004b, t01=0x00b0}
0x075e8…07604 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x004b, t01=0x00ce}
0x07604…0762c Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x004b, t01=0x00ea}
0x0762c…0764a Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x004b, t01=0x0112}
0x0764a…07666 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x004b, t01=0x0130}
0x07666…07670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x014c}
0x07670…076a6 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x004b, t01=0x0156}
0x076a6…076dc Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x004b, t01=0x018c}
0x076dc…076e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0032}
0x076e6…07702 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x004c, t01=0x003c}
0x07702…0772a Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x004c, t01=0x0058}
0x0772a…07752 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x004c, t01=0x0080}
0x07752…0777a Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x004c, t01=0x00a8}
0x0777a…07784 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00d0}
0x07784…0778e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00da}
0x0778e…077a4 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x004c, t01=0x00e4}
0x077a4…077ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x00fa}
0x077ae…077bc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x004c, t01=0x0104}
0x077bc…077c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0112}
0x077c6…077e8 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 3 «, t00=0x004c, t01=0x011c}
0x077e8…077f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x013e}
0x077f2…07806 Head {h00=0x0010, h01=0x0050, text=»PL2CWT EQU *«, t00=0x004c, t01=0x0148}
0x07806…07810 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x015c}
0x07810…07824 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x004c, t01=0x0166}
0x07824…07844 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x004c, t01=0x017a}
0x07844…0786a Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x004d, t01=0x000a}
0x0786a…0789a Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x004d, t01=0x0030}
0x0789a…078a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0060}
0x078a4…078be Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x004d, t01=0x006a}
0x078be…078de Head {h00=0x001c, h01=0x0050, text=» DATA 2 PLC NUMBER (0-3)«, t00=0x004d, t01=0x0084}
0x078de…07910 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x004d, t01=0x00a4}
0x07910…07936 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x004d, t01=0x00d6}
0x07936…07958 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x004d, t01=0x00fc}
0x07958…07980 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x004d, t01=0x011e}
0x07980…0798a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0146}
0x0798a…079b2 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x004d, t01=0x0150}
0x079b2…079e4 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL3 OPEN LINE PARAMETER AREA ADDR«, t00=0x004d, t01=0x0178}
0x079e4…07a14 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL3 WORK STATION TABLE ADDRESS «, t00=0x004e, t01=0x001a}
0x07a14…07a38 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x004e, t01=0x004a}
0x07a38…07a66 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x004e, t01=0x006e}
0x07a66…07a92 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x004e, t01=0x009c}
0x07a92…07ab4 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x004e, t01=0x00c8}
0x07ab4…07ae6 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x004e, t01=0x00ea}
0x07ae6…07b16 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x004e, t01=0x011c}
0x07b16…07b20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x014c}
0x07b20…07b3c Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x004e, t01=0x0156}
0x07b3c…07b68 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA2 START I/O OPERATION«, t00=0x004e, t01=0x0172}
0x07b68…07b9e Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA2 RELEASE RCA AND RESET INTERRUPT«, t00=0x004f, t01=0x000e}
0x07b9e…07ba8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0044}
0x07ba8…07bc8 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x004f, t01=0x004e}
0x07bc8…07bfa Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x004f, t01=0x006e}
0x07bfa…07c1e Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004f, t01=0x00a0}
0x07c1e…07c46 Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTCID CID ADDRESS «, t00=0x004f, t01=0x00c4}
0x07c46…07c6a Head {h00=0x0020, h01=0x0050, text=» DATA INTLV2 INTERRUPT LEVEL«, t00=0x004f, t01=0x00ec}
0x07c6a…07ca0 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x004f, t01=0x0110}
0x07ca0…07cc4 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x004f, t01=0x0146}
0x07cc4…07cec Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTCCA CCA ADDRESS «, t00=0x004f, t01=0x016a}
0x07cec…07d10 (80, 0, 400) Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0050, t01=0x0004}
0x07d10…07d38 Head {h00=0x0024, h01=0x0050, text=» DATA PL2CWT+CWTRCA RCA ADDRESS «, t00=0x0050, t01=0x0028}
0x07d38…07d60 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0050, t01=0x0050}
0x07d60…07d84 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0050, t01=0x0078}
0x07d84…07da8 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0050, t01=0x009c}
0x07da8…07db2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x00c0}
0x07db2…07dde Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0050, t01=0x00ca}
0x07dde…07e0e Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0050, t01=0x00f6}
0x07e0e…07e46 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0050, t01=0x0126}
0x07e46…07e6e Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0050, t01=0x015e}
0x07e6e…07e96 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0050, t01=0x0186}
0x07e96…07eb4 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0051, t01=0x001e}
0x07eb4…07ed0 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0051, t01=0x003c}
0x07ed0…07ef8 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0051, t01=0x0058}
0x07ef8…07f16 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0051, t01=0x0080}
0x07f16…07f32 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0051, t01=0x009e}
0x07f32…07f3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x00ba}
0x07f3c…07f72 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0051, t01=0x00c4}
0x07f72…07fa8 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0051, t01=0x00fa}
0x07fa8…07fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0130}
0x07fb2…07fce Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0051, t01=0x013a}
0x07fce…07ff6 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0051, t01=0x0156}
0x07ff6…0801e Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0051, t01=0x017e}
0x0801e…08046 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0052, t01=0x0016}
0x08046…08050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x003e}
0x08050…0805a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0048}
0x0805a…08070 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x0052, t01=0x0052}
0x08070…0807a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0068}
0x0807a…08088 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0052, t01=0x0072}
0x08088…08092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0080}
0x08092…080b4 Head {h00=0x001e, h01=0x0050, text=»* CWT FOR PLC NUMBER 4 «, t00=0x0052, t01=0x008a}
0x080b4…080be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00ac}
0x080be…080d2 Head {h00=0x0010, h01=0x0050, text=»PL3CWT EQU *«, t00=0x0052, t01=0x00b6}
0x080d2…080dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x00ca}
0x080dc…080f0 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0052, t01=0x00d4}
0x080f0…08110 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0052, t01=0x00e8}
0x08110…08136 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0052, t01=0x0108}
0x08136…08166 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0052, t01=0x012e}
0x08166…08170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x015e}
0x08170…0818a Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0052, t01=0x0168}
0x0818a…081aa Head {h00=0x001c, h01=0x0050, text=» DATA 3 PLC NUMBER (0-3)«, t00=0x0052, t01=0x0182}
0x081aa…081dc Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0053, t01=0x0012}
0x081dc…08202 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0053, t01=0x0044}
0x08202…08224 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0053, t01=0x006a}
0x08224…0824c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREA «, t00=0x0053, t01=0x008c}
0x0824c…08256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00b4}
0x08256…0827e Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0053, t01=0x00be}
0x0827e…082b0 Head {h00=0x002e, h01=0x0050, text=» DATA OPARL4 OPEN LINE PARAMETER AREA ADDR«, t00=0x0053, t01=0x00e6}
0x082b0…082e0 Head {h00=0x002c, h01=0x0050, text=» DATA INTPL4 WORK STATION TABLE ADDRESS «, t00=0x0053, t01=0x0118}
0x082e0…08304 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0053, t01=0x0148}
0x08304…08332 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0053, t01=0x016c}
0x08332…0835e Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0054, t01=0x000a}
0x0835e…08380 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0054, t01=0x0036}
0x08380…083b2 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0054, t01=0x0058}
0x083b2…083e2 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0054, t01=0x008a}
0x083e2…083ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00ba}
0x083ec…08408 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0054, t01=0x00c4}
0x08408…08434 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA3 START I/O OPERATION«, t00=0x0054, t01=0x00e0}
0x08434…0846a Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA3 RELEASE RCA AND RESET INTERRUPT«, t00=0x0054, t01=0x010c}
0x0846a…08474 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0142}
0x08474…08494 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0054, t01=0x014c}
0x08494…084c6 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0054, t01=0x016c}
0x084c6…084ea Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x000e}
0x084ea…08512 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTCID CID ADDRESS «, t00=0x0055, t01=0x0032}
0x08512…08536 Head {h00=0x0020, h01=0x0050, text=» DATA INTLV3 INTERRUPT LEVEL«, t00=0x0055, t01=0x005a}
0x08536…0856c Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0055, t01=0x007e}
0x0856c…08590 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x00b4}
0x08590…085b8 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTCCA CCA ADDRESS «, t00=0x0055, t01=0x00d8}
0x085b8…085dc Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0055, t01=0x0100}
0x085dc…08604 Head {h00=0x0024, h01=0x0050, text=» DATA PL3CWT+CWTRCA RCA ADDRESS «, t00=0x0055, t01=0x0124}
0x08604…0862c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0055, t01=0x014c}
0x0862c…08650 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0055, t01=0x0174}
0x08650…08674 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0056, t01=0x0008}
0x08674…0867e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x002c}
0x0867e…086aa Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0056, t01=0x0036}
0x086aa…086da Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0056, t01=0x0062}
0x086da…08712 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0056, t01=0x0092}
0x08712…0873a Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0056, t01=0x00ca}
0x0873a…08762 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0056, t01=0x00f2}
0x08762…08780 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0056, t01=0x011a}
0x08780…0879c Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0056, t01=0x0138}
0x0879c…087c4 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0056, t01=0x0154}
0x087c4…087e2 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0056, t01=0x017c}
0x087e2…087fe Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0057, t01=0x000a}
0x087fe…08808 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0026}
0x08808…0883e Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0057, t01=0x0030}
0x0883e…08874 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0057, t01=0x0066}
0x08874…0887e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x009c}
0x0887e…0889a Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0057, t01=0x00a6}
0x0889a…088c2 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0057, t01=0x00c2}
0x088c2…088ea Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0057, t01=0x00ea}
0x088ea…08912 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0057, t01=0x0112}
0x08912…0891e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x013a}
0x0891e…08928 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0146}
0x08928…08936 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0057, t01=0x0150}
0x08936…0894c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0057, t01=0x015e}
0x0894c…08956 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0174}
0x08956…0897e Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 5 REMOTE«, t00=0x0057, t01=0x017e}
0x0897e…08988 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0016}
0x08988…0899c Head {h00=0x0010, h01=0x0050, text=»PR1CWT EQU *«, t00=0x0058, t01=0x0020}
0x0899c…089a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0034}
0x089a6…089ba Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0058, t01=0x003e}
0x089ba…089da Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0058, t01=0x0052}
0x089da…08a00 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0058, t01=0x0072}
0x08a00…08a30 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0058, t01=0x0098}
0x08a30…08a3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00c8}
0x08a3a…08a54 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0058, t01=0x00d2}
0x08a54…08a78 Head {h00=0x0020, h01=0x0050, text=» DATA 4 PLC NUMBER (4-7) =5 «, t00=0x0058, t01=0x00ec}
0x08a78…08aaa Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0058, t01=0x0110}
0x08aaa…08ad0 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0058, t01=0x0142}
0x08ad0…08af2 Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0058, t01=0x0168}
0x08af2…08b1a Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x0058, t01=0x018a}
0x08b1a…08b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0022}
0x08b24…08b4c Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0059, t01=0x002c}
0x08b4c…08b84 Head {h00=0x0034, h01=0x0050, text=» DATA OPARR1 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x0059, t01=0x0054}
0x08b84…08bb4 Head {h00=0x002c, h01=0x0050, text=» DATA INTPR1 WORK STATION TABLE ADDRESS «, t00=0x0059, t01=0x008c}
0x08bb4…08bd8 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0059, t01=0x00bc}
0x08bd8…08c06 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0059, t01=0x00e0}
0x08c06…08c32 Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0059, t01=0x010e}
0x08c32…08c54 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0059, t01=0x013a}
0x08c54…08c86 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0059, t01=0x015c}
0x08c86…08cb6 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0059, t01=0x018e}
0x08cb6…08cc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x002e}
0x08cc0…08cdc Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x005a, t01=0x0038}
0x08cdc…08d08 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA4 START I/O OPERATION«, t00=0x005a, t01=0x0054}
0x08d08…08d3e Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA4 RELEASE RCA AND RESET INTERRUPT«, t00=0x005a, t01=0x0080}
0x08d3e…08d48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00b6}
0x08d48…08d68 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x005a, t01=0x00c0}
0x08d68…08d9a Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x005a, t01=0x00e0}
0x08d9a…08dbe Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005a, t01=0x0112}
0x08dbe…08de6 Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTCID CID ADDRESS «, t00=0x005a, t01=0x0136}
0x08de6…08e0a Head {h00=0x0020, h01=0x0050, text=» DATA INTRV0 INTERRUPT LEVEL«, t00=0x005a, t01=0x015e}
0x08e0a…08e40 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x005a, t01=0x0182}
0x08e40…08e64 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005b, t01=0x0028}
0x08e64…08e8c Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTCCA CCA ADDRESS «, t00=0x005b, t01=0x004c}
0x08e8c…08eb0 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x005b, t01=0x0074}
0x08eb0…08ed8 Head {h00=0x0024, h01=0x0050, text=» DATA PR1CWT+CWTRCA RCA ADDRESS «, t00=0x005b, t01=0x0098}
0x08ed8…08f00 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x005b, t01=0x00c0}
0x08f00…08f24 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x005b, t01=0x00e8}
0x08f24…08f48 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x005b, t01=0x010c}
0x08f48…08f52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0130}
0x08f52…08f7e Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x005b, t01=0x013a}
0x08f7e…08fae Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x005b, t01=0x0166}
0x08fae…08fe6 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x005c, t01=0x0008}
0x08fe6…0900e Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x005c, t01=0x0040}
0x0900e…09036 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x005c, t01=0x0068}
0x09036…09054 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x005c, t01=0x0090}
0x09054…09070 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x005c, t01=0x00ae}
0x09070…09098 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x005c, t01=0x00ca}
0x09098…090b6 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x005c, t01=0x00f2}
0x090b6…090d2 Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x005c, t01=0x0110}
0x090d2…090dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x012c}
0x090dc…09112 Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x005c, t01=0x0136}
0x09112…09148 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x005c, t01=0x016c}
0x09148…09152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0012}
0x09152…0916e Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x005d, t01=0x001c}
0x0916e…09196 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x005d, t01=0x0038}
0x09196…091be Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x005d, t01=0x0060}
0x091be…091e6 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x005d, t01=0x0088}
0x091e6…091f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00b0}
0x091f0…091fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00ba}
0x091fa…09208 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x005d, t01=0x00c4}
0x09208…0921e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x005d, t01=0x00d2}
0x0921e…09228 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00e8}
0x09228…09250 Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 6 REMOTE«, t00=0x005d, t01=0x00f2}
0x09250…0925a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x011a}
0x0925a…0926e Head {h00=0x0010, h01=0x0050, text=»PR2CWT EQU *«, t00=0x005d, t01=0x0124}
0x0926e…09278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0138}
0x09278…0928c Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x005d, t01=0x0142}
0x0928c…092ac Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x005d, t01=0x0156}
0x092ac…092d2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x005d, t01=0x0176}
0x092d2…09302 Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x005e, t01=0x000c}
0x09302…0930c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x003c}
0x0930c…09326 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x005e, t01=0x0046}
0x09326…0934a Head {h00=0x0020, h01=0x0050, text=» DATA 5 PLC NUMBER (4-7) =5 «, t00=0x005e, t01=0x0060}
0x0934a…0937c Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x005e, t01=0x0084}
0x0937c…093a2 Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x005e, t01=0x00b6}
0x093a2…093c6 Head {h00=0x0020, h01=0x0050, text=» DATA 0 LINE NO INDICATOR =5«, t00=0x005e, t01=0x00dc}
0x093c6…093f2 Head {h00=0x0028, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS =5 «, t00=0x005e, t01=0x0100}
0x093f2…093fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x012c}
0x093fc…09424 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x005e, t01=0x0136}
0x09424…0945c Head {h00=0x0034, h01=0x0050, text=» DATA OPARR2 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x005e, t01=0x015e}
0x0945c…0948c Head {h00=0x002c, h01=0x0050, text=» DATA INTPR2 WORK STATION TABLE ADDRESS «, t00=0x005f, t01=0x0008}
0x0948c…094b0 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x005f, t01=0x0038}
0x094b0…094de Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x005f, t01=0x005c}
0x094de…0950a Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x005f, t01=0x008a}
0x0950a…0952c Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x005f, t01=0x00b6}
0x0952c…0955e Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x005f, t01=0x00d8}
0x0955e…0958e Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x005f, t01=0x010a}
0x0958e…09598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x013a}
0x09598…095b4 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x005f, t01=0x0144}
0x095b4…095e0 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA5 START I/O OPERATION«, t00=0x005f, t01=0x0160}
0x095e0…09616 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA5 RELEASE RCA AND RESET INTERRUPT«, t00=0x005f, t01=0x018c}
0x09616…09620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0032}
0x09620…09640 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0060, t01=0x003c}
0x09640…09672 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0060, t01=0x005c}
0x09672…09696 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0060, t01=0x008e}
0x09696…096be Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTCID CID ADDRESS «, t00=0x0060, t01=0x00b2}
0x096be…096e2 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV1 INTERRUPT LEVEL«, t00=0x0060, t01=0x00da}
0x096e2…09718 Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0060, t01=0x00fe}
0x09718…0973c Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0060, t01=0x0134}
0x0973c…09764 Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTCCA CCA ADDRESS «, t00=0x0060, t01=0x0158}
0x09764…09788 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0060, t01=0x0180}
0x09788…097b0 Head {h00=0x0024, h01=0x0050, text=» DATA PR2CWT+CWTRCA RCA ADDRESS «, t00=0x0061, t01=0x0014}
0x097b0…097d8 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0061, t01=0x003c}
0x097d8…097fc Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0061, t01=0x0064}
0x097fc…09820 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0061, t01=0x0088}
0x09820…0982a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00ac}
0x0982a…09856 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0061, t01=0x00b6}
0x09856…09886 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0061, t01=0x00e2}
0x09886…098be Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0061, t01=0x0112}
0x098be…098e6 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0061, t01=0x014a}
0x098e6…0990e Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0061, t01=0x0172}
0x0990e…0992c Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0062, t01=0x000a}
0x0992c…09948 Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0062, t01=0x0028}
0x09948…09970 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0062, t01=0x0044}
0x09970…0998e Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0062, t01=0x006c}
0x0998e…099aa Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0062, t01=0x008a}
0x099aa…099b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x00a6}
0x099b4…099ea Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0062, t01=0x00b0}
0x099ea…09a20 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0062, t01=0x00e6}
0x09a20…09a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x011c}
0x09a2a…09a46 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0062, t01=0x0126}
0x09a46…09a6e Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0062, t01=0x0142}
0x09a6e…09a96 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0062, t01=0x016a}
0x09a96…09abe (99, 0, 400) Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0063, t01=0x0004}
0x09abe…09ac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x002c}
0x09ac8…09ad2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0036}
0x09ad2…09ae0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0063, t01=0x0040}
0x09ae0…09af6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x0063, t01=0x004e}
0x09af6…09b00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0064}
0x09b00…09b28 Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 7 REMOTE«, t00=0x0063, t01=0x006e}
0x09b28…09b32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0096}
0x09b32…09b46 Head {h00=0x0010, h01=0x0050, text=»PR3CWT EQU *«, t00=0x0063, t01=0x00a0}
0x09b46…09b50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00b4}
0x09b50…09b64 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0063, t01=0x00be}
0x09b64…09b84 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0063, t01=0x00d2}
0x09b84…09baa Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0063, t01=0x00f2}
0x09baa…09bda Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0063, t01=0x0118}
0x09bda…09be4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0148}
0x09be4…09bfe Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0063, t01=0x0152}
0x09bfe…09c22 Head {h00=0x0020, h01=0x0050, text=» DATA 6 PLC NUMBER (4-7) =5 «, t00=0x0063, t01=0x016c}
0x09c22…09c54 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0063, t01=0x0190}
0x09c54…09c7a Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0064, t01=0x0032}
0x09c7a…09c9c Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0064, t01=0x0058}
0x09c9c…09cc4 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x0064, t01=0x007a}
0x09cc4…09cce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00a2}
0x09cce…09cf6 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x0064, t01=0x00ac}
0x09cf6…09d2e Head {h00=0x0034, h01=0x0050, text=» DATA OPARR3 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x0064, t01=0x00d4}
0x09d2e…09d5e Head {h00=0x002c, h01=0x0050, text=» DATA INTPR3 WORK STATION TABLE ADDRESS «, t00=0x0064, t01=0x010c}
0x09d5e…09d82 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x0064, t01=0x013c}
0x09d82…09db0 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x0064, t01=0x0160}
0x09db0…09ddc Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x0064, t01=0x018e}
0x09ddc…09dfe Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x0065, t01=0x002a}
0x09dfe…09e30 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x0065, t01=0x004c}
0x09e30…09e60 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x0065, t01=0x007e}
0x09e60…09e6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00ae}
0x09e6a…09e86 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x0065, t01=0x00b8}
0x09e86…09eb2 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA6 START I/O OPERATION«, t00=0x0065, t01=0x00d4}
0x09eb2…09ee8 Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA6 RELEASE RCA AND RESET INTERRUPT«, t00=0x0065, t01=0x0100}
0x09ee8…09ef2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0136}
0x09ef2…09f12 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x0065, t01=0x0140}
0x09f12…09f44 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x0065, t01=0x0160}
0x09f44…09f68 (102, 0, 400) Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0066, t01=0x0004}
0x09f68…09f90 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTCID CID ADDRESS «, t00=0x0066, t01=0x0028}
0x09f90…09fb4 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV2 INTERRUPT LEVEL«, t00=0x0066, t01=0x0050}
0x09fb4…09fea Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x0066, t01=0x0074}
0x09fea…0a00e Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0066, t01=0x00aa}
0x0a00e…0a036 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTCCA CCA ADDRESS «, t00=0x0066, t01=0x00ce}
0x0a036…0a05a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x0066, t01=0x00f6}
0x0a05a…0a082 Head {h00=0x0024, h01=0x0050, text=» DATA PR3CWT+CWTRCA RCA ADDRESS «, t00=0x0066, t01=0x011a}
0x0a082…0a0aa Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x0066, t01=0x0142}
0x0a0aa…0a0ce Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x0066, t01=0x016a}
0x0a0ce…0a0f2 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x0066, t01=0x018e}
0x0a0f2…0a0fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0022}
0x0a0fc…0a128 Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x0067, t01=0x002c}
0x0a128…0a158 Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x0067, t01=0x0058}
0x0a158…0a190 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x0067, t01=0x0088}
0x0a190…0a1b8 Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x0067, t01=0x00c0}
0x0a1b8…0a1e0 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x0067, t01=0x00e8}
0x0a1e0…0a1fe Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x0067, t01=0x0110}
0x0a1fe…0a21a Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x0067, t01=0x012e}
0x0a21a…0a242 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x0067, t01=0x014a}
0x0a242…0a260 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x0067, t01=0x0172}
0x0a260…0a27c Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x0067, t01=0x0190}
0x0a27c…0a286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x001c}
0x0a286…0a2bc Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x0068, t01=0x0026}
0x0a2bc…0a2f2 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x0068, t01=0x005c}
0x0a2f2…0a2fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0092}
0x0a2fc…0a318 Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x0068, t01=0x009c}
0x0a318…0a340 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x0068, t01=0x00b8}
0x0a340…0a368 Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x0068, t01=0x00e0}
0x0a368…0a390 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x0068, t01=0x0108}
0x0a390…0a39a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0130}
0x0a39a…0a3a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x013a}
0x0a3a4…0a3b2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x0144}
0x0a3b2…0a3c8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x0068, t01=0x0152}
0x0a3c8…0a3d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0168}
0x0a3d2…0a3fa Head {h00=0x0024, h01=0x0050, text=»* CWT FOR PLC NUMBER 8 REMOTE«, t00=0x0068, t01=0x0172}
0x0a3fa…0a404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x000a}
0x0a404…0a418 Head {h00=0x0010, h01=0x0050, text=»PR4CWT EQU *«, t00=0x0069, t01=0x0014}
0x0a418…0a422 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0028}
0x0a422…0a436 Head {h00=0x0010, h01=0x0050, text=»* FLAGS«, t00=0x0069, t01=0x0032}
0x0a436…0a456 Head {h00=0x001c, h01=0x0050, text=» RES 1 PLC OPERABLE FLAG«, t00=0x0069, t01=0x0046}
0x0a456…0a47c Head {h00=0x0022, h01=0x0050, text=» DATA 0 CCA BUSY FLAG (0=FREE)«, t00=0x0069, t01=0x0066}
0x0a47c…0a4ac Head {h00=0x002c, h01=0x0050, text=» DATA 1 GENERAL READ ALLOWED (0=ALLOWED)«, t00=0x0069, t01=0x008c}
0x0a4ac…0a4b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00bc}
0x0a4b6…0a4d0 Head {h00=0x0016, h01=0x0050, text=»* DATA WORDS «, t00=0x0069, t01=0x00c6}
0x0a4d0…0a4f4 Head {h00=0x0020, h01=0x0050, text=» DATA 7 PLC NUMBER (4-7) =5 «, t00=0x0069, t01=0x00e0}
0x0a4f4…0a526 Head {h00=0x002e, h01=0x0050, text=» DATA 0 WORK STATION TO ABORT (0=NO ABORT)«, t00=0x0069, t01=0x0104}
0x0a526…0a54c Head {h00=0x0022, h01=0x0050, text=» DATA 0 LATEST PLC RCA STATUS «, t00=0x0069, t01=0x0136}
0x0a54c…0a56e Head {h00=0x001e, h01=0x0050, text=» DATA 0 LINE NO INDICATOR «, t00=0x0069, t01=0x015c}
0x0a56e…0a596 Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDEX TO PARAMETER AREAS«, t00=0x0069, t01=0x017e}
0x0a596…0a5a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0016}
0x0a5a0…0a5c8 Head {h00=0x0024, h01=0x0050, text=»* POINTERS AND QUEUE HEADS «, t00=0x006a, t01=0x0020}
0x0a5c8…0a600 Head {h00=0x0034, h01=0x0050, text=» DATA OPARR4 OPEN LINE PARAMETER AREA ADDRESSES «, t00=0x006a, t01=0x0048}
0x0a600…0a630 Head {h00=0x002c, h01=0x0050, text=» DATA INTPR4 WORK STATION TABLE ADDRESS «, t00=0x006a, t01=0x0080}
0x0a630…0a654 Head {h00=0x0020, h01=0x0050, text=» DATA 0 INPUT BUFFER ADDRESS«, t00=0x006a, t01=0x00b0}
0x0a654…0a682 Head {h00=0x002a, h01=0x0050, text=» DATA 0 QUEUE FOR SHORT OUTPUT BUFFER «, t00=0x006a, t01=0x00d4}
0x0a682…0a6ae Head {h00=0x0028, h01=0x0050, text=» DATA 0 QUEUE FOR LONG OUTPUT BUFFER«, t00=0x006a, t01=0x0102}
0x0a6ae…0a6d0 Head {h00=0x001e, h01=0x0050, text=» DATA 0 QUEUE FOR CCA FREE«, t00=0x006a, t01=0x012e}
0x0a6d0…0a702 Head {h00=0x002e, h01=0x0050, text=» DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS «, t00=0x006a, t01=0x0150}
0x0a702…0a732 Head {h00=0x002c, h01=0x0050, text=» DATA 0 TIMER POINTER FOR RESTART DELAY «, t00=0x006a, t01=0x0182}
0x0a732…0a73c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0022}
0x0a73c…0a758 Head {h00=0x0018, h01=0x0050, text=»* INSTRUCTIONS «, t00=0x006b, t01=0x002c}
0x0a758…0a784 Head {h00=0x0028, h01=0x0050, text=» CIO A3,1,PLCDA7 START I/O OPERATION«, t00=0x006b, t01=0x0048}
0x0a784…0a7ba Head {h00=0x0032, h01=0x0050, text=» SST A3,PLCDA7 RELEASE RCA AND RESET INTERRUPT«, t00=0x006b, t01=0x0074}
0x0a7ba…0a7c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00aa}
0x0a7c4…0a7e4 Head {h00=0x001c, h01=0x0050, text=»* PLC CONTROL AREAS«, t00=0x006b, t01=0x00b4}
0x0a7e4…0a816 Head {h00=0x002e, h01=0x0050, text=»* CONTROL UNIT START DESCRIPTOR (3 WORDS) «, t00=0x006b, t01=0x00d4}
0x0a816…0a83a Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x006b, t01=0x0106}
0x0a83a…0a862 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTCID CID ADDRESS «, t00=0x006b, t01=0x012a}
0x0a862…0a886 Head {h00=0x0020, h01=0x0050, text=» DATA INTRV3 INTERRUPT LEVEL«, t00=0x006b, t01=0x0152}
0x0a886…0a8bc Head {h00=0x0032, h01=0x0050, text=»* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) «, t00=0x006b, t01=0x0176}
0x0a8bc…0a8e0 Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x006c, t01=0x001c}
0x0a8e0…0a908 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTCCA CCA ADDRESS «, t00=0x006c, t01=0x0040}
0x0a908…0a92c Head {h00=0x0020, h01=0x0050, text=» DATA 0 DUMMY & MSB ADDRESS «, t00=0x006c, t01=0x0068}
0x0a92c…0a954 Head {h00=0x0024, h01=0x0050, text=» DATA PR4CWT+CWTRCA RCA ADDRESS «, t00=0x006c, t01=0x008c}
0x0a954…0a97c Head {h00=0x0024, h01=0x0050, text=» DATA 0 INTERRUPT SPECIFICATION «, t00=0x006c, t01=0x00b4}
0x0a97c…0a9a0 Head {h00=0x0020, h01=0x0050, text=» RES 8 COMMAND CONTROL AREA «, t00=0x006c, t01=0x00dc}
0x0a9a0…0a9c4 Head {h00=0x0020, h01=0x0050, text=» RES 8 RESPONSE CONTROL AREA«, t00=0x006c, t01=0x0100}
0x0a9c4…0a9ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0124}
0x0a9ce…0a9fa Head {h00=0x0028, h01=0x0050, text=»* POOLBLOCKS (5 WORDS / BLOCK) «, t00=0x006c, t01=0x012e}
0x0a9fa…0aa2a Head {h00=0x002c, h01=0x0050, text=» DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS«, t00=0x006c, t01=0x015a}
0x0aa2a…0aa62 Head {h00=0x0034, h01=0x0050, text=» DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH«, t00=0x006c, t01=0x018a}
0x0aa62…0aa8a Head {h00=0x0024, h01=0x0050, text=» DATA SOBUFS+SOBUFS AREA LENGTH «, t00=0x006d, t01=0x0032}
0x0aa8a…0aab2 Head {h00=0x0024, h01=0x0050, text=» DATA 'LO',0 ID = "LONG OUTPUT" «, t00=0x006d, t01=0x005a}
0x0aab2…0aad0 Head {h00=0x001a, h01=0x0050, text=» DATA 0,LOBUF1+LOBUF1 «, t00=0x006d, t01=0x0082}
0x0aad0…0aaec Head {h00=0x0018, h01=0x0050, text=» DATA LOBUFS+LOBUFS «, t00=0x006d, t01=0x00a0}
0x0aaec…0ab14 Head {h00=0x0024, h01=0x0050, text=» DATA 'GR',0 ID = "GENERAL READ"«, t00=0x006d, t01=0x00bc}
0x0ab14…0ab32 Head {h00=0x001a, h01=0x0050, text=» DATA 0,GRBUF1+GRBUF1 «, t00=0x006d, t01=0x00e4}
0x0ab32…0ab4e Head {h00=0x0018, h01=0x0050, text=» DATA GRBUFS+GRBUFS «, t00=0x006d, t01=0x0102}
0x0ab4e…0ab58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x011e}
0x0ab58…0ab8e Head {h00=0x0032, h01=0x0050, text=»* WORK STATION STATUS WORDS. 1 WORD / WS «, t00=0x006d, t01=0x0128}
0x0ab8e…0abc4 Head {h00=0x0032, h01=0x0050, text=» RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. «, t00=0x006d, t01=0x015e}
0x0abc4…0abce (110, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0004}
0x0abce…0abea Head {h00=0x0018, h01=0x0050, text=»* BUFFER AREAS «, t00=0x006e, t01=0x000e}
0x0abea…0ac12 Head {h00=0x0024, h01=0x0050, text=» RES SOBUFS SHORT OUTPUT BUFFERS«, t00=0x006e, t01=0x002a}
0x0ac12…0ac3a Head {h00=0x0024, h01=0x0050, text=» RES LOBUFS LONG OUTPUT BUFFERS «, t00=0x006e, t01=0x0052}
0x0ac3a…0ac62 Head {h00=0x0024, h01=0x0050, text=» RES GRBUFS GENERAL READ BUFFERS«, t00=0x006e, t01=0x007a}
0x0ac62…0ac6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00a2}
0x0ac6c…0ac76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00ac}
0x0ac76…0ac82 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x00b6}
0x0ac82…0ac90 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006e, t01=0x00c2}
0x0ac90…0ac9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00d0}
0x0ac9a…0acc4 Head {h00=0x0026, h01=0x0050, text=»* I/O COMPLETION DISPATCH TABLE«, t00=0x006e, t01=0x00da}
0x0acc4…0acce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0104}
0x0acce…0ad04 Head {h00=0x0032, h01=0x0050, text=»* THE MOST FREQUENTLY USED ROUTINES ARE PLACED«, t00=0x006e, t01=0x010e}
0x0ad04…0ad38 Head {h00=0x0030, h01=0x0050, text=»* AT THE END OF THE TABLE, AS IT IS SCANNED «, t00=0x006e, t01=0x0144}
0x0ad38…0ad50 Head {h00=0x0014, h01=0x0050, text=»* FROM THE END. «, t00=0x006e, t01=0x0178}
0x0ad50…0ad5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0190}
0x0ad5a…0ad6e Head {h00=0x0010, h01=0x0050, text=»CMDTAB EQU *«, t00=0x006f, t01=0x000a}
0x0ad6e…0ada2 Head {h00=0x0030, h01=0x0050, text=» DATA CMDTC COMMAND CODE "TEST CHANNEL UNIT"«, t00=0x006f, t01=0x001e}
0x0ada2…0addc Head {h00=0x0036, h01=0x0050, text=» DATA COMPTC START OF "TEST CU" COMPLETION ROUTINE«, t00=0x006f, t01=0x0052}
0x0addc…0ae10 Head {h00=0x0030, h01=0x0050, text=» DATA 0 ALLOWED STATUS FOR "TEST CU" COMMAND«, t00=0x006f, t01=0x008c}
0x0ae10…0ae40 Head {h00=0x002c, h01=0x0050, text=»CMDTB1 EQU *-CMDTAB LENGTH OF ONE ENTRY «, t00=0x006f, t01=0x00c0}
0x0ae40…0ae5e Head {h00=0x001a, h01=0x0050, text=» DATA CMDOP OPEN LINE «, t00=0x006f, t01=0x00f0}
0x0ae5e…0ae72 Head {h00=0x0010, h01=0x0050, text=» DATA COMPOP«, t00=0x006f, t01=0x010e}
0x0ae72…0ae82 Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x006f, t01=0x0122}
0x0ae82…0ae9e Head {h00=0x0018, h01=0x0050, text=» DATA CMDOD OPEN DLS«, t00=0x006f, t01=0x0132}
0x0ae9e…0aeb2 Head {h00=0x0010, h01=0x0050, text=» DATA COMPOD«, t00=0x006f, t01=0x014e}
0x0aeb2…0aece Head {h00=0x0018, h01=0x0050, text=» DATA STADNO+STANOC «, t00=0x006f, t01=0x0162}
0x0aece…0aee4 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x006f, t01=0x017e}
0x0aee4…0af0c (112, 0, 400) Head {h00=0x0024, h01=0x0050, text=» DATA CMDPS GET LINE STATISTICS «, t00=0x0070, t01=0x0004}
0x0af0c…0af20 Head {h00=0x0010, h01=0x0050, text=» DATA COMPPS«, t00=0x0070, t01=0x002c}
0x0af20…0af46 Head {h00=0x0022, h01=0x0050, text=»STAE2 EQU STAREQ+STAILL DUMMY «, t00=0x0070, t01=0x0040}
0x0af46…0af6c Head {h00=0x0022, h01=0x0050, text=»STAE3 EQU STASEQ+STANOB DUMMY «, t00=0x0070, t01=0x0066}
0x0af6c…0af86 Head {h00=0x0016, h01=0x0050, text=» DATA STAE2+STAE3 «, t00=0x0070, t01=0x008c}
0x0af86…0afac Head {h00=0x0022, h01=0x0050, text=» DATA CMDDS GET DLS STATISTICS«, t00=0x0070, t01=0x00a6}
0x0afac…0afc0 Head {h00=0x0010, h01=0x0050, text=» DATA COMPDS«, t00=0x0070, t01=0x00cc}
0x0afc0…0afda Head {h00=0x0016, h01=0x0050, text=» DATA STAE2+STAE3 «, t00=0x0070, t01=0x00e0}
0x0afda…0b000 Head {h00=0x0022, h01=0x0050, text=» DATA CMDRM READ LOCAL MEMORY «, t00=0x0070, t01=0x00fa}
0x0b000…0b014 Head {h00=0x0010, h01=0x0050, text=» DATA COMPRM«, t00=0x0070, t01=0x0120}
0x0b014…0b028 Head {h00=0x0010, h01=0x0050, text=» DATA STAE2 «, t00=0x0070, t01=0x0134}
0x0b028…0b032 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0148}
0x0b032…0b040 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0070, t01=0x0152}
0x0b040…0b04a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0160}
0x0b04a…0b056 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0070, t01=0x016a}
0x0b056…0b078 Head {h00=0x001e, h01=0x0050, text=» DATA CMDSW STANDARD WRITE«, t00=0x0070, t01=0x0176}
0x0b078…0b08c Head {h00=0x0010, h01=0x0050, text=» DATA COMPSW«, t00=0x0071, t01=0x0008}
0x0b08c…0b0a0 Head {h00=0x0010, h01=0x0050, text=» DATA STAERR«, t00=0x0071, t01=0x001c}
0x0b0a0…0b0be Head {h00=0x001a, h01=0x0050, text=» DATA CMDFW FAST WRITE«, t00=0x0071, t01=0x0030}
0x0b0be…0b0d2 Head {h00=0x0010, h01=0x0050, text=» DATA COMPFW«, t00=0x0071, t01=0x004e}
0x0b0d2…0b0e6 Head {h00=0x0010, h01=0x0050, text=» DATA STAERR«, t00=0x0071, t01=0x0062}
0x0b0e6…0b106 Head {h00=0x001c, h01=0x0050, text=» DATA CMDGR GENERAL READ«, t00=0x0071, t01=0x0076}
0x0b106…0b11a Head {h00=0x0010, h01=0x0050, text=» DATA COMPGR«, t00=0x0071, t01=0x0096}
0x0b11a…0b12a Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0071, t01=0x00aa}
0x0b12a…0b152 Head {h00=0x0024, h01=0x0050, text=»CMDTBL EQU *-CMDTAB TABLE LENGTH«, t00=0x0071, t01=0x00ba}
0x0b152…0b15c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00e2}
0x0b15c…0b16a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0071, t01=0x00ec}
0x0b16a…0b174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00fa}
0x0b174…0b1a0 Head {h00=0x0028, h01=0x0050, text=»* READ COMPLETION DISPATCH TABLE «, t00=0x0071, t01=0x0104}
0x0b1a0…0b1aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0130}
0x0b1aa…0b1e0 Head {h00=0x0032, h01=0x0050, text=»* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" «, t00=0x0071, t01=0x013a}
0x0b1e0…0b202 Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS DEFINED ABOVE.«, t00=0x0071, t01=0x0170}
0x0b202…0b216 (114, 0, 400) Head {h00=0x0010, h01=0x0050, text=»REAROU EQU *«, t00=0x0072, t01=0x0004}
0x0b216…0b238 Head {h00=0x001e, h01=0x0050, text=» DATA GRERR1 ERROR ROUTINE«, t00=0x0072, t01=0x0018}
0x0b238…0b272 Head {h00=0x0036, h01=0x0050, text=» DATA GRERR1 DATA PACKET NO FLOW C. (NOT IMPLEM.) «, t00=0x0072, t01=0x003a}
0x0b272…0b2a0 Head {h00=0x002a, h01=0x0050, text=» DATA GRSTAT DEVICE STATUS DATA PACKET«, t00=0x0072, t01=0x0074}
0x0b2a0…0b2c8 Head {h00=0x0024, h01=0x0050, text=» DATA GRDATA NORMAL DATA PACKET «, t00=0x0072, t01=0x00a2}
0x0b2c8…0b2f0 Head {h00=0x0024, h01=0x0050, text=» DATA GRRR RECIEVE READY PACKET «, t00=0x0072, t01=0x00ca}
0x0b2f0…0b310 Head {h00=0x001c, h01=0x0050, text=» DATA GRRES RESET PACKET«, t00=0x0072, t01=0x00f2}
0x0b310…0b348 Head {h00=0x0034, h01=0x0050, text=» DATA GRERR1 RESET CONFIRM. PACKET (NOT IMPLEM.)«, t00=0x0072, t01=0x0112}
0x0b348…0b352 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x014a}
0x0b352…0b35c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0154}
0x0b35c…0b388 Head {h00=0x0028, h01=0x0050, text=»* WRITE COMPLETION DISPATCH TABLE«, t00=0x0072, t01=0x015e}
0x0b388…0b392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x018a}
0x0b392…0b3c8 (115, 0, 400) Head {h00=0x0032, h01=0x0050, text=»* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" «, t00=0x0073, t01=0x0004}
0x0b3c8…0b3ea Head {h00=0x001e, h01=0x0050, text=»* CONSTANTS DEFINED ABOVE.«, t00=0x0073, t01=0x003a}
0x0b3ea…0b3fe Head {h00=0x0010, h01=0x0050, text=»WRIROU EQU *«, t00=0x0073, t01=0x005c}
0x0b3fe…0b420 Head {h00=0x001e, h01=0x0050, text=» DATA WRERR ERROR ROUTINE «, t00=0x0073, t01=0x0070}
0x0b420…0b456 Head {h00=0x0032, h01=0x0050, text=» DATA WRNFLO DATA PACKET WITHOUT FLOW CONTROL «, t00=0x0073, t01=0x0092}
0x0b456…0b48c Head {h00=0x0032, h01=0x0050, text=» DATA WRERR DEVICE STATUS DATA (NOT RELEVANT) «, t00=0x0073, t01=0x00c8}
0x0b48c…0b4b4 Head {h00=0x0024, h01=0x0050, text=» DATA WRDATA NORMAL DATA PACKET «, t00=0x0073, t01=0x00fe}
0x0b4b4…0b4dc Head {h00=0x0024, h01=0x0050, text=» DATA WRRR RECIEVE READY PACKET «, t00=0x0073, t01=0x0126}
0x0b4dc…0b50e Head {h00=0x002e, h01=0x0050, text=» DATA WRERR RESET PACKET (NOT IMPLEMENTED)«, t00=0x0073, t01=0x014e}
0x0b50e…0b53c Head {h00=0x002a, h01=0x0050, text=» DATA WRRESC RESET CONFIRMATION PACKET«, t00=0x0073, t01=0x0180}
0x0b53c…0b546 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x001e}
0x0b546…0b554 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x0028}
0x0b554…0b55e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0036}
0x0b55e…0b57a Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0074, t01=0x0040}
0x0b57a…0b596 Head {h00=0x0018, h01=0x0050, text=»* REQUEST ROUTINES *«, t00=0x0074, t01=0x005c}
0x0b596…0b5b2 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0074, t01=0x0078}
0x0b5b2…0b5bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0094}
0x0b5bc…0b5f8 Head {h00=0x0038, h01=0x0050, text=»* THIS SECTION CONTAINS REQUEST HANDLING ROUTINES.«, t00=0x0074, t01=0x009e}
0x0b5f8…0b632 Head {h00=0x0036, h01=0x0050, text=»* THE REQUEST ROUTINES ARE CALLED FROM TERMINAL «, t00=0x0074, t01=0x00da}
0x0b632…0b66c Head {h00=0x0036, h01=0x0050, text=»* DEVICE DRIVERS. THIS IS NORMALLY DONE THROUGH «, t00=0x0074, t01=0x0114}
0x0b66c…0b6aa Head {h00=0x003a, h01=0x0050, text=»* THE TERMINAL NETWORK DISTRIBUTOR DRIVER (DRND01). «, t00=0x0074, t01=0x014e}
0x0b6aa…0b6e0 Head {h00=0x0032, h01=0x0050, text=»* THE DISTRIBUTOR DRIVER WILL SWITCH CALL TO«, t00=0x0074, t01=0x018c}
0x0b6e0…0b71a Head {h00=0x0036, h01=0x0050, text=»* CONNECTED LINE DRIVER. RETURN IS MADE DIRECTLY«, t00=0x0075, t01=0x0032}
0x0b71a…0b752 Head {h00=0x0034, h01=0x0050, text=»* FROM THIS DRIVER TO TERMINAL DEVICE DRIVER. «, t00=0x0075, t01=0x006c}
0x0b752…0b78c Head {h00=0x0036, h01=0x0050, text=»* A CALL WILL NORMALLY RESULT IN A WAIT FOR SOME«, t00=0x0075, t01=0x00a4}
0x0b78c…0b7c8 Head {h00=0x0038, h01=0x0050, text=»* I/O ACTION AND DISPATCHING. THIS MEANS, THAT AT «, t00=0x0075, t01=0x00de}
0x0b7c8…0b804 Head {h00=0x0038, h01=0x0050, text=»* TIME OF CALL THE DEVICE DRIVER MAY NOT HAVE ANY «, t00=0x0075, t01=0x011a}
0x0b804…0b826 Head {h00=0x001e, h01=0x0050, text=»* DATA ON THE A15 STACK.«, t00=0x0075, t01=0x0156}
0x0b826…0b830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0178}
0x0b830…0b864 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0075, t01=0x0182}
0x0b864…0b86e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0026}
0x0b86e…0b886 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0076, t01=0x0030}
0x0b886…0b890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0048}
0x0b890…0b8b8 Head {h00=0x0024, h01=0x0050, text=»* PLCHRI INPUT OF ONE CHARACTER «, t00=0x0076, t01=0x0052}
0x0b8b8…0b8e6 Head {h00=0x002a, h01=0x0050, text=»* PLSTBL DEFINE START OF OUTPUT BLOCK «, t00=0x0076, t01=0x007a}
0x0b8e6…0b90e Head {h00=0x0024, h01=0x0050, text=»* PLCHRO OUTPUT OF ONE CHARACTER«, t00=0x0076, t01=0x00a8}
0x0b90e…0b93a Head {h00=0x0028, h01=0x0050, text=»* PLENBL DEFINE END OF OUTPUT BLOCK «, t00=0x0076, t01=0x00d0}
0x0b93a…0b964 Head {h00=0x0026, h01=0x0050, text=»* PLTEST PERFORM PLC TEST FUNCTION«, t00=0x0076, t01=0x00fc}
0x0b964…0b96e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x0126}
0x0b96e…0b97c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0076, t01=0x0130}
0x0b97c…0b986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x013e}
0x0b986…0b9ca Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0076, t01=0x0148}
0x0b9ca…0b9d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x018c}
0x0b9d4…0b9ec Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0077, t01=0x0008}
0x0b9ec…0b9fc Head {h00=0x000c, h01=0x0050, text=»* PLCHRI«, t00=0x0077, t01=0x0020}
0x0b9fc…0ba06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0030}
0x0ba06…0ba1a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0077, t01=0x003a}
0x0ba1a…0ba50 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE FETCHES ONE CHARACTER FROM THE «, t00=0x0077, t01=0x004e}
0x0ba50…0ba88 Head {h00=0x0034, h01=0x0050, text=»* INPUT BUFFER. IF NO BUFFER HAS ARRIVED, "INPUT«, t00=0x0077, t01=0x0084}
0x0ba88…0babc Head {h00=0x0030, h01=0x0050, text=»* REQUESTED" FLAG IN DWT IS SET, AND CALLING«, t00=0x0077, t01=0x00bc}
0x0babc…0baf2 Head {h00=0x0032, h01=0x0050, text=»* PROCESS IS SUSPENDED UNTIL A BUFFER ARRIVES.«, t00=0x0077, t01=0x00f0}
0x0baf2…0bafc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0126}
0x0bafc…0bb0c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0077, t01=0x0130}
0x0bb0c…0bb24 Head {h00=0x0014, h01=0x0050, text=»* ABI INPTAB,A1 «, t00=0x0077, t01=0x0140}
0x0bb24…0bb3a Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLCHRI«, t00=0x0077, t01=0x0158}
0x0bb3a…0bb44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x016e}
0x0bb44…0bb54 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0077, t01=0x0178}
0x0bb54…0bb70 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0077, t01=0x0188}
0x0bb70…0bb7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0014}
0x0bb7a…0bb8c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0078, t01=0x001e}
0x0bb8c…0bbb0 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x0078, t01=0x0030}
0x0bbb0…0bbd2 Head {h00=0x001e, h01=0x0050, text=»* A1 = BITS 0-14 CHANGED«, t00=0x0078, t01=0x0054}
0x0bbd2…0bbfe Head {h00=0x0028, h01=0x0050, text=»* BIT 15 1 IF MORE CHAR IN BUFFER «, t00=0x0078, t01=0x0076}
0x0bbfe…0bc1c Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x0078, t01=0x00a2}
0x0bc1c…0bc3c Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x0078, t01=0x00c0}
0x0bc3c…0bc56 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x0078, t01=0x00e0}
0x0bc56…0bc60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00fa}
0x0bc60…0bca4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0078, t01=0x0104}
0x0bca4…0bcae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0148}
0x0bcae…0bcc2 Head {h00=0x0010, h01=0x0050, text=»PLCHRI EQU *«, t00=0x0078, t01=0x0152}
0x0bcc2…0bcd6 Head {h00=0x0010, h01=0x0050, text=»PRCHRI EQU *«, t00=0x0078, t01=0x0166}
0x0bcd6…0bcf2 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x0078, t01=0x017a}
0x0bcf2…0bd1e Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTLD1,A6 INPUT TEXT WAITING?«, t00=0x0079, t01=0x0008}
0x0bd1e…0bd44 Head {h00=0x0022, h01=0x0050, text=» RF(Z) CI100 NO, WAIT FOR TEXT«, t00=0x0079, t01=0x0034}
0x0bd44…0bd4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x005a}
0x0bd4e…0bd5c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0079, t01=0x0064}
0x0bd5c…0bd66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0072}
0x0bd66…0bd96 Head {h00=0x002c, h01=0x0050, text=» CF A15,PLGECH GET CHARACTER FROM BUFFER«, t00=0x0079, t01=0x007c}
0x0bd96…0bdbc Head {h00=0x0022, h01=0x0050, text=» LDR A1,A1 CHECK RETURN STATUS«, t00=0x0079, t01=0x00ac}
0x0bdbc…0bdec Head {h00=0x002c, h01=0x0050, text=» RF(N) CI100 BUFFER EMPTY, WAIT FOR NEXT«, t00=0x0079, t01=0x00d2}
0x0bdec…0be08 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0079, t01=0x0102}
0x0be08…0be32 Head {h00=0x0026, h01=0x0050, text=» RF CI110 RETURN TO DEVICE DRIVER «, t00=0x0079, t01=0x011e}
0x0be32…0be3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0148}
0x0be3c…0be46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0152}
0x0be46…0be5a Head {h00=0x0010, h01=0x0050, text=»CI100 EQU * «, t00=0x0079, t01=0x015c}
0x0be5a…0be76 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0079, t01=0x0170}
0x0be76…0bea4 Head {h00=0x002a, h01=0x0050, text=» LDK A2,DWFINP FLAG "INPUT REQUESTED" «, t00=0x0079, t01=0x018c}
0x0bea4…0bed8 Head {h00=0x0030, h01=0x0050, text=» ORS A2,DWTST,A6 SET INPUT REQUESTED IN DWT «, t00=0x007a, t01=0x002a}
0x0bed8…0bf08 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x007a, t01=0x005e}
0x0bf08…0bf2c Head {h00=0x0020, h01=0x0050, text=» ABL PLDISP LOCAL DISPATCHER«, t00=0x007a, t01=0x008e}
0x0bf2c…0bf36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00b2}
0x0bf36…0bf40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00bc}
0x0bf40…0bf7e Head {h00=0x003a, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A NEW BUFFER HAS ARRIVED «, t00=0x007a, t01=0x00c6}
0x0bf7e…0bfa0 Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x007a, t01=0x0104}
0x0bfa0…0bfd0 Head {h00=0x002c, h01=0x0050, text=»* A1 = NR OF CHARACTERS LEFT IN BUFFER «, t00=0x007a, t01=0x0126}
0x0bfd0…0bfee Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x007a, t01=0x0156}
0x0bfee…0c00e Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x007a, t01=0x0174}
0x0c00e…0c02c (123, 0, 400) Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x007b, t01=0x0004}
0x0c02c…0c048 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x007b, t01=0x0022}
0x0c048…0c052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x003e}
0x0c052…0c066 Head {h00=0x0010, h01=0x0050, text=»INPRST EQU *«, t00=0x007b, t01=0x0048}
0x0c066…0c09c Head {h00=0x0032, h01=0x0050, text=» LDKL A3,/FFFF-DWFINP MASK FOR INPUT REQUESTED«, t00=0x007b, t01=0x005c}
0x0c09c…0c0c0 Head {h00=0x0020, h01=0x0050, text=» ANS A3,DWTST,A6 RESET FLAG «, t00=0x007b, t01=0x0092}
0x0c0c0…0c0ec Head {h00=0x0028, h01=0x0050, text=» ST A4,DWTLD1,A6 LINK BUFFER TO DWT «, t00=0x007b, t01=0x00b6}
0x0c0ec…0c0f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00e2}
0x0c0f6…0c126 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGET8 GET A3-A5, A7-A8 FROM DWT«, t00=0x007b, t01=0x00ec}
0x0c126…0c130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x011c}
0x0c130…0c13e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007b, t01=0x0126}
0x0c13e…0c148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0134}
0x0c148…0c15c Head {h00=0x0010, h01=0x0050, text=»CI110 EQU * «, t00=0x007b, t01=0x013e}
0x0c15c…0c180 Head {h00=0x0020, h01=0x0050, text=»* RETURN TO DEVICE DRIVER«, t00=0x007b, t01=0x0152}
0x0c180…0c1ac Head {h00=0x0028, h01=0x0050, text=» LDR A1,A1 ANY CHAR LEFT IN BUFFER? «, t00=0x007b, t01=0x0176}
0x0c1ac…0c1ce Head {h00=0x001e, h01=0x0050, text=» RF(Z) CI120 NO, CONTINUE «, t00=0x007c, t01=0x0012}
0x0c1ce…0c1f8 Head {h00=0x0026, h01=0x0050, text=» LDK A1,1 INDICATE MORE CHARACTERS«, t00=0x007c, t01=0x0034}
0x0c1f8…0c20a Head {h00=0x000e, h01=0x0050, text=» RF CI130 «, t00=0x007c, t01=0x005e}
0x0c20a…0c214 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0070}
0x0c214…0c228 Head {h00=0x0010, h01=0x0050, text=»CI120 EQU * «, t00=0x007c, t01=0x007a}
0x0c228…0c24c Head {h00=0x0020, h01=0x0050, text=» CM DWTLD1,A6 UNLINK BUFFER «, t00=0x007c, t01=0x008e}
0x0c24c…0c260 Head {h00=0x0010, h01=0x0050, text=»CI130 EQU * «, t00=0x007c, t01=0x00b2}
0x0c260…0c26c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007c, t01=0x00c6}
0x0c26c…0c27c Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007c, t01=0x00d2}
0x0c27c…0c286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00e2}
0x0c286…0c294 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007c, t01=0x00ec}
0x0c294…0c29e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00fa}
0x0c29e…0c2e2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007c, t01=0x0104}
0x0c2e2…0c2ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0148}
0x0c2ec…0c304 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x007c, t01=0x0152}
0x0c304…0c314 Head {h00=0x000c, h01=0x0050, text=»* PLSTBL«, t00=0x007c, t01=0x016a}
0x0c314…0c31e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x017a}
0x0c31e…0c332 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x007c, t01=0x0184}
0x0c332…0c36a Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE DEFINES START OF AN OUTPUT BLOCK.«, t00=0x007d, t01=0x0008}
0x0c36a…0c3a0 Head {h00=0x0032, h01=0x0050, text=»* IT ALLOCATES AN OUTPUT BUFFER, AND LINKS IT «, t00=0x007d, t01=0x0040}
0x0c3a0…0c3b6 Head {h00=0x0012, h01=0x0050, text=»* TO THE DWT. «, t00=0x007d, t01=0x0076}
0x0c3b6…0c3c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x008c}
0x0c3c0…0c3d0 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x007d, t01=0x0096}
0x0c3d0…0c3e8 Head {h00=0x0014, h01=0x0050, text=»* ABI STBTAB,A1 «, t00=0x007d, t01=0x00a6}
0x0c3e8…0c3fe Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLSTBL«, t00=0x007d, t01=0x00be}
0x0c3fe…0c408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00d4}
0x0c408…0c418 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x007d, t01=0x00de}
0x0c418…0c450 Head {h00=0x0034, h01=0x0050, text=»* A2 = MAXIMAL LENGTH OF TEXT IN BLOCK (BYTES) «, t00=0x007d, t01=0x00ee}
0x0c450…0c46c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x007d, t01=0x0126}
0x0c46c…0c476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0142}
0x0c476…0c488 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x007d, t01=0x014c}
0x0c488…0c4ac Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x007d, t01=0x015e}
0x0c4ac…0c4c8 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x007d, t01=0x0182}
0x0c4c8…0c4da Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x007e, t01=0x000e}
0x0c4da…0c4f4 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x007e, t01=0x0020}
0x0c4f4…0c528 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x007e, t01=0x003a}
0x0c528…0c546 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x007e, t01=0x006e}
0x0c546…0c560 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x007e, t01=0x008c}
0x0c560…0c56a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00a6}
0x0c56a…0c5ae Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x007e, t01=0x00b0}
0x0c5ae…0c5b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00f4}
0x0c5b8…0c5cc Head {h00=0x0010, h01=0x0050, text=»PLSTBL EQU *«, t00=0x007e, t01=0x00fe}
0x0c5cc…0c5e0 Head {h00=0x0010, h01=0x0050, text=»PRSTBL EQU *«, t00=0x007e, t01=0x0112}
0x0c5e0…0c5ec Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x007e, t01=0x0126}
0x0c5ec…0c61c Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x007e, t01=0x0132}
0x0c61c…0c644 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x007e, t01=0x0162}
0x0c644…0c64e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x018a}
0x0c64e…0c65c (127, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007f, t01=0x0004}
0x0c65c…0c666 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0012}
0x0c666…0c680 Head {h00=0x0016, h01=0x0050, text=»SB050 EQU * . =16 «, t00=0x007f, t01=0x001c}
0x0c680…0c6b2 Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTLD1,A6 BUFFER ALREADY ALLOCATED?«, t00=0x007f, t01=0x0036}
0x0c6b2…0c6de Head {h00=0x0028, h01=0x0050, text=» ABL(NZ) NDREPO YES, SET OK & RETURN«, t00=0x007f, t01=0x0068}
0x0c6de…0c708 Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x007f, t01=0x0094}
0x0c708…0c72c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) SBERR2 ERROR, RETURN«, t00=0x007f, t01=0x00be}
0x0c72c…0c75c Head {h00=0x002c, h01=0x0050, text=» LD A3,DWTCHP,A6 CHANNEL PARAMETERS =16 «, t00=0x007f, t01=0x00e2}
0x0c75c…0c788 Head {h00=0x0028, h01=0x0050, text=» ANK A3,CHABLO CHANGED BLOCKING? =16«, t00=0x007f, t01=0x0112}
0x0c788…0c7a4 Head {h00=0x0018, h01=0x0050, text=» RF(Z) SB070 NO =16 «, t00=0x007f, t01=0x013e}
0x0c7a4…0c7d6 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,LOBUFL LOAD MAX BLOCK LENGTH =16 «, t00=0x007f, t01=0x015a}
0x0c7d6…0c7f0 Head {h00=0x0016, h01=0x0050, text=»SB070 EQU * . =16 «, t00=0x007f, t01=0x018c}
0x0c7f0…0c7fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0016}
0x0c7fa…0c81c Head {h00=0x001e, h01=0x0050, text=»* CHECK LEVEL 3 WINDOW «, t00=0x0080, t01=0x0020}
0x0c81c…0c844 Head {h00=0x0024, h01=0x0050, text=» LDR A3,A2 SAVE MAX BLOCK LENGTH«, t00=0x0080, t01=0x0042}
0x0c844…0c866 Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x0080, t01=0x006a}
0x0c866…0c89a Head {h00=0x0030, h01=0x0050, text=» ANKL A1,DWFECH+DWFTY1 ECHO OR ONLY TYPE 1? «, t00=0x0080, t01=0x008c}
0x0c89a…0c8c8 Head {h00=0x002a, h01=0x0050, text=» RF(NZ) SB090 YES, DON'T CHECK WINDOW «, t00=0x0080, t01=0x00c0}
0x0c8c8…0c8fe Head {h00=0x0032, h01=0x0050, text=» CF A15,GETOFR A2 := NR OF OUTSTANDING FRAMES «, t00=0x0080, t01=0x00ee}
0x0c8fe…0c928 Head {h00=0x0026, h01=0x0050, text=» LDR A2,A2 ANY FRAMES OUTSTANDING?«, t00=0x0080, t01=0x0124}
0x0c928…0c94a Head {h00=0x001e, h01=0x0050, text=» RF(Z) SB090 NO, CONTINUE «, t00=0x0080, t01=0x014e}
0x0c94a…0c96c Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x0080, t01=0x0170}
0x0c96c…0c9a0 (129, 0, 400) Head {h00=0x0030, h01=0x0050, text=» ANK A1,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x0081, t01=0x0004}
0x0c9a0…0c9d6 Head {h00=0x0032, h01=0x0050, text=» RF(NZ) SBERR YES, NO FRAMES MAY BE OUT. ERROR«, t00=0x0081, t01=0x0038}
0x0c9d6…0c9fa Head {h00=0x0020, h01=0x0050, text=» SUK A2,WINDOW WINDOW FULL? «, t00=0x0081, t01=0x006e}
0x0c9fa…0ca1c Head {h00=0x001e, h01=0x0050, text=» RF(N) SB090 NO, CONTINUE «, t00=0x0081, t01=0x0092}
0x0ca1c…0ca50 Head {h00=0x0030, h01=0x0050, text=»* DWT WILL HAVE TO WAIT UNTIL WINDOW IS OPEN«, t00=0x0081, t01=0x00b4}
0x0ca50…0ca86 Head {h00=0x0032, h01=0x0050, text=» ST A3,DWTLD1,A6 SAVE REQUESTED BUFFER LENGTH «, t00=0x0081, t01=0x00e8}
0x0ca86…0cabc Head {h00=0x0032, h01=0x0050, text=» LDK A1,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" «, t00=0x0081, t01=0x011e}
0x0cabc…0caec Head {h00=0x002c, h01=0x0050, text=» ORS A1,DWTST,A6 SET FLAG IN DWT STATUS «, t00=0x0081, t01=0x0154}
0x0caec…0cb12 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0081, t01=0x0184}
0x0cb12…0cb36 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0082, t01=0x001a}
0x0cb36…0cb52 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0082, t01=0x003e}
0x0cb52…0cb8a Head {h00=0x0034, h01=0x0050, text=» IM WIQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0082, t01=0x005a}
0x0cb8a…0cb96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x0092}
0x0cb96…0cbba Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0082, t01=0x009e}
0x0cbba…0cbc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00c2}
0x0cbc4…0cbce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x00cc}
0x0cbce…0cc08 Head {h00=0x0036, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN WINDOW IS OPEN AGAIN «, t00=0x0082, t01=0x00d6}
0x0cc08…0cc2c Head {h00=0x0020, h01=0x0050, text=»* (AFTER A LEVEL 3 ACK) «, t00=0x0082, t01=0x0110}
0x0cc2c…0cc56 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0082, t01=0x0134}
0x0cc56…0cc72 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0082, t01=0x015e}
0x0cc72…0cc8e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0082, t01=0x017a}
0x0cc8e…0ccaa Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0083, t01=0x0008}
0x0ccaa…0ccb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0024}
0x0ccb4…0ccc8 Head {h00=0x0010, h01=0x0050, text=»WINRST EQU *«, t00=0x0083, t01=0x002e}
0x0ccc8…0cd00 Head {h00=0x0034, h01=0x0050, text=» LD A3,DWTLD1,A6 RESTORE REQUESTED BUFFER LENGTH«, t00=0x0083, t01=0x0042}
0x0cd00…0cd16 Head {h00=0x0012, h01=0x0050, text=» CM DWTLD1,A6 «, t00=0x0083, t01=0x007a}
0x0cd16…0cd34 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0083, t01=0x0090}
0x0cd34…0cd6a Head {h00=0x0032, h01=0x0050, text=» RF(NZ) SBERR2 ERROR, RETURN TO DEVICE DRIVER «, t00=0x0083, t01=0x00ae}
0x0cd6a…0cd74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00e4}
0x0cd74…0cd7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x00ee}
0x0cd7e…0cd92 Head {h00=0x0010, h01=0x0050, text=»SB090 EQU * «, t00=0x0083, t01=0x00f8}
0x0cd92…0cda4 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x0083, t01=0x010c}
0x0cda4…0cdd0 Head {h00=0x0028, h01=0x0050, text=» CWK A3,SOBUFL SHORT BUFFER ENOUGH? «, t00=0x0083, t01=0x011e}
0x0cdd0…0cdfa Head {h00=0x0026, h01=0x0050, text=» RF(G) SB100 NO, TAKE LONG BUFFER «, t00=0x0083, t01=0x014a}
0x0cdfa…0ce04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0174}
0x0ce04…0ce2e Head {h00=0x0026, h01=0x0050, text=»* ALLOCATE SHORT OUTPUT BUFFER «, t00=0x0083, t01=0x017e}
0x0ce2e…0ce60 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS«, t00=0x0084, t01=0x0018}
0x0ce60…0ce86 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGTBU ALLOCATE BUFFER«, t00=0x0084, t01=0x004a}
0x0ce86…0ceb6 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) SB120 COMMON PART FOR SHORT/LONG«, t00=0x0084, t01=0x0070}
0x0ceb6…0ceec Head {h00=0x0032, h01=0x0050, text=» LDK A7,CWTSBQ NO BUFFER LEFT. SET QUEUE HEAD «, t00=0x0084, t01=0x00a0}
0x0ceec…0cf12 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0084, t01=0x00d6}
0x0cf12…0cf36 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0084, t01=0x00fc}
0x0cf36…0cf52 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0084, t01=0x0120}
0x0cf52…0cf8a Head {h00=0x0034, h01=0x0050, text=» IM SBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0084, t01=0x013c}
0x0cf8a…0cf96 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0084, t01=0x0174}
0x0cf96…0cfc2 Head {h00=0x0028, h01=0x0050, text=» RF SB110 COMMON PART FOR NO BUFFER «, t00=0x0084, t01=0x0180}
0x0cfc2…0cfcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x001c}
0x0cfcc…0cfe0 Head {h00=0x0010, h01=0x0050, text=»SB100 EQU * «, t00=0x0085, t01=0x0026}
0x0cfe0…0d00a Head {h00=0x0026, h01=0x0050, text=» CWK A3,LOBUFL LONG BUFFER ENOUGH?«, t00=0x0085, t01=0x003a}
0x0d00a…0d028 Head {h00=0x001a, h01=0x0050, text=» RF(G) SBERR NO, ERROR«, t00=0x0085, t01=0x0064}
0x0d028…0d050 Head {h00=0x0024, h01=0x0050, text=»* ALLOCATE LONG OUTPUT BUFFER«, t00=0x0085, t01=0x0082}
0x0d050…0d082 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS «, t00=0x0085, t01=0x00aa}
0x0d082…0d0a8 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGTBU ALLOCATE BUFFER«, t00=0x0085, t01=0x00dc}
0x0d0a8…0d0d8 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) SB120 COMMON PART FOR SHORT/LONG«, t00=0x0085, t01=0x0102}
0x0d0d8…0d10e Head {h00=0x0032, h01=0x0050, text=» LDK A7,CWTLBQ NO BUFFER LEFT. SET QUEUE HEAD «, t00=0x0085, t01=0x0132}
0x0d10e…0d134 Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0085, t01=0x0168}
0x0d134…0d158 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0085, t01=0x018e}
0x0d158…0d174 Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0086, t01=0x0022}
0x0d174…0d1ac Head {h00=0x0034, h01=0x0050, text=» IM LBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0086, t01=0x003e}
0x0d1ac…0d1b8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0086, t01=0x0076}
0x0d1b8…0d1c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0082}
0x0d1c2…0d1d6 Head {h00=0x0010, h01=0x0050, text=»SB110 EQU * «, t00=0x0086, t01=0x008c}
0x0d1d6…0d212 Head {h00=0x0038, h01=0x0050, text=»* NO BUFFER WAS AVAILABLE. PUT REQUEST IN QUEUE. «, t00=0x0086, t01=0x00a0}
0x0d212…0d23e Head {h00=0x0028, h01=0x0050, text=» ADR A7,A5 A7 := QUEUE HEAD ADDRESS «, t00=0x0086, t01=0x00dc}
0x0d23e…0d25c Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x0086, t01=0x0108}
0x0d25c…0d286 Head {h00=0x0026, h01=0x0050, text=» ADKL A4,DWTOTQ QUEUE LINK ADDRESS«, t00=0x0086, t01=0x0126}
0x0d286…0d2ae Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKLST PUT LAST IN QUEUE«, t00=0x0086, t01=0x0150}
0x0d2ae…0d2d2 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0086, t01=0x0178}
0x0d2d2…0d2dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x000c}
0x0d2dc…0d2e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0016}
0x0d2e6…0d31c Head {h00=0x0032, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A BUFFER IS FREE «, t00=0x0087, t01=0x0020}
0x0d31c…0d33c Head {h00=0x001c, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0087, t01=0x0056}
0x0d33c…0d358 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0087, t01=0x0076}
0x0d358…0d380 Head {h00=0x0024, h01=0x0050, text=»* A4 = BUFFER ADDRESS (IF A1=0)«, t00=0x0087, t01=0x0092}
0x0d380…0d39c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0087, t01=0x00ba}
0x0d39c…0d3b8 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0087, t01=0x00d6}
0x0d3b8…0d3c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00f2}
0x0d3c2…0d3d6 Head {h00=0x0010, h01=0x0050, text=»BUFRST EQU *«, t00=0x0087, t01=0x00fc}
0x0d3d6…0d3f4 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0087, t01=0x0110}
0x0d3f4…0d41a Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SBERR2 RETURN IF ERROR«, t00=0x0087, t01=0x012e}
0x0d41a…0d42e Head {h00=0x0010, h01=0x0050, text=»SB120 EQU * «, t00=0x0087, t01=0x0154}
0x0d42e…0d45a Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF X25 HEADER «, t00=0x0087, t01=0x0168}
0x0d45a…0d48e (136, 0, 400) Head {h00=0x0030, h01=0x0050, text=» ST A2,BUFBIX,A4 BYTE INDEX := START OF DATA«, t00=0x0088, t01=0x0004}
0x0d48e…0d4c2 Head {h00=0x0030, h01=0x0050, text=» ST A4,DWTLD1,A6 SAVE BUFFER ADDRESS IN DWT «, t00=0x0088, t01=0x0038}
0x0d4c2…0d4cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x006c}
0x0d4cc…0d4f8 Head {h00=0x0028, h01=0x0050, text=» ABL NDREPO RETURN TO DEVICE DRIVER «, t00=0x0088, t01=0x0076}
0x0d4f8…0d516 Head {h00=0x001a, h01=0x0050, text=»* RETURN CODE := OK«, t00=0x0088, t01=0x00a2}
0x0d516…0d520 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00c0}
0x0d520…0d52a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00ca}
0x0d52a…0d53e Head {h00=0x0010, h01=0x0050, text=»SBERR EQU * «, t00=0x0088, t01=0x00d4}
0x0d53e…0d56a Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x0088, t01=0x00e8}
0x0d56a…0d57e Head {h00=0x0010, h01=0x0050, text=»SBERR2 EQU *«, t00=0x0088, t01=0x0114}
0x0d57e…0d5a4 Head {h00=0x0022, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS «, t00=0x0088, t01=0x0128}
0x0d5a4…0d5ce Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x0088, t01=0x014e}
0x0d5ce…0d5d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0178}
0x0d5d8…0d5e6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0088, t01=0x0182}
0x0d5e6…0d5f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0190}
0x0d5f0…0d634 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0089, t01=0x000a}
0x0d634…0d63e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x004e}
0x0d63e…0d656 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0089, t01=0x0058}
0x0d656…0d666 Head {h00=0x000c, h01=0x0050, text=»* PLCHRO«, t00=0x0089, t01=0x0070}
0x0d666…0d670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0080}
0x0d670…0d684 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0089, t01=0x008a}
0x0d684…0d6c2 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE WRITES ONE CHARACTER TO OUTPUT BUFFER. «, t00=0x0089, t01=0x009e}
0x0d6c2…0d6cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00dc}
0x0d6cc…0d6dc Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0089, t01=0x00e6}
0x0d6dc…0d6f4 Head {h00=0x0014, h01=0x0050, text=»* ABI OUPTAB,A1 «, t00=0x0089, t01=0x00f6}
0x0d6f4…0d70a Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLCHRO«, t00=0x0089, t01=0x010e}
0x0d70a…0d714 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0124}
0x0d714…0d724 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0089, t01=0x012e}
0x0d724…0d748 Head {h00=0x0020, h01=0x0050, text=»* A2 = BITS 0-7 IRRELEVANT«, t00=0x0089, t01=0x013e}
0x0d748…0d768 Head {h00=0x001c, h01=0x0050, text=»* BITS 8-15 CHARACTER «, t00=0x0089, t01=0x0162}
0x0d768…0d784 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0089, t01=0x0182}
0x0d784…0d78e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x000e}
0x0d78e…0d7a0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x008a, t01=0x0018}
0x0d7a0…0d7c4 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x008a, t01=0x002a}
0x0d7c4…0d7e0 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x008a, t01=0x004e}
0x0d7e0…0d7f2 Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x008a, t01=0x006a}
0x0d7f2…0d80c Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x008a, t01=0x007c}
0x0d80c…0d840 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x008a, t01=0x0096}
0x0d840…0d85e Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x008a, t01=0x00ca}
0x0d85e…0d878 Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x008a, t01=0x00e8}
0x0d878…0d882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0102}
0x0d882…0d8c6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x008a, t01=0x010c}
0x0d8c6…0d8d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0150}
0x0d8d0…0d8e4 Head {h00=0x0010, h01=0x0050, text=»PLCHRO EQU *«, t00=0x008a, t01=0x015a}
0x0d8e4…0d8f8 Head {h00=0x0010, h01=0x0050, text=»PRCHRO EQU *«, t00=0x008a, t01=0x016e}
0x0d8f8…0d904 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x008a, t01=0x0182}
0x0d904…0d90e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x018e}
0x0d90e…0d91c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008b, t01=0x0008}
0x0d91c…0d926 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0016}
0x0d926…0d942 Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x008b, t01=0x0020}
0x0d942…0d96a Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTLD1,A6 BUFFER ADDRESS «, t00=0x008b, t01=0x003c}
0x0d96a…0d992 Head {h00=0x0024, h01=0x0050, text=» RF(Z) COERR2 ERROR IF NO BUFFER«, t00=0x008b, t01=0x0064}
0x0d992…0d9c0 Head {h00=0x002a, h01=0x0050, text=» CF A15,PLPUCH PUT CHARACTER IN BUFFER«, t00=0x008b, t01=0x008c}
0x0d9c0…0d9e4 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 CHECK RETURN CODE«, t00=0x008b, t01=0x00ba}
0x0d9e4…0da10 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) COERR1 ERROR IF BUFFER FULL «, t00=0x008b, t01=0x00de}
0x0da10…0da3a Head {h00=0x0026, h01=0x0050, text=» LD A2,BUFBIX,A4 BUFFER INDEX =16 «, t00=0x008b, t01=0x010a}
0x0da3a…0da44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0134}
0x0da44…0da60 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x008b, t01=0x013e}
0x0da60…0da9a Head {h00=0x0036, h01=0x0050, text=»* RETURN DIRECTLY INSTEAD OF THROUGH NDRETO TO GET«, t00=0x008b, t01=0x015a}
0x0da9a…0dab6 (140, 0, 398) Head {h00=0x0018, h01=0x0050, text=»* FASTER PROCESSING.«, t00=0x008c, t01=0x0004}
0x0dab6…0dae0 Head {h00=0x0026, h01=0x0050, text=» CWK A2,LOBUFL+3 BUFFER FULL? =16 «, t00=0x008c, t01=0x0020}
0x0dae0…0dafc Head {h00=0x0018, h01=0x0050, text=» RF(NE) OP100 NO =16«, t00=0x008c, t01=0x004a}
0x0dafc…0db2a Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTCHP,A6 CHANNEL PARAMETER =16«, t00=0x008c, t01=0x0066}
0x0db2a…0db56 Head {h00=0x0028, h01=0x0050, text=» ANK A2,CHABLO CHANGED BLOCKING? =16«, t00=0x008c, t01=0x0094}
0x0db56…0db80 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) EB050 YES SEND BUFFER =16 «, t00=0x008c, t01=0x00c0}
0x0db80…0db9a Head {h00=0x0016, h01=0x0050, text=»OP100 EQU * . =16 «, t00=0x008c, t01=0x00ea}
0x0db9a…0dba6 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x008c, t01=0x0104}
0x0dba6…0dbc4 Head {h00=0x001a, h01=0x0050, text=» ADK A5,4 ADJUST STACK«, t00=0x008c, t01=0x0110}
0x0dbc4…0dbf6 Head {h00=0x002e, h01=0x0050, text=» LDR A2,A1 DEVICE STATUS & RET CODE := OK «, t00=0x008c, t01=0x012e}
0x0dbf6…0dc1e Head {h00=0x0024, h01=0x0050, text=» ABR* A5 RETURN TO DEVICE DRIVER«, t00=0x008c, t01=0x0160}
0x0dc1e…0dc28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0188}
0x0dc28…0dc32 (141, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0004}
0x0dc32…0dc46 Head {h00=0x0010, h01=0x0050, text=»COERR1 EQU *«, t00=0x008d, t01=0x000e}
0x0dc46…0dc6c Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x008d, t01=0x0022}
0x0dc6c…0dc94 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x008d, t01=0x0048}
0x0dc94…0dca8 Head {h00=0x0010, h01=0x0050, text=»COERR2 EQU *«, t00=0x008d, t01=0x0070}
0x0dca8…0dcc4 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x008d, t01=0x0084}
0x0dcc4…0dcf0 Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x008d, t01=0x00a0}
0x0dcf0…0dd1a Head {h00=0x0026, h01=0x0050, text=» ABL NDRET RETURN TO DEVICE DRIVER«, t00=0x008d, t01=0x00cc}
0x0dd1a…0dd24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00f6}
0x0dd24…0dd32 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x008d, t01=0x0100}
0x0dd32…0dd3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x010e}
0x0dd3c…0dd80 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x008d, t01=0x0118}
0x0dd80…0dd8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x015c}
0x0dd8a…0dda2 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x008d, t01=0x0166}
0x0dda2…0ddb2 Head {h00=0x000c, h01=0x0050, text=»* PLENBL«, t00=0x008d, t01=0x017e}
0x0ddb2…0ddbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x018e}
0x0ddbc…0ddd0 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x008e, t01=0x0008}
0x0ddd0…0de04 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE DEFINES END OF OUTPUT BLOCK. «, t00=0x008e, t01=0x001c}
0x0de04…0de36 Head {h00=0x002e, h01=0x0050, text=»* IT SENDS THE BLOCK TO PLC AND WAITS FOR «, t00=0x008e, t01=0x0050}
0x0de36…0de4c Head {h00=0x0012, h01=0x0050, text=»* ACKNOWLEDGE.«, t00=0x008e, t01=0x0082}
0x0de4c…0de56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0098}
0x0de56…0de66 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x008e, t01=0x00a2}
0x0de66…0de7e Head {h00=0x0014, h01=0x0050, text=»* ABI ENBTAB,A1 «, t00=0x008e, t01=0x00b2}
0x0de7e…0de94 Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLENBL«, t00=0x008e, t01=0x00ca}
0x0de94…0de9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00e0}
0x0de9e…0deae Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x008e, t01=0x00ea}
0x0deae…0deca Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x008e, t01=0x00fa}
0x0deca…0ded4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0116}
0x0ded4…0dee6 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x008e, t01=0x0120}
0x0dee6…0df0a Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x008e, t01=0x0132}
0x0df0a…0df26 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x008e, t01=0x0156}
0x0df26…0df38 Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x008e, t01=0x0172}
0x0df38…0df52 Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x008e, t01=0x0184}
0x0df52…0df86 Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x008f, t01=0x000e}
0x0df86…0dfa4 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x008f, t01=0x0042}
0x0dfa4…0dfbe Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x008f, t01=0x0060}
0x0dfbe…0dfc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x007a}
0x0dfc8…0e00c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x008f, t01=0x0084}
0x0e00c…0e016 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00c8}
0x0e016…0e02a Head {h00=0x0010, h01=0x0050, text=»PLENBL EQU *«, t00=0x008f, t01=0x00d2}
0x0e02a…0e03e Head {h00=0x0010, h01=0x0050, text=»PRENBL EQU *«, t00=0x008f, t01=0x00e6}
0x0e03e…0e066 Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 SET RETURN CODE OK =16«, t00=0x008f, t01=0x00fa}
0x0e066…0e09a Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTWAT,A6 GET WAIT/ACT INDICATOR =16 «, t00=0x008f, t01=0x0122}
0x0e09a…0e0b2 Head {h00=0x0014, h01=0x0050, text=» SUK A2,1 . =16 «, t00=0x008f, t01=0x0156}
0x0e0b2…0e0cc Head {h00=0x0016, h01=0x0050, text=» RF(Z) EB040 . =16«, t00=0x008f, t01=0x016e}
0x0e0cc…0e104 Head {h00=0x0034, h01=0x0050, text=» LDKL A2,/FFFF-CHABLO RESET CHANGED BLOCKING =16«, t00=0x008f, t01=0x0188}
0x0e104…0e124 Head {h00=0x001c, h01=0x0050, text=» ANS A2,DWTCHP,A6 . =16 «, t00=0x0090, t01=0x0030}
0x0e124…0e13e Head {h00=0x0016, h01=0x0050, text=»EB040 EQU * . =16 «, t00=0x0090, t01=0x0050}
0x0e13e…0e16c Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTCHP,A6 CHANNEL PARAMETER =16«, t00=0x0090, t01=0x006a}
0x0e16c…0e198 Head {h00=0x0028, h01=0x0050, text=» ANK A2,CHABLO CHANGED BLOCKING =16 «, t00=0x0090, t01=0x0098}
0x0e198…0e1be Head {h00=0x0022, h01=0x0050, text=» RB(NZ) OP100 YES, RETURN =16 «, t00=0x0090, t01=0x00c4}
0x0e1be…0e1d8 Head {h00=0x0016, h01=0x0050, text=»EB050 EQU * . =16 «, t00=0x0090, t01=0x00ea}
0x0e1d8…0e1e4 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0090, t01=0x0104}
0x0e1e4…0e214 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x0090, t01=0x0110}
0x0e214…0e23c Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x0090, t01=0x0140}
0x0e23c…0e246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0168}
0x0e246…0e254 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0090, t01=0x0172}
0x0e254…0e25e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0090, t01=0x0180}
0x0e25e…0e28e Head {h00=0x002c, h01=0x0050, text=» LDK A1,PLSERR SET RET CODE JUST IN CASE«, t00=0x0090, t01=0x018a}
0x0e28e…0e2b6 Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTLD1,A6 BUFFER ADDRESS «, t00=0x0091, t01=0x002a}
0x0e2b6…0e2ec Head {h00=0x0032, h01=0x0050, text=» ABL(Z) NDREPO ERROR IF NO BUFFER. RETURN =16 «, t00=0x0091, t01=0x0052}
0x0e2ec…0e316 Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0091, t01=0x0088}
0x0e316…0e33c Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR1 RETURN IF ERROR«, t00=0x0091, t01=0x00b2}
0x0e33c…0e346 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x00d8}
0x0e346…0e364 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A6 DWT ADDRESS«, t00=0x0091, t01=0x00e2}
0x0e364…0e38a Head {h00=0x0022, h01=0x0050, text=» ADKL A3,DWTOTQ QUEUE POINTER «, t00=0x0091, t01=0x0100}
0x0e38a…0e3ac Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCS RESERVE CCA«, t00=0x0091, t01=0x0126}
0x0e3ac…0e3de Head {h00=0x002e, h01=0x0050, text=» CM DWTOTQ,A6 RESET QUEUE ELEMENT POINTER «, t00=0x0091, t01=0x0148}
0x0e3de…0e3fc Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0091, t01=0x017a}
0x0e3fc…0e422 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR1 RETURN IF ERROR«, t00=0x0092, t01=0x0008}
0x0e422…0e42c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x002e}
0x0e42c…0e460 Head {h00=0x0030, h01=0x0050, text=»* WRITE PARAMETERS IN CCA AND X25 HEADER «, t00=0x0092, t01=0x0038}
0x0e460…0e46c Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0092, t01=0x006c}
0x0e46c…0e494 Head {h00=0x0024, h01=0x0050, text=» LD A4,DWTLD1,A6 BUFFER ADDRESS «, t00=0x0092, t01=0x0078}
0x0e494…0e4ba Head {h00=0x0022, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 TO CCA«, t00=0x0092, t01=0x00a0}
0x0e4ba…0e4f8 Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x0092, t01=0x00c6}
0x0e4f8…0e520 Head {h00=0x0024, h01=0x0050, text=» LDK A3,CMDFW ASSUME FAST WRITE «, t00=0x0092, t01=0x0104}
0x0e520…0e546 Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 DEVICE STATUS «, t00=0x0092, t01=0x012c}
0x0e546…0e55e Head {h00=0x0014, h01=0x0050, text=» LDR A7,A2 SAVE «, t00=0x0092, t01=0x0152}
0x0e55e…0e582 Head {h00=0x0020, h01=0x0050, text=» ANKL A7,DWFECH ECHO OUTPUT?«, t00=0x0092, t01=0x016a}
0x0e582…0e5a8 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EB090 YES, USE TYPE 1 «, t00=0x0092, t01=0x018e}
0x0e5a8…0e5da Head {h00=0x002e, h01=0x0050, text=» LDK A3,CMDSW NOT ECHO, USE STANDARD WRITE«, t00=0x0093, t01=0x0024}
0x0e5da…0e606 Head {h00=0x0028, h01=0x0050, text=» ANK A2,DWFTY1 ONLY TYPE 1 ALLOWED? «, t00=0x0093, t01=0x0056}
0x0e606…0e62a Head {h00=0x0020, h01=0x0050, text=» RF(Z) EB100 NO, USE TYPE 2 «, t00=0x0093, t01=0x0082}
0x0e62a…0e634 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00a6}
0x0e634…0e642 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0093, t01=0x00b0}
0x0e642…0e64c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x00be}
0x0e64c…0e660 Head {h00=0x0010, h01=0x0050, text=»EB090 EQU * «, t00=0x0093, t01=0x00c8}
0x0e660…0e67e Head {h00=0x001a, h01=0x0050, text=»* NO FLOW CONTROL«, t00=0x0093, t01=0x00dc}
0x0e67e…0e6b2 Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR1 WRITE LINE ADDRESS. NO FLOW C«, t00=0x0093, t01=0x00fa}
0x0e6b2…0e6e8 Head {h00=0x0032, h01=0x0050, text=» LDK A2,TYNFLO MESSAGE TYPE := NO FLOW CONTROL«, t00=0x0093, t01=0x012e}
0x0e6e8…0e702 Head {h00=0x0016, h01=0x0050, text=» RF EB110 CONTINUE«, t00=0x0093, t01=0x0164}
0x0e702…0e70c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x017e}
0x0e70c…0e720 Head {h00=0x0010, h01=0x0050, text=»EB100 EQU * «, t00=0x0093, t01=0x0188}
0x0e720…0e73c Head {h00=0x0018, h01=0x0050, text=»* FLOW CONTROL «, t00=0x0094, t01=0x000c}
0x0e73c…0e770 Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR2 WRITE LINE ADDRESS. FLOW CTRL«, t00=0x0094, t01=0x0028}
0x0e770…0e7a4 Head {h00=0x0030, h01=0x0050, text=» CF A15,FWOPSR FETCH AND UPDATE FLOW CONTROL«, t00=0x0094, t01=0x005c}
0x0e7a4…0e7d2 Head {h00=0x002a, h01=0x0050, text=» SC A2,X25FLW,A4 P(R) & P(S) TO PACKET«, t00=0x0094, t01=0x0090}
0x0e7d2…0e804 Head {h00=0x002e, h01=0x0050, text=» LDK A2,TYDATA MESSAGE TYPE := NORMAL DATA«, t00=0x0094, t01=0x00be}
0x0e804…0e80e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x00f0}
0x0e80e…0e822 Head {h00=0x0010, h01=0x0050, text=»EB110 EQU * «, t00=0x0094, t01=0x00fa}
0x0e822…0e856 Head {h00=0x0030, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 MESSAGE TYPE TO CCA «, t00=0x0094, t01=0x010e}
0x0e856…0e884 Head {h00=0x002a, h01=0x0050, text=» SC A3,CWTCCA+CCRCMD,A5 COMMAND TO CCA«, t00=0x0094, t01=0x0142}
0x0e884…0e8b6 Head {h00=0x002e, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA«, t00=0x0094, t01=0x0170}
0x0e8b6…0e8da Head {h00=0x0020, h01=0x0050, text=» LD A3,BUFBIX,A4 BYTE INDEX «, t00=0x0095, t01=0x0012}
0x0e8da…0e90e Head {h00=0x0030, h01=0x0050, text=» ST A3,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA«, t00=0x0095, t01=0x0036}
0x0e90e…0e918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x006a}
0x0e918…0e942 Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0095, t01=0x0074}
0x0e942…0e968 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) EBERR2 RETURN IF ERROR«, t00=0x0095, t01=0x009e}
0x0e968…0e990 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0095, t01=0x00c4}
0x0e990…0e9b4 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) EBERR1 HANDLE ERROR «, t00=0x0095, t01=0x00ec}
0x0e9b4…0e9d8 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0095, t01=0x0110}
0x0e9d8…0e9e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0134}
0x0e9e2…0e9f0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0095, t01=0x013e}
0x0e9f0…0e9fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x014c}
0x0e9fa…0ea32 Head {h00=0x0034, h01=0x0050, text=»* ENTRY TO ACKRST IS MADE WHEN I/O OPERATION «, t00=0x0095, t01=0x0156}
0x0ea32…0ea4c Head {h00=0x0016, h01=0x0050, text=»* IS COMPLETED.«, t00=0x0095, t01=0x018e}
0x0ea4c…0ea76 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0096, t01=0x0018}
0x0ea76…0ea92 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0096, t01=0x0042}
0x0ea92…0eaae Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0096, t01=0x005e}
0x0eaae…0eaca Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0096, t01=0x007a}
0x0eaca…0eae6 Head {h00=0x0018, h01=0x0050, text=»* A7 = MESSAGE TYPE«, t00=0x0096, t01=0x0096}
0x0eae6…0eaf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x00b2}
0x0eaf0…0eb04 Head {h00=0x0010, h01=0x0050, text=»ACKRST EQU *«, t00=0x0096, t01=0x00bc}
0x0eb04…0eb2a Head {h00=0x0022, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS «, t00=0x0096, t01=0x00d0}
0x0eb2a…0eb48 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 ANY ERROR? «, t00=0x0096, t01=0x00f6}
0x0eb48…0eb6a Head {h00=0x001e, h01=0x0050, text=» RF(NZ) EB130 YES, RETURN «, t00=0x0096, t01=0x0114}
0x0eb6a…0eb74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0136}
0x0eb74…0eb96 Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x0096, t01=0x0140}
0x0eb96…0eba8 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x0096, t01=0x0162}
0x0eba8…0ebd6 Head {h00=0x002a, h01=0x0050, text=» ANK A4,DWFRES RESET PACKET RECIEVED? «, t00=0x0096, t01=0x0174}
0x0ebd6…0ebee Head {h00=0x0014, h01=0x0050, text=» RF(Z) EB120 NO «, t00=0x0097, t01=0x0012}
0x0ebee…0ec20 Head {h00=0x002e, h01=0x0050, text=» LDK A1,LINERR YES. RET CODE := LINK RESET«, t00=0x0097, t01=0x002a}
0x0ec20…0ec38 Head {h00=0x0014, h01=0x0050, text=» RF EB130 RETURN«, t00=0x0097, t01=0x005c}
0x0ec38…0ec42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0074}
0x0ec42…0ec56 Head {h00=0x0010, h01=0x0050, text=»EB120 EQU * «, t00=0x0097, t01=0x007e}
0x0ec56…0ec8a Head {h00=0x0030, h01=0x0050, text=» CWK A7,TYNFLO PACKET WITH NO FLOW CONTROL? «, t00=0x0097, t01=0x0092}
0x0ec8a…0ecaa Head {h00=0x001c, h01=0x0050, text=» RF(E) EB130 YES, RETURN«, t00=0x0097, t01=0x00c6}
0x0ecaa…0ecd6 Head {h00=0x0028, h01=0x0050, text=» ANK A3,DWFSAC WAIT FOR LEVEL 3 ACK?«, t00=0x0097, t01=0x00e6}
0x0ecd6…0ecf6 Head {h00=0x001c, h01=0x0050, text=» RF(Z) EB130 NO, RETURN «, t00=0x0097, t01=0x0112}
0x0ecf6…0ed00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0132}
0x0ed00…0ed36 Head {h00=0x0032, h01=0x0050, text=» LDK A3,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" «, t00=0x0097, t01=0x013c}
0x0ed36…0ed66 Head {h00=0x002c, h01=0x0050, text=» ORS A3,DWTST,A6 SET FLAG IN DWT STATUS «, t00=0x0097, t01=0x0172}
0x0ed66…0ed8a Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0098, t01=0x0012}
0x0ed8a…0ed94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0036}
0x0ed94…0eda2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0098, t01=0x0040}
0x0eda2…0edac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x004e}
0x0edac…0edf2 Head {h00=0x0042, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN ACK ON LEVEL 3 HAVE BEEN RECIEVED«, t00=0x0098, t01=0x0058}
0x0edf2…0ee1c Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x0098, t01=0x009e}
0x0ee1c…0ee38 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0098, t01=0x00c8}
0x0ee38…0ee6c Head {h00=0x0030, h01=0x0050, text=»* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0)«, t00=0x0098, t01=0x00e4}
0x0ee6c…0ee88 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0098, t01=0x0118}
0x0ee88…0eea4 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0098, t01=0x0134}
0x0eea4…0eeae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x0150}
0x0eeae…0eec2 Head {h00=0x0010, h01=0x0050, text=»AK3RST EQU *«, t00=0x0098, t01=0x015a}
0x0eec2…0eecc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x016e}
0x0eecc…0eee0 Head {h00=0x0010, h01=0x0050, text=»EB130 EQU * «, t00=0x0098, t01=0x0178}
0x0eee0…0eeea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x018c}
0x0eeea…0ef18 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTCHP,A6 CHANNEL PARAMETER =16«, t00=0x0099, t01=0x0008}
0x0ef18…0ef44 Head {h00=0x0028, h01=0x0050, text=» ANK A2,CHABLO CHANGED BLOCKING? =16«, t00=0x0099, t01=0x0036}
0x0ef44…0ef74 Head {h00=0x002c, h01=0x0050, text=» ABL(NZ) SB050 YES, START NEW BLOCK =16 «, t00=0x0099, t01=0x0062}
0x0ef74…0ef9e Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x0099, t01=0x0092}
0x0ef9e…0efa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00bc}
0x0efa8…0efb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00c6}
0x0efb2…0efbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0099, t01=0x00d0}
0x0efbc…0efd0 Head {h00=0x0010, h01=0x0050, text=»EBERR2 EQU *«, t00=0x0099, t01=0x00da}
0x0efd0…0eff2 Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x0099, t01=0x00ee}
0x0eff2…0f006 Head {h00=0x0010, h01=0x0050, text=»EBERR1 EQU *«, t00=0x0099, t01=0x0110}
0x0f006…0f034 Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTLD1,A6 OUTPUT BUFFER ADDRESS«, t00=0x0099, t01=0x0124}
0x0f034…0f05a Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x0099, t01=0x0152}
0x0f05a…0f082 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x0099, t01=0x0178}
0x0f082…0f0aa Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x009a, t01=0x0010}
0x0f0aa…0f0d4 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x009a, t01=0x0038}
0x0f0d4…0f0de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x0062}
0x0f0de…0f0ec Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009a, t01=0x006c}
0x0f0ec…0f0f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x007a}
0x0f0f6…0f13a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x009a, t01=0x0084}
0x0f13a…0f144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00c8}
0x0f144…0f15c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x009a, t01=0x00d2}
0x0f15c…0f16c Head {h00=0x000c, h01=0x0050, text=»* PLTEST«, t00=0x009a, t01=0x00ea}
0x0f16c…0f176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009a, t01=0x00fa}
0x0f176…0f18a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x009a, t01=0x0104}
0x0f18a…0f1c0 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES TEST COMMANDS FOR PLC. «, t00=0x009a, t01=0x0118}
0x0f1c0…0f1f4 Head {h00=0x0030, h01=0x0050, text=»* THE TEST COMMANDS ARE GENERATED BY A TEST «, t00=0x009a, t01=0x014e}
0x0f1f4…0f22c Head {h00=0x0034, h01=0x0050, text=»* COMMAND "DRIVER" WITH AN INTERFACE SIMILAR TO «, t00=0x009a, t01=0x0182}
0x0f22c…0f262 Head {h00=0x0032, h01=0x0050, text=»* THAT OF THE NORMAL TERMINAL DEVICE DRIVERS. «, t00=0x009b, t01=0x002a}
0x0f262…0f298 Head {h00=0x0032, h01=0x0050, text=»* CALL IS MADE DIRECTLY TO THE PLC DRIVER, AND«, t00=0x009b, t01=0x0060}
0x0f298…0f2d0 Head {h00=0x0034, h01=0x0050, text=»* NOT THROUGH THE TERMINAL NETWORK DISTRIBUTOR, «, t00=0x009b, t01=0x0096}
0x0f2d0…0f306 Head {h00=0x0032, h01=0x0050, text=»* AS THIS FUNCTION IS NOT AVAILABLE FOR OTHER «, t00=0x009b, t01=0x00ce}
0x0f306…0f31e Head {h00=0x0014, h01=0x0050, text=»* LINE DRIVERS. «, t00=0x009b, t01=0x0104}
0x0f31e…0f328 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x011c}
0x0f328…0f338 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x009b, t01=0x0126}
0x0f338…0f34e Head {h00=0x0012, h01=0x0050, text=»* CF A5,PLTEST«, t00=0x009b, t01=0x0136}
0x0f34e…0f358 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x014c}
0x0f358…0f368 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x009b, t01=0x0156}
0x0f368…0f384 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x009b, t01=0x0166}
0x0f384…0f38e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009b, t01=0x0182}
0x0f38e…0f3a0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x009b, t01=0x018c}
0x0f3a0…0f3c4 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO DEVICE DRIVER«, t00=0x009c, t01=0x000e}
0x0f3c4…0f3e0 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x009c, t01=0x0032}
0x0f3e0…0f3f2 Head {h00=0x000e, h01=0x0050, text=»* 0 IF OK«, t00=0x009c, t01=0x004e}
0x0f3f2…0f40c Head {h00=0x0016, h01=0x0050, text=»* NOT 0 IF ERROR «, t00=0x009c, t01=0x0060}
0x0f40c…0f424 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x009c, t01=0x007a}
0x0f424…0f442 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x009c, t01=0x0092}
0x0f442…0f45c Head {h00=0x0016, h01=0x0050, text=»* INTERR. ENABLED «, t00=0x009c, t01=0x00b0}
0x0f45c…0f466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x00ca}
0x0f466…0f4aa Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x009c, t01=0x00d4}
0x0f4aa…0f4b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0118}
0x0f4b4…0f4c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x009c, t01=0x0122}
0x0f4c2…0f4cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009c, t01=0x0130}
0x0f4cc…0f4e0 Head {h00=0x0010, h01=0x0050, text=»PLTEST EQU *«, t00=0x009c, t01=0x013a}
0x0f4e0…0f4f6 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x009c, t01=0x014e}
0x0f4f6…0f526 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT «, t00=0x009c, t01=0x0164}
0x0f526…0f54e (157, 0, 398) Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x009d, t01=0x0004}
0x0f54e…0f570 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x009d, t01=0x002c}
0x0f570…0f57a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009d, t01=0x004e}
0x0f57a…0f586 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x009d, t01=0x0058}
0x0f586…0f5b8 Head {h00=0x002e, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA«, t00=0x009d, t01=0x0064}
0x0f5b8…0f5f8 Head {h00=0x003c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 DATA CHAINING & MSB OF BUFFER ADDR «, t00=0x009d, t01=0x0096}
0x0f5f8…0f62c Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTTBU,A6 USER REQUEST BUFFER ADDRESS«, t00=0x009d, t01=0x00d6}
0x0f62c…0f652 Head {h00=0x0022, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 TO CCA«, t00=0x009d, t01=0x010a}
0x0f652…0f686 Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTTLN,A6 USER REQUEST BUFFER LENGTH «, t00=0x009d, t01=0x0130}
0x0f686…0f6b4 Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 LENGTH TO CCA «, t00=0x009d, t01=0x0164}
0x0f6b4…0f6e6 (158, 0, 400) Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTTCW,A6 USER REQUEST CONTROL WORD«, t00=0x009e, t01=0x0004}
0x0f6e6…0f6f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009e, t01=0x0036}
0x0f6f0…0f71a Head {h00=0x0026, h01=0x0050, text=»* DETERMINE TYPE OF TEST ORDER «, t00=0x009e, t01=0x0040}
0x0f71a…0f74c Head {h00=0x002e, h01=0x0050, text=» LC A1,DWTOR+1,A6 USER REQUEST ORDER CODE «, t00=0x009e, t01=0x006a}
0x0f74c…0f766 Head {h00=0x0016, h01=0x0050, text=» ANK A1,/3F CLEAN «, t00=0x009e, t01=0x009c}
0x0f766…0f790 Head {h00=0x0026, h01=0x0050, text=» CWK A1,ORDPS GET LINE STATISTICS?«, t00=0x009e, t01=0x00b6}
0x0f790…0f7b0 Head {h00=0x001c, h01=0x0050, text=» RF(E) TE100 YES, HANDLE«, t00=0x009e, t01=0x00e0}
0x0f7b0…0f7da Head {h00=0x0026, h01=0x0050, text=» CWK A1,ORDDS GET DLS STATISTICS? «, t00=0x009e, t01=0x0100}
0x0f7da…0f7fa Head {h00=0x001c, h01=0x0050, text=» RF(E) TE110 YES, HANDLE«, t00=0x009e, t01=0x012a}
0x0f7fa…0f822 Head {h00=0x0024, h01=0x0050, text=» CWK A1,ORDRM READ LOCAL MEMORY?«, t00=0x009e, t01=0x014a}
0x0f822…0f858 Head {h00=0x0032, h01=0x0050, text=» RF(NE) TEERR2 NO, COMMAND NOT DEFINED. ERROR «, t00=0x009e, t01=0x0172}
0x0f858…0f862 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x0018}
0x0f862…0f880 Head {h00=0x001a, h01=0x0050, text=»* READ LOCAL MEMORY«, t00=0x009f, t01=0x0022}
0x0f880…0f8ba Head {h00=0x0036, h01=0x0050, text=» ST A3,CWTCCA+CCRSUB,A5 PLC MEMORY ADDRESS TO CCA «, t00=0x009f, t01=0x0040}
0x0f8ba…0f8ee Head {h00=0x0030, h01=0x0050, text=» LDK A3,CMDRM PLC COMMAND READ LOCAL MEMORY «, t00=0x009f, t01=0x007a}
0x0f8ee…0f90e Head {h00=0x001c, h01=0x0050, text=» RF TE120 TO COMMON PART«, t00=0x009f, t01=0x00ae}
0x0f90e…0f918 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x009f, t01=0x00ce}
0x0f918…0f92c Head {h00=0x0010, h01=0x0050, text=»TE100 EQU * «, t00=0x009f, t01=0x00d8}
0x0f92c…0f94c Head {h00=0x001c, h01=0x0050, text=»* GET LINE STATISTICS«, t00=0x009f, t01=0x00ec}
0x0f94c…0f988 Head {h00=0x0038, h01=0x0050, text=» SC A3,CWTCCA+CCRSU1,A5 STORE LINE NUMBER (0-3) =12 «, t00=0x009f, t01=0x010c}
0x0f988…0f9be Head {h00=0x0032, h01=0x0050, text=» LDK A3,CMDPS PLC COMMAND GET LINE STATISTICS «, t00=0x009f, t01=0x0148}
0x0f9be…0f9de Head {h00=0x001c, h01=0x0050, text=» RF TE120 TO COMMON PART«, t00=0x009f, t01=0x017e}
0x0f9de…0f9e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x000e}
0x0f9e8…0f9fc Head {h00=0x0010, h01=0x0050, text=»TE110 EQU * «, t00=0x00a0, t01=0x0018}
0x0f9fc…0fa1c Head {h00=0x001c, h01=0x0050, text=»* GET DLS STATISTICS «, t00=0x00a0, t01=0x002c}
0x0fa1c…0fa46 Head {h00=0x0026, h01=0x0050, text=» LC A3,DWTCP2,A6 CHANNEL PARAMETER«, t00=0x00a0, t01=0x004c}
0x0fa46…0fa6c Head {h00=0x0022, h01=0x0050, text=» ANK A3,MASKWS CLEAN WS NUMBER«, t00=0x00a0, t01=0x0076}
0x0fa6c…0fa8a Head {h00=0x001a, h01=0x0050, text=» SLL A3,8 TO LEFT BYTE«, t00=0x00a0, t01=0x009c}
0x0fa8a…0fabe Head {h00=0x0030, h01=0x0050, text=» ADK A3,CMDDS PLC COMMAND GET DLS STATISTICS«, t00=0x00a0, t01=0x00ba}
0x0fabe…0fac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x00ee}
0x0fac8…0fadc Head {h00=0x0010, h01=0x0050, text=»TE120 EQU * «, t00=0x00a0, t01=0x00f8}
0x0fadc…0fb16 Head {h00=0x0036, h01=0x0050, text=» ST A3,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND TO CCA«, t00=0x00a0, t01=0x010c}
0x0fb16…0fb20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a0, t01=0x0146}
0x0fb20…0fb48 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x00a0, t01=0x0150}
0x0fb48…0fb6c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TEERR1 ERROR. HANDLE«, t00=0x00a0, t01=0x0178}
0x0fb6c…0fb96 Head {h00=0x0026, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCER. WAIT «, t00=0x00a1, t01=0x000c}
0x0fb96…0fba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0036}
0x0fba0…0fbaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0040}
0x0fbaa…0fbea Head {h00=0x003c, h01=0x0050, text=»* ENTRY IS MADE TO TSTRST WHEN COMMAND IS COMPLETED. «, t00=0x00a1, t01=0x004a}
0x0fbea…0fc14 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00a1, t01=0x008a}
0x0fc14…0fc30 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00a1, t01=0x00b4}
0x0fc30…0fc4c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a1, t01=0x00d0}
0x0fc4c…0fc68 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00a1, t01=0x00ec}
0x0fc68…0fc72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0108}
0x0fc72…0fc86 Head {h00=0x0010, h01=0x0050, text=»TSTRST EQU *«, t00=0x00a1, t01=0x0112}
0x0fc86…0fcb0 Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x00a1, t01=0x0126}
0x0fcb0…0fcba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x0150}
0x0fcba…0fcc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a1, t01=0x015a}
0x0fcc4…0fcd8 Head {h00=0x0010, h01=0x0050, text=»TEERR2 EQU *«, t00=0x00a1, t01=0x0164}
0x0fcd8…0fd00 Head {h00=0x0024, h01=0x0050, text=» CM CWTCCB,A5 INDICATE CCA FREE «, t00=0x00a1, t01=0x0178}
0x0fd00…0fd2c Head {h00=0x0028, h01=0x0050, text=» LDK A1,PLSERR RET CODE := SW ERROR «, t00=0x00a2, t01=0x0010}
0x0fd2c…0fd40 Head {h00=0x0010, h01=0x0050, text=»TEERR1 EQU *«, t00=0x00a2, t01=0x003c}
0x0fd40…0fd6a Head {h00=0x0026, h01=0x0050, text=» ABL NDREP RETURN TO DEVICE DRIVER«, t00=0x00a2, t01=0x0050}
0x0fd6a…0fd76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a2, t01=0x007a}
0x0fd76…0fd80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0086}
0x0fd80…0fd8e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a2, t01=0x0090}
0x0fd8e…0fd98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x009e}
0x0fd98…0fdb6 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x00a2, t01=0x00a8}
0x0fdb6…0fdd4 Head {h00=0x001a, h01=0x0050, text=»* INTERRUPT ROUTINES *«, t00=0x00a2, t01=0x00c6}
0x0fdd4…0fdf2 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x00a2, t01=0x00e4}
0x0fdf2…0fdfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a2, t01=0x0102}
0x0fdfc…0fe3a Head {h00=0x003a, h01=0x0050, text=»* THIS SECTION CONTAINS INTERRUPT HANDLING ROUTINES.«, t00=0x00a2, t01=0x010c}
0x0fe3a…0fe6e Head {h00=0x0030, h01=0x0050, text=»* IT IS ENTERED IMMEDIATELY AT A RELEASE, «, t00=0x00a2, t01=0x014a}
0x0fe6e…0fea0 Head {h00=0x002e, h01=0x0050, text=»* ATTENTION OR I/O COMPLETION INTERRUPT.«, t00=0x00a2, t01=0x017e}
0x0fea0…0fec6 Head {h00=0x0022, h01=0x0050, text=»* ALL ROUTINES ARE EXECUTED «, t00=0x00a3, t01=0x0020}
0x0fec6…0ff02 Head {h00=0x0038, h01=0x0050, text=»* ON INTERRUPT PRIORITY. AFTER PROCESSING, EXIT IS«, t00=0x00a3, t01=0x0046}
0x0ff02…0ff44 Head {h00=0x003e, h01=0x0050, text=»* MADE EITHER TO SOME ROUTINE WAITING FOR THE INTERRUPT,«, t00=0x00a3, t01=0x0082}
0x0ff44…0ff82 Head {h00=0x003a, h01=0x0050, text=»* TO THE LOCAL PLC DISPATCHER OR TO TOSS DISPATCHER.«, t00=0x00a3, t01=0x00c4}
0x0ff82…0ffbe Head {h00=0x0038, h01=0x0050, text=»* ON EXIT, A15 STACK CONTAINS INTERRUPT RETURN AND«, t00=0x00a3, t01=0x0102}
0x0ffbe…0ffd0 Head {h00=0x000e, h01=0x0050, text=»* A1-A8.«, t00=0x00a3, t01=0x013e}
0x0ffd0…0ffda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x0150}
0x0ffda…0ffe4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a3, t01=0x015a}
0x0ffe4…10018 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00a3, t01=0x0164}
0x10018…10022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x0008}
0x10022…1003a Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00a4, t01=0x0012}
0x1003a…10044 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a4, t01=0x002a}
0x10044…10062 Head {h00=0x001a, h01=0x0050, text=»* IHPL INTERRUPT ENTRY«, t00=0x00a4, t01=0x0034}
0x10062…1008a Head {h00=0x0024, h01=0x0050, text=»* PLIHR HANDLE RELEASE INTERRUPT«, t00=0x00a4, t01=0x0052}
0x1008a…100b4 Head {h00=0x0026, h01=0x0050, text=»* PLIHA HANDLE ATTENTION INTERRUPT«, t00=0x00a4, t01=0x007a}
0x100b4…100e4 Head {h00=0x002c, h01=0x0050, text=»* PLIHC HANDLE I/O COMPLETION INTERRUPT «, t00=0x00a4, t01=0x00a4}
0x100e4…1011a Head {h00=0x0032, h01=0x0050, text=»* COMPSTA HANDLE COMPLETION OF START COMMANDS «, t00=0x00a4, t01=0x00d4}
0x1011a…10144 Head {h00=0x0026, h01=0x0050, text=»* (TEST CU, OPEN LINE, OPEN DLS)«, t00=0x00a4, t01=0x010a}
0x10144…1017a Head {h00=0x0032, h01=0x0050, text=»* COMPTEST HANDLE COMPLETION OF TEST COMMANDS «, t00=0x00a4, t01=0x0134}
0x1017a…101b4 Head {h00=0x0036, h01=0x0050, text=»* (PLC STATISTICS, DLS STAT., READ LOCAL MEMORY)«, t00=0x00a4, t01=0x016a}
0x101b4…101ea Head {h00=0x0032, h01=0x0050, text=»* COMPWRI HANDLE COMPLETION OF WRITE COMMANDS «, t00=0x00a5, t01=0x0014}
0x101ea…10226 Head {h00=0x0038, h01=0x0050, text=»* COMPGR HANDLE COMPLETION OF GENERAL READ COMMANDS «, t00=0x00a5, t01=0x004a}
0x10226…10254 Head {h00=0x002a, h01=0x0050, text=»* GRERR HANDLE ERRORS AT GENERAL READ «, t00=0x00a5, t01=0x0086}
0x10254…1028e Head {h00=0x0036, h01=0x0050, text=»* GRSACK HANDLE STATUS AND RR MESSAGE FROM DEVICE «, t00=0x00a5, t01=0x00b4}
0x1028e…102bc Head {h00=0x002a, h01=0x0050, text=»* GRDATA HANDLE DATA INPUT FROM DEVICE«, t00=0x00a5, t01=0x00ee}
0x102bc…102f0 Head {h00=0x0030, h01=0x0050, text=»* GRRES HANDLE RESET MESSAGE FROM SECONDARY «, t00=0x00a5, t01=0x011c}
0x102f0…102fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0150}
0x102fa…10308 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a5, t01=0x015a}
0x10308…10312 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a5, t01=0x0168}
0x10312…10356 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a5, t01=0x0172}
0x10356…10360 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0026}
0x10360…10378 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00a6, t01=0x0030}
0x10378…10386 Head {h00=0x000a, h01=0x0050, text=»* IHPL«, t00=0x00a6, t01=0x0048}
0x10386…10390 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0056}
0x10390…103a4 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00a6, t01=0x0060}
0x103a4…103da Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE CONTAINS INTERRUPT ENTRIES FOR «, t00=0x00a6, t01=0x0074}
0x103da…10410 Head {h00=0x0032, h01=0x0050, text=»* ALL PLC:S INCLUDED. IT SAVES A1-A8, SETS CWT«, t00=0x00a6, t01=0x00aa}
0x10410…10448 Head {h00=0x0034, h01=0x0050, text=»* ADDRESS AND EXITS TO RELEASE OR I/O COMPLETION«, t00=0x00a6, t01=0x00e0}
0x10448…10464 Head {h00=0x0018, h01=0x0050, text=»* INTERRUPT HANDLER.«, t00=0x00a6, t01=0x0118}
0x10464…1046e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x0134}
0x1046e…1047e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00a6, t01=0x013e}
0x1047e…1049a Head {h00=0x0018, h01=0x0050, text=»* HARDWARE INTERRUPT«, t00=0x00a6, t01=0x014e}
0x1049a…104a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a6, t01=0x016a}
0x104a4…104b4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00a6, t01=0x0174}
0x104b4…104d8 Head {h00=0x0020, h01=0x0050, text=»* A15 = SYSTEM STACK POINTER«, t00=0x00a6, t01=0x0184}
0x104d8…104f4 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x00a7, t01=0x0018}
0x104f4…1050a Head {h00=0x0012, h01=0x0050, text=»* MODE SYSTEM «, t00=0x00a7, t01=0x0034}
0x1050a…10514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x004a}
0x10514…10526 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00a7, t01=0x0054}
0x10526…10542 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00a7, t01=0x0066}
0x10542…1054c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x0082}
0x1054c…10590 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00a7, t01=0x008c}
0x10590…1059a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a7, t01=0x00d0}
0x1059a…105ae Head {h00=0x0010, h01=0x0050, text=»IHPL01 EQU *«, t00=0x00a7, t01=0x00da}
0x105ae…105c8 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a7, t01=0x00ee}
0x105c8…105de Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00a7, t01=0x0108}
0x105de…105fe Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00a7, t01=0x011e}
0x105fe…1060a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a7, t01=0x013e}
0x1060a…10624 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a7, t01=0x014a}
0x10624…1063a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00a7, t01=0x0164}
0x1063a…10658 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00a7, t01=0x017a}
0x10658…10664 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a8, t01=0x0008}
0x10664…1066e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0014}
0x1066e…10688 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a8, t01=0x001e}
0x10688…106b2 Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL0CWT CWT ADDRESS, PLC 0«, t00=0x00a8, t01=0x0038}
0x106b2…106da Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00a8, t01=0x0062}
0x106da…106e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a8, t01=0x008a}
0x106e6…106f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x0096}
0x106f0…106fe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00a8, t01=0x00a0}
0x106fe…10708 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x00ae}
0x10708…1071c Head {h00=0x0010, h01=0x0050, text=»IHPL02 EQU *«, t00=0x00a8, t01=0x00b8}
0x1071c…10736 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a8, t01=0x00cc}
0x10736…1074c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a8, t01=0x00e6}
0x1074c…10762 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00a8, t01=0x00fc}
0x10762…10782 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00a8, t01=0x0112}
0x10782…1078e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a8, t01=0x0132}
0x1078e…10798 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a8, t01=0x013e}
0x10798…107b2 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a8, t01=0x0148}
0x107b2…107c8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a8, t01=0x0162}
0x107c8…107de Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00a8, t01=0x0178}
0x107de…107fc Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00a8, t01=0x018e}
0x107fc…10808 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x001c}
0x10808…10812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0028}
0x10812…1082c Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a9, t01=0x0032}
0x1082c…10842 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a9, t01=0x004c}
0x10842…1086c Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL1CWT CWT ADDRESS, PLC 1«, t00=0x00a9, t01=0x0062}
0x1086c…10894 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00a9, t01=0x008c}
0x10894…108a0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x00b4}
0x108a0…108aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x00c0}
0x108aa…108be Head {h00=0x0010, h01=0x0050, text=»IHPL03 EQU *«, t00=0x00a9, t01=0x00ca}
0x108be…108d8 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a9, t01=0x00de}
0x108d8…108ee Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a9, t01=0x00f8}
0x108ee…10904 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00a9, t01=0x010e}
0x10904…1091a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00a9, t01=0x0124}
0x1091a…1093a Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00a9, t01=0x013a}
0x1093a…10946 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00a9, t01=0x015a}
0x10946…10950 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00a9, t01=0x0166}
0x10950…1096a Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00a9, t01=0x0170}
0x1096a…10980 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00a9, t01=0x018a}
0x10980…10996 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00aa, t01=0x0010}
0x10996…109ac Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00aa, t01=0x0026}
0x109ac…109ca Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00aa, t01=0x003c}
0x109ca…109d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00aa, t01=0x005a}
0x109d6…109e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0066}
0x109e0…109fa Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00aa, t01=0x0070}
0x109fa…10a10 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00aa, t01=0x008a}
0x10a10…10a26 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00aa, t01=0x00a0}
0x10a26…10a50 Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL2CWT CWT ADDRESS, PLC 2«, t00=0x00aa, t01=0x00b6}
0x10a50…10a78 Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00aa, t01=0x00e0}
0x10a78…10a84 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00aa, t01=0x0108}
0x10a84…10a8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00aa, t01=0x0114}
0x10a8e…10aa2 Head {h00=0x0010, h01=0x0050, text=»IHPL04 EQU *«, t00=0x00aa, t01=0x011e}
0x10aa2…10abc Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00aa, t01=0x0132}
0x10abc…10ad2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00aa, t01=0x014c}
0x10ad2…10ae8 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00aa, t01=0x0162}
0x10ae8…10afe Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x00aa, t01=0x0178}
0x10afe…10b14 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00aa, t01=0x018e}
0x10b14…10b34 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ab, t01=0x0014}
0x10b34…10b40 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ab, t01=0x0034}
0x10b40…10b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x0040}
0x10b4a…10b64 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00ab, t01=0x004a}
0x10b64…10b7a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00ab, t01=0x0064}
0x10b7a…10b90 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00ab, t01=0x007a}
0x10b90…10ba6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x00ab, t01=0x0090}
0x10ba6…10bbc Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00ab, t01=0x00a6}
0x10bbc…10bda Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00ab, t01=0x00bc}
0x10bda…10be6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ab, t01=0x00da}
0x10be6…10bf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ab, t01=0x00e6}
0x10bf0…10c0a Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRL=0 U =5«, t00=0x00ab, t01=0x00f0}
0x10c0a…10c20 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=1 «, t00=0x00ab, t01=0x010a}
0x10c20…10c36 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=2 «, t00=0x00ab, t01=0x0120}
0x10c36…10c4c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=3 «, t00=0x00ab, t01=0x0136}
0x10c4c…10c76 Head {h00=0x0026, h01=0x0050, text=» LDKL A5,PL3CWT CWT ADDRESS, PLC 3«, t00=0x00ab, t01=0x014c}
0x10c76…10c9e Head {h00=0x0024, h01=0x0050, text=» RF IHPL COMMON PART, ALL PLC:S «, t00=0x00ab, t01=0x0176}
0x10c9e…10caa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x000e}
0x10caa…10cb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ac, t01=0x001a}
0x10cb4…10cc8 Head {h00=0x0010, h01=0x0050, text=»IHPR01 EQU *«, t00=0x00ac, t01=0x0024}
0x10cc8…10cde Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ac, t01=0x0038}
0x10cde…10cf4 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ac, t01=0x004e}
0x10cf4…10d14 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ac, t01=0x0064}
0x10d14…10d20 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x0084}
0x10d20…10d36 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ac, t01=0x0090}
0x10d36…10d4c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00ac, t01=0x00a6}
0x10d4c…10d6a Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00ac, t01=0x00bc}
0x10d6a…10d76 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x00da}
0x10d76…10d8c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ac, t01=0x00e6}
0x10d8c…10dbc Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR1CWT CWTADDRESS PLC 1 REMOTE «, t00=0x00ac, t01=0x00fc}
0x10dbc…10de2 Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00ac, t01=0x012c}
0x10de2…10dee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ac, t01=0x0152}
0x10dee…10e02 Head {h00=0x0010, h01=0x0050, text=»IHPR02 EQU *«, t00=0x00ac, t01=0x015e}
0x10e02…10e18 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ac, t01=0x0172}
0x10e18…10e2e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ac, t01=0x0188}
0x10e2e…10e44 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ad, t01=0x000e}
0x10e44…10e64 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ad, t01=0x0024}
0x10e64…10e70 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x0044}
0x10e70…10e86 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ad, t01=0x0050}
0x10e86…10e9c Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ad, t01=0x0066}
0x10e9c…10eb2 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00ad, t01=0x007c}
0x10eb2…10ed0 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00ad, t01=0x0092}
0x10ed0…10edc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x00b0}
0x10edc…10ef2 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ad, t01=0x00bc}
0x10ef2…10f08 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ad, t01=0x00d2}
0x10f08…10f38 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR2CWT CWTADDRESS PLC 2 REMOTE «, t00=0x00ad, t01=0x00e8}
0x10f38…10f5e Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00ad, t01=0x0118}
0x10f5e…10f6a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ad, t01=0x013e}
0x10f6a…10f7e Head {h00=0x0010, h01=0x0050, text=»IHPR03 EQU *«, t00=0x00ad, t01=0x014a}
0x10f7e…10f94 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ad, t01=0x015e}
0x10f94…10faa Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ad, t01=0x0174}
0x10faa…10fc0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00ad, t01=0x018a}
0x10fc0…10fd6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00ae, t01=0x0010}
0x10fd6…10ff6 Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00ae, t01=0x0026}
0x10ff6…11002 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x0046}
0x11002…11018 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ae, t01=0x0052}
0x11018…1102e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ae, t01=0x0068}
0x1102e…11044 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00ae, t01=0x007e}
0x11044…1105a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00ae, t01=0x0094}
0x1105a…11078 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00ae, t01=0x00aa}
0x11078…11084 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x00c8}
0x11084…1109a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ae, t01=0x00d4}
0x1109a…110b0 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00ae, t01=0x00ea}
0x110b0…110c6 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00ae, t01=0x0100}
0x110c6…110f6 Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR3CWT CWTADDRESS PLC 3 REMOTE «, t00=0x00ae, t01=0x0116}
0x110f6…1111c Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL PLC:S«, t00=0x00ae, t01=0x0146}
0x1111c…11128 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00ae, t01=0x016c}
0x11128…1113c Head {h00=0x0010, h01=0x0050, text=»IHPR04 EQU *«, t00=0x00ae, t01=0x0178}
0x1113c…11152 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00ae, t01=0x018c}
0x11152…11168 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00af, t01=0x0012}
0x11168…1117e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00af, t01=0x0028}
0x1117e…11194 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x00af, t01=0x003e}
0x11194…111aa Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00af, t01=0x0054}
0x111aa…111ca Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00af, t01=0x006a}
0x111ca…111d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00af, t01=0x008a}
0x111d6…111ec Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00af, t01=0x0096}
0x111ec…11202 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00af, t01=0x00ac}
0x11202…11218 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=2 «, t00=0x00af, t01=0x00c2}
0x11218…1122e Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=3 «, t00=0x00af, t01=0x00d8}
0x1122e…11244 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00af, t01=0x00ee}
0x11244…11262 Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00af, t01=0x0104}
0x11262…1126e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00af, t01=0x0122}
0x1126e…11284 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x00af, t01=0x012e}
0x11284…1129a Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=1 «, t00=0x00af, t01=0x0144}
0x1129a…112b4 Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=2 U =9«, t00=0x00af, t01=0x015a}
0x112b4…112ce Head {h00=0x0016, h01=0x0050, text=» IFF PLCNRR=3 U =9«, t00=0x00af, t01=0x0174}
0x112ce…112fe Head {h00=0x002c, h01=0x0050, text=» LDKL A5,PR4CWT CWTADDRESS PLC 4 REMOTE «, t00=0x00af, t01=0x018e}
0x112fe…11324 Head {h00=0x0022, h01=0x0050, text=» RF IHPL COMMON PART ALL CWT:S«, t00=0x00b0, t01=0x002e}
0x11324…11330 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b0, t01=0x0054}
0x11330…1133e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b0, t01=0x0060}
0x1133e…11348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b0, t01=0x006e}
0x11348…1135a Head {h00=0x000e, h01=0x0050, text=»IHPL EQU *«, t00=0x00b0, t01=0x0078}
0x1135a…11384 Head {h00=0x0026, h01=0x0050, text=» ST P,INTSAV SAVE LATEST INTERRUPT«, t00=0x00b0, t01=0x008a}
0x11384…113a6 Head {h00=0x001e, h01=0x0050, text=» LDK A1,0 RESET HIGH BYTE «, t00=0x00b0, t01=0x00b4}
0x113a6…113d6 Head {h00=0x002c, h01=0x0050, text=» LC A1,CWTCID+CIDINT,A5 INTERRUPT SOURCE«, t00=0x00b0, t01=0x00d6}
0x113d6…113f2 Head {h00=0x0018, h01=0x0050, text=» CWK A1,/40 RELEASE?«, t00=0x00b0, t01=0x0106}
0x113f2…11412 Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHR YES, HANDLE«, t00=0x00b0, t01=0x0122}
0x11412…11436 Head {h00=0x0020, h01=0x0050, text=» CWK A1,/20 I/O COMPLETION? «, t00=0x00b0, t01=0x0142}
0x11436…11456 Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHC YES, HANDLE«, t00=0x00b0, t01=0x0166}
0x11456…11474 Head {h00=0x001a, h01=0x0050, text=» CWK A1,/80 ATTENTION?«, t00=0x00b0, t01=0x0186}
0x11474…11494 Head {h00=0x001c, h01=0x0050, text=» RF(E) PLIHA YES, HANDLE«, t00=0x00b1, t01=0x0014}
0x11494…1149e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0034}
0x1149e…114d4 Head {h00=0x0032, h01=0x0050, text=» CF A15,PLCNOP ILLEGAL CODE, SET NOT OPERABLE «, t00=0x00b1, t01=0x003e}
0x114d4…114ec Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00b1, t01=0x0074}
0x114ec…114f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x008c}
0x114f6…11504 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b1, t01=0x0096}
0x11504…1150e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00a4}
0x1150e…11552 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b1, t01=0x00ae}
0x11552…1155c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x00f2}
0x1155c…11574 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b1, t01=0x00fc}
0x11574…11584 Head {h00=0x000c, h01=0x0050, text=»* PLIHR «, t00=0x00b1, t01=0x0114}
0x11584…1158e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b1, t01=0x0124}
0x1158e…115a2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b1, t01=0x012e}
0x115a2…115d4 Head {h00=0x002e, h01=0x0050, text=»* THIS ROUTINE HANDLES RELEASE INTERRUPTS.«, t00=0x00b1, t01=0x0142}
0x115d4…11606 Head {h00=0x002e, h01=0x0050, text=»* IT RESETS THE INTERRUPT, AND IF ANOTHER «, t00=0x00b1, t01=0x0174}
0x11606…11636 Head {h00=0x002c, h01=0x0050, text=»* PROCESS IS WAITING FOR THE CCA, RETURN«, t00=0x00b2, t01=0x0016}
0x11636…11662 Head {h00=0x0028, h01=0x0050, text=»* IS MADE TO CCA ALLOCATION ROUTINE.«, t00=0x00b2, t01=0x0046}
0x11662…1166c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0072}
0x1166c…1167c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b2, t01=0x007c}
0x1167c…1168e Head {h00=0x000e, h01=0x0050, text=»* RF PLIHR«, t00=0x00b2, t01=0x008c}
0x1168e…11698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x009e}
0x11698…116a8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b2, t01=0x00a8}
0x116a8…116c4 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b2, t01=0x00b8}
0x116c4…116ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x00d4}
0x116ce…116e0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b2, t01=0x00de}
0x116e0…116fc Head {h00=0x0018, h01=0x0050, text=»* IF PROCESS WAITING«, t00=0x00b2, t01=0x00f0}
0x116fc…1172c Head {h00=0x002c, h01=0x0050, text=»* A4 = BLOCK ADDRESS OF WAITING PROCESS«, t00=0x00b2, t01=0x010c}
0x1172c…11748 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b2, t01=0x013c}
0x11748…11752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b2, t01=0x0158}
0x11752…11796 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b2, t01=0x0162}
0x11796…117a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0016}
0x117a0…117b4 Head {h00=0x0010, h01=0x0050, text=»PLIHR EQU * «, t00=0x00b3, t01=0x0020}
0x117b4…117da Head {h00=0x0022, h01=0x0050, text=» EX CWTST3,A5 RESET INTERRUPT «, t00=0x00b3, t01=0x0034}
0x117da…1180c Head {h00=0x002e, h01=0x0050, text=» LD A4,CWTCCQ,A5 PROCESS WAITING FOR CCA? «, t00=0x00b3, t01=0x005a}
0x1180c…1183a Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) CCARST YES, ACTIVATE PROCESS «, t00=0x00b3, t01=0x008c}
0x1183a…11860 Head {h00=0x0022, h01=0x0050, text=» CM CWTCCB,A5 NO, SET CCA FREE«, t00=0x00b3, t01=0x00ba}
0x11860…11878 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00b3, t01=0x00e0}
0x11878…11882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x00f8}
0x11882…11890 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b3, t01=0x0102}
0x11890…1189a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0110}
0x1189a…118de Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b3, t01=0x011a}
0x118de…118e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x015e}
0x118e8…11900 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b3, t01=0x0168}
0x11900…11910 Head {h00=0x000c, h01=0x0050, text=»* PLIHA «, t00=0x00b3, t01=0x0180}
0x11910…1191a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b3, t01=0x0190}
0x1191a…1192e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b4, t01=0x000a}
0x1192e…11966 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE HANDLES ATTENTION INTERRUPTS. IF «, t00=0x00b4, t01=0x001e}
0x11966…1199e Head {h00=0x0034, h01=0x0050, text=»* ERROR, IT SETS AN ERROR CODE AND STARTS ABORT «, t00=0x00b4, t01=0x0056}
0x1199e…119d6 Head {h00=0x0034, h01=0x0050, text=»* OF ALL CALLS. IF COMMUNICATION REESTABLISHED, «, t00=0x00b4, t01=0x008e}
0x119d6…119f4 Head {h00=0x001a, h01=0x0050, text=»* IT STARTS RECOVERY. «, t00=0x00b4, t01=0x00c6}
0x119f4…119fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x00e4}
0x119fe…11a0e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b4, t01=0x00ee}
0x11a0e…11a20 Head {h00=0x000e, h01=0x0050, text=»* RF PLIHA«, t00=0x00b4, t01=0x00fe}
0x11a20…11a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0110}
0x11a2a…11a3a Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b4, t01=0x011a}
0x11a3a…11a56 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b4, t01=0x012a}
0x11a56…11a60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b4, t01=0x0146}
0x11a60…11a72 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b4, t01=0x0150}
0x11a72…11a8e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b4, t01=0x0162}
0x11a8e…11aa8 Head {h00=0x0016, h01=0x0050, text=»* A6 = WS NUMBER «, t00=0x00b4, t01=0x017e}
0x11aa8…11ab2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0008}
0x11ab2…11af6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b5, t01=0x0012}
0x11af6…11b00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0056}
0x11b00…11b14 Head {h00=0x0010, h01=0x0050, text=»PLIHA EQU * «, t00=0x00b5, t01=0x0060}
0x11b14…11b3e Head {h00=0x0026, h01=0x0050, text=» LD A1,CWTRCA+CCRSTA,A5 PLC STATUS«, t00=0x00b5, t01=0x0074}
0x11b3e…11b68 Head {h00=0x0026, h01=0x0050, text=» ST A1,CWTPLS,A5 SAVE FOR TESTING «, t00=0x00b5, t01=0x009e}
0x11b68…11b7e Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x00b5, t01=0x00c8}
0x11b7e…11b9c Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGATT LOG RCA«, t00=0x00b5, t01=0x00de}
0x11b9c…11ba8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b5, t01=0x00fc}
0x11ba8…11bd2 Head {h00=0x0026, h01=0x0050, text=» LC A6,CWTRCA+CCRDLS,A5 WS NUMBER «, t00=0x00b5, t01=0x0108}
0x11bd2…11bee Head {h00=0x0018, h01=0x0050, text=» ANK A6,MASKWS CLEAN«, t00=0x00b5, t01=0x0132}
0x11bee…11c10 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00b5, t01=0x014e}
0x11c10…11c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0170}
0x11c1a…11c28 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b5, t01=0x017a}
0x11c28…11c32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b5, t01=0x0188}
0x11c32…11c56 (182, 0, 398) Head {h00=0x0020, h01=0x0050, text=» LDKL A2,/FFFF-STACOM-STAERR«, t00=0x00b6, t01=0x0004}
0x11c56…11c7a Head {h00=0x0020, h01=0x0050, text=»* MASK FOR ALLOWED ERRORS«, t00=0x00b6, t01=0x0028}
0x11c7a…11c9a Head {h00=0x001c, h01=0x0050, text=» ANR A2,A1 FATAL ERROR? «, t00=0x00b6, t01=0x004c}
0x11c9a…11cbc Head {h00=0x001e, h01=0x0050, text=» RF(Z) IA100 NO, CONTINUE «, t00=0x00b6, t01=0x006c}
0x11cbc…11ce8 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00b6, t01=0x008e}
0x11ce8…11d00 Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00b6, t01=0x00ba}
0x11d00…11d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x00d2}
0x11d0a…11d1e Head {h00=0x0010, h01=0x0050, text=»IA100 EQU * «, t00=0x00b6, t01=0x00dc}
0x11d1e…11d38 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A1 STATUS «, t00=0x00b6, t01=0x00f0}
0x11d38…11d6c Head {h00=0x0030, h01=0x0050, text=» ANK A2,STACOM COMMUNICATION REESTABLISHED? «, t00=0x00b6, t01=0x010a}
0x11d6c…11d9e Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) PLREWS YES, START RECOVERY OF WS «, t00=0x00b6, t01=0x013e}
0x11d9e…11da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b6, t01=0x0170}
0x11da8…11dc4 Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 WS NUMBER«, t00=0x00b6, t01=0x017a}
0x11dc4…11dee Head {h00=0x0026, h01=0x0050, text=» CF A15,STAHAN HANDLE ERROR STATUS«, t00=0x00b7, t01=0x0008}
0x11dee…11e12 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00b7, t01=0x0032}
0x11e12…11e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x0056}
0x11e1c…11e2a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b7, t01=0x0060}
0x11e2a…11e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x006e}
0x11e34…11e78 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b7, t01=0x0078}
0x11e78…11e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00bc}
0x11e82…11e9a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00b7, t01=0x00c6}
0x11e9a…11eaa Head {h00=0x000c, h01=0x0050, text=»* PLIHC «, t00=0x00b7, t01=0x00de}
0x11eaa…11eb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b7, t01=0x00ee}
0x11eb4…11ec8 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00b7, t01=0x00f8}
0x11ec8…11f02 Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE HANDLES I/O COMPLETION INTERRUPTS. «, t00=0x00b7, t01=0x010c}
0x11f02…11f3c Head {h00=0x0036, h01=0x0050, text=»* IT CHECKS WHICH COMMAND THAT HAS BEEN COMPLETED,«, t00=0x00b7, t01=0x0146}
0x11f3c…11f72 Head {h00=0x0032, h01=0x0050, text=»* AND EXITS TO CORRESPONDING COMMAND HANDLER. «, t00=0x00b7, t01=0x0180}
0x11f72…11f7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0026}
0x11f7c…11f8c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00b8, t01=0x0030}
0x11f8c…11f9e Head {h00=0x000e, h01=0x0050, text=»* RF PLIHC«, t00=0x00b8, t01=0x0040}
0x11f9e…11fa8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0052}
0x11fa8…11fb8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00b8, t01=0x005c}
0x11fb8…11fd4 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b8, t01=0x006c}
0x11fd4…11fde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0088}
0x11fde…11ff0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00b8, t01=0x0092}
0x11ff0…1200a Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00b8, t01=0x00a4}
0x1200a…1202a Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00b8, t01=0x00be}
0x1202a…12046 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00b8, t01=0x00de}
0x12046…12064 Head {h00=0x001a, h01=0x0050, text=»* A6 = USER PARAMETER«, t00=0x00b8, t01=0x00fa}
0x12064…1206e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0118}
0x1206e…120b2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00b8, t01=0x0122}
0x120b2…120bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b8, t01=0x0166}
0x120bc…120d0 Head {h00=0x0010, h01=0x0050, text=»PLIHC EQU * «, t00=0x00b8, t01=0x0170}
0x120d0…120fa Head {h00=0x0026, h01=0x0050, text=» LD A1,CWTRCA+CCRSTA,A5 PLC STATUS«, t00=0x00b8, t01=0x0184}
0x120fa…12124 Head {h00=0x0026, h01=0x0050, text=» ST A1,CWTPLS,A5 SAVE FOR TESTING «, t00=0x00b9, t01=0x001e}
0x12124…1213a Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x00b9, t01=0x0048}
0x1213a…12158 Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGIOC LOG CCR«, t00=0x00b9, t01=0x005e}
0x12158…12164 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00b9, t01=0x007c}
0x12164…12188 Head {h00=0x0020, h01=0x0050, text=» ANKL A1,/FFFF-STAPOL-STALER«, t00=0x00b9, t01=0x0088}
0x12188…121b2 Head {h00=0x0026, h01=0x0050, text=»* RESET POLL STOP & LINK ERROR «, t00=0x00b9, t01=0x00ac}
0x121b2…121f2 Head {h00=0x003c, h01=0x0050, text=» LD A6,CWTRCA+CCRIDW,A5 USER PARAMETER (DWT, DLS OR ...)«, t00=0x00b9, t01=0x00d6}
0x121f2…1221a Head {h00=0x0024, h01=0x0050, text=» LC A2,CWTRCA+CCRCMD,A5 COMMAND «, t00=0x00b9, t01=0x0116}
0x1221a…12224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x013e}
0x12224…12232 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00b9, t01=0x0148}
0x12232…1223c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00b9, t01=0x0156}
0x1223c…12268 Head {h00=0x0028, h01=0x0050, text=» LDK A3,CMDTBL COMMAND TABLE LENGTH «, t00=0x00b9, t01=0x0160}
0x12268…1227c Head {h00=0x0010, h01=0x0050, text=»IC100 EQU * «, t00=0x00b9, t01=0x018c}
0x1227c…122ac Head {h00=0x002c, h01=0x0050, text=»* SCAN TABLE TO FIND MATCHING COMMAND«, t00=0x00ba, t01=0x0010}
0x122ac…122d2 Head {h00=0x0022, h01=0x0050, text=» SUK A3,CMDTB1 DECREMENT INDEX«, t00=0x00ba, t01=0x0040}
0x122d2…122fa Head {h00=0x0024, h01=0x0050, text=» RF(N) IC120 END OF TABLE. ERROR«, t00=0x00ba, t01=0x0066}
0x122fa…12324 Head {h00=0x0026, h01=0x0050, text=» CC A2,CMDTAB+1,A3 COMMAND FOUND? «, t00=0x00ba, t01=0x008e}
0x12324…12346 Head {h00=0x001e, h01=0x0050, text=» RB(NE) IC100 NO, CONTINUE«, t00=0x00ba, t01=0x00b8}
0x12346…12350 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ba, t01=0x00da}
0x12350…12382 Head {h00=0x002e, h01=0x0050, text=» C1 A2,CMDTAB+4,A3 MASK FOR ALLOWED ERRORS«, t00=0x00ba, t01=0x00e4}
0x12382…123a2 Head {h00=0x001c, h01=0x0050, text=» ANR A2,A1 FATAL ERROR? «, t00=0x00ba, t01=0x0116}
0x123a2…123c4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) IC110 NO, CONTINUE «, t00=0x00ba, t01=0x0136}
0x123c4…123f0 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00ba, t01=0x0158}
0x123f0…12404 Head {h00=0x0010, h01=0x0050, text=»IC110 EQU * «, t00=0x00ba, t01=0x0184}
0x12404…1243a Head {h00=0x0032, h01=0x0050, text=» ABI CMDTAB+2,A3 CALL COMMAND HANDLING ROUTINE«, t00=0x00bb, t01=0x0008}
0x1243a…12444 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x003e}
0x12444…12458 Head {h00=0x0010, h01=0x0050, text=»IC120 EQU * «, t00=0x00bb, t01=0x0048}
0x12458…1247a Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00bb, t01=0x005c}
0x1247a…124a6 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLCNOP SET PLC NOT OPERABLE «, t00=0x00bb, t01=0x007e}
0x124a6…124ca Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00bb, t01=0x00aa}
0x124ca…124d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x00ce}
0x124d4…124e2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bb, t01=0x00d8}
0x124e2…124ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x00e6}
0x124ec…12530 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00bb, t01=0x00f0}
0x12530…1253a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0134}
0x1253a…12552 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00bb, t01=0x013e}
0x12552…12564 Head {h00=0x000e, h01=0x0050, text=»* COMPSTA «, t00=0x00bb, t01=0x0156}
0x12564…1256e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bb, t01=0x0168}
0x1256e…12582 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00bb, t01=0x0172}
0x12582…125b8 Head {h00=0x0032, h01=0x0050, text=»* THESE ROUTINES HANDLE COMPLETION OF TEST CU,«, t00=0x00bb, t01=0x0186}
0x125b8…125e2 Head {h00=0x0026, h01=0x0050, text=»* OPEN LINE AND OPEN DLS COMMANDS.«, t00=0x00bc, t01=0x002c}
0x125e2…12616 Head {h00=0x0030, h01=0x0050, text=»* THEY CHECK THE RETURN CODE AND EXIT TO THE«, t00=0x00bc, t01=0x0056}
0x12616…12640 Head {h00=0x0026, h01=0x0050, text=»* ROUTINE THAT MADE THE I/O CALL. «, t00=0x00bc, t01=0x008a}
0x12640…1264a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00b4}
0x1264a…1265a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00bc, t01=0x00be}
0x1265a…12672 Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00bc, t01=0x00ce}
0x12672…1267c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x00e6}
0x1267c…1268c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00bc, t01=0x00f0}
0x1268c…126a6 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00bc, t01=0x0100}
0x126a6…126c6 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00bc, t01=0x011a}
0x126c6…126e2 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00bc, t01=0x013a}
0x126e2…1270a Head {h00=0x0024, h01=0x0050, text=»* A6 = PARAMETER (IF RELEVANT) «, t00=0x00bc, t01=0x0156}
0x1270a…12714 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bc, t01=0x017e}
0x12714…12726 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00bc, t01=0x0188}
0x12726…12740 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00bd, t01=0x000a}
0x12740…12760 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00bd, t01=0x0024}
0x12760…1277c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00bd, t01=0x0044}
0x1277c…127aa Head {h00=0x002a, h01=0x0050, text=»* A6 = DLS INDEX (IF EXIT TO ODLRST) «, t00=0x00bd, t01=0x0060}
0x127aa…127b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x008e}
0x127b4…127f8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00bd, t01=0x0098}
0x127f8…12802 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x00dc}
0x12802…12816 Head {h00=0x0010, h01=0x0050, text=»COMPTC EQU *«, t00=0x00bd, t01=0x00e6}
0x12816…12838 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00bd, t01=0x00fa}
0x12838…1286e Head {h00=0x0032, h01=0x0050, text=» ABL TCURST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00bd, t01=0x011c}
0x1286e…12878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0152}
0x12878…12886 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bd, t01=0x015c}
0x12886…12890 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x016a}
0x12890…1289a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bd, t01=0x0174}
0x1289a…128bc Head {h00=0x001e, h01=0x0050, text=»* OPEN LINE, COMPLETION«, t00=0x00bd, t01=0x017e}
0x128bc…128c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0010}
0x128c6…128da Head {h00=0x0010, h01=0x0050, text=»COMPOP EQU *«, t00=0x00be, t01=0x001a}
0x128da…128fc Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00be, t01=0x002e}
0x128fc…12932 Head {h00=0x0032, h01=0x0050, text=» ABL OPLRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00be, t01=0x0050}
0x12932…1293c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0086}
0x1293c…12946 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0090}
0x12946…12968 Head {h00=0x001e, h01=0x0050, text=»* OPEN DLS, COMPLETION «, t00=0x00be, t01=0x009a}
0x12968…12972 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x00bc}
0x12972…12986 Head {h00=0x0010, h01=0x0050, text=»COMPOD EQU *«, t00=0x00be, t01=0x00c6}
0x12986…129a8 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00be, t01=0x00da}
0x129a8…129c8 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL STATUS?«, t00=0x00be, t01=0x00fc}
0x129c8…129f4 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CD100 YES, SKIP STATUS CHECK«, t00=0x00be, t01=0x011c}
0x129f4…129fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00be, t01=0x0148}
0x129fe…12a1a Head {h00=0x0018, h01=0x0050, text=» LDR A2,A6 WS NUMBER«, t00=0x00be, t01=0x0152}
0x12a1a…12a42 Head {h00=0x0024, h01=0x0050, text=» CF A15,STAHAN HANDLE PLC STATUS«, t00=0x00be, t01=0x016e}
0x12a42…12a6c Head {h00=0x0026, h01=0x0050, text=» LDK A2,0 CLEAR FATAL STATUS FLAGS«, t00=0x00bf, t01=0x0008}
0x12a6c…12a76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0032}
0x12a76…12a8a Head {h00=0x0010, h01=0x0050, text=»CD100 EQU * «, t00=0x00bf, t01=0x003c}
0x12a8a…12ac0 Head {h00=0x0032, h01=0x0050, text=» ABL ODLRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00bf, t01=0x0050}
0x12ac0…12aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0086}
0x12aca…12ad8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00bf, t01=0x0090}
0x12ad8…12ae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x009e}
0x12ae2…12b26 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00bf, t01=0x00a8}
0x12b26…12b30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x00ec}
0x12b30…12b48 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00bf, t01=0x00f6}
0x12b48…12b5a Head {h00=0x000e, h01=0x0050, text=»* COMPTEST«, t00=0x00bf, t01=0x010e}
0x12b5a…12b64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00bf, t01=0x0120}
0x12b64…12b78 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00bf, t01=0x012a}
0x12b78…12bae Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF GET LINE «, t00=0x00bf, t01=0x013e}
0x12bae…12be6 Head {h00=0x0034, h01=0x0050, text=»* STATISTICS, GET DLS STATISTICS AND READ LOCAL «, t00=0x00bf, t01=0x0174}
0x12be6…12c00 Head {h00=0x0016, h01=0x0050, text=»* MEMORY COMMANDS.«, t00=0x00c0, t01=0x001c}
0x12c00…12c32 Head {h00=0x002e, h01=0x0050, text=»* IT CHECKS THE PLC STATUS, SETS EFFECTIVE«, t00=0x00c0, t01=0x0036}
0x12c32…12c68 Head {h00=0x0032, h01=0x0050, text=»* LENGTH IN DWT AND EXITS TO THE ROUTINE THAT «, t00=0x00c0, t01=0x0068}
0x12c68…12c84 Head {h00=0x0018, h01=0x0050, text=»* MADE THE I/O CALL.«, t00=0x00c0, t01=0x009e}
0x12c84…12c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x00ba}
0x12c8e…12c9e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00c0, t01=0x00c4}
0x12c9e…12cb6 Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00c0, t01=0x00d4}
0x12cb6…12cc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x00ec}
0x12cc0…12cd0 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00c0, t01=0x00f6}
0x12cd0…12cea Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00c0, t01=0x0106}
0x12cea…12d06 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c0, t01=0x0120}
0x12d06…12d22 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c0, t01=0x013c}
0x12d22…12d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c0, t01=0x0158}
0x12d2c…12d3e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00c0, t01=0x0162}
0x12d3e…12d5a Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00c0, t01=0x0174}
0x12d5a…12d76 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c0, t01=0x0190}
0x12d76…12d92 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c1, t01=0x001c}
0x12d92…12d9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0038}
0x12d9c…12de0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c1, t01=0x0042}
0x12de0…12dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0086}
0x12dea…12e00 Head {h00=0x0012, h01=0x0050, text=» IFT PLCTST=1 «, t00=0x00c1, t01=0x0090}
0x12e00…12e14 Head {h00=0x0010, h01=0x0050, text=»COMPPS EQU *«, t00=0x00c1, t01=0x00a6}
0x12e14…12e28 Head {h00=0x0010, h01=0x0050, text=»COMPDS EQU *«, t00=0x00c1, t01=0x00ba}
0x12e28…12e3c Head {h00=0x0010, h01=0x0050, text=»COMPRM EQU *«, t00=0x00c1, t01=0x00ce}
0x12e3c…12e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00e2}
0x12e46…12e54 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c1, t01=0x00ec}
0x12e54…12e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x00fa}
0x12e5e…12e7c Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 PLC STATUS «, t00=0x00c1, t01=0x0104}
0x12e7c…12ea0 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TS100 ERROR. HANDLE «, t00=0x00c1, t01=0x0122}
0x12ea0…12eaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c1, t01=0x0146}
0x12eaa…12eda Head {h00=0x002c, h01=0x0050, text=» LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH«, t00=0x00c1, t01=0x0150}
0x12eda…12efa Head {h00=0x001c, h01=0x0050, text=» ST A2,DWTTLN,A6 TO DWT «, t00=0x00c1, t01=0x0180}
0x12efa…12f18 Head {h00=0x001a, h01=0x0050, text=» RF TS110 EXIT. A1 = 0«, t00=0x00c2, t01=0x0010}
0x12f18…12f22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x002e}
0x12f22…12f36 Head {h00=0x0010, h01=0x0050, text=»TS100 EQU * «, t00=0x00c2, t01=0x0038}
0x12f36…12f68 Head {h00=0x002e, h01=0x0050, text=» LDK A1,NOTOPR RETURN CODE := NOT OPERABLE«, t00=0x00c2, t01=0x004c}
0x12f68…12f94 Head {h00=0x0028, h01=0x0050, text=» CM DWTTLN,A6 EFFECTIVE LENGTH := 0 «, t00=0x00c2, t01=0x007e}
0x12f94…12f9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x00aa}
0x12f9e…12fb2 Head {h00=0x0010, h01=0x0050, text=»TS110 EQU * «, t00=0x00c2, t01=0x00b4}
0x12fb2…12fd4 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c2, t01=0x00c8}
0x12fd4…1300a Head {h00=0x0032, h01=0x0050, text=» ABL TSTRST RETURN TO ROUTINE MAKING I/O CALL «, t00=0x00c2, t01=0x00ea}
0x1300a…13016 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00c2, t01=0x0120}
0x13016…13020 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x012c}
0x13020…1302e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c2, t01=0x0136}
0x1302e…13038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c2, t01=0x0144}
0x13038…1307c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c2, t01=0x014e}
0x1307c…13086 (195, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x0004}
0x13086…1309e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00c3, t01=0x000e}
0x1309e…130b0 Head {h00=0x000e, h01=0x0050, text=»* COMPWRI «, t00=0x00c3, t01=0x0026}
0x130b0…130ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x0038}
0x130ba…130ce Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00c3, t01=0x0042}
0x130ce…13104 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF STANDARD «, t00=0x00c3, t01=0x0056}
0x13104…13124 Head {h00=0x001c, h01=0x0050, text=»* WRITE AND FAST WRITE. «, t00=0x00c3, t01=0x008c}
0x13124…1315e Head {h00=0x0036, h01=0x0050, text=»* IT CHECKS THE PLC STATUS AND RELEASES THE OUTPUT«, t00=0x00c3, t01=0x00ac}
0x1315e…13194 Head {h00=0x0032, h01=0x0050, text=»* BUFFER, IF ANY WAS ALLOCATED. IF THE OUTPUT «, t00=0x00c3, t01=0x00e6}
0x13194…131ca Head {h00=0x0032, h01=0x0050, text=»* OPERATION IS FINISHED, IT THEN EXITS TO THE «, t00=0x00c3, t01=0x011c}
0x131ca…131f4 Head {h00=0x0026, h01=0x0050, text=»* ROUTINE THAT MADE THE I/O CALL. «, t00=0x00c3, t01=0x0152}
0x131f4…131fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c3, t01=0x017c}
0x131fe…1320e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00c3, t01=0x0186}
0x1320e…13226 Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00c4, t01=0x0008}
0x13226…13230 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0020}
0x13230…13240 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00c4, t01=0x002a}
0x13240…1325a Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00c4, t01=0x003a}
0x1325a…1327a Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00c4, t01=0x0054}
0x1327a…13296 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c4, t01=0x0074}
0x13296…132b2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c4, t01=0x0090}
0x132b2…132bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x00ac}
0x132bc…132ce Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00c4, t01=0x00b6}
0x132ce…13302 Head {h00=0x0030, h01=0x0050, text=»* WHEN RETURN TO ROUTINE MAKING OUTPUT CALL «, t00=0x00c4, t01=0x00c8}
0x13302…1331e Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00c4, t01=0x00fc}
0x1331e…1333c Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO «, t00=0x00c4, t01=0x0118}
0x1333c…1335e Head {h00=0x001e, h01=0x0050, text=»* BITS 8-15 DEVICE STATUS«, t00=0x00c4, t01=0x0136}
0x1335e…1337a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00c4, t01=0x0158}
0x1337a…13396 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00c4, t01=0x0174}
0x13396…133a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c4, t01=0x0190}
0x133a0…133e4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c5, t01=0x000a}
0x133e4…133ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x004e}
0x133ee…133fc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c5, t01=0x0058}
0x133fc…13406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x0066}
0x13406…1341a Head {h00=0x0010, h01=0x0050, text=»COMPSW EQU *«, t00=0x00c5, t01=0x0070}
0x1341a…1342e Head {h00=0x0010, h01=0x0050, text=»COMPFW EQU *«, t00=0x00c5, t01=0x0084}
0x1342e…13452 Head {h00=0x0020, h01=0x0050, text=» LDR A2,A2 FATAL PLC STATUS?«, t00=0x00c5, t01=0x0098}
0x13452…13474 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) WRERR1 YES, HANDLE«, t00=0x00c5, t01=0x00bc}
0x13474…1347e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c5, t01=0x00de}
0x1347e…134a8 Head {h00=0x0026, h01=0x0050, text=» LC A2,DWTCP2,A6 CHANEL PARAMETER «, t00=0x00c5, t01=0x00e8}
0x134a8…134ce Head {h00=0x0022, h01=0x0050, text=» ANK A2,MASKWS CLEAN WS NUMBER«, t00=0x00c5, t01=0x0112}
0x134ce…134f6 Head {h00=0x0024, h01=0x0050, text=» CF A15,STAHAN HANDLE PLC STATUS«, t00=0x00c5, t01=0x0138}
0x134f6…1352c Head {h00=0x0032, h01=0x0050, text=» LC A7,CWTRCA+CCRIDB,A5 TYPE OF WRITE COMMAND «, t00=0x00c5, t01=0x0160}
0x1352c…13546 Head {h00=0x0016, h01=0x0050, text=» ANK A7,/FF CLEAN «, t00=0x00c6, t01=0x0008}
0x13546…13574 Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x00c6, t01=0x0022}
0x13574…13596 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c6, t01=0x0050}
0x13596…135c8 Head {h00=0x002e, h01=0x0050, text=» ABI WRIROU,A7 CALL CORRESPONDING ROUTINE «, t00=0x00c6, t01=0x0072}
0x135c8…135d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00a4}
0x135d2…135dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00ae}
0x135dc…135fc Head {h00=0x001c, h01=0x0050, text=»* IRRECOVERABLE ERROR«, t00=0x00c6, t01=0x00b8}
0x135fc…13606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x00d8}
0x13606…1361a Head {h00=0x0010, h01=0x0050, text=»WRERR1 EQU *«, t00=0x00c6, t01=0x00e2}
0x1361a…1363c Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00c6, t01=0x00f6}
0x1363c…13650 Head {h00=0x0010, h01=0x0050, text=»WRERR EQU * «, t00=0x00c6, t01=0x0118}
0x13650…13668 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00c6, t01=0x012c}
0x13668…13672 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0144}
0x13672…1367c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x014e}
0x1367c…136aa Head {h00=0x002a, h01=0x0050, text=»* COMPLETION OF DATA MESSAGE OUTPUT«, t00=0x00c6, t01=0x0158}
0x136aa…136b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c6, t01=0x0186}
0x136b4…136c8 Head {h00=0x0010, h01=0x0050, text=»WRNFLO EQU *«, t00=0x00c6, t01=0x0190}
0x136c8…136dc Head {h00=0x0010, h01=0x0050, text=»WRDATA EQU *«, t00=0x00c7, t01=0x0014}
0x136dc…13708 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLRLBU RELEASE OUTPUT BUFFER«, t00=0x00c7, t01=0x0028}
0x13708…13730 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD1,A6 INDICATE NO BUFFER«, t00=0x00c7, t01=0x0054}
0x13730…1375e Head {h00=0x002a, h01=0x0050, text=» ABL ACKRST RETURN TO REQUEST HANDLER «, t00=0x00c7, t01=0x007c}
0x1375e…13768 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00aa}
0x13768…13772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00b4}
0x13772…137aa Head {h00=0x0034, h01=0x0050, text=»* COMPLETION OF RECIEVE READY MESSAGE OUTPUT «, t00=0x00c7, t01=0x00be}
0x137aa…137b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c7, t01=0x00f6}
0x137b4…137c6 Head {h00=0x000e, h01=0x0050, text=»WRRR EQU *«, t00=0x00c7, t01=0x0100}
0x137c6…137ee Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 START OF MONITOR BLOCK«, t00=0x00c7, t01=0x0112}
0x137ee…1380c Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00c7, t01=0x013a}
0x1380c…1383c Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00c7, t01=0x0158}
0x1383c…13864 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00c7, t01=0x0188}
0x13864…13888 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00c8, t01=0x0020}
0x13888…13892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0044}
0x13892…138aa Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00c8, t01=0x004e}
0x138aa…138b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0066}
0x138b4…138be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x0070}
0x138be…138fa Head {h00=0x0038, h01=0x0050, text=»* COMPLETION OF RESET CONFIRMATION MESSAGE OUTPUT«, t00=0x00c8, t01=0x007a}
0x138fa…13904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c8, t01=0x00b6}
0x13904…13918 Head {h00=0x0010, h01=0x0050, text=»WRRESC EQU *«, t00=0x00c8, t01=0x00c0}
0x13918…13940 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 START OF MONITOR BLOCK«, t00=0x00c8, t01=0x00d4}
0x13940…1395e Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00c8, t01=0x00fc}
0x1395e…1398e Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00c8, t01=0x011a}
0x1398e…139b6 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00c8, t01=0x014a}
0x139b6…139da Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00c8, t01=0x0172}
0x139da…139e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x0008}
0x139e4…13a16 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/FFFF-DWFRES MASK FOR RESET FLAG «, t00=0x00c9, t01=0x0012}
0x13a16…13a42 Head {h00=0x0028, h01=0x0050, text=» ANS A2,DWTST,A6 CLEAR "RESET" FLAG «, t00=0x00c9, t01=0x0044}
0x13a42…13a76 Head {h00=0x0030, h01=0x0050, text=» LDK A4,RELINE RECOVERY CAUSE := LINK RESET «, t00=0x00c9, t01=0x0070}
0x13a76…13aa2 Head {h00=0x0028, h01=0x0050, text=» CF A15,NDREDW CALL RECOVERY FOR DWT«, t00=0x00c9, t01=0x00a4}
0x13aa2…13ac6 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00c9, t01=0x00d0}
0x13ac6…13ad0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x00f4}
0x13ad0…13ade Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00c9, t01=0x00fe}
0x13ade…13ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x010c}
0x13ae8…13b2c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00c9, t01=0x0116}
0x13b2c…13b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x015a}
0x13b36…13b4e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00c9, t01=0x0164}
0x13b4e…13b5e Head {h00=0x000c, h01=0x0050, text=»* COMPGR«, t00=0x00c9, t01=0x017c}
0x13b5e…13b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00c9, t01=0x018c}
0x13b68…13b7c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00ca, t01=0x0008}
0x13b7c…13bb0 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE HANDLES COMPLETION OF GENERAL«, t00=0x00ca, t01=0x001c}
0x13bb0…13bc8 Head {h00=0x0014, h01=0x0050, text=»* READ COMMANDS.«, t00=0x00ca, t01=0x0050}
0x13bc8…13bf6 Head {h00=0x002a, h01=0x0050, text=»* IT CHECKS TYPE OF MESSAGE AND CALLS «, t00=0x00ca, t01=0x0068}
0x13bf6…13c16 Head {h00=0x001c, h01=0x0050, text=»* CORRESPONDING ROUTINE.«, t00=0x00ca, t01=0x0096}
0x13c16…13c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x00b6}
0x13c20…13c30 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00ca, t01=0x00c0}
0x13c30…13c48 Head {h00=0x0014, h01=0x0050, text=»* ABI CMDROU,A3 «, t00=0x00ca, t01=0x00d0}
0x13c48…13c52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x00e8}
0x13c52…13c62 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00ca, t01=0x00f2}
0x13c62…13c7c Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00ca, t01=0x0102}
0x13c7c…13c9c Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00ca, t01=0x011c}
0x13c9c…13cb8 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00ca, t01=0x013c}
0x13cb8…13cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ca, t01=0x0158}
0x13cc2…13cd4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00ca, t01=0x0162}
0x13cd4…13cee Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00ca, t01=0x0174}
0x13cee…13d0c Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00ca, t01=0x018e}
0x13d0c…13d28 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00cb, t01=0x001c}
0x13d28…13d42 Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00cb, t01=0x0038}
0x13d42…13d6e Head {h00=0x0028, h01=0x0050, text=»* A7 = DEVICE ADDRESS (IF RELEVANT)«, t00=0x00cb, t01=0x0052}
0x13d6e…13d78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x007e}
0x13d78…13dbc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00cb, t01=0x0088}
0x13dbc…13dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x00cc}
0x13dc6…13dda Head {h00=0x0010, h01=0x0050, text=»COMPGR EQU *«, t00=0x00cb, t01=0x00d6}
0x13dda…13dfa Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL STATUS?«, t00=0x00cb, t01=0x00ea}
0x13dfa…13e1a Head {h00=0x001c, h01=0x0050, text=» RF(NZ) GRERR2 YES, EXIT«, t00=0x00cb, t01=0x010a}
0x13e1a…13e24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x012a}
0x13e24…13e32 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cb, t01=0x0134}
0x13e32…13e3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cb, t01=0x0142}
0x13e3c…13e68 Head {h00=0x0028, h01=0x0050, text=» CF A15,INTYPE A3 := TYPE OF MESSAGE«, t00=0x00cb, t01=0x014c}
0x13e68…13e96 Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x00cb, t01=0x0178}
0x13e96…13ec0 Head {h00=0x0026, h01=0x0050, text=» LC A6,CWTRCA+CCRDLS,A5 DLS INDEX «, t00=0x00cc, t01=0x0016}
0x13ec0…13edc Head {h00=0x0018, h01=0x0050, text=» ANK A6,MASKWS CLEAN«, t00=0x00cc, t01=0x0040}
0x13edc…13f04 Head {h00=0x0024, h01=0x0050, text=» LC A7,X25LCN,A4 DEVICE ADDRESS «, t00=0x00cc, t01=0x005c}
0x13f04…13f20 Head {h00=0x0018, h01=0x0050, text=» ANK A7,MASKLC CLEAN«, t00=0x00cc, t01=0x0084}
0x13f20…13f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00a0}
0x13f2a…13f5e Head {h00=0x0030, h01=0x0050, text=» ABI REAROU,A3 ROUTINE FOR THIS MESSAGE TYPE«, t00=0x00cc, t01=0x00aa}
0x13f5e…13f68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00de}
0x13f68…13f76 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00cc, t01=0x00e8}
0x13f76…13f80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x00f6}
0x13f80…13fc4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00cc, t01=0x0100}
0x13fc4…13fce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x0144}
0x13fce…13fe6 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00cc, t01=0x014e}
0x13fe6…13ff6 Head {h00=0x000c, h01=0x0050, text=»* GRERR «, t00=0x00cc, t01=0x0166}
0x13ff6…14000 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cc, t01=0x0176}
0x14000…14014 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00cc, t01=0x0180}
0x14014…1404a (205, 0, 400) Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES ILLEGAL INPUT MESSAGES.«, t00=0x00cd, t01=0x0004}
0x1404a…1406a Head {h00=0x001c, h01=0x0050, text=»* GRERR1 RETURNS BUFFER «, t00=0x00cd, t01=0x003a}
0x1406a…14074 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x005a}
0x14074…14084 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00cd, t01=0x0064}
0x14084…1409c Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00cd, t01=0x0074}
0x1409c…140b0 Head {h00=0x0010, h01=0x0050, text=»* RB GRERR1 «, t00=0x00cd, t01=0x008c}
0x140b0…140c4 Head {h00=0x0010, h01=0x0050, text=»* RF GRERR2 «, t00=0x00cd, t01=0x00a0}
0x140c4…140ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x00b4}
0x140ce…140de Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00cd, t01=0x00be}
0x140de…14108 Head {h00=0x0026, h01=0x0050, text=»* A4 = BUFFER ADDRESS (IF GRERR1)«, t00=0x00cd, t01=0x00ce}
0x14108…14124 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00cd, t01=0x00f8}
0x14124…1412e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x0114}
0x1412e…14140 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00cd, t01=0x011e}
0x14140…1414c Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00cd, t01=0x0130}
0x1414c…14156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x013c}
0x14156…1419a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00cd, t01=0x0146}
0x1419a…141a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cd, t01=0x018a}
0x141a4…141b8 (206, 0, 400) Head {h00=0x0010, h01=0x0050, text=»GRERR1 EQU *«, t00=0x00ce, t01=0x0004}
0x141b8…141ea Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00ce, t01=0x0018}
0x141ea…141f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x004a}
0x141f4…14208 Head {h00=0x0010, h01=0x0050, text=»GRERR2 EQU *«, t00=0x00ce, t01=0x0054}
0x14208…1422a Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00ce, t01=0x0068}
0x1422a…14234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x008a}
0x14234…1424c Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00ce, t01=0x0094}
0x1424c…14256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x00ac}
0x14256…14264 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00ce, t01=0x00b6}
0x14264…1426e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x00c4}
0x1426e…142b2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00ce, t01=0x00ce}
0x142b2…142bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0112}
0x142bc…142d4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00ce, t01=0x011c}
0x142d4…142e4 Head {h00=0x000c, h01=0x0050, text=»* GRSACK«, t00=0x00ce, t01=0x0134}
0x142e4…142ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ce, t01=0x0144}
0x142ee…14302 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00ce, t01=0x014e}
0x14302…1433a Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE HANDLES STATUS AND RECIEVE READY «, t00=0x00ce, t01=0x0162}
0x1433a…1435c Head {h00=0x001e, h01=0x0050, text=»* MESSAGES FROM A DEVICE. «, t00=0x00cf, t01=0x000a}
0x1435c…14394 Head {h00=0x0034, h01=0x0050, text=»* IT RELEASES THE BUFFER AND RETURNS TO ROUTINE «, t00=0x00cf, t01=0x002c}
0x14394…143ae Head {h00=0x0016, h01=0x0050, text=»* MAKING I/O CALL.«, t00=0x00cf, t01=0x0064}
0x143ae…143b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x007e}
0x143b8…143c8 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00cf, t01=0x0088}
0x143c8…143e0 Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00cf, t01=0x0098}
0x143e0…143ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x00b0}
0x143ea…143fa Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00cf, t01=0x00ba}
0x143fa…14418 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00cf, t01=0x00ca}
0x14418…14434 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00cf, t01=0x00e8}
0x14434…1444e Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00cf, t01=0x0104}
0x1444e…1446c Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00cf, t01=0x011e}
0x1446c…14476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00cf, t01=0x013c}
0x14476…14488 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00cf, t01=0x0146}
0x14488…144a4 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x00cf, t01=0x0158}
0x144a4…144b8 Head {h00=0x0010, h01=0x0050, text=»* =0 IF OK «, t00=0x00cf, t01=0x0174}
0x144b8…144d0 Head {h00=0x0014, h01=0x0050, text=»* ><0 IF ERROR «, t00=0x00cf, t01=0x0188}
0x144d0…144ee Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x00d0, t01=0x0010}
0x144ee…14512 Head {h00=0x0020, h01=0x0050, text=»* BITS 8-15 DEVICE STATUS «, t00=0x00d0, t01=0x002e}
0x14512…1452e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d0, t01=0x0052}
0x1452e…1454a Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x00d0, t01=0x006e}
0x1454a…14554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x008a}
0x14554…14598 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d0, t01=0x0094}
0x14598…145a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x00d8}
0x145a2…145b0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d0, t01=0x00e2}
0x145b0…145ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d0, t01=0x00f0}
0x145ba…145ce Head {h00=0x0010, h01=0x0050, text=»GRSTAT EQU *«, t00=0x00d0, t01=0x00fa}
0x145ce…145f6 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d0, t01=0x010e}
0x145f6…1461a Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d0, t01=0x0136}
0x1461a…1464e Head {h00=0x0030, h01=0x0050, text=» CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS «, t00=0x00d0, t01=0x015a}
0x1464e…1467a Head {h00=0x0028, h01=0x0050, text=» LC A2,X25DAT,A4 DEVICE STATUS BYTE «, t00=0x00d0, t01=0x018e}
0x1467a…14694 Head {h00=0x0016, h01=0x0050, text=» ANK A2,/FF CLEAN «, t00=0x00d1, t01=0x002a}
0x14694…146b2 Head {h00=0x001a, h01=0x0050, text=» RF SR100 COMMON PART «, t00=0x00d1, t01=0x0044}
0x146b2…146bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0062}
0x146bc…146c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x006c}
0x146c6…146d8 Head {h00=0x000e, h01=0x0050, text=»GRRR EQU *«, t00=0x00d1, t01=0x0076}
0x146d8…14700 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d1, t01=0x0088}
0x14700…14724 Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d1, t01=0x00b0}
0x14724…14756 Head {h00=0x002e, h01=0x0050, text=» CF A15,FWIPR UPDATE FLOW CONTROL COUNTERS«, t00=0x00d1, t01=0x00d4}
0x14756…14780 Head {h00=0x0026, h01=0x0050, text=» LDK A2,0 RESET DEVICE STATUS BYTE«, t00=0x00d1, t01=0x0106}
0x14780…1478a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x0130}
0x1478a…14794 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d1, t01=0x013a}
0x14794…147a8 Head {h00=0x0010, h01=0x0050, text=»SR100 EQU * «, t00=0x00d1, t01=0x0144}
0x147a8…147ee Head {h00=0x0042, h01=0x0050, text=»* COMMON PART FOR DEVICE STATUS AND RECIEVE READY MESSAGES «, t00=0x00d1, t01=0x0158}
0x147ee…14810 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00d2, t01=0x000e}
0x14810…14842 Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00d2, t01=0x0030}
0x14842…14864 Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x00d2, t01=0x0062}
0x14864…14876 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A3«, t00=0x00d2, t01=0x0084}
0x14876…148ae Head {h00=0x0034, h01=0x0050, text=» ANK A4,DWFAK3 ANYONE WAITING FOR THIS MESSAGE? «, t00=0x00d2, t01=0x0096}
0x148ae…148d2 Head {h00=0x0020, h01=0x0050, text=» ABL(Z) PLDSP2 NO, DISPATCH «, t00=0x00d2, t01=0x00ce}
0x148d2…148dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d2, t01=0x00f2}
0x148dc…14904 Head {h00=0x0024, h01=0x0050, text=» XRS A4,DWTST,A6 RESET WAIT FLAG«, t00=0x00d2, t01=0x00fc}
0x14904…14928 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x00d2, t01=0x0124}
0x14928…1495c Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x00d2, t01=0x0148}
0x1495c…1498a Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x00d2, t01=0x017c}
0x1498a…149b8 Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x00d3, t01=0x001a}
0x149b8…149c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0048}
0x149c2…149d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d3, t01=0x0052}
0x149d0…149da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x0060}
0x149da…14a1e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d3, t01=0x006a}
0x14a1e…14a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x00ae}
0x14a28…14a40 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00d3, t01=0x00b8}
0x14a40…14a50 Head {h00=0x000c, h01=0x0050, text=»* GRDATA«, t00=0x00d3, t01=0x00d0}
0x14a50…14a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x00e0}
0x14a5a…14a6e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00d3, t01=0x00ea}
0x14a6e…14aa2 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE HANDLES DATA INPUT MESSAGES. «, t00=0x00d3, t01=0x00fe}
0x14aa2…14acc Head {h00=0x0026, h01=0x0050, text=»* IT LINKS THE BUFFER TO THE CWT. «, t00=0x00d3, t01=0x0132}
0x14acc…14ad6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x015c}
0x14ad6…14ae6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00d3, t01=0x0166}
0x14ae6…14afe Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00d3, t01=0x0176}
0x14afe…14b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d3, t01=0x018e}
0x14b08…14b18 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00d4, t01=0x0008}
0x14b18…14b36 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00d4, t01=0x0018}
0x14b36…14b52 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d4, t01=0x0036}
0x14b52…14b6c Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00d4, t01=0x0052}
0x14b6c…14b8a Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00d4, t01=0x006c}
0x14b8a…14b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x008a}
0x14b94…14ba6 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00d4, t01=0x0094}
0x14ba6…14bb2 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00d4, t01=0x00a6}
0x14bb2…14bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x00b2}
0x14bbc…14c00 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d4, t01=0x00bc}
0x14c00…14c0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x0100}
0x14c0a…14c1e Head {h00=0x0010, h01=0x0050, text=»GRDATA EQU *«, t00=0x00d4, t01=0x010a}
0x14c1e…14c46 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d4, t01=0x011e}
0x14c46…14c6a Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d4, t01=0x0146}
0x14c6a…14c74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d4, t01=0x016a}
0x14c74…14ca8 Head {h00=0x0030, h01=0x0050, text=» CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS «, t00=0x00d4, t01=0x0174}
0x14ca8…14ce0 Head {h00=0x0034, h01=0x0050, text=» ST A4,CWTBUF,A5 SAVE INPUT DATA BUFFER ADDRESS «, t00=0x00d5, t01=0x0018}
0x14ce0…14d14 Head {h00=0x0030, h01=0x0050, text=» ST A6,BUFDWT,A4 SAVE DWT ADDRESS IN BUFFER «, t00=0x00d5, t01=0x0050}
0x14d14…14d44 Head {h00=0x002c, h01=0x0050, text=» LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH«, t00=0x00d5, t01=0x0084}
0x14d44…14d6c Head {h00=0x0024, h01=0x0050, text=» ST A2,BUFLEN,A4 SAVE IN BUFFER «, t00=0x00d5, t01=0x00b4}
0x14d6c…14d96 Head {h00=0x0026, h01=0x0050, text=» LDK A2,X25DAT START OF USER DATA «, t00=0x00d5, t01=0x00dc}
0x14d96…14dbc Head {h00=0x0022, h01=0x0050, text=» ST A2,BUFBIX,A4 TO BYTE INDEX«, t00=0x00d5, t01=0x0106}
0x14dbc…14dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x012c}
0x14dc6…14dd4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d5, t01=0x0136}
0x14dd4…14dde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0144}
0x14dde…14e00 Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00d5, t01=0x014e}
0x14e00…14e18 Head {h00=0x0014, h01=0x0050, text=» ABL PLDSP2 EXIT«, t00=0x00d5, t01=0x0170}
0x14e18…14e22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d5, t01=0x0188}
0x14e22…14e30 (214, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d6, t01=0x0004}
0x14e30…14e3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0012}
0x14e3a…14e7e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d6, t01=0x001c}
0x14e7e…14e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0060}
0x14e88…14ea0 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00d6, t01=0x006a}
0x14ea0…14eb0 Head {h00=0x000c, h01=0x0050, text=»* GRRES «, t00=0x00d6, t01=0x0082}
0x14eb0…14eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d6, t01=0x0092}
0x14eba…14ece Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00d6, t01=0x009c}
0x14ece…14f04 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES RESET MESSAGES FROM THE«, t00=0x00d6, t01=0x00b0}
0x14f04…14f18 Head {h00=0x0010, h01=0x0050, text=»* SECONDARY.«, t00=0x00d6, t01=0x00e6}
0x14f18…14f52 Head {h00=0x0036, h01=0x0050, text=»* IT RESETS THE FLOW CONTROL COUNTERS IN THE DWT, «, t00=0x00d6, t01=0x00fa}
0x14f52…14f8c Head {h00=0x0036, h01=0x0050, text=»* AND SETS A RESET PACKET FLAG IN THE DWT. THEN A «, t00=0x00d6, t01=0x0134}
0x14f8c…14fc0 Head {h00=0x0030, h01=0x0050, text=»* RESET CONFIRMATION MESSAGE IS SENT. IF THE«, t00=0x00d6, t01=0x016e}
0x14fc0…14ffc Head {h00=0x0038, h01=0x0050, text=»* PROCESS IS WAITING FOR LEVEL 3 ACK OR IN A BUFFER «, t00=0x00d7, t01=0x0012}
0x14ffc…1501a Head {h00=0x001a, h01=0x0050, text=»* QUEUE IT IS ABORTED.«, t00=0x00d7, t01=0x004e}
0x1501a…15024 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x006c}
0x15024…15034 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00d7, t01=0x0076}
0x15034…1504c Head {h00=0x0014, h01=0x0050, text=»* ABI REAROU,A3 «, t00=0x00d7, t01=0x0086}
0x1504c…15056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x009e}
0x15056…15066 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00d7, t01=0x00a8}
0x15066…15084 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x00d7, t01=0x00b8}
0x15084…150a0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00d7, t01=0x00d6}
0x150a0…150ba Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x00d7, t01=0x00f2}
0x150ba…150d8 Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x00d7, t01=0x010c}
0x150d8…150e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x012a}
0x150e2…150f4 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00d7, t01=0x0134}
0x150f4…15100 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00d7, t01=0x0146}
0x15100…1510a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d7, t01=0x0152}
0x1510a…1514e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00d7, t01=0x015c}
0x1514e…15158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0010}
0x15158…1516c Head {h00=0x0010, h01=0x0050, text=»GRRES EQU * «, t00=0x00d8, t01=0x001a}
0x1516c…15194 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00d8, t01=0x002e}
0x15194…151b8 Head {h00=0x0020, h01=0x0050, text=» RB(Z) GRERR1 NO DWT DEFINED«, t00=0x00d8, t01=0x0056}
0x151b8…151c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x007a}
0x151c2…151d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00d8, t01=0x0084}
0x151d0…151da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0092}
0x151da…151fc Head {h00=0x001e, h01=0x0050, text=» EX CWTST3,A5 RELEASE RCA «, t00=0x00d8, t01=0x009c}
0x151fc…1522e Head {h00=0x002e, h01=0x0050, text=» CF A15,PLRLBU RELEASE GENERAL READ BUFFER«, t00=0x00d8, t01=0x00be}
0x1522e…15260 Head {h00=0x002e, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL COUNTERS «, t00=0x00d8, t01=0x00f0}
0x15260…1526a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d8, t01=0x0122}
0x1526a…1528c Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00d8, t01=0x012c}
0x1528c…152ba Head {h00=0x002a, h01=0x0050, text=» ANK A2,DWFRES RESET ALREADY RECIEVED?«, t00=0x00d8, t01=0x014e}
0x152ba…152dc Head {h00=0x001e, h01=0x0050, text=» ABL(NZ) PLDSP2 YES, EXIT «, t00=0x00d8, t01=0x017c}
0x152dc…152f2 Head {h00=0x0012, h01=0x0050, text=» LDK A2,DWFRES«, t00=0x00d9, t01=0x000e}
0x152f2…15322 Head {h00=0x002c, h01=0x0050, text=» ORS A2,DWTST,A6 INDICATE RESET RECIEVED«, t00=0x00d9, t01=0x0024}
0x15322…1532c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0054}
0x1532c…15352 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLCCCA RESERVE PLC CCA«, t00=0x00d9, t01=0x005e}
0x15352…1535e Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00d9, t01=0x0084}
0x1535e…15368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00d9, t01=0x0090}
0x15368…15390 Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBLK GET OUTPUT BUFFER«, t00=0x00d9, t01=0x009a}
0x15390…153ae Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x00d9, t01=0x00c2}
0x153ae…153de Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00d9, t01=0x00e0}
0x153de…15416 Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKFST PUT BLOCK IN QUEUE (FOR RECOVERY)«, t00=0x00d9, t01=0x0110}
0x15416…15438 Head {h00=0x001e, h01=0x0050, text=» ADK A4,2 SKIP QUEUE LINK «, t00=0x00d9, t01=0x0148}
0x15438…1546a Head {h00=0x002e, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDR TO CCA«, t00=0x00d9, t01=0x016a}
0x1546a…154a8 Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x00da, t01=0x000c}
0x154a8…154dc Head {h00=0x0030, h01=0x0050, text=» CF A15,WRADR2 WRITE ADDRESS IN CCA (TYPE 2)«, t00=0x00da, t01=0x004a}
0x154dc…15510 Head {h00=0x0030, h01=0x0050, text=» LDK A2,CMDSW COMMAND CODE "STANDARD WRITE" «, t00=0x00da, t01=0x007e}
0x15510…15536 Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x00da, t01=0x00b2}
0x15536…1555c Head {h00=0x0022, h01=0x0050, text=» LDK A2,/1F MESSAGE TYPE FLAGS«, t00=0x00da, t01=0x00d8}
0x1555c…15586 Head {h00=0x0026, h01=0x0050, text=» SC A2,X25FLW,A4 TO OUTPUT BUFFER «, t00=0x00da, t01=0x00fe}
0x15586…155b6 Head {h00=0x002c, h01=0x0050, text=» LDK A2,TYRESC TYPE "RESET CONFIRMATION"«, t00=0x00da, t01=0x0128}
0x155b6…155e8 Head {h00=0x002e, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 TO CCA, COMMAND ID«, t00=0x00da, t01=0x0158}
0x155e8…15626 Head {h00=0x003a, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 DWT ADDRESS TO CCA, COMMAND ID«, t00=0x00da, t01=0x018a}
0x15626…15652 Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF SYSTEM PART«, t00=0x00db, t01=0x0038}
0x15652…15680 Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 TO CCA LENGTH «, t00=0x00db, t01=0x0064}
0x15680…1568a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x0092}
0x1568a…15698 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00db, t01=0x009c}
0x15698…156a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00db, t01=0x00aa}
0x156a2…156c4 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00db, t01=0x00b4}
0x156c4…156ee Head {h00=0x0026, h01=0x0050, text=» ANK A2,DWFRES RESET STILL WANTED?«, t00=0x00db, t01=0x00d6}
0x156ee…1570c Head {h00=0x001a, h01=0x0050, text=» RF(Z) REERR1 NO, EXIT«, t00=0x00db, t01=0x0100}
0x1570c…15736 Head {h00=0x0026, h01=0x0050, text=» CF A15,GETWSS A1 := STATUS & INH «, t00=0x00db, t01=0x011e}
0x15736…1575a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) REERR1 EXIT IF ERROR«, t00=0x00db, t01=0x0148}
0x1575a…15782 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x00db, t01=0x016c}
0x15782…157a6 (220, 0, 400) Head {h00=0x0020, h01=0x0050, text=» RF(NZ) REERR2 EXIT IF ERROR«, t00=0x00dc, t01=0x0004}
0x157a6…157b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dc, t01=0x0028}
0x157b0…157de Head {h00=0x002a, h01=0x0050, text=» LDK A1,LINERR RET CODE := LINK ERROR «, t00=0x00dc, t01=0x0032}
0x157de…15800 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x00dc, t01=0x0060}
0x15800…15812 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x00dc, t01=0x0082}
0x15812…15842 Head {h00=0x002c, h01=0x0050, text=» ANK A2,DWFAK3 WAITING FOR LEVEL 3 ACK? «, t00=0x00dc, t01=0x0094}
0x15842…15864 Head {h00=0x001e, h01=0x0050, text=» RF(Z) RE100 NO, CONTINUE «, t00=0x00dc, t01=0x00c4}
0x15864…1588c Head {h00=0x0024, h01=0x0050, text=» XRS A2,DWTST,A6 RESET ACK3 FLAG«, t00=0x00dc, t01=0x00e6}
0x1588c…158c0 Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x00dc, t01=0x010e}
0x158c0…158ee Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x00dc, t01=0x0142}
0x158ee…1591c Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x00dc, t01=0x0170}
0x1591c…15926 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x000e}
0x15926…1593a Head {h00=0x0010, h01=0x0050, text=»RE100 EQU * «, t00=0x00dd, t01=0x0018}
0x1593a…1596e Head {h00=0x0030, h01=0x0050, text=» CF A15,OUTBUQ REMOVE DWT FROM BUFFER QUEUE «, t00=0x00dd, t01=0x002c}
0x1596e…15988 Head {h00=0x0016, h01=0x0050, text=» LDR A2,A2 FOUND? «, t00=0x00dd, t01=0x0060}
0x15988…159bc Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) BUFRST YES, RETURN WITH ERROR CODE «, t00=0x00dd, t01=0x007a}
0x159bc…159c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x00ae}
0x159c6…159ea Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00dd, t01=0x00b8}
0x159ea…159f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x00dc}
0x159f4…159fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00dd, t01=0x00e6}
0x159fe…15a12 Head {h00=0x0010, h01=0x0050, text=»REERR1 EQU *«, t00=0x00dd, t01=0x00f0}
0x15a12…15a34 Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x00dd, t01=0x0104}
0x15a34…15a48 Head {h00=0x0010, h01=0x0050, text=»REERR2 EQU *«, t00=0x00dd, t01=0x0126}
0x15a48…15a7e Head {h00=0x0032, h01=0x0050, text=»* ERROR. RETURN MONITOR BLOCK IMMEDIATELY«, t00=0x00dd, t01=0x013a}
0x15a7e…15aae Head {h00=0x002c, h01=0x0050, text=» SUK A4,2 START ADDRESS OF MONITOR BLOCK«, t00=0x00dd, t01=0x0170}
0x15aae…15ae6 Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET«, t00=0x00de, t01=0x0010}
0x15ae6…15b12 Head {h00=0x0028, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK «, t00=0x00de, t01=0x0048}
0x15b12…15b36 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00de, t01=0x0074}
0x15b36…15b40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0098}
0x15b40…15b4e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00de, t01=0x00a2}
0x15b4e…15b58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x00b0}
0x15b58…15b76 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x00de, t01=0x00ba}
0x15b76…15b94 Head {h00=0x001a, h01=0x0050, text=»* RECOVERY ROUTINES * «, t00=0x00de, t01=0x00d8}
0x15b94…15bb2 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x00de, t01=0x00f6}
0x15bb2…15bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00de, t01=0x0114}
0x15bbc…15bfc Head {h00=0x003c, h01=0x0050, text=»* THESE ROUTINES ARE USED AT SYSTEM START OR TC POWER «, t00=0x00de, t01=0x011e}
0x15bfc…15c3e Head {h00=0x003e, h01=0x0050, text=»* UP. IN CASE OF POWER UP, THEY FIRST REMOVE ALL RUNNING«, t00=0x00de, t01=0x015e}
0x15c3e…15c7c Head {h00=0x003a, h01=0x0050, text=»* OUTPUT OPERATIONS. AFTER THAT, THE PLC IS STARTED,«, t00=0x00df, t01=0x0010}
0x15c7c…15cb8 Head {h00=0x0038, h01=0x0050, text=»* AND LAST RECOVERY ROUTINES IN DEVICE DRIVERS ARE«, t00=0x00df, t01=0x004e}
0x15cb8…15cda Head {h00=0x001e, h01=0x0050, text=»* CALLED FOR ALL DWT:S. «, t00=0x00df, t01=0x008a}
0x15cda…15d16 Head {h00=0x0038, h01=0x0050, text=»* THE SECTION ALSO CONTAINS ROUTINES FOR RECOVERY «, t00=0x00df, t01=0x00ac}
0x15d16…15d30 Head {h00=0x0016, h01=0x0050, text=»* OF I/O ERRORS.«, t00=0x00df, t01=0x00e8}
0x15d30…15d3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x0102}
0x15d3a…15d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x010c}
0x15d44…15d78 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00df, t01=0x0116}
0x15d78…15d82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x014a}
0x15d82…15d9a Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00df, t01=0x0154}
0x15d9a…15da4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00df, t01=0x016c}
0x15da4…15de0 Head {h00=0x0038, h01=0x0050, text=»* PLON CALL RECOVERY ONCE FOR EACH PLC CHANNEL UNIT «, t00=0x00df, t01=0x0176}
0x15de0…15e14 Head {h00=0x0030, h01=0x0050, text=»* PLSTRT START PLC AND CALL DEVICE RECOVERY «, t00=0x00e0, t01=0x0022}
0x15e14…15e1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x0056}
0x15e1e…15e2c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e0, t01=0x0060}
0x15e2c…15e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x006e}
0x15e36…15e7a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e0, t01=0x0078}
0x15e7a…15e84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x00bc}
0x15e84…15e9c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00e0, t01=0x00c6}
0x15e9c…15eaa Head {h00=0x000a, h01=0x0050, text=»* PLON«, t00=0x00e0, t01=0x00de}
0x15eaa…15eb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e0, t01=0x00ec}
0x15eb4…15ec8 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00e0, t01=0x00f6}
0x15ec8…15efa Head {h00=0x002e, h01=0x0050, text=»* THIS ROUTINE WILL ACTIVATE A MONITOR JOB«, t00=0x00e0, t01=0x010a}
0x15efa…15f30 Head {h00=0x0032, h01=0x0050, text=»* FOR THE PLC RECOVERY, IF THE JOB NOT ALREADY«, t00=0x00e0, t01=0x013c}
0x15f30…15f46 Head {h00=0x0012, h01=0x0050, text=»* IS PENDING. «, t00=0x00e0, t01=0x0172}
0x15f46…15f84 Head {h00=0x003a, h01=0x0050, text=»* THE MONITOR JOB WILL CALL THE RECOVERY ROUTINE ONCE «, t00=0x00e0, t01=0x0188}
0x15f84…15fa4 Head {h00=0x001c, h01=0x0050, text=»* FOR EACH PLC DEFINED. «, t00=0x00e1, t01=0x0036}
0x15fa4…15fae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0056}
0x15fae…15fbe Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00e1, t01=0x0060}
0x15fbe…15fd4 Head {h00=0x0012, h01=0x0050, text=»* CF A15,PLON «, t00=0x00e1, t01=0x0070}
0x15fd4…15fde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0086}
0x15fde…15fee Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00e1, t01=0x0090}
0x15fee…15ffa Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00e1, t01=0x00a0}
0x15ffa…16004 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x00ac}
0x16004…16016 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00e1, t01=0x00b6}
0x16016…16038 Head {h00=0x001e, h01=0x0050, text=»* AT ENTRY TO PLSTRT:«, t00=0x00e1, t01=0x00c8}
0x16038…16054 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00e1, t01=0x00ea}
0x16054…1605e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0106}
0x1605e…160a2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e1, t01=0x0110}
0x160a2…160ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e1, t01=0x0154}
0x160ac…160be Head {h00=0x000e, h01=0x0050, text=»PLON EQU *«, t00=0x00e1, t01=0x015e}
0x160be…160e6 Head {h00=0x0024, h01=0x0050, text=» LD A1,PLCPFP POWER UP PENDING? «, t00=0x00e1, t01=0x0170}
0x160e6…16106 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) PO100 YES, EXIT «, t00=0x00e2, t01=0x0008}
0x16106…16132 Head {h00=0x0028, h01=0x0050, text=» IM PLCPFP INDICATE POWER UP STARTED«, t00=0x00e2, t01=0x0028}
0x16132…1613c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0054}
0x1613c…16160 Head {h00=0x0020, h01=0x0050, text=» LDKL A2,PO110 START ADDRESS«, t00=0x00e2, t01=0x005e}
0x16160…1618a Head {h00=0x0026, h01=0x0050, text=» CF A15,QMJOB ACTIVATE MONITOR JOB«, t00=0x00e2, t01=0x0082}
0x1618a…16194 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00ac}
0x16194…161a8 Head {h00=0x0010, h01=0x0050, text=»PO100 EQU * «, t00=0x00e2, t01=0x00b6}
0x161a8…161b8 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x00e2, t01=0x00ca}
0x161b8…161c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00da}
0x161c2…161d0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e2, t01=0x00e4}
0x161d0…161da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x00f2}
0x161da…161ee Head {h00=0x0010, h01=0x0050, text=»PO110 EQU * «, t00=0x00e2, t01=0x00fc}
0x161ee…16212 Head {h00=0x0020, h01=0x0050, text=» CM PLCPFP NO LONGER PENDING«, t00=0x00e2, t01=0x0110}
0x16212…1621c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x0134}
0x1621c…16226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e2, t01=0x013e}
0x16226…1624c Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x00e2, t01=0x0148}
0x1624c…16278 Head {h00=0x0028, h01=0x0050, text=»* RESET QUEUE STATISTICS COUNTERS«, t00=0x00e2, t01=0x016e}
0x16278…1629c Head {h00=0x0020, h01=0x0050, text=» LDK A1,STATLN TABLE LENGTH «, t00=0x00e3, t01=0x000a}
0x1629c…162b0 Head {h00=0x0010, h01=0x0050, text=»PO113 EQU * «, t00=0x00e3, t01=0x002e}
0x162b0…162cc Head {h00=0x0018, h01=0x0050, text=» SUK A1,2 NEXT WORD «, t00=0x00e3, t01=0x0042}
0x162cc…162f4 Head {h00=0x0024, h01=0x0050, text=» RF(N) PO116 READY WHEN ALL DONE«, t00=0x00e3, t01=0x005e}
0x162f4…16318 Head {h00=0x0020, h01=0x0050, text=» CM STATAR,A1 RESET COUNTER «, t00=0x00e3, t01=0x0086}
0x16318…16334 Head {h00=0x0018, h01=0x0050, text=» RB PO113 NEXT WORD «, t00=0x00e3, t01=0x00aa}
0x16334…16348 Head {h00=0x0010, h01=0x0050, text=»PO116 EQU * «, t00=0x00e3, t01=0x00c6}
0x16348…16354 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e3, t01=0x00da}
0x16354…1635e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e3, t01=0x00e6}
0x1635e…1638a Head {h00=0x0028, h01=0x0050, text=» LDK A1,16 (MAX NUMBER OF PLC:S) * 2«, t00=0x00e3, t01=0x00f0}
0x1638a…1639e Head {h00=0x0010, h01=0x0050, text=»PO120 EQU * «, t00=0x00e3, t01=0x011c}
0x1639e…163d2 Head {h00=0x0030, h01=0x0050, text=»* THIS LOOP IS EXECUTED ONCE FOR EACH PLC«, t00=0x00e3, t01=0x0130}
0x163d2…163ec Head {h00=0x0016, h01=0x0050, text=» SUK A1,2 NEXT PLC«, t00=0x00e3, t01=0x0164}
0x163ec…16412 Head {h00=0x0022, h01=0x0050, text=» RF(N) PO130 EXIT IF ALL DONE «, t00=0x00e3, t01=0x017e}
0x16412…16436 Head {h00=0x0020, h01=0x0050, text=» LD A5,TABCWT,A1 CWT ADDRESS«, t00=0x00e4, t01=0x0014}
0x16436…16464 Head {h00=0x002a, h01=0x0050, text=» RB(Z) PO120 TAKE NEXT IF NOT DEFINED «, t00=0x00e4, t01=0x0038}
0x16464…16488 Head {h00=0x0020, h01=0x0050, text=» CF A15,PLSTRT START ONE PLC«, t00=0x00e4, t01=0x0066}
0x16488…164a2 Head {h00=0x0016, h01=0x0050, text=» RB PO120 NEXT PLC«, t00=0x00e4, t01=0x008a}
0x164a2…164ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x00a4}
0x164ac…164c0 Head {h00=0x0010, h01=0x0050, text=»PO130 EQU * «, t00=0x00e4, t01=0x00ae}
0x164c0…164e4 Head {h00=0x0020, h01=0x0050, text=» ABL MEXIT MONITOR JOB EXIT «, t00=0x00e4, t01=0x00c2}
0x164e4…164ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x00e6}
0x164ee…164fc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e4, t01=0x00f0}
0x164fc…16506 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x00fe}
0x16506…1654a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e4, t01=0x0108}
0x1654a…16554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x014c}
0x16554…1656c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00e4, t01=0x0156}
0x1656c…1657c Head {h00=0x000c, h01=0x0050, text=»* PLSTRT«, t00=0x00e4, t01=0x016e}
0x1657c…16586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e4, t01=0x017e}
0x16586…1659a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00e4, t01=0x0188}
0x1659a…165d0 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE FIRST CLEARS ALL WORK AREAS AND«, t00=0x00e5, t01=0x000c}
0x165d0…16608 Head {h00=0x0034, h01=0x0050, text=»* DWT:S, AND SETS THE DWT:S BUSY. IT THEN STARTS«, t00=0x00e5, t01=0x0042}
0x16608…1663e Head {h00=0x0032, h01=0x0050, text=»* THE PLC, AND CALLS RECOVERY ROUTINES IN ALL «, t00=0x00e5, t01=0x007a}
0x1663e…16658 Head {h00=0x0016, h01=0x0050, text=»* DEVICE DRIVERS. «, t00=0x00e5, t01=0x00b0}
0x16658…16662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x00ca}
0x16662…16672 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00e5, t01=0x00d4}
0x16672…1668a Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLSTRT «, t00=0x00e5, t01=0x00e4}
0x1668a…16694 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x00fc}
0x16694…166a4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00e5, t01=0x0106}
0x166a4…166c0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00e5, t01=0x0116}
0x166c0…166ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x0132}
0x166ca…166dc Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00e5, t01=0x013c}
0x166dc…166e8 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00e5, t01=0x014e}
0x166e8…166f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e5, t01=0x015a}
0x166f2…16736 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00e5, t01=0x0164}
0x16736…16740 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0018}
0x16740…16754 Head {h00=0x0010, h01=0x0050, text=»PLSTRT EQU *«, t00=0x00e6, t01=0x0022}
0x16754…1676a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x00e6, t01=0x0036}
0x1676a…1678a Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 PUSH A1-A8«, t00=0x00e6, t01=0x004c}
0x1678a…16796 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e6, t01=0x006c}
0x16796…167ac Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x00e6, t01=0x0078}
0x167ac…167ca Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 PUSH A1-A8 «, t00=0x00e6, t01=0x008e}
0x167ca…167d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x00e6, t01=0x00ac}
0x167d6…167e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x00b8}
0x167e0…167ec Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00e6, t01=0x00c2}
0x167ec…16822 Head {h00=0x0032, h01=0x0050, text=» IM CWTGR,A5 INDICATE GENERAL READ NOT ALLOWED«, t00=0x00e6, t01=0x00ce}
0x16822…16848 Head {h00=0x0022, h01=0x0050, text=» CM CWTABW,A5 STOP ABORT OF WS«, t00=0x00e6, t01=0x0104}
0x16848…16876 Head {h00=0x002a, h01=0x0050, text=» CM CWTSBQ,A5 RESET SHORT BUFFER QUEUE«, t00=0x00e6, t01=0x012a}
0x16876…168a4 Head {h00=0x002a, h01=0x0050, text=» CM CWTLBQ,A5 RESET LONG BUFFER QUEUE «, t00=0x00e6, t01=0x0158}
0x168a4…168ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e6, t01=0x0186}
0x168ae…168bc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00e6, t01=0x0190}
0x168bc…168c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e7, t01=0x000e}
0x168c6…168da Head {h00=0x0010, h01=0x0050, text=»ST100 EQU * «, t00=0x00e7, t01=0x0018}
0x168da…1690c Head {h00=0x002e, h01=0x0050, text=»* RETURN MONITOR BLOCKS USED AS BUFFERS«, t00=0x00e7, t01=0x002c}
0x1690c…1691e Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e7, t01=0x005e}
0x1691e…1694e Head {h00=0x002c, h01=0x0050, text=» ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD «, t00=0x00e7, t01=0x0070}
0x1694e…1696e Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A7 FIRST BLOCK «, t00=0x00e7, t01=0x00a0}
0x1696e…16996 Head {h00=0x0024, h01=0x0050, text=» RF(Z) ST105 CONTINUE IF NO LEFT«, t00=0x00e7, t01=0x00c0}
0x16996…169be Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00e7, t01=0x00e8}
0x169be…169e2 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00e7, t01=0x0110}
0x169e2…169fe Head {h00=0x0018, h01=0x0050, text=» RB ST100 TAKE NEXT «, t00=0x00e7, t01=0x0134}
0x169fe…16a12 Head {h00=0x0010, h01=0x0050, text=»ST105 EQU * «, t00=0x00e7, t01=0x0150}
0x16a12…16a44 Head {h00=0x002e, h01=0x0050, text=»* RETURN MONITOR BLOCKS FROM CCA QUEUE «, t00=0x00e7, t01=0x0164}
0x16a44…16a56 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e8, t01=0x0008}
0x16a56…16a7c Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x00e8, t01=0x001a}
0x16a7c…16a9c Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A7 FIRST BLOCK «, t00=0x00e8, t01=0x0040}
0x16a9c…16ac4 Head {h00=0x0024, h01=0x0050, text=» RF(Z) ST110 CONTINUE IF NO LEFT«, t00=0x00e8, t01=0x0060}
0x16ac4…16aec Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x00e8, t01=0x0088}
0x16aec…16b10 Head {h00=0x0020, h01=0x0050, text=» CF A15,FREBLK RETURN BLOCK «, t00=0x00e8, t01=0x00b0}
0x16b10…16b2c Head {h00=0x0018, h01=0x0050, text=» RB ST105 TAKE NEXT «, t00=0x00e8, t01=0x00d4}
0x16b2c…16b36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00e8, t01=0x00f0}
0x16b36…16b4a Head {h00=0x0010, h01=0x0050, text=»ST110 EQU * «, t00=0x00e8, t01=0x00fa}
0x16b4a…16b6c Head {h00=0x001e, h01=0x0050, text=»* INITIATE BUFFER AREAS«, t00=0x00e8, t01=0x010e}
0x16b6c…16b8a Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00e8, t01=0x0130}
0x16b8a…16bc0 Head {h00=0x0032, h01=0x0050, text=» ADKL A4,CWTSOB AREA FOR SHORT OUTPUT BUFFERS «, t00=0x00e8, t01=0x014e}
0x16bc0…16bd2 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e8, t01=0x0184}
0x16bd2…16c08 Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK, SHORT OUTPUT BUFFERS«, t00=0x00e9, t01=0x0008}
0x16c08…16c34 Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00e9, t01=0x003e}
0x16c34…16c52 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00e9, t01=0x006a}
0x16c52…16c86 Head {h00=0x0030, h01=0x0050, text=» ADKL A4,CWTLOB AREA FOR LONG OUTPUT BUFFERS«, t00=0x00e9, t01=0x0088}
0x16c86…16c98 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e9, t01=0x00bc}
0x16c98…16cce Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK, LONG OUTPUT BUFFERS «, t00=0x00e9, t01=0x00ce}
0x16cce…16cfa Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00e9, t01=0x0104}
0x16cfa…16d18 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A5 CWT ADDRESS«, t00=0x00e9, t01=0x0130}
0x16d18…16d4e Head {h00=0x0032, h01=0x0050, text=» ADKL A4,CWTGRB AREA FOR GENERAL READ BUFFERS «, t00=0x00e9, t01=0x014e}
0x16d4e…16d60 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x00e9, t01=0x0184}
0x16d60…16d96 Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTPBG POOLBLOCK, GENERAL READ BUFFERS«, t00=0x00ea, t01=0x0008}
0x16d96…16dc2 Head {h00=0x0028, h01=0x0050, text=» CF A15,INIBUF INITIATE BUFFER AREA «, t00=0x00ea, t01=0x003e}
0x16dc2…16dcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ea, t01=0x006a}
0x16dcc…16e00 Head {h00=0x0030, h01=0x0050, text=»* RESET ALL DWT:S AND WORK STATION STATUS«, t00=0x00ea, t01=0x0074}
0x16e00…16e34 Head {h00=0x0030, h01=0x0050, text=» LDK A3,MAXWS+1 NUMBER OF WORK STATIONS + 1 «, t00=0x00ea, t01=0x00a8}
0x16e34…16e48 Head {h00=0x0010, h01=0x0050, text=»ST120 EQU * «, t00=0x00ea, t01=0x00dc}
0x16e48…16e6c Head {h00=0x0020, h01=0x0050, text=» SUK A3,1 NEXT WORK STATION «, t00=0x00ea, t01=0x00f0}
0x16e6c…16e94 Head {h00=0x0024, h01=0x0050, text=» RF(N) ST150 END IF NO MORE LEFT«, t00=0x00ea, t01=0x0114}
0x16e94…16eba Head {h00=0x0022, h01=0x0050, text=» LDR A2,A3 WORK STATION NUMBER«, t00=0x00ea, t01=0x013c}
0x16eba…16ed6 Head {h00=0x0018, h01=0x0050, text=» SLA A2,1 MAKE INDEX«, t00=0x00ea, t01=0x0162}
0x16ed6…16ef8 Head {h00=0x001e, h01=0x0050, text=» ADR A2,A5 ADD CWT ADDRESS«, t00=0x00ea, t01=0x017e}
0x16ef8…16f28 Head {h00=0x002c, h01=0x0050, text=» ADK A2,CWTWSS WORK STATION STATUS WORD «, t00=0x00eb, t01=0x0010}
0x16f28…16f44 Head {h00=0x0018, h01=0x0050, text=» CMR A2 CLEAR STATUS«, t00=0x00eb, t01=0x0040}
0x16f44…16f5a Head {h00=0x0012, h01=0x0050, text=» LDK A1,NOTOPR«, t00=0x00eb, t01=0x005c}
0x16f5a…16f80 Head {h00=0x0022, h01=0x0050, text=» SCR A1,A2 WS := NOT OPERABLE «, t00=0x00eb, t01=0x0072}
0x16f80…16fb4 Head {h00=0x0030, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE ADDRESS«, t00=0x00eb, t01=0x0098}
0x16fb4…16fda Head {h00=0x0022, h01=0x0050, text=» LDR A6,A3 WORK STATION NUMBER«, t00=0x00eb, t01=0x00cc}
0x16fda…1700e Head {h00=0x0030, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS«, t00=0x00eb, t01=0x00f2}
0x1700e…17020 Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x00eb, t01=0x0126}
0x17020…17034 Head {h00=0x0010, h01=0x0050, text=»ST130 EQU * «, t00=0x00eb, t01=0x0138}
0x17034…1704e Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 NEXT DWT«, t00=0x00eb, t01=0x014c}
0x1704e…1707a Head {h00=0x0028, h01=0x0050, text=» RF(N) ST140 NEXT WS IF NO DWT LEFT «, t00=0x00eb, t01=0x0166}
0x1707a…17096 (236, 0, 400) Head {h00=0x0018, h01=0x0050, text=» LDR A6,A3 WS NUMBER«, t00=0x00ec, t01=0x0004}
0x17096…170be Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x00ec, t01=0x0020}
0x170be…170de Head {h00=0x001c, h01=0x0050, text=» RB(Z) ST130 NOT DEFINED«, t00=0x00ec, t01=0x0048}
0x170de…17106 Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x00ec, t01=0x0068}
0x17106…1712a Head {h00=0x0020, h01=0x0050, text=» LDKL A2,/FFFF-DWFBSY-DWFPLC«, t00=0x00ec, t01=0x0090}
0x1712a…17152 Head {h00=0x0024, h01=0x0050, text=»* MASK FOR BUSY AND PLC FLAGS«, t00=0x00ec, t01=0x00b4}
0x17152…17176 Head {h00=0x0020, h01=0x0050, text=» ANS A2,DWTST,A6 RESET FLAGS«, t00=0x00ec, t01=0x00dc}
0x17176…171a2 Head {h00=0x0028, h01=0x0050, text=» CM DWTLD1,A6 RELEASE BUFFER, IF ANY«, t00=0x00ec, t01=0x0100}
0x171a2…171d6 Head {h00=0x0030, h01=0x0050, text=» CM DWTOTQ,A6 REMOVE DWT FROM QUEUE, IF ANY «, t00=0x00ec, t01=0x012c}
0x171d6…171f0 Head {h00=0x0016, h01=0x0050, text=» RB ST130 NEXT DWT«, t00=0x00ec, t01=0x0160}
0x171f0…17204 Head {h00=0x0010, h01=0x0050, text=»ST140 EQU * «, t00=0x00ec, t01=0x017a}
0x17204…17228 Head {h00=0x0020, h01=0x0050, text=» RB ST120 NEXT WORK STATION «, t00=0x00ec, t01=0x018e}
0x17228…17232 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0022}
0x17232…17246 Head {h00=0x0010, h01=0x0050, text=»ST150 EQU * «, t00=0x00ed, t01=0x002c}
0x17246…17276 Head {h00=0x002c, h01=0x0050, text=»* DELAY UNTIL PLC IS READY FOR START «, t00=0x00ed, t01=0x0040}
0x17276…172a6 Head {h00=0x002c, h01=0x0050, text=» LD A4,CWTTPR,A5 TIMER ALREADY STARTED? «, t00=0x00ed, t01=0x0070}
0x172a6…172ca Head {h00=0x0020, h01=0x0050, text=» RF(Z) ST152 NO, START TIMER«, t00=0x00ed, t01=0x00a0}
0x172ca…172f0 Head {h00=0x0022, h01=0x0050, text=» LDKL A1,-STADLY-1 DELAY TIME «, t00=0x00ed, t01=0x00c4}
0x172f0…17310 Head {h00=0x001c, h01=0x0050, text=» STR A1,A4 RESTART TIMER«, t00=0x00ed, t01=0x00ea}
0x17310…17326 Head {h00=0x0012, h01=0x0050, text=» RF ST154 EXIT«, t00=0x00ed, t01=0x010a}
0x17326…17330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ed, t01=0x0120}
0x17330…17344 Head {h00=0x0010, h01=0x0050, text=»ST152 EQU * «, t00=0x00ed, t01=0x012a}
0x17344…17368 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A5 SAVE CWT ADDRESS «, t00=0x00ed, t01=0x013e}
0x17368…1738a Head {h00=0x001e, h01=0x0050, text=» CF A15,SETIME START TIMER«, t00=0x00ed, t01=0x0162}
0x1738a…173c2 Head {h00=0x0034, h01=0x0050, text=» DATA ST156,STADLY RESTART ADDRESS & DELAY TIME «, t00=0x00ed, t01=0x0184}
0x173c2…173ee Head {h00=0x0028, h01=0x0050, text=» ST A4,CWTTPR,A5 SAVE TIMER POINTER «, t00=0x00ee, t01=0x002c}
0x173ee…17402 Head {h00=0x0010, h01=0x0050, text=»ST154 EQU * «, t00=0x00ee, t01=0x0058}
0x17402…1742e Head {h00=0x0028, h01=0x0050, text=» ABL TDISP WAIT UNTIL TIMER EXPIRES «, t00=0x00ee, t01=0x006c}
0x1742e…17438 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ee, t01=0x0098}
0x17438…1744c Head {h00=0x0010, h01=0x0050, text=»ST156 EQU * «, t00=0x00ee, t01=0x00a2}
0x1744c…17472 Head {h00=0x0022, h01=0x0050, text=» LDR A5,A1 RESTORE CWT ADDRESS«, t00=0x00ee, t01=0x00b6}
0x17472…174a2 Head {h00=0x002c, h01=0x0050, text=» CM CWTTPR,A5 INDICATE NO TIMER RUNNING «, t00=0x00ee, t01=0x00dc}
0x174a2…174ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ee, t01=0x010c}
0x174ac…174dc Head {h00=0x002c, h01=0x0050, text=»* START "TEST CHANNEL UNIT" OPERATION«, t00=0x00ee, t01=0x0116}
0x174dc…174fe Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET CCA BUSY«, t00=0x00ee, t01=0x0146}
0x174fe…17524 Head {h00=0x0022, h01=0x0050, text=» CM CWTOPR,A5 SET PLC OPERABLE«, t00=0x00ee, t01=0x0168}
0x17524…1754e Head {h00=0x0026, h01=0x0050, text=» LDK A2,CMDTC COMMAND CODE TEST CU«, t00=0x00ee, t01=0x018e}
0x1754e…1758a Head {h00=0x0038, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA«, t00=0x00ef, t01=0x0028}
0x1758a…175ba Head {h00=0x002c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING«, t00=0x00ef, t01=0x0064}
0x175ba…175d8 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A5 CWT ADDRESS«, t00=0x00ef, t01=0x0094}
0x175d8…17612 Head {h00=0x0036, h01=0x0050, text=» ADK A3,CWTCSD CONTROL UNIT START DESCRIPTOR ADDR «, t00=0x00ef, t01=0x00b2}
0x17612…1761e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x00ef, t01=0x00ec}
0x1761e…1763e Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00ef, t01=0x00f8}
0x1763e…17662 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00ef, t01=0x0118}
0x17662…1769c Head {h00=0x0036, h01=0x0050, text=» IM CWTOPR,A5 SET NOT OPERABLE UNTIL TEST CU READY«, t00=0x00ef, t01=0x013c}
0x1769c…176c2 Head {h00=0x0022, h01=0x0050, text=» ABL TDISP WAIT FOR COMPLETION«, t00=0x00ef, t01=0x0176}
0x176c2…176cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x000c}
0x176cc…176d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0016}
0x176d6…17710 Head {h00=0x0036, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN TEST CU IS COMPLETED.«, t00=0x00f0, t01=0x0020}
0x17710…1773a Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00f0, t01=0x005a}
0x1773a…17754 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00f0, t01=0x0084}
0x17754…17770 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00f0, t01=0x009e}
0x17770…1777a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x00ba}
0x1777a…1778e Head {h00=0x0010, h01=0x0050, text=»TCURST EQU *«, t00=0x00f0, t01=0x00c4}
0x1778e…177ae Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 OPERATION OK?«, t00=0x00f0, t01=0x00d8}
0x177ae…177ce Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 NO, EXIT «, t00=0x00f0, t01=0x00f8}
0x177ce…177d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f0, t01=0x0118}
0x177d8…17802 Head {h00=0x0026, h01=0x0050, text=»* PERFORM "OPEN LINE" OPERATION«, t00=0x00f0, t01=0x0122}
0x17802…17812 Head {h00=0x000c, h01=0x0050, text=» U =5 «, t00=0x00f0, t01=0x014c}
0x17812…1783a Head {h00=0x0024, h01=0x0050, text=» LDK A2,0 INITIATE LINE COUNTER «, t00=0x00f0, t01=0x015c}
0x1783a…17852 Head {h00=0x0014, h01=0x0050, text=» ST A2,CWTLNO,A5«, t00=0x00f0, t01=0x0184}
0x17852…17866 Head {h00=0x0010, h01=0x0050, text=»ST157 EQU * «, t00=0x00f1, t01=0x000c}
0x17866…17888 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x00f1, t01=0x0020}
0x17888…17892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f1, t01=0x0042}
0x17892…178b6 Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTLNO,A5 GET LINE NO«, t00=0x00f1, t01=0x004c}
0x178b6…178ec Head {h00=0x0032, h01=0x0050, text=» SC A2,CWTCCA+CCRSU1,A5 SET UP LINE IN CCA =5 «, t00=0x00f1, t01=0x0070}
0x178ec…17912 Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 MAKE OPEN LINE PARA-«, t00=0x00f1, t01=0x00a6}
0x17912…17936 Head {h00=0x0020, h01=0x0050, text=» ST A2,CWTPAR,A5 METER AREA «, t00=0x00f1, t01=0x00cc}
0x17936…1794a Head {h00=0x0010, h01=0x0050, text=»ST158 EQU * «, t00=0x00f1, t01=0x00f0}
0x1794a…17972 Head {h00=0x0024, h01=0x0050, text=» LD A2,CWTOPP,A5 MAKE ADDRESS TO«, t00=0x00f1, t01=0x0104}
0x17972…179a4 Head {h00=0x002e, h01=0x0050, text=» AD A2,CWTPAR,A5 OPEN LINE PARAMETER AREA «, t00=0x00f1, t01=0x012c}
0x179a4…179bc Head {h00=0x0014, h01=0x0050, text=» LDR* A2,A2 U =5«, t00=0x00f1, t01=0x015e}
0x179bc…179ea Head {h00=0x002a, h01=0x0050, text=» ST A2,CWTCCA+CCRBUF,A5 SET UP IN CCA «, t00=0x00f1, t01=0x0176}
0x179ea…17a12 Head {h00=0x0024, h01=0x0050, text=» LDK A2,CMDOP COMMAND OPEN LINE «, t00=0x00f2, t01=0x0014}
0x17a12…17a4e Head {h00=0x0038, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 COMMAND AND DLS INDEX TO CCA«, t00=0x00f2, t01=0x003c}
0x17a4e…17a8c Head {h00=0x003a, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR«, t00=0x00f2, t01=0x0078}
0x17a8c…17ab8 Head {h00=0x0028, h01=0x0050, text=» LDK A2,12 PARAMETER AREA LENGTH =1 «, t00=0x00f2, t01=0x00b6}
0x17ab8…17ade Head {h00=0x0022, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 TO CCA«, t00=0x00f2, t01=0x00e2}
0x17ade…17ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f2, t01=0x0108}
0x17ae8…17b0e Head {h00=0x0022, h01=0x0050, text=» CM CWTOPR,A5 SET PLC OPERABLE«, t00=0x00f2, t01=0x0112}
0x17b0e…17b2e Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00f2, t01=0x0138}
0x17b2e…17b52 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00f2, t01=0x0158}
0x17b52…17b76 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00f2, t01=0x017c}
0x17b76…17b80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0010}
0x17b80…17b8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x001a}
0x17b8a…17bc6 Head {h00=0x0038, h01=0x0050, text=»* ENTRY TO OPLRST WILL BE MADE WHEN THE OPEN LINE«, t00=0x00f3, t01=0x0024}
0x17bc6…17bea Head {h00=0x0020, h01=0x0050, text=»* OPERATION IS COMPLETED.«, t00=0x00f3, t01=0x0060}
0x17bea…17c14 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00f3, t01=0x0084}
0x17c14…17c2e Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x00f3, t01=0x00ae}
0x17c2e…17c4a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00f3, t01=0x00c8}
0x17c4a…17c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x00e4}
0x17c54…17c68 Head {h00=0x0010, h01=0x0050, text=»OPLRST EQU *«, t00=0x00f3, t01=0x00ee}
0x17c68…17c88 Head {h00=0x001c, h01=0x0050, text=» LDR A1,A1 OPERATION OK?«, t00=0x00f3, t01=0x0102}
0x17c88…17ca8 Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 NO, EXIT «, t00=0x00f3, t01=0x0122}
0x17ca8…17cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f3, t01=0x0142}
0x17cb2…17cd6 Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTPNR,A5 GET PLC NR «, t00=0x00f3, t01=0x014c}
0x17cd6…17cf6 Head {h00=0x001c, h01=0x0050, text=» SUK A2,3 CHECK IF LOCAL«, t00=0x00f3, t01=0x0170}
0x17cf6…17d10 Head {h00=0x0016, h01=0x0050, text=» RF(NP) ST159 YES «, t00=0x00f3, t01=0x0190}
0x17d10…17d3c Head {h00=0x0028, h01=0x0050, text=» IM CWTLNO,A5 INCREMENT LINE NUMBER «, t00=0x00f4, t01=0x001a}
0x17d3c…17d60 Head {h00=0x0020, h01=0x0050, text=» LD A2,CWTLNO,A5 GET LINE NO«, t00=0x00f4, t01=0x0046}
0x17d60…17d84 Head {h00=0x0020, h01=0x0050, text=» SUK A2,4 ALL LINES OPENED ?«, t00=0x00f4, t01=0x006a}
0x17d84…17da8 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ST157 NO, TAKE NEXT «, t00=0x00f4, t01=0x008e}
0x17da8…17dbe Head {h00=0x0012, h01=0x0050, text=» CM CWTLNO,A5 «, t00=0x00f4, t01=0x00b2}
0x17dbe…17dd2 Head {h00=0x0010, h01=0x0050, text=»ST159 EQU * «, t00=0x00f4, t01=0x00c8}
0x17dd2…17ddc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x00dc}
0x17ddc…17e0e Head {h00=0x002e, h01=0x0050, text=» CM CWTGR,A5 INDICATE GENERAL READ ALLOWED«, t00=0x00f4, t01=0x00e6}
0x17e0e…17e18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0118}
0x17e18…17e5a Head {h00=0x003e, h01=0x0050, text=»* PERFORM OPEN DATA LINK FOR ALL CONNECTED SECONDARIES «, t00=0x00f4, t01=0x0122}
0x17e5a…17e64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f4, t01=0x0164}
0x17e64…17e90 Head {h00=0x0028, h01=0x0050, text=» LDK A6,MAXWS+1 (MAX NR OF DLS) + 1 «, t00=0x00f4, t01=0x016e}
0x17e90…17ea4 Head {h00=0x0010, h01=0x0050, text=»ST160 EQU * «, t00=0x00f5, t01=0x000a}
0x17ea4…17ece Head {h00=0x0026, h01=0x0050, text=» SUK A6,1 NEXT WORK STATION (DLS) «, t00=0x00f5, t01=0x001e}
0x17ece…17ef4 Head {h00=0x0022, h01=0x0050, text=» RF(N) ST180 EXIT IF ALL DONE «, t00=0x00f5, t01=0x0048}
0x17ef4…17f20 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x00f5, t01=0x006e}
0x17f20…17f54 Head {h00=0x0030, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS«, t00=0x00f5, t01=0x009a}
0x17f54…17f72 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A7 ANY DWT:S? «, t00=0x00f5, t01=0x00ce}
0x17f72…17f98 Head {h00=0x0022, h01=0x0050, text=» RB(N) ST160 NO, TAKE NEXT WS «, t00=0x00f5, t01=0x00ec}
0x17f98…17fa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f5, t01=0x0112}
0x17fa2…17fc4 Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x00f5, t01=0x011c}
0x17fc4…17fea Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x00f5, t01=0x013e}
0x17fea…18006 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x00f5, t01=0x0164}
0x18006…18028 Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x00f5, t01=0x0180}
0x18028…1804e Head {h00=0x0022, h01=0x0050, text=» CM CWTWSS,A3 CLEAR WS STATUS «, t00=0x00f6, t01=0x0012}
0x1804e…1808a Head {h00=0x0038, h01=0x0050, text=» SC A6,CWTCCA+CCRDLS,A5 DLS INDEX (WS NUMBER) TO CCA«, t00=0x00f6, t01=0x0038}
0x1808a…180b8 Head {h00=0x002a, h01=0x0050, text=» ST A6,CWTCCA+CCRIDW,A5 SAVE DLS INDEX«, t00=0x00f6, t01=0x0074}
0x180b8…180de Head {h00=0x0022, h01=0x0050, text=» LDK A2,CMDOD COMMAND OPEN DLS«, t00=0x00f6, t01=0x00a2}
0x180de…18104 Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x00f6, t01=0x00c8}
0x18104…18130 Head {h00=0x0028, h01=0x0050, text=» LDK A2,MAXFR MAX OUTSTANDING FRAMES«, t00=0x00f6, t01=0x00ee}
0x18130…18160 Head {h00=0x002c, h01=0x0050, text=» SC A2,CWTCCA+CCRSU1,A5 TO SUBCOMMAND 1 «, t00=0x00f6, t01=0x011a}
0x18160…18190 Head {h00=0x002c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING«, t00=0x00f6, t01=0x014a}
0x18190…181b0 Head {h00=0x001c, h01=0x0050, text=» CF A15,PLCCIO CIO START«, t00=0x00f6, t01=0x017a}
0x181b0…181d4 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) STERR2 EXIT IF ERROR«, t00=0x00f7, t01=0x000a}
0x181d4…18202 Head {h00=0x002a, h01=0x0050, text=» ABL PLDSP2 EXIT. WAIT FOR COMPLETION «, t00=0x00f7, t01=0x002e}
0x18202…1820c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f7, t01=0x005c}
0x1820c…18216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f7, t01=0x0066}
0x18216…18258 Head {h00=0x003e, h01=0x0050, text=»* ENTRY TO ODLRST IS MADE WHEN OPERATION IS COMPLETED. «, t00=0x00f7, t01=0x0070}
0x18258…18282 Head {h00=0x0026, h01=0x0050, text=»* REGISTER CONTENTS ON ENTRY:«, t00=0x00f7, t01=0x00b2}
0x18282…182a2 Head {h00=0x001c, h01=0x0050, text=»* A2 = FATAL PLC STATUS«, t00=0x00f7, t01=0x00dc}
0x182a2…182be Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x00f7, t01=0x00fc}
0x182be…182ee Head {h00=0x002c, h01=0x0050, text=»* A6 = WORK STATION NUMBER (DLS INDEX) «, t00=0x00f7, t01=0x0118}
0x182ee…182f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f7, t01=0x0148}
0x182f8…1830c Head {h00=0x0010, h01=0x0050, text=»ODLRST EQU *«, t00=0x00f7, t01=0x0152}
0x1830c…1832c Head {h00=0x001c, h01=0x0050, text=» LDR A2,A2 FATAL ERROR? «, t00=0x00f7, t01=0x0166}
0x1832c…1834c Head {h00=0x001c, h01=0x0050, text=» RF(NZ) STERR2 YES, EXIT«, t00=0x00f7, t01=0x0186}
0x1834c…18380 Head {h00=0x0030, h01=0x0050, text=» LD* A3,CWTINT,A5 WORK STATION TABLE ADDRESS«, t00=0x00f8, t01=0x0016}
0x18380…183a8 Head {h00=0x0024, h01=0x0050, text=» LDK A4,RETCP FLAG "TC POWER UP"«, t00=0x00f8, t01=0x004a}
0x183a8…183da Head {h00=0x002e, h01=0x0050, text=» CF A15,NDREWS RECOVERY OF ALL DWT:S ON WS«, t00=0x00f8, t01=0x0072}
0x183da…18402 Head {h00=0x0024, h01=0x0050, text=» RB ST160 TAKE NEXT WORK STATION«, t00=0x00f8, t01=0x00a4}
0x18402…1840c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00cc}
0x1840c…18416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x00d6}
0x18416…1842a Head {h00=0x0010, h01=0x0050, text=»ST180 EQU * «, t00=0x00f8, t01=0x00e0}
0x1842a…18458 Head {h00=0x002a, h01=0x0050, text=»* ALL DATA LINKS ARE STARTED. EXIT.«, t00=0x00f8, t01=0x00f4}
0x18458…1847c Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x00f8, t01=0x0122}
0x1847c…18486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0146}
0x18486…18490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f8, t01=0x0150}
0x18490…184a4 Head {h00=0x0010, h01=0x0050, text=»STERR2 EQU *«, t00=0x00f8, t01=0x015a}
0x184a4…184cc Head {h00=0x0024, h01=0x0050, text=»* ERROR DURING STARTUP. EXIT.«, t00=0x00f8, t01=0x016e}
0x184cc…184d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0008}
0x184d6…184ee Head {h00=0x0014, h01=0x0050, text=» ABL TDISP EXIT «, t00=0x00f9, t01=0x0012}
0x184ee…184f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x002a}
0x184f8…18506 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00f9, t01=0x0034}
0x18506…18510 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x0042}
0x18510…1852c Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x00f9, t01=0x004c}
0x1852c…18548 Head {h00=0x0018, h01=0x0050, text=»* LOCAL DISPATCHER *«, t00=0x00f9, t01=0x0068}
0x18548…18564 Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x00f9, t01=0x0084}
0x18564…1856e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00f9, t01=0x00a0}
0x1856e…185b0 Head {h00=0x003e, h01=0x0050, text=»* THIS SECTION CONTAINS A DISPATCHER FOR THE PLC DRIVER.«, t00=0x00f9, t01=0x00aa}
0x185b0…185f0 Head {h00=0x003c, h01=0x0050, text=»* IT CAN BE CALLED EITHER FROM ANOTHER ROUTINE IN THE «, t00=0x00f9, t01=0x00ec}
0x185f0…18632 Head {h00=0x003e, h01=0x0050, text=»* PLC DRIVER, OR FROM A TERMINAL DEVICE DRIVER (THROUGH «, t00=0x00f9, t01=0x012c}
0x18632…18658 Head {h00=0x0022, h01=0x0050, text=»* THE NETWORK DISTRIBUTOR). «, t00=0x00f9, t01=0x016e}
0x18658…18696 (250, 0, 400) Head {h00=0x003a, h01=0x0050, text=»* SOME INTERRUPTS OR DEVICE DRIVER CALLS SET SEVERAL«, t00=0x00fa, t01=0x0004}
0x18696…186d2 Head {h00=0x0038, h01=0x0050, text=»* RESOURCES FREE. THIS MEANS THAT SEVERAL WAITING «, t00=0x00fa, t01=0x0042}
0x186d2…18712 Head {h00=0x003c, h01=0x0050, text=»* PROCERSSES MAY BECOME READY FOR ACTIVATION. ONLY ONE«, t00=0x00fa, t01=0x007e}
0x18712…18750 Head {h00=0x003a, h01=0x0050, text=»* OF THESE PROCESSES CAN BE ACTIVATED DIRECTLY. THE «, t00=0x00fa, t01=0x00be}
0x18750…18792 Head {h00=0x003e, h01=0x0050, text=»* OTHER PROCESSES WILL BE ACTIVATED IN TURN, WHEN FIRST «, t00=0x00fa, t01=0x00fc}
0x18792…187c0 Head {h00=0x002a, h01=0x0050, text=»* PROCESS EXITS TO THIS DISPATCHER. «, t00=0x00fa, t01=0x013e}
0x187c0…187ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x016c}
0x187ca…187d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fa, t01=0x0176}
0x187d4…18808 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x00fa, t01=0x0180}
0x18808…18812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0024}
0x18812…1882a Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x00fb, t01=0x002e}
0x1882a…18834 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0046}
0x18834…18870 Head {h00=0x0038, h01=0x0050, text=»* PLDISP ACTIVATE PROCESS OR PERFORM COMMON FUNCTION«, t00=0x00fb, t01=0x0050}
0x18870…1887a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x008c}
0x1887a…18888 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x00fb, t01=0x0096}
0x18888…18892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x00a4}
0x18892…188d6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00fb, t01=0x00ae}
0x188d6…188e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x00f2}
0x188e0…188f8 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x00fb, t01=0x00fc}
0x188f8…18908 Head {h00=0x000c, h01=0x0050, text=»* PLDISP«, t00=0x00fb, t01=0x0114}
0x18908…18912 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fb, t01=0x0124}
0x18912…18926 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x00fb, t01=0x012e}
0x18926…18962 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE LOOKS FOR WAITING PROCESSES THAT ARE «, t00=0x00fb, t01=0x0142}
0x18962…1899a Head {h00=0x0034, h01=0x0050, text=»* READY FOR DISPATCHING. IF ANY IS FOUND, IT IS «, t00=0x00fb, t01=0x017e}
0x1899a…189d6 Head {h00=0x0038, h01=0x0050, text=»* ACTIVATED. THE ROUTINE ALSO PERFORMS ACTIONS THAT «, t00=0x00fc, t01=0x0026}
0x189d6…18a12 Head {h00=0x0038, h01=0x0050, text=»* ARE NOT EXPLICITLY REQUESTED BY USER PROCESSES, EG«, t00=0x00fc, t01=0x0062}
0x18a12…18a52 Head {h00=0x003c, h01=0x0050, text=»* GENERAL READ. WHEN NOTHING IS LEFT TO DO, THE ROUTINE «, t00=0x00fc, t01=0x009e}
0x18a52…18a76 Head {h00=0x0020, h01=0x0050, text=»* EXITS TO TOSS DISPATCHER. «, t00=0x00fc, t01=0x00de}
0x18a76…18ab2 Head {h00=0x0038, h01=0x0050, text=»* TWO ENTRIES ARE PROVIDED. ONE IS USED WHEN CALLER «, t00=0x00fc, t01=0x0102}
0x18ab2…18aec Head {h00=0x0036, h01=0x0050, text=»* KNOWS OWN DWT ADDRESS, ONE WHEN CALLER KNOWS OWN«, t00=0x00fc, t01=0x013e}
0x18aec…18b02 Head {h00=0x0012, h01=0x0050, text=»* CWT ADDRESS.«, t00=0x00fc, t01=0x0178}
0x18b02…18b0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fc, t01=0x018e}
0x18b0c…18b1c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x00fd, t01=0x0008}
0x18b1c…18b30 Head {h00=0x0010, h01=0x0050, text=»* ABL PLDISP«, t00=0x00fd, t01=0x0018}
0x18b30…18b44 Head {h00=0x0010, h01=0x0050, text=»* ABL PLDSP2«, t00=0x00fd, t01=0x002c}
0x18b44…18b4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x0040}
0x18b4e…18b5e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x00fd, t01=0x004a}
0x18b5e…18b86 Head {h00=0x0024, h01=0x0050, text=»* A5 = CWT ADDRESS (IF PLDSP2) «, t00=0x00fd, t01=0x005a}
0x18b86…18bae Head {h00=0x0024, h01=0x0050, text=»* A6 = DWT ADDRESS (IF PLDISP) «, t00=0x00fd, t01=0x0082}
0x18bae…18bca Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x00fd, t01=0x00aa}
0x18bca…18bd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x00c6}
0x18bd4…18be6 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x00fd, t01=0x00d0}
0x18be6…18bf2 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x00fd, t01=0x00e2}
0x18bf2…18bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x00ee}
0x18bfc…18c40 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x00fd, t01=0x00f8}
0x18c40…18c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fd, t01=0x013c}
0x18c4a…18c5e Head {h00=0x0010, h01=0x0050, text=»PLDISP EQU *«, t00=0x00fd, t01=0x0146}
0x18c5e…18c72 Head {h00=0x0010, h01=0x0050, text=»PRDISP EQU *«, t00=0x00fd, t01=0x015a}
0x18c72…18c9a Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCWT A5 := CWT ADDRESS«, t00=0x00fd, t01=0x016e}
0x18c9a…18cac Head {h00=0x000e, h01=0x0050, text=» LDR A5,A5«, t00=0x00fe, t01=0x0008}
0x18cac…18cd4 Head {h00=0x0024, h01=0x0050, text=» ABL(Z) TDISP NOT DEFINED. EXIT «, t00=0x00fe, t01=0x001a}
0x18cd4…18cde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0042}
0x18cde…18ce8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x004c}
0x18ce8…18cfc Head {h00=0x0010, h01=0x0050, text=»PLDSP2 EQU *«, t00=0x00fe, t01=0x0056}
0x18cfc…18d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x006a}
0x18d06…18d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0074}
0x18d10…18d24 Head {h00=0x0010, h01=0x0050, text=»DP100 EQU * «, t00=0x00fe, t01=0x007e}
0x18d24…18d30 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x00fe, t01=0x0092}
0x18d30…18d54 Head {h00=0x0020, h01=0x0050, text=»* HANDLE CHARACTER INPUT «, t00=0x00fe, t01=0x009e}
0x18d54…18d82 Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTBUF,A5 INPUT BUFFER WAITING?«, t00=0x00fe, t01=0x00c2}
0x18d82…18da4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP200 NO, CONTINUE «, t00=0x00fe, t01=0x00f0}
0x18da4…18dc8 Head {h00=0x0020, h01=0x0050, text=» LD A6,BUFDWT,A4 DWT ADDRESS«, t00=0x00fe, t01=0x0112}
0x18dc8…18dd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00fe, t01=0x0136}
0x18dd2…18df8 Head {h00=0x0022, h01=0x0050, text=» CF A15,PLGECH A2 := CHARACTER«, t00=0x00fe, t01=0x0140}
0x18df8…18e1c Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 CHECK RETURN CODE«, t00=0x00fe, t01=0x0166}
0x18e1c…18e3e Head {h00=0x001e, h01=0x0050, text=» RF(N) DP110 BUFFER EMPTY «, t00=0x00fe, t01=0x018a}
0x18e3e…18e64 Head {h00=0x0022, h01=0x0050, text=» LD A3,DWTST,A6 DEVICE STATUS «, t00=0x00ff, t01=0x001c}
0x18e64…18e8c Head {h00=0x0024, h01=0x0050, text=» ANK A3,DWFINP INPUT REQUESTED? «, t00=0x00ff, t01=0x0042}
0x18e8c…18ec0 Head {h00=0x0030, h01=0x0050, text=» ABL(NZ) INPRST YES, RETURN TO DEVICE DRIVER«, t00=0x00ff, t01=0x006a}
0x18ec0…18eca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x009e}
0x18eca…18ef0 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTADR,A6 ADDRESS BLOCK«, t00=0x00ff, t01=0x00a8}
0x18ef0…18f22 Head {h00=0x002e, h01=0x0050, text=» LD A1,INTADR,A1 INTERRUPT ENTRY DEFINED? «, t00=0x00ff, t01=0x00ce}
0x18f22…18f52 Head {h00=0x002c, h01=0x0050, text=» ABR(NZ) A1 YES, GO TO INTERRUPT HANDLER«, t00=0x00ff, t01=0x0100}
0x18f52…18f5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x00ff, t01=0x0130}
0x18f5c…18f70 Head {h00=0x0010, h01=0x0050, text=»DP110 EQU * «, t00=0x00ff, t01=0x013a}
0x18f70…18fa4 Head {h00=0x0030, h01=0x0050, text=» CW A4,DWTLD1,A6 BUFFER CHAINED TO THIS DWT?«, t00=0x00ff, t01=0x014e}
0x18fa4…18fc6 Head {h00=0x001e, h01=0x0050, text=» RF(NE) DP120 NO, CONTINUE«, t00=0x00ff, t01=0x0182}
0x18fc6…18fe8 Head {h00=0x001e, h01=0x0050, text=» CM DWTLD1,A6 REMOVE LINK «, t00=0x0100, t01=0x0014}
0x18fe8…18ffc Head {h00=0x0010, h01=0x0050, text=»DP120 EQU * «, t00=0x0100, t01=0x0036}
0x18ffc…19024 Head {h00=0x0024, h01=0x0050, text=» CM CWTBUF,A5 NO BUFFER WAITING «, t00=0x0100, t01=0x004a}
0x19024…1904a Head {h00=0x0022, h01=0x0050, text=» CF A15,PLRLBU RELEASE BUFFER «, t00=0x0100, t01=0x0072}
0x1904a…19054 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x0098}
0x19054…19090 Head {h00=0x0038, h01=0x0050, text=»* CHECK IF LEVEL 3 RECIEVE READY SHOULD BE SENT«, t00=0x0100, t01=0x00a2}
0x19090…190c4 Head {h00=0x0030, h01=0x0050, text=» CF A15,GETIFR A2 := NR OF FRAMES NOT ACK:ED«, t00=0x0100, t01=0x00de}
0x190c4…190e6 Head {h00=0x001e, h01=0x0050, text=» SUK A2,6 TIME TO SEND RR?«, t00=0x0100, t01=0x0112}
0x190e6…19102 Head {h00=0x0018, h01=0x0050, text=» ABL(NN) SENDRR YES «, t00=0x0100, t01=0x0134}
0x19102…1910c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x0150}
0x1910c…19116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0100, t01=0x015a}
0x19116…1912a Head {h00=0x0010, h01=0x0050, text=»DP200 EQU * «, t00=0x0100, t01=0x0164}
0x1912a…19136 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0100, t01=0x0178}
0x19136…1915a Head {h00=0x0020, h01=0x0050, text=»* HANDLE POWER UP FOR TC «, t00=0x0100, t01=0x0184}
0x1915a…19186 Head {h00=0x0028, h01=0x0050, text=» LD A1,PFPOST POWER UP TASK PENDING?«, t00=0x0101, t01=0x0018}
0x19186…191b2 Head {h00=0x0028, h01=0x0050, text=» OR A1,PLCPFP PLC POWER UP PENDING? «, t00=0x0101, t01=0x0044}
0x191b2…191d2 Head {h00=0x001c, h01=0x0050, text=» ABL(NZ) TDISP YES, EXIT«, t00=0x0101, t01=0x0070}
0x191d2…191dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0090}
0x191dc…191e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x009a}
0x191e6…191fa Head {h00=0x0010, h01=0x0050, text=»DP300 EQU * «, t00=0x0101, t01=0x00a4}
0x191fa…19228 Head {h00=0x002a, h01=0x0050, text=»* HANDLE ABORT OF ONE WORK STATION «, t00=0x0101, t01=0x00b8}
0x19228…19254 Head {h00=0x0028, h01=0x0050, text=» LD A6,CWTABW,A5 WS TO ABORT, IF ANY«, t00=0x0101, t01=0x00e6}
0x19254…19282 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) ABTHAN DO ABORT, IF REQUESTED«, t00=0x0101, t01=0x0112}
0x19282…1928c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x0140}
0x1928c…19296 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0101, t01=0x014a}
0x19296…192aa Head {h00=0x0010, h01=0x0050, text=»DP400 EQU * «, t00=0x0101, t01=0x0154}
0x192aa…192d6 Head {h00=0x0028, h01=0x0050, text=»* CHECK IF ANYONE WAITING FOR CCA«, t00=0x0101, t01=0x0168}
0x192d6…19304 (258, 0, 400) Head {h00=0x002a, h01=0x0050, text=» LD A4,CWTCCQ,A5 ANYONE IN CCA QUEUE? «, t00=0x0102, t01=0x0004}
0x19304…19326 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP500 NO, CONTINUE «, t00=0x0102, t01=0x0032}
0x19326…19348 Head {h00=0x001e, h01=0x0050, text=» LD A1,CWTCCB,A5 CCA FREE?«, t00=0x0102, t01=0x0054}
0x19348…1936a Head {h00=0x001e, h01=0x0050, text=» RF(NZ) DP500 NO, CONTINUE«, t00=0x0102, t01=0x0076}
0x1936a…1938c Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET CCA BUSY«, t00=0x0102, t01=0x0098}
0x1938c…193b8 Head {h00=0x0028, h01=0x0050, text=» ABL CCARST ACTIVATE WAITING PROCESS«, t00=0x0102, t01=0x00ba}
0x193b8…193c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x00e6}
0x193c2…193cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0102, t01=0x00f0}
0x193cc…193e0 Head {h00=0x0010, h01=0x0050, text=»DP500 EQU * «, t00=0x0102, t01=0x00fa}
0x193e0…19400 Head {h00=0x001c, h01=0x0050, text=»* CHECK BUFFER QUEUES«, t00=0x0102, t01=0x010e}
0x19400…19438 Head {h00=0x0034, h01=0x0050, text=» LD A6,CWTSBQ,A5 ANYONE IN SHORT BUFFERS QUEUE? «, t00=0x0102, t01=0x012e}
0x19438…1945c Head {h00=0x0020, h01=0x0050, text=» RF(Z) DP510 NO, CHECK LONG «, t00=0x0102, t01=0x0166}
0x1945c…1947a Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0102, t01=0x018a}
0x1947a…194ac Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS«, t00=0x0103, t01=0x0018}
0x194ac…194d8 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x0103, t01=0x004a}
0x194d8…19500 Head {h00=0x0024, h01=0x0050, text=» RF(Z) DP510 NO BUFFER AVAILABLE«, t00=0x0103, t01=0x0076}
0x19500…19530 Head {h00=0x002c, h01=0x0050, text=» LDK A7,CWTSBQ OFFSET TO CWT QUEUE HEAD «, t00=0x0103, t01=0x009e}
0x19530…1955c Head {h00=0x0028, h01=0x0050, text=» RF DP520 COMMON PART FOR SHORT/LONG«, t00=0x0103, t01=0x00ce}
0x1955c…19566 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0103, t01=0x00fa}
0x19566…1957a Head {h00=0x0010, h01=0x0050, text=»DP510 EQU * «, t00=0x0103, t01=0x0104}
0x1957a…195b0 Head {h00=0x0032, h01=0x0050, text=» LD A6,CWTLBQ,A5 ANYONE IN LONG BUFFERS QUEUE?«, t00=0x0103, t01=0x0118}
0x195b0…195d2 Head {h00=0x001e, h01=0x0050, text=» RF(Z) DP600 NO, CONTINUE «, t00=0x0103, t01=0x014e}
0x195d2…195f0 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0103, t01=0x0170}
0x195f0…19622 Head {h00=0x002e, h01=0x0050, text=» ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS «, t00=0x0103, t01=0x018e}
0x19622…1964e Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x0104, t01=0x0030}
0x1964e…19682 Head {h00=0x0030, h01=0x0050, text=» RF(Z) DP600 CONTINUE IF NO BUFFER AVAILABLE«, t00=0x0104, t01=0x005c}
0x19682…196ba Head {h00=0x0034, h01=0x0050, text=» LDK A7,CWTLBQ OFFSET TO LONG BUFFERS QUEUE HEAD«, t00=0x0104, t01=0x0090}
0x196ba…196c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0104, t01=0x00c8}
0x196c4…196d8 Head {h00=0x0010, h01=0x0050, text=»DP520 EQU * «, t00=0x0104, t01=0x00d2}
0x196d8…19702 Head {h00=0x0026, h01=0x0050, text=»* SHORT OR LONG BUFFER FOUND «, t00=0x0104, t01=0x00e6}
0x19702…19728 Head {h00=0x0022, h01=0x0050, text=» LDR A2,A4 SAVE BUFFER ADDRESS«, t00=0x0104, t01=0x0110}
0x19728…1974a Head {h00=0x001e, h01=0x0050, text=» LDR A4,A6 DWT QUEUE LINK «, t00=0x0104, t01=0x0136}
0x1974a…1976e Head {h00=0x0020, h01=0x0050, text=» ADR A7,A5 BUFFER QUEUE HEAD«, t00=0x0104, t01=0x0158}
0x1976e…19796 Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x0104, t01=0x017c}
0x19796…197c0 Head {h00=0x0026, h01=0x0050, text=» SUKL A6,DWTOTQ A6 := DWT ADDRESS «, t00=0x0105, t01=0x0014}
0x197c0…197ea Head {h00=0x0026, h01=0x0050, text=» LDR A4,A2 RESTORE BUFFER ADDRESS «, t00=0x0105, t01=0x003e}
0x197ea…1980a Head {h00=0x001c, h01=0x0050, text=» LDK A1,0 RET CODE := OK«, t00=0x0105, t01=0x0068}
0x1980a…19838 Head {h00=0x002a, h01=0x0050, text=» ABL BUFRST RETURN TO ROUTINE WAITING «, t00=0x0105, t01=0x0088}
0x19838…19842 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x00b6}
0x19842…1984c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x00c0}
0x1984c…19860 Head {h00=0x0010, h01=0x0050, text=»DP600 EQU * «, t00=0x0105, t01=0x00ca}
0x19860…19896 Head {h00=0x0032, h01=0x0050, text=»* CHECK IF GENERAL READ SHOULD BE PERFORMED«, t00=0x0105, t01=0x00de}
0x19896…198c4 Head {h00=0x002a, h01=0x0050, text=» LD A1,CWTGR,A5 GENERAL READ ALLOWED? «, t00=0x0105, t01=0x0114}
0x198c4…198e2 Head {h00=0x001a, h01=0x0050, text=» RF(NZ) DP800 NO, EXIT«, t00=0x0105, t01=0x0142}
0x198e2…198ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0105, t01=0x0160}
0x198ec…1990a Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0105, t01=0x016a}
0x1990a…19944 Head {h00=0x0036, h01=0x0050, text=» ADK A7,CWTPBG POOLBLOCK FOR GENERAL READ BUFFERS «, t00=0x0105, t01=0x0188}
0x19944…19970 Head {h00=0x0028, h01=0x0050, text=» CF A15,PLGTBU A4 := BUFFER ADDRESS «, t00=0x0106, t01=0x0032}
0x19970…199a2 Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) GREAD PERFORM GR IF BUFFER FOUND «, t00=0x0106, t01=0x005e}
0x199a2…199ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x0090}
0x199ac…199b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x009a}
0x199b6…199ca Head {h00=0x0010, h01=0x0050, text=»DP800 EQU * «, t00=0x0106, t01=0x00a4}
0x199ca…199fe Head {h00=0x0030, h01=0x0050, text=»* NOTHING MORE TO DO. EXIT TO DISPATCHER «, t00=0x0106, t01=0x00b8}
0x199fe…19a20 Head {h00=0x001e, h01=0x0050, text=» ABL TDISP TOSS DISPATCHER«, t00=0x0106, t01=0x00ec}
0x19a20…19a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x010e}
0x19a2a…19a38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0106, t01=0x0118}
0x19a38…19a42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x0126}
0x19a42…19a56 Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0106, t01=0x0130}
0x19a56…19a6a Head {h00=0x0010, h01=0x0050, text=»* ROUTINES *«, t00=0x0106, t01=0x0144}
0x19a6a…19a7e Head {h00=0x0010, h01=0x0050, text=»************«, t00=0x0106, t01=0x0158}
0x19a7e…19a88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0106, t01=0x016c}
0x19a88…19aca Head {h00=0x003e, h01=0x0050, text=»* THIS SECTION CONTAINS MISCELLANEOUS SERVICE ROUTINES. «, t00=0x0106, t01=0x0176}
0x19aca…19b10 Head {h00=0x0042, h01=0x0050, text=»* ALL ROUTINES ARE CALLED BY AN ABL "NAME" INSTRUCTION. «, t00=0x0107, t01=0x0028}
0x19b10…19b4e Head {h00=0x003a, h01=0x0050, text=»* REGISTER INTERFACE IS DESCRIBED FOR EACH ROUTINE. «, t00=0x0107, t01=0x006e}
0x19b4e…19b8e Head {h00=0x003c, h01=0x0050, text=»* WHEN A ROUTINE HAS PERFORMED THE REQUESTED FUNCTION,«, t00=0x0107, t01=0x00ac}
0x19b8e…19bc0 Head {h00=0x002e, h01=0x0050, text=»* IT WILL EXIT TO THE LOCAL DISPATCHER. «, t00=0x0107, t01=0x00ec}
0x19bc0…19bca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x011e}
0x19bca…19bfe Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0107, t01=0x0128}
0x19bfe…19c08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x015c}
0x19c08…19c20 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0107, t01=0x0166}
0x19c20…19c2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0107, t01=0x017e}
0x19c2a…19c64 Head {h00=0x0036, h01=0x0050, text=»* ABTHAN ABORT ALL WAITING DWT:S ON A WORK STATION«, t00=0x0107, t01=0x0188}
0x19c64…19c98 Head {h00=0x0030, h01=0x0050, text=»* PLREWS HANDLE RECOVERY OF ONE WORK STATION«, t00=0x0108, t01=0x0032}
0x19c98…19ccc Head {h00=0x0030, h01=0x0050, text=»* SENDRR SEND LEVEL 3 RECIEVE READY MESSAGE «, t00=0x0108, t01=0x0066}
0x19ccc…19cf0 Head {h00=0x0020, h01=0x0050, text=»* GREAD PERFORM GENERAL READ«, t00=0x0108, t01=0x009a}
0x19cf0…19cfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x00be}
0x19cfa…19d08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0108, t01=0x00c8}
0x19d08…19d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x00d6}
0x19d12…19d56 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0108, t01=0x00e0}
0x19d56…19d60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x0124}
0x19d60…19d78 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0108, t01=0x012e}
0x19d78…19d88 Head {h00=0x000c, h01=0x0050, text=»* ABTHAN«, t00=0x0108, t01=0x0146}
0x19d88…19d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0108, t01=0x0156}
0x19d92…19da6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0108, t01=0x0160}
0x19da6…19ddc Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE WILL HANDLE ABORTS FOR ONE WORK«, t00=0x0108, t01=0x0174}
0x19ddc…19e10 Head {h00=0x0030, h01=0x0050, text=»* STATION. ALL REQUESTS OF DWT:S WAITING FOR«, t00=0x0109, t01=0x001a}
0x19e10…19e48 Head {h00=0x0034, h01=0x0050, text=»* LEVEL 3 ACK OR WAITING IN CCA OR BUFFER QUEUES«, t00=0x0109, t01=0x004e}
0x19e48…19e7e Head {h00=0x0032, h01=0x0050, text=»* WILL BE ABORTED. ONE CALL IS NEEDED FOR EACH«, t00=0x0109, t01=0x0086}
0x19e7e…19e9e Head {h00=0x001c, h01=0x0050, text=»* REQUEST TO BE ABORTED.«, t00=0x0109, t01=0x00bc}
0x19e9e…19ea8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x00dc}
0x19ea8…19eb8 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0109, t01=0x00e6}
0x19eb8…19ecc Head {h00=0x0010, h01=0x0050, text=»* ABL ABTHAN«, t00=0x0109, t01=0x00f6}
0x19ecc…19ed6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x010a}
0x19ed6…19ee6 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0109, t01=0x0114}
0x19ee6…19f02 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0109, t01=0x0124}
0x19f02…19f26 Head {h00=0x0020, h01=0x0050, text=»* A6 = WORK STATION NUMBER «, t00=0x0109, t01=0x0140}
0x19f26…19f30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0109, t01=0x0164}
0x19f30…19f42 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0109, t01=0x016e}
0x19f42…19f66 Head {h00=0x0020, h01=0x0050, text=»* AT RETURN TO REQUEST:«, t00=0x0109, t01=0x0180}
0x19f66…19f82 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x010a, t01=0x0014}
0x19f82…19f9e Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x010a, t01=0x0030}
0x19f9e…19fba Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x010a, t01=0x004c}
0x19fba…19fc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x0068}
0x19fc4…1a008 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x010a, t01=0x0072}
0x1a008…1a012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x00b6}
0x1a012…1a026 Head {h00=0x0010, h01=0x0050, text=»ABTHAN EQU *«, t00=0x010a, t01=0x00c0}
0x1a026…1a04c Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x010a, t01=0x00d4}
0x1a04c…1a068 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x010a, t01=0x00fa}
0x1a068…1a08a Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x010a, t01=0x0116}
0x1a08a…1a0c0 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x010a, t01=0x0138}
0x1a0c0…1a0ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x016e}
0x1a0ca…1a0d8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010a, t01=0x0178}
0x1a0d8…1a0e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010a, t01=0x0186}
0x1a0e2…1a104 Head {h00=0x001e, h01=0x0050, text=» LDR A8,A6 SAVE WS NUMBER «, t00=0x010a, t01=0x0190}
0x1a104…1a130 Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x010b, t01=0x0022}
0x1a130…1a160 Head {h00=0x002c, h01=0x0050, text=» CF A15,NDGEDN A7 := HIGEST DWT NR ON WS«, t00=0x010b, t01=0x004e}
0x1a160…1a172 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x010b, t01=0x007e}
0x1a172…1a198 Head {h00=0x0022, h01=0x0050, text=» LCR A1,A3 WORK STATION STATUS«, t00=0x010b, t01=0x0090}
0x1a198…1a1a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010b, t01=0x00b6}
0x1a1a2…1a1c4 Head {h00=0x001e, h01=0x0050, text=» ADK A7,1 PREPARE FOR SUK «, t00=0x010b, t01=0x00c0}
0x1a1c4…1a1d8 Head {h00=0x0010, h01=0x0050, text=»AH100 EQU * «, t00=0x010b, t01=0x00e2}
0x1a1d8…1a1f2 Head {h00=0x0016, h01=0x0050, text=» SUK A7,1 NEXT DWT«, t00=0x010b, t01=0x00f6}
0x1a1f2…1a218 Head {h00=0x0022, h01=0x0050, text=» RF(N) AH110 EXIT IF ALL DONE «, t00=0x010b, t01=0x0110}
0x1a218…1a234 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A8 WS NUMBER«, t00=0x010b, t01=0x0136}
0x1a234…1a25c Head {h00=0x0024, h01=0x0050, text=» CF A15,GETDWT A6 := DWT ADDRESS«, t00=0x010b, t01=0x0152}
0x1a25c…1a27c Head {h00=0x001c, h01=0x0050, text=» RB(Z) AH100 NOT DEFINED«, t00=0x010b, t01=0x017a}
0x1a27c…1a286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010c, t01=0x000a}
0x1a286…1a2ae Head {h00=0x0024, h01=0x0050, text=» CM DWTLD2,A6 RESET FLOW CONTROL«, t00=0x010c, t01=0x0014}
0x1a2ae…1a2d0 Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTST,A6 DWT STATUS«, t00=0x010c, t01=0x003c}
0x1a2d0…1a2e2 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x010c, t01=0x005e}
0x1a2e2…1a312 Head {h00=0x002c, h01=0x0050, text=» LDKL A4,/FFFF-DWFPLC MASK FOR PLC FLAGS«, t00=0x010c, t01=0x0070}
0x1a312…1a336 Head {h00=0x0020, h01=0x0050, text=» ANS A4,DWTST,A6 RESET FLAGS«, t00=0x010c, t01=0x00a0}
0x1a336…1a36c Head {h00=0x0032, h01=0x0050, text=» ANK A2,DWFAK3 IS DWT WAITING FOR LEVEL 3 ACK?«, t00=0x010c, t01=0x00c4}
0x1a36c…1a38e Head {h00=0x001e, h01=0x0050, text=» RF(Z) AH105 NO, CONTINUE «, t00=0x010c, t01=0x00fa}
0x1a38e…1a3c2 Head {h00=0x0030, h01=0x0050, text=» ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? «, t00=0x010c, t01=0x011c}
0x1a3c2…1a3f0 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) AK3RST YES, RETURN WITH ACK 3«, t00=0x010c, t01=0x0150}
0x1a3f0…1a41e Head {h00=0x002a, h01=0x0050, text=» ABL WINRST NO, RETURN TO WINDOW QUEUE«, t00=0x010c, t01=0x017e}
0x1a41e…1a428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010d, t01=0x001c}
0x1a428…1a43c Head {h00=0x0010, h01=0x0050, text=»AH105 EQU * «, t00=0x010d, t01=0x0026}
0x1a43c…1a46e Head {h00=0x002e, h01=0x0050, text=» LD A4,DWTOTQ,A6 CCA QUEUE ELEMENT POINTER«, t00=0x010d, t01=0x003a}
0x1a46e…1a494 Head {h00=0x0022, h01=0x0050, text=» LDR A2,A7 SAVE DEVICE ADDRESS«, t00=0x010d, t01=0x006c}
0x1a494…1a4b8 Head {h00=0x0020, h01=0x0050, text=» LDR A3,A1 SAVE RETURN CODE «, t00=0x010d, t01=0x0092}
0x1a4b8…1a4d6 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x010d, t01=0x00b6}
0x1a4d6…1a4fc Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x010d, t01=0x00d4}
0x1a4fc…1a532 Head {h00=0x0032, h01=0x0050, text=» CF A15,LNKOUT LINK MONITOR BLOCK OUT OF QUEUE«, t00=0x010d, t01=0x00fa}
0x1a532…1a54c Head {h00=0x0016, h01=0x0050, text=» LDR A7,A7 FOUND? «, t00=0x010d, t01=0x0130}
0x1a54c…1a576 Head {h00=0x0026, h01=0x0050, text=» ABL(NZ) CCAABT YES, ABORT REQUEST«, t00=0x010d, t01=0x014a}
0x1a576…1a5a0 Head {h00=0x0026, h01=0x0050, text=» LDR A7,A2 RESTORE DEVICE ADDRESS «, t00=0x010d, t01=0x0174}
0x1a5a0…1a5c6 Head {h00=0x0022, h01=0x0050, text=» LDR A1,A3 RESTORE RETURN CODE«, t00=0x010e, t01=0x000e}
0x1a5c6…1a5d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0034}
0x1a5d0…1a600 Head {h00=0x002c, h01=0x0050, text=» CF A15,OUTBUQ REMOVE FROM BUFFER QUEUE «, t00=0x010e, t01=0x003e}
0x1a600…1a622 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A2 FOUND IN QUEUE?«, t00=0x010e, t01=0x006e}
0x1a622…1a650 Head {h00=0x002a, h01=0x0050, text=» ABL(NZ) BUFRST YES, TERMINATE REQUEST«, t00=0x010e, t01=0x0090}
0x1a650…1a66a Head {h00=0x0016, h01=0x0050, text=» RB AH100 NEXT DWT«, t00=0x010e, t01=0x00be}
0x1a66a…1a674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x00d8}
0x1a674…1a688 Head {h00=0x0010, h01=0x0050, text=»AH110 EQU * «, t00=0x010e, t01=0x00e2}
0x1a688…1a6ce Head {h00=0x0042, h01=0x0050, text=»* ALL PROCESSES WAITING FOR ACK 3 OR IN QUEUES ARE ABORTED «, t00=0x010e, t01=0x00f6}
0x1a6ce…1a6f2 Head {h00=0x0020, h01=0x0050, text=» CM CWTABW,A5 NO MORE ABORT «, t00=0x010e, t01=0x013c}
0x1a6f2…1a716 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x010e, t01=0x0160}
0x1a716…1a720 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010e, t01=0x0184}
0x1a720…1a72e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x010e, t01=0x018e}
0x1a72e…1a738 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x000c}
0x1a738…1a77c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x010f, t01=0x0016}
0x1a77c…1a786 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x005a}
0x1a786…1a79e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x010f, t01=0x0064}
0x1a79e…1a7ae Head {h00=0x000c, h01=0x0050, text=»* PLREWS«, t00=0x010f, t01=0x007c}
0x1a7ae…1a7b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x008c}
0x1a7b8…1a7cc Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x010f, t01=0x0096}
0x1a7cc…1a804 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE WILL HANDLE RECOVERY OF ONE WORK «, t00=0x010f, t01=0x00aa}
0x1a804…1a83c Head {h00=0x0034, h01=0x0050, text=»* STATION. ACTUAL CALL TO TERMINAL DEVICE DRIVER«, t00=0x010f, t01=0x00e2}
0x1a83c…1a870 Head {h00=0x0030, h01=0x0050, text=»* RECOVERY ROUTINES ARE MADE THROUGH NDREWS.«, t00=0x010f, t01=0x011a}
0x1a870…1a87a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x014e}
0x1a87a…1a88a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x010f, t01=0x0158}
0x1a88a…1a89e Head {h00=0x0010, h01=0x0050, text=»* ABL PLREWS«, t00=0x010f, t01=0x0168}
0x1a89e…1a8a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x010f, t01=0x017c}
0x1a8a8…1a8b8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x010f, t01=0x0186}
0x1a8b8…1a8d4 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0110, t01=0x0008}
0x1a8d4…1a8f8 Head {h00=0x0020, h01=0x0050, text=»* A6 = WORK STATION NUMBER «, t00=0x0110, t01=0x0024}
0x1a8f8…1a902 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x0048}
0x1a902…1a914 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0110, t01=0x0052}
0x1a914…1a940 Head {h00=0x0028, h01=0x0050, text=»* AT ENTRY TO DEVICE RECOVERY: «, t00=0x0110, t01=0x0064}
0x1a940…1a954 Head {h00=0x0010, h01=0x0050, text=»* SEE NDREWS«, t00=0x0110, t01=0x0090}
0x1a954…1a95e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x00a4}
0x1a95e…1a9a2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0110, t01=0x00ae}
0x1a9a2…1a9ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0110, t01=0x00f2}
0x1a9ac…1a9c0 Head {h00=0x0010, h01=0x0050, text=»PLREWS EQU *«, t00=0x0110, t01=0x00fc}
0x1a9c0…1a9e6 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A6 WORK STATION NUMBER«, t00=0x0110, t01=0x0110}
0x1a9e6…1aa02 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x0110, t01=0x0136}
0x1aa02…1aa24 Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x0110, t01=0x0152}
0x1aa24…1aa5a Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x0110, t01=0x0174}
0x1aa5a…1aa64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0111, t01=0x001a}
0x1aa64…1aa96 Head {h00=0x002e, h01=0x0050, text=» LDKL A2,/FFFF-WSFERR MASK FOR ERROR FLAG «, t00=0x0111, t01=0x0024}
0x1aa96…1aaca Head {h00=0x0030, h01=0x0050, text=» ANRS A2,A3 INDICATE WS WORKING AFTER ERROR «, t00=0x0111, t01=0x0056}
0x1aaca…1aae6 Head {h00=0x0018, h01=0x0050, text=» LCR A1,A3 WS STATUS«, t00=0x0111, t01=0x008a}
0x1aae6…1aaf8 Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0111, t01=0x00a6}
0x1aaf8…1ab18 Head {h00=0x001c, h01=0x0050, text=» SCR A2,A3 RESET STATUS «, t00=0x0111, t01=0x00b8}
0x1ab18…1ab48 Head {h00=0x002c, h01=0x0050, text=» LDK A4,RESECP ASSUME SECONDARY POWER UP«, t00=0x0111, t01=0x00d8}
0x1ab48…1ab66 Head {h00=0x001a, h01=0x0050, text=» ANK A1,NOTOPR WAS IT?«, t00=0x0111, t01=0x0108}
0x1ab66…1ab80 Head {h00=0x0016, h01=0x0050, text=» RF(NZ) PR110 YES «, t00=0x0111, t01=0x0126}
0x1ab80…1aba6 Head {h00=0x0022, h01=0x0050, text=» LDK A4,RELINE NO, LINK ERROR «, t00=0x0111, t01=0x0140}
0x1aba6…1abba Head {h00=0x0010, h01=0x0050, text=»PR110 EQU * «, t00=0x0111, t01=0x0166}
0x1abba…1abe6 Head {h00=0x0028, h01=0x0050, text=» LD* A3,CWTINT,A5 WORK STATION TABLE«, t00=0x0111, t01=0x017a}
0x1abe6…1ac1e Head {h00=0x0034, h01=0x0050, text=» CF A15,NDREWS CALL RECOVERY FOR ALL DWT:S ON WS«, t00=0x0112, t01=0x0016}
0x1ac1e…1ac28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x004e}
0x1ac28…1ac4c Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0112, t01=0x0058}
0x1ac4c…1ac56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x007c}
0x1ac56…1ac64 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0112, t01=0x0086}
0x1ac64…1ac6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x0094}
0x1ac6e…1acb2 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0112, t01=0x009e}
0x1acb2…1acbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x00e2}
0x1acbc…1acd4 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0112, t01=0x00ec}
0x1acd4…1ace4 Head {h00=0x000c, h01=0x0050, text=»* SENDRR«, t00=0x0112, t01=0x0104}
0x1ace4…1acee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0112, t01=0x0114}
0x1acee…1ad02 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0112, t01=0x011e}
0x1ad02…1ad3c Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE WILL SEND ONE LEVEL 3 RECIEVE READY«, t00=0x0112, t01=0x0132}
0x1ad3c…1ad66 Head {h00=0x0026, h01=0x0050, text=»* MESSAGE TO A SECONDARY STATION. «, t00=0x0112, t01=0x016c}
0x1ad66…1ad70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0008}
0x1ad70…1ad80 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0113, t01=0x0012}
0x1ad80…1ad94 Head {h00=0x0010, h01=0x0050, text=»* ABL SENDRR«, t00=0x0113, t01=0x0022}
0x1ad94…1ad9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0036}
0x1ad9e…1adae Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0113, t01=0x0040}
0x1adae…1adca Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0113, t01=0x0050}
0x1adca…1ade6 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0113, t01=0x006c}
0x1ade6…1adf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x0088}
0x1adf0…1ae02 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0113, t01=0x0092}
0x1ae02…1ae0e Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x0113, t01=0x00a4}
0x1ae0e…1ae18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x00b0}
0x1ae18…1ae5c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0113, t01=0x00ba}
0x1ae5c…1ae66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0113, t01=0x00fe}
0x1ae66…1ae7a Head {h00=0x0010, h01=0x0050, text=»SENDRR EQU *«, t00=0x0113, t01=0x0108}
0x1ae7a…1ae9c Head {h00=0x001e, h01=0x0050, text=» CF A15,PLCCCA RESERVE CCA«, t00=0x0113, t01=0x011c}
0x1ae9c…1aece Head {h00=0x002e, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK AS BUFFER«, t00=0x0113, t01=0x013e}
0x1aece…1aeda Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0113, t01=0x0170}
0x1aeda…1aef8 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0113, t01=0x017c}
0x1aef8…1af2e Head {h00=0x0032, h01=0x0050, text=» ADK A7,CWTMBQ QUEUE FOR KEEPING TRACK OF MB:S«, t00=0x0114, t01=0x000a}
0x1af2e…1af60 Head {h00=0x002e, h01=0x0050, text=» CF A15,LNKFST PUT MONITOR BLOCK IN QUEUE «, t00=0x0114, t01=0x0040}
0x1af60…1af8a Head {h00=0x0026, h01=0x0050, text=» ADK A4,2 A4 := START OF USER PART«, t00=0x0114, t01=0x0072}
0x1af8a…1afc4 Head {h00=0x0036, h01=0x0050, text=» CF A15,WRADR2 WRITE LINE ADDRESS IN CCA & BUFFER «, t00=0x0114, t01=0x009c}
0x1afc4…1aff4 Head {h00=0x002c, h01=0x0050, text=» LDK A2,CMDSW COMMAND := STANDARD WRITE «, t00=0x0114, t01=0x00d6}
0x1aff4…1b01a Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRCMD,A5 TO CCA«, t00=0x0114, t01=0x0106}
0x1b01a…1b04c Head {h00=0x002e, h01=0x0050, text=» LDK A2,TYRR MESSAGE TYPE := RECIEVE READY«, t00=0x0114, t01=0x012c}
0x1b04c…1b07c Head {h00=0x002c, h01=0x0050, text=» SC A2,CWTCCA+CCRIDB,A5 TO CCA, IDENTITY«, t00=0x0114, t01=0x015e}
0x1b07c…1b0a8 Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT LENGTH OF X25 HEADER «, t00=0x0114, t01=0x018e}
0x1b0a8…1b0dc Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 BUFFER LENGTH TO CCA«, t00=0x0115, t01=0x002a}
0x1b0dc…1b11c Head {h00=0x003c, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 RESET DATA CHAIN & MSB BUFFER ADDR «, t00=0x0115, t01=0x005e}
0x1b11c…1b152 Head {h00=0x0032, h01=0x0050, text=» ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDRESS TO CCA «, t00=0x0115, t01=0x009e}
0x1b152…1b15c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0115, t01=0x00d4}
0x1b15c…1b186 Head {h00=0x0026, h01=0x0050, text=» CF A15,GETLCS A1 := STATUS & INH «, t00=0x0115, t01=0x00de}
0x1b186…1b1aa Head {h00=0x0020, h01=0x0050, text=» RF(Z) RR100 CONTINUE IF OK «, t00=0x0115, t01=0x0108}
0x1b1aa…1b1cc Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x0115, t01=0x012c}
0x1b1cc…1b1e6 Head {h00=0x0016, h01=0x0050, text=» RF RR110 SKIP RR «, t00=0x0115, t01=0x014e}
0x1b1e6…1b1fa Head {h00=0x0010, h01=0x0050, text=»RR100 EQU * «, t00=0x0115, t01=0x0168}
0x1b1fa…1b22c Head {h00=0x002e, h01=0x0050, text=» CF A15,FWOPR A2 := P(R). UPDATE FLOW CTRL«, t00=0x0115, t01=0x017c}
0x1b22c…1b252 Head {h00=0x0022, h01=0x0050, text=» ORK A2,/01 MESSAGE TYPE := RR«, t00=0x0116, t01=0x001e}
0x1b252…1b274 Head {h00=0x001e, h01=0x0050, text=» SC A2,X25FLW,A4 TO BUFFER«, t00=0x0116, t01=0x0044}
0x1b274…1b29c Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0116, t01=0x0066}
0x1b29c…1b2bc Head {h00=0x001c, h01=0x0050, text=» RF(Z) RR120 EXIT IF OK «, t00=0x0116, t01=0x008e}
0x1b2bc…1b2d0 Head {h00=0x0010, h01=0x0050, text=»RR110 EQU * «, t00=0x0116, t01=0x00ae}
0x1b2d0…1b300 Head {h00=0x002c, h01=0x0050, text=» SUK A4,2 START ADDRESS OF MONITOR BLOCK«, t00=0x0116, t01=0x00c2}
0x1b300…1b338 Head {h00=0x0034, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET«, t00=0x0116, t01=0x00f2}
0x1b338…1b364 Head {h00=0x0028, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK «, t00=0x0116, t01=0x012a}
0x1b364…1b36e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0116, t01=0x0156}
0x1b36e…1b382 Head {h00=0x0010, h01=0x0050, text=»RR120 EQU * «, t00=0x0116, t01=0x0160}
0x1b382…1b3a6 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0116, t01=0x0174}
0x1b3a6…1b3b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0008}
0x1b3b0…1b3be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0117, t01=0x0012}
0x1b3be…1b3c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0020}
0x1b3c8…1b40c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0117, t01=0x002a}
0x1b40c…1b416 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x006e}
0x1b416…1b42e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0117, t01=0x0078}
0x1b42e…1b43e Head {h00=0x000c, h01=0x0050, text=»* GREAD «, t00=0x0117, t01=0x0090}
0x1b43e…1b448 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x00a0}
0x1b448…1b45c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0117, t01=0x00aa}
0x1b45c…1b490 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WILL PERFORM ONE GENERAL READ«, t00=0x0117, t01=0x00be}
0x1b490…1b4b0 Head {h00=0x001c, h01=0x0050, text=»* OPERATION TO THE PLC. «, t00=0x0117, t01=0x00f2}
0x1b4b0…1b4ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0112}
0x1b4ba…1b4ca Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0117, t01=0x011c}
0x1b4ca…1b4de Head {h00=0x0010, h01=0x0050, text=»* ABL GREAD «, t00=0x0117, t01=0x012c}
0x1b4de…1b4e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0117, t01=0x0140}
0x1b4e8…1b4f8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0117, t01=0x014a}
0x1b4f8…1b516 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0117, t01=0x015a}
0x1b516…1b532 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0117, t01=0x0178}
0x1b532…1b53c (280, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x0004}
0x1b53c…1b54e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0118, t01=0x000e}
0x1b54e…1b55a Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x0118, t01=0x0020}
0x1b55a…1b564 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x002c}
0x1b564…1b5a8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0118, t01=0x0036}
0x1b5a8…1b5b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0118, t01=0x007a}
0x1b5b2…1b5c6 Head {h00=0x0010, h01=0x0050, text=»GREAD EQU * «, t00=0x0118, t01=0x0084}
0x1b5c6…1b5f4 Head {h00=0x002a, h01=0x0050, text=» LDR A6,A4 PARAMETER := BUFFER ADDRESS«, t00=0x0118, t01=0x0098}
0x1b5f4…1b61a Head {h00=0x0022, h01=0x0050, text=» CF A15,PLCCCA RESERVE PLC CCA«, t00=0x0118, t01=0x00c6}
0x1b61a…1b63c Head {h00=0x001e, h01=0x0050, text=»* SET CCA PARAMETERS «, t00=0x0118, t01=0x00ec}
0x1b63c…1b678 Head {h00=0x0038, h01=0x0050, text=» CM CWTCCA+CCRC1B,A5 CLEAR DATA CHAINING & MSB ADDR «, t00=0x0118, t01=0x010e}
0x1b678…1b6a6 Head {h00=0x002a, h01=0x0050, text=» ST A6,CWTCCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x0118, t01=0x014a}
0x1b6a6…1b6cc Head {h00=0x0022, h01=0x0050, text=» LD A2,BUFLEN,A6 BUFFER LENGTH«, t00=0x0118, t01=0x0178}
0x1b6cc…1b6ec Head {h00=0x001c, h01=0x0050, text=» ST A2,CWTCCA+CCRLEN,A5 «, t00=0x0119, t01=0x000e}
0x1b6ec…1b716 Head {h00=0x0026, h01=0x0050, text=» LDK A2,CMDGR COMMAND GENERAL READ«, t00=0x0119, t01=0x002e}
0x1b716…1b74a Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND «, t00=0x0119, t01=0x0058}
0x1b74a…1b772 Head {h00=0x0024, h01=0x0050, text=» CF A15,PLCCIO EXECUTE CIO START«, t00=0x0119, t01=0x008c}
0x1b772…1b79c Head {h00=0x0026, h01=0x0050, text=» ABL PLDSP2 CHECK WHAT TO DO NEXT «, t00=0x0119, t01=0x00b4}
0x1b79c…1b7a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x00de}
0x1b7a6…1b7b4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0119, t01=0x00e8}
0x1b7b4…1b7be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x00f6}
0x1b7be…1b7d6 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0119, t01=0x0100}
0x1b7d6…1b7ee Head {h00=0x0014, h01=0x0050, text=»* SUBROUTINES * «, t00=0x0119, t01=0x0118}
0x1b7ee…1b806 Head {h00=0x0014, h01=0x0050, text=»*************** «, t00=0x0119, t01=0x0130}
0x1b806…1b810 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0119, t01=0x0148}
0x1b810…1b854 Head {h00=0x0040, h01=0x0050, text=»* THIS SECTION CONTAINS MISCELLANEOUS SERVICE SUBROUTINES.«, t00=0x0119, t01=0x0152}
0x1b854…1b88e Head {h00=0x0036, h01=0x0050, text=»* ALL ROUTINES ARE CALLED BY A CF A15,"NAME" «, t00=0x011a, t01=0x0008}
0x1b88e…1b8d0 Head {h00=0x003e, h01=0x0050, text=»* INSTRUCTION. REGISTER INTERFACE IS DESCRIBED FOR EACH «, t00=0x011a, t01=0x0042}
0x1b8d0…1b910 Head {h00=0x003c, h01=0x0050, text=»* ROUTINE. ONLY REGISTERS A1-A8 & PSW ARE CONSIDERED. «, t00=0x011a, t01=0x0084}
0x1b910…1b950 Head {h00=0x003c, h01=0x0050, text=»* REGISTERS NOT MENTIONED UNDER "OUTPUT" ARE UNCHANGED«, t00=0x011a, t01=0x00c4}
0x1b950…1b966 Head {h00=0x0012, h01=0x0050, text=»* FROM CALL.«, t00=0x011a, t01=0x0104}
0x1b966…1b9a6 Head {h00=0x003c, h01=0x0050, text=»* THE ROUTINES ARE OF TWO TYPES, ASYNCHRONOUS ROUTINES«, t00=0x011a, t01=0x011a}
0x1b9a6…1b9e6 Head {h00=0x003c, h01=0x0050, text=»* AND COMPUTATION ROUTINES. ASYNCHRONOUS ROUTINES MAY,«, t00=0x011a, t01=0x015a}
0x1b9e6…1ba28 Head {h00=0x003e, h01=0x0050, text=»* IF THE REQUESTED FUNCTION IS OCCUPIED OR NOT USEABLE, «, t00=0x011b, t01=0x000a}
0x1ba28…1ba68 Head {h00=0x003c, h01=0x0050, text=»* EXIT TO THE LOCAL DISPATCHER AND/OR TOSS DISPATCHER.«, t00=0x011b, t01=0x004c}
0x1ba68…1baa6 Head {h00=0x003a, h01=0x0050, text=»* THIS MEANS THAT THE A15 STACK AT CALL MUST CONTAIN«, t00=0x011b, t01=0x008c}
0x1baa6…1bae8 Head {h00=0x003e, h01=0x0050, text=»* INTERRUPT RETURN, A1-A8 AND NOTHING ELSE. COMPUTATION «, t00=0x011b, t01=0x00ca}
0x1bae8…1bb2a Head {h00=0x003e, h01=0x0050, text=»* ROUTINES HAVE NO SUCH LIMITATIONS, AS THEY WILL RETURN«, t00=0x011b, t01=0x010c}
0x1bb2a…1bb6a Head {h00=0x003c, h01=0x0050, text=»* IMMEDIATELY WHEN THEY HAVE PERFORMED THE PROCESSING.«, t00=0x011b, t01=0x014e}
0x1bb6a…1bb74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011b, t01=0x018e}
0x1bb74…1bb82 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011c, t01=0x0008}
0x1bb82…1bb8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0016}
0x1bb8c…1bbc0 Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x011c, t01=0x0020}
0x1bbc0…1bbca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0054}
0x1bbca…1bbe2 Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x011c, t01=0x005e}
0x1bbe2…1bbec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x0076}
0x1bbec…1bc10 Head {h00=0x0020, h01=0x0050, text=»* ASYNCHRONOUS ROUTINES«, t00=0x011c, t01=0x0080}
0x1bc10…1bc38 Head {h00=0x0024, h01=0x0050, text=»* PLCCCA RESERVE CCA FOR PROCESS«, t00=0x011c, t01=0x00a4}
0x1bc38…1bc5a Head {h00=0x001e, h01=0x0050, text=»* PLCCIO EXECUTE CIO START«, t00=0x011c, t01=0x00cc}
0x1bc5a…1bc64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011c, t01=0x00ee}
0x1bc64…1bc88 Head {h00=0x0020, h01=0x0050, text=»* COMPUTATION ROUTINES «, t00=0x011c, t01=0x00f8}
0x1bc88…1bcbe Head {h00=0x0032, h01=0x0050, text=»* PLCNOP SET FLAG INDICATING PLC NOT OPERABLE «, t00=0x011c, t01=0x011c}
0x1bcbe…1bce4 Head {h00=0x0022, h01=0x0050, text=»* GETDWT CALCULATE DWT ADDRESS«, t00=0x011c, t01=0x0152}
0x1bce4…1bd0a Head {h00=0x0022, h01=0x0050, text=»* GETCWT CALCULATE CWT ADDRESS«, t00=0x011c, t01=0x0178}
0x1bd0a…1bd3a Head {h00=0x002c, h01=0x0050, text=»* GETFR GET NUMBER OF OUTSTANDING FRAMES«, t00=0x011d, t01=0x000e}
0x1bd3a…1bd68 Head {h00=0x002a, h01=0x0050, text=»* FLWINP HANDLE FLOW CONTROL FOR INPUT«, t00=0x011d, t01=0x003e}
0x1bd68…1bd98 Head {h00=0x002c, h01=0x0050, text=»* FLWOUT HANDLE FLOW CONTROL FOR OUTPUT «, t00=0x011d, t01=0x006c}
0x1bd98…1bdce Head {h00=0x0032, h01=0x0050, text=»* WRADDR WRITE LINE ADDRESS IN CCA AND BUFFER «, t00=0x011d, t01=0x009c}
0x1bdce…1bdf8 Head {h00=0x0026, h01=0x0050, text=»* STAHAN PLC RETURN STATUS HANDLER«, t00=0x011d, t01=0x00d2}
0x1bdf8…1be26 Head {h00=0x002a, h01=0x0050, text=»* GETSTA GET STATUS FOR I/O CONNECTION«, t00=0x011d, t01=0x00fc}
0x1be26…1be5c Head {h00=0x0032, h01=0x0050, text=»* PLGTBU ALLOCATE BUFFER AND SET TO PLC FORMAT«, t00=0x011d, t01=0x012a}
0x1be5c…1be8a Head {h00=0x002a, h01=0x0050, text=»* PLRLBU RELEASE BUFFER OF PLC FORMAT «, t00=0x011d, t01=0x0160}
0x1be8a…1bec6 Head {h00=0x0038, h01=0x0050, text=»* PLCHAR GET/PUT CHARACTER FROM/IN PLC FORMAT BUFFER«, t00=0x011d, t01=0x018e}
0x1bec6…1bef4 Head {h00=0x002a, h01=0x0050, text=»* INTYPE DECIDE TYPE OF INPUT MESSAGE «, t00=0x011e, t01=0x003a}
0x1bef4…1bf26 Head {h00=0x002e, h01=0x0050, text=»* OUTBUQ REMOVE ELEMENT FROM BUFFER QUEUE «, t00=0x011e, t01=0x0068}
0x1bf26…1bf52 Head {h00=0x0028, h01=0x0050, text=»* LNKFST LINK ELEMENT FIRST IN QUEUE«, t00=0x011e, t01=0x009a}
0x1bf52…1bf7e Head {h00=0x0028, h01=0x0050, text=»* LNKLST LINK ELEMENT LAST IN QUEUE «, t00=0x011e, t01=0x00c6}
0x1bf7e…1bfa8 Head {h00=0x0026, h01=0x0050, text=»* LNKOUT LINK ELEMENT OUT OF QUEUE«, t00=0x011e, t01=0x00f2}
0x1bfa8…1bfb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x011c}
0x1bfb2…1bfc0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x011e, t01=0x0126}
0x1bfc0…1bfca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0134}
0x1bfca…1c00e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x011e, t01=0x013e}
0x1c00e…1c018 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011e, t01=0x0182}
0x1c018…1c030 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x011e, t01=0x018c}
0x1c030…1c040 Head {h00=0x000c, h01=0x0050, text=»* PLCCCA«, t00=0x011f, t01=0x0014}
0x1c040…1c04a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x011f, t01=0x0024}
0x1c04a…1c05e Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x011f, t01=0x002e}
0x1c05e…1c096 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE IS CALLED WHEN A PROCESS WANTS TO«, t00=0x011f, t01=0x0042}
0x1c096…1c0ce Head {h00=0x0034, h01=0x0050, text=»* USE THE PLC COMMAND COMMUNICATION AREA (CCA). «, t00=0x011f, t01=0x007a}
0x1c0ce…1c106 Head {h00=0x0034, h01=0x0050, text=»* IF THE AREA IS FREE, THE ROUTINE SETS IT BUSY «, t00=0x011f, t01=0x00b2}
0x1c106…1c13e Head {h00=0x0034, h01=0x0050, text=»* AND RETURNS. IF THE AREA IS BUSY, THE CALLING «, t00=0x011f, t01=0x00ea}
0x1c13e…1c176 Head {h00=0x0034, h01=0x0050, text=»* PROCESS IS PUT IN A QUEUE, AND EXIT IS MADE TO«, t00=0x011f, t01=0x0122}
0x1c176…1c196 Head {h00=0x001c, h01=0x0050, text=»* THE LOCAL DISPATCHER. «, t00=0x011f, t01=0x015a}
0x1c196…1c1be Head {h00=0x0024, h01=0x0050, text=»* PLCCCA ONLY RESERVES THE AREA.«, t00=0x011f, t01=0x017a}
0x1c1be…1c1f4 Head {h00=0x0032, h01=0x0050, text=»* PLCCCS ALSO SAVES THE QUEUE ELEMENT ADDRESS.«, t00=0x0120, t01=0x0012}
0x1c1f4…1c1fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0048}
0x1c1fe…1c20e Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0120, t01=0x0052}
0x1c20e…1c226 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCCA «, t00=0x0120, t01=0x0062}
0x1c226…1c23e Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCCS «, t00=0x0120, t01=0x007a}
0x1c23e…1c248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x0092}
0x1c248…1c258 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0120, t01=0x009c}
0x1c258…1c294 Head {h00=0x0038, h01=0x0050, text=»* A3 = QUEUE ELEMENT ADDRESS SAVE AREA (IF PLCCCS) «, t00=0x0120, t01=0x00ac}
0x1c294…1c2b0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0120, t01=0x00e8}
0x1c2b0…1c2ca Head {h00=0x0016, h01=0x0050, text=»* A6 = PARAMETER «, t00=0x0120, t01=0x0104}
0x1c2ca…1c2e6 Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x0120, t01=0x011e}
0x1c2e6…1c2f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0120, t01=0x013a}
0x1c2f0…1c302 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0120, t01=0x0144}
0x1c302…1c338 Head {h00=0x0032, h01=0x0050, text=»* A1 = RETURN CODE (IF PLCCCS, ELSE CHANGED) «, t00=0x0120, t01=0x0156}
0x1c338…1c350 Head {h00=0x0014, h01=0x0050, text=»* A2-A4 CHANGED «, t00=0x0120, t01=0x018c}
0x1c350…1c368 Head {h00=0x0014, h01=0x0050, text=»* A7-A8 CHANGED «, t00=0x0121, t01=0x0014}
0x1c368…1c380 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0121, t01=0x002c}
0x1c380…1c39c Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0121, t01=0x0044}
0x1c39c…1c3a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x0060}
0x1c3a6…1c3ea Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0121, t01=0x006a}
0x1c3ea…1c3f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x00ae}
0x1c3f4…1c402 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0121, t01=0x00b8}
0x1c402…1c40c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x00c6}
0x1c40c…1c420 Head {h00=0x0010, h01=0x0050, text=»PLCCCA EQU *«, t00=0x0121, t01=0x00d0}
0x1c420…1c452 Head {h00=0x002e, h01=0x0050, text=» LDK A3,0 DON'T SAVE QUEUE ELEMENT ADDRESS«, t00=0x0121, t01=0x00e4}
0x1c452…1c45c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0121, t01=0x0116}
0x1c45c…1c470 Head {h00=0x0010, h01=0x0050, text=»PLCCCS EQU *«, t00=0x0121, t01=0x0120}
0x1c470…1c47c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0121, t01=0x0134}
0x1c47c…1c4ac Head {h00=0x002c, h01=0x0050, text=» LD A1,CWTCCQ,A5 ANYONE WAITING FOR CCA?«, t00=0x0121, t01=0x0140}
0x1c4ac…1c4d4 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CA100 YES, PUT IN QUEUE «, t00=0x0121, t01=0x0170}
0x1c4d4…1c4f6 Head {h00=0x001e, h01=0x0050, text=» LD A4,CWTCCB,A5 PLC BUSY?«, t00=0x0122, t01=0x0008}
0x1c4f6…1c51e Head {h00=0x0024, h01=0x0050, text=» RF(NZ) CA100 YES, PUT IN QUEUE «, t00=0x0122, t01=0x002a}
0x1c51e…1c528 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0052}
0x1c528…1c53e Head {h00=0x0012, h01=0x0050, text=»* PLC FREE «, t00=0x0122, t01=0x005c}
0x1c53e…1c560 Head {h00=0x001e, h01=0x0050, text=» IM CWTCCB,A5 SET PLC BUSY«, t00=0x0122, t01=0x0072}
0x1c560…1c58c Head {h00=0x0028, h01=0x0050, text=» ADKL A15,4 ADJUST STACK FOR RETURN «, t00=0x0122, t01=0x0094}
0x1c58c…1c5b0 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x0122, t01=0x00c0}
0x1c5b0…1c5d8 Head {h00=0x0024, h01=0x0050, text=» ABR* A15 RETURN IN INHIBIT MODE«, t00=0x0122, t01=0x00e4}
0x1c5d8…1c5e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x010c}
0x1c5e2…1c5ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0122, t01=0x0116}
0x1c5ec…1c600 Head {h00=0x0010, h01=0x0050, text=»CA100 EQU * «, t00=0x0122, t01=0x0120}
0x1c600…1c62c Head {h00=0x0028, h01=0x0050, text=»* PLC BUSY. PUT REQUEST IN QUEUE.«, t00=0x0122, t01=0x0134}
0x1c62c…1c64e Head {h00=0x001e, h01=0x0050, text=» LDR A1,A6 SAVE PARAMETER «, t00=0x0122, t01=0x0160}
0x1c64e…1c66c Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x0122, t01=0x0182}
0x1c66c…1c694 Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 SAVE RETURN ADDRESS«, t00=0x0123, t01=0x0010}
0x1c694…1c6cc Head {h00=0x0034, h01=0x0050, text=» CF A15,GETBLK GET MONITOR BLOCK AND SAVE A1-A2 «, t00=0x0123, t01=0x0038}
0x1c6cc…1c6ec Head {h00=0x001c, h01=0x0050, text=» LDR A3,A3 SAVE POINTER?«, t00=0x0123, t01=0x0070}
0x1c6ec…1c70e Head {h00=0x001e, h01=0x0050, text=» RF(Z) CA110 NO, CONTINUE «, t00=0x0123, t01=0x0090}
0x1c70e…1c73c Head {h00=0x002a, h01=0x0050, text=» STR A4,A3 SAVE QUEUE ELEMENT ADDRESS «, t00=0x0123, t01=0x00b2}
0x1c73c…1c750 Head {h00=0x0010, h01=0x0050, text=»CA110 EQU * «, t00=0x0123, t01=0x00e0}
0x1c750…1c76e Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0123, t01=0x00f4}
0x1c76e…1c798 Head {h00=0x0026, h01=0x0050, text=» ADK A7,CWTCCQ PLC BUSY QUEUE HEAD«, t00=0x0123, t01=0x0112}
0x1c798…1c7c6 Head {h00=0x002a, h01=0x0050, text=» CF A15,LNKLST PUT BLOCK LAST IN QUEUE«, t00=0x0123, t01=0x013c}
0x1c7c6…1c7ec Head {h00=0x0022, h01=0x0050, text=» IFF UTTEST=0 QUEUE STATISTICS«, t00=0x0123, t01=0x016a}
0x1c7ec…1c810 Head {h00=0x0020, h01=0x0050, text=» LD A1,CWTPNR,A5 PLC NUMBER «, t00=0x0123, t01=0x0190}
0x1c810…1c82c Head {h00=0x0018, h01=0x0050, text=» SLA A1,1 MAKE INDEX«, t00=0x0124, t01=0x0024}
0x1c82c…1c864 Head {h00=0x0034, h01=0x0050, text=» IM CCQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER«, t00=0x0124, t01=0x0040}
0x1c864…1c870 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0124, t01=0x0078}
0x1c870…1c894 Head {h00=0x0020, h01=0x0050, text=» ABL PLDSP2 LOCAL DISPATCHER«, t00=0x0124, t01=0x0084}
0x1c894…1c89e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x00a8}
0x1c89e…1c8a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x00b2}
0x1c8a8…1c8de Head {h00=0x0032, h01=0x0050, text=»* RETURN IS MADE HERE WHEN THE CCA IS FREE.«, t00=0x0124, t01=0x00bc}
0x1c8de…1c918 Head {h00=0x0036, h01=0x0050, text=»* (AT A RELEASE INTERRUPT OR FROM DISPATCHER.) «, t00=0x0124, t01=0x00f2}
0x1c918…1c93a Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0124, t01=0x012c}
0x1c93a…1c960 Head {h00=0x0022, h01=0x0050, text=»* A4 = MONITOR BLOCK ADDRESS «, t00=0x0124, t01=0x014e}
0x1c960…1c97c Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0124, t01=0x0174}
0x1c97c…1c986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0124, t01=0x0190}
0x1c986…1c99a Head {h00=0x0010, h01=0x0050, text=»CCARST EQU *«, t00=0x0125, t01=0x000a}
0x1c99a…1c9a6 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0125, t01=0x001e}
0x1c9a6…1c9c4 Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x0125, t01=0x002a}
0x1c9c4…1c9ea Head {h00=0x0022, h01=0x0050, text=» ADK A7,CWTCCQ CCA QUEUE HEAD «, t00=0x0125, t01=0x0048}
0x1c9ea…1ca1a Head {h00=0x002c, h01=0x0050, text=» CF A15,LNKOUT REMOVE PROCESS FROM QUEUE«, t00=0x0125, t01=0x006e}
0x1ca1a…1ca3e Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 RETURN CODE := OK «, t00=0x0125, t01=0x009e}
0x1ca3e…1ca48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x00c2}
0x1ca48…1ca52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0125, t01=0x00cc}
0x1ca52…1ca92 Head {h00=0x003c, h01=0x0050, text=»* ENTRY IS MADE HERE WHEN A REQUEST SHOULD BE ABORTED«, t00=0x0125, t01=0x00d6}
0x1ca92…1cab0 Head {h00=0x001a, h01=0x0050, text=»* DUE TO I/O ERROR.«, t00=0x0125, t01=0x0116}
0x1cab0…1cad2 Head {h00=0x001e, h01=0x0050, text=»* REGISTERS ON ENTRY:«, t00=0x0125, t01=0x0134}
0x1cad2…1caee Head {h00=0x0018, h01=0x0050, text=»* A3 = RETURN CODE «, t00=0x0125, t01=0x0156}
0x1caee…1cb14 Head {h00=0x0022, h01=0x0050, text=»* A4 = MONITOR BLOCK ADDRESS «, t00=0x0125, t01=0x0172}
0x1cb14…1cb30 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0126, t01=0x0008}
0x1cb30…1cb3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0024}
0x1cb3a…1cb4e Head {h00=0x0010, h01=0x0050, text=»CCAABT EQU *«, t00=0x0126, t01=0x002e}
0x1cb4e…1cb5a Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0126, t01=0x0042}
0x1cb5a…1cb7e Head {h00=0x0020, h01=0x0050, text=» LDR A7,A3 SAVE RETURN CODE «, t00=0x0126, t01=0x004e}
0x1cb7e…1cbb6 Head {h00=0x0034, h01=0x0050, text=» CF A15,FREBLK RETURN MONITOR BLOCK. LOAD A1-A2 «, t00=0x0126, t01=0x0072}
0x1cbb6…1cbd2 Head {h00=0x0018, h01=0x0050, text=» LDR A6,A1 PARAMETER«, t00=0x0126, t01=0x00aa}
0x1cbd2…1cbf6 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A7 A1 := RETURN CODE«, t00=0x0126, t01=0x00c6}
0x1cbf6…1cc0c Head {h00=0x0012, h01=0x0050, text=» ABR A2 RETURN«, t00=0x0126, t01=0x00ea}
0x1cc0c…1cc16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0100}
0x1cc16…1cc24 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0126, t01=0x010a}
0x1cc24…1cc2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0118}
0x1cc2e…1cc72 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0126, t01=0x0122}
0x1cc72…1cc7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0126, t01=0x0166}
0x1cc7c…1cc94 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0126, t01=0x0170}
0x1cc94…1cca4 Head {h00=0x000c, h01=0x0050, text=»* PLCCIO«, t00=0x0126, t01=0x0188}
0x1cca4…1ccae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x0008}
0x1ccae…1ccc2 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0127, t01=0x0012}
0x1ccc2…1cd02 Head {h00=0x003c, h01=0x0050, text=»* THIS ROUTINE CHECKS IF THE PLC CAN BE USED. IF IT CAN,«, t00=0x0127, t01=0x0026}
0x1cd02…1cd3a Head {h00=0x0034, h01=0x0050, text=»* THE ROUTINE EXECUTES A CIO START INSTRUCTION. «, t00=0x0127, t01=0x0066}
0x1cd3a…1cd72 Head {h00=0x0034, h01=0x0050, text=»* IF THE PLC IS NOT OPERABLE DUE TO TC POWER UP,«, t00=0x0127, t01=0x009e}
0x1cd72…1cdb2 Head {h00=0x003c, h01=0x0050, text=»* THE ROUTINE WILL EXIT TO TOSS DISPATCHER. IN ALL OTHER«, t00=0x0127, t01=0x00d6}
0x1cdb2…1cdf2 Head {h00=0x003c, h01=0x0050, text=»* CASES, IT WILL RETURN TO CALLING PROGRAM WITH A RETURN«, t00=0x0127, t01=0x0116}
0x1cdf2…1ce02 Head {h00=0x000c, h01=0x0050, text=»* CODE. «, t00=0x0127, t01=0x0156}
0x1ce02…1ce0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0127, t01=0x0166}
0x1ce0c…1ce1c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0127, t01=0x0170}
0x1ce1c…1ce34 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCCIO «, t00=0x0127, t01=0x0180}
0x1ce34…1ce3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x0008}
0x1ce3e…1ce4e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0128, t01=0x0012}
0x1ce4e…1ce6a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0128, t01=0x0022}
0x1ce6a…1ce86 Head {h00=0x0018, h01=0x0050, text=»* A1-A8 ON A15 STACK«, t00=0x0128, t01=0x003e}
0x1ce86…1ce90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x005a}
0x1ce90…1cea2 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0128, t01=0x0064}
0x1cea2…1cebe Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0128, t01=0x0076}
0x1cebe…1ced2 Head {h00=0x0010, h01=0x0050, text=»* 0 IF OK «, t00=0x0128, t01=0x0092}
0x1ced2…1cee8 Head {h00=0x0012, h01=0x0050, text=»* NOT 0 ELSE«, t00=0x0128, t01=0x00a6}
0x1cee8…1cf00 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0128, t01=0x00bc}
0x1cf00…1cf1e Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x0128, t01=0x00d4}
0x1cf1e…1cf3a Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0128, t01=0x00f2}
0x1cf3a…1cf44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x010e}
0x1cf44…1cf88 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0128, t01=0x0118}
0x1cf88…1cf92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0128, t01=0x015c}
0x1cf92…1cfa6 Head {h00=0x0010, h01=0x0050, text=»PLCCIO EQU *«, t00=0x0128, t01=0x0166}
0x1cfa6…1cfb2 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0128, t01=0x017a}
0x1cfb2…1cfd0 Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x0128, t01=0x0186}
0x1cfd0…1cff8 Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 GET RETURN ADDRESS «, t00=0x0129, t01=0x0014}
0x1cff8…1d002 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x003c}
0x1d002…1d010 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0129, t01=0x0046}
0x1d010…1d01a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0129, t01=0x0054}
0x1d01a…1d046 Head {h00=0x0028, h01=0x0050, text=» LD A1,PFPOST POWER UP TASK PENDING?«, t00=0x0129, t01=0x005e}
0x1d046…1d072 Head {h00=0x0028, h01=0x0050, text=» OR A1,PLCPFP PLC POWER UP PENDING? «, t00=0x0129, t01=0x008a}
0x1d072…1d0a4 Head {h00=0x002e, h01=0x0050, text=» ABL(NZ) TDISP YES, GO TO TOSS DISPATCHER «, t00=0x0129, t01=0x00b6}
0x1d0a4…1d0ca Head {h00=0x0022, h01=0x0050, text=» LD A1,CWTOPR,A5 PLC OPERABLE?«, t00=0x0129, t01=0x00e8}
0x1d0ca…1d0ea Head {h00=0x001c, h01=0x0050, text=» RF(NZ) CS100 NO, HANDLE«, t00=0x0129, t01=0x010e}
0x1d0ea…1d100 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0129, t01=0x012e}
0x1d100…1d11e Head {h00=0x001a, h01=0x0050, text=» CF A15,LOGCOM LOG CCR«, t00=0x0129, t01=0x0144}
0x1d11e…1d12a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0129, t01=0x0162}
0x1d12a…1d152 Head {h00=0x0024, h01=0x0050, text=» EX CWTCIO,A5 EXECUTE CIO START «, t00=0x0129, t01=0x016e}
0x1d152…1d17c Head {h00=0x0026, h01=0x0050, text=» RF(U) CS090 UNDEFINED, NOT OK =13«, t00=0x012a, t01=0x0008}
0x1d17c…1d19e Head {h00=0x001e, h01=0x0050, text=» LDKL A1,0 SET CR, OK =14 «, t00=0x012a, t01=0x0032}
0x1d19e…1d1ae Head {h00=0x000c, h01=0x0050, text=» ABR A2 «, t00=0x012a, t01=0x0054}
0x1d1ae…1d1c2 Head {h00=0x0010, h01=0x0050, text=»CS090 EQU * «, t00=0x012a, t01=0x0064}
0x1d1c2…1d1cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x0078}
0x1d1cc…1d1fa Head {h00=0x002a, h01=0x0050, text=» CF A15,PLCNOP ERROR. SET NOT OPERABLE«, t00=0x012a, t01=0x0082}
0x1d1fa…1d20e Head {h00=0x0010, h01=0x0050, text=»CS100 EQU * «, t00=0x012a, t01=0x00b0}
0x1d20e…1d240 Head {h00=0x002e, h01=0x0050, text=» LDK A1,NOTOPR RETURN CODE := NOT OPERABLE«, t00=0x012a, t01=0x00c4}
0x1d240…1d262 Head {h00=0x001e, h01=0x0050, text=» CM CWTCCB,A5 SET CCA FREE«, t00=0x012a, t01=0x00f6}
0x1d262…1d27c Head {h00=0x0016, h01=0x0050, text=» LDR A1,A1 SET CR «, t00=0x012a, t01=0x0118}
0x1d27c…1d292 Head {h00=0x0012, h01=0x0050, text=» ABR A2 RETURN«, t00=0x012a, t01=0x0132}
0x1d292…1d29c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x0148}
0x1d29c…1d2aa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012a, t01=0x0152}
0x1d2aa…1d2b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012a, t01=0x0160}
0x1d2b4…1d2f8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012a, t01=0x016a}
0x1d2f8…1d302 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x001e}
0x1d302…1d31a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x012b, t01=0x0028}
0x1d31a…1d32a Head {h00=0x000c, h01=0x0050, text=»* PLCNOP«, t00=0x012b, t01=0x0040}
0x1d32a…1d334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0050}
0x1d334…1d348 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x012b, t01=0x005a}
0x1d348…1d384 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE SETS A FLAG TO INDICATE THAT THE PLC «, t00=0x012b, t01=0x006e}
0x1d384…1d3a0 Head {h00=0x0018, h01=0x0050, text=»* IS "NOT OPERABLE".«, t00=0x012b, t01=0x00aa}
0x1d3a0…1d3aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x00c6}
0x1d3aa…1d3ba Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x012b, t01=0x00d0}
0x1d3ba…1d3d2 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLCNOP «, t00=0x012b, t01=0x00e0}
0x1d3d2…1d3dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x00f8}
0x1d3dc…1d3ec Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x012b, t01=0x0102}
0x1d3ec…1d408 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x012b, t01=0x0112}
0x1d408…1d412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x012e}
0x1d412…1d424 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x012b, t01=0x0138}
0x1d424…1d430 Head {h00=0x0008, h01=0x0050, text=»* - «, t00=0x012b, t01=0x014a}
0x1d430…1d43a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012b, t01=0x0156}
0x1d43a…1d47e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012b, t01=0x0160}
0x1d47e…1d488 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0014}
0x1d488…1d49c Head {h00=0x0010, h01=0x0050, text=»PLCNOP EQU *«, t00=0x012c, t01=0x001e}
0x1d49c…1d4b8 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x012c, t01=0x0032}
0x1d4b8…1d4e0 Head {h00=0x0024, h01=0x0050, text=» LD A1,CWTPLS,A5 GET PLC STATUS «, t00=0x012c, t01=0x004e}
0x1d4e0…1d4f6 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) PN100 «, t00=0x012c, t01=0x0076}
0x1d4f6…1d51e Head {h00=0x0024, h01=0x0050, text=» LDKL A1,-1 SET DUMMY ERROR CODE«, t00=0x012c, t01=0x008c}
0x1d51e…1d532 Head {h00=0x0010, h01=0x0050, text=»PN100 EQU * «, t00=0x012c, t01=0x00b4}
0x1d532…1d560 Head {h00=0x002a, h01=0x0050, text=» ST A1,CWTOPR,A5 SET PLC NOT OPERABLE «, t00=0x012c, t01=0x00c8}
0x1d560…1d56a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x00f6}
0x1d56a…1d580 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x012c, t01=0x0100}
0x1d580…1d58a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x0116}
0x1d58a…1d598 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012c, t01=0x0120}
0x1d598…1d5a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012c, t01=0x012e}
0x1d5a2…1d5c4 Head {h00=0x001e, h01=0x0050, text=» LD A1,UTTST TRAP CONTROL «, t00=0x012c, t01=0x0138}
0x1d5c4…1d5e0 Head {h00=0x0018, h01=0x0050, text=» SUK A1,1 TRAP USED?«, t00=0x012c, t01=0x015a}
0x1d5e0…1d5fe Head {h00=0x001a, h01=0x0050, text=» RF(NG) PN120 NO, SKIP«, t00=0x012c, t01=0x0176}
0x1d5fe…1d620 (301, 0, 400) Head {h00=0x001e, h01=0x0050, text=» LDK A1,PLCERR ERROR CODE «, t00=0x012d, t01=0x0004}
0x1d620…1d642 Head {h00=0x001e, h01=0x0050, text=» OTR A1,0,/2E TO SOP LAMPS«, t00=0x012d, t01=0x0026}
0x1d642…1d664 Head {h00=0x001e, h01=0x0050, text=» DATA /6300 TRAP TO BUGGER«, t00=0x012d, t01=0x0048}
0x1d664…1d678 Head {h00=0x0010, h01=0x0050, text=»PN120 EQU * «, t00=0x012d, t01=0x006a}
0x1d678…1d682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x007e}
0x1d682…1d68e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x012d, t01=0x0088}
0x1d68e…1d698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0094}
0x1d698…1d6b4 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x012d, t01=0x009e}
0x1d6b4…1d6c4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x012d, t01=0x00ba}
0x1d6c4…1d6d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012d, t01=0x00ca}
0x1d6d2…1d6dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x00d8}
0x1d6dc…1d720 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012d, t01=0x00e2}
0x1d720…1d72a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0126}
0x1d72a…1d742 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x012d, t01=0x0130}
0x1d742…1d752 Head {h00=0x000c, h01=0x0050, text=»* GETDWT«, t00=0x012d, t01=0x0148}
0x1d752…1d75c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012d, t01=0x0158}
0x1d75c…1d770 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x012d, t01=0x0162}
0x1d770…1d7a8 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE DWT ADDRESS FOR A «, t00=0x012d, t01=0x0176}
0x1d7a8…1d7cc Head {h00=0x0020, h01=0x0050, text=»* DEVICE CONNECTED TO A PLC.«, t00=0x012e, t01=0x001e}
0x1d7cc…1d7d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0042}
0x1d7d6…1d7e6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x012e, t01=0x004c}
0x1d7e6…1d7fe Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETDWT «, t00=0x012e, t01=0x005c}
0x1d7fe…1d808 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0074}
0x1d808…1d818 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x012e, t01=0x007e}
0x1d818…1d834 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x012e, t01=0x008e}
0x1d834…1d84e Head {h00=0x0016, h01=0x0050, text=»* A6 = DLS INDEX «, t00=0x012e, t01=0x00aa}
0x1d84e…1d86c Head {h00=0x001a, h01=0x0050, text=»* A7 = DEVICE ADDRESS«, t00=0x012e, t01=0x00c4}
0x1d86c…1d876 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x00e2}
0x1d876…1d888 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x012e, t01=0x00ec}
0x1d888…1d8ae Head {h00=0x0022, h01=0x0050, text=»* A6 = DWT ADDRESS IF FOUND, «, t00=0x012e, t01=0x00fe}
0x1d8ae…1d8c0 Head {h00=0x000e, h01=0x0050, text=»* ELSE 0«, t00=0x012e, t01=0x0124}
0x1d8c0…1d8de Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A6«, t00=0x012e, t01=0x0136}
0x1d8de…1d8fa Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x012e, t01=0x0154}
0x1d8fa…1d904 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012e, t01=0x0170}
0x1d904…1d948 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012e, t01=0x017a}
0x1d948…1d952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x002e}
0x1d952…1d966 Head {h00=0x0010, h01=0x0050, text=»GETDWT EQU *«, t00=0x012f, t01=0x0038}
0x1d966…1d972 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x012f, t01=0x004c}
0x1d972…1d98e Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x012f, t01=0x0058}
0x1d98e…1d9ba Head {h00=0x0028, h01=0x0050, text=» LD* A1,CWTINT,A5 WORK STATION TABLE«, t00=0x012f, t01=0x0074}
0x1d9ba…1d9e2 Head {h00=0x0024, h01=0x0050, text=» CF A15,NDGEDW A6 := DWT ADDRESS«, t00=0x012f, t01=0x00a0}
0x1d9e2…1d9fe Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x012f, t01=0x00c8}
0x1d9fe…1da2a Head {h00=0x0028, h01=0x0050, text=» ADKL A15,4 ADJUST STACK FOR RETURN «, t00=0x012f, t01=0x00e4}
0x1da2a…1da5a Head {h00=0x002c, h01=0x0050, text=» ANKL A6,/FFFE SET CR & SKIP ODD ADDRESS«, t00=0x012f, t01=0x0110}
0x1da5a…1da72 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x012f, t01=0x0140}
0x1da72…1da7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0158}
0x1da7c…1da8a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x012f, t01=0x0162}
0x1da8a…1da94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x012f, t01=0x0170}
0x1da94…1dad8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x012f, t01=0x017a}
0x1dad8…1dae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x002e}
0x1dae2…1dafa Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0130, t01=0x0038}
0x1dafa…1db0a Head {h00=0x000c, h01=0x0050, text=»* GETCWT«, t00=0x0130, t01=0x0050}
0x1db0a…1db14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x0060}
0x1db14…1db28 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0130, t01=0x006a}
0x1db28…1db5e Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE CWT ADDRESS FOR «, t00=0x0130, t01=0x007e}
0x1db5e…1db8c Head {h00=0x002a, h01=0x0050, text=»* THE PLC CONTROLLING CALLING DEVICE. «, t00=0x0130, t01=0x00b4}
0x1db8c…1db96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x00e2}
0x1db96…1dba6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0130, t01=0x00ec}
0x1dba6…1dbbe Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETCWT «, t00=0x0130, t01=0x00fc}
0x1dbbe…1dbc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x0114}
0x1dbc8…1dbd8 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0130, t01=0x011e}
0x1dbd8…1dbf4 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0130, t01=0x012e}
0x1dbf4…1dbfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0130, t01=0x014a}
0x1dbfe…1dc10 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0130, t01=0x0154}
0x1dc10…1dc36 Head {h00=0x0022, h01=0x0050, text=»* A5 = CWT ADDRESS IF FOUND, «, t00=0x0130, t01=0x0166}
0x1dc36…1dc48 Head {h00=0x000e, h01=0x0050, text=»* ELSE 0«, t00=0x0130, t01=0x018c}
0x1dc48…1dc6e Head {h00=0x0022, h01=0x0050, text=»* A7 = 0 IF LOCAL CONNECTION «, t00=0x0131, t01=0x000e}
0x1dc6e…1dc86 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0131, t01=0x0034}
0x1dc86…1dc90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x004c}
0x1dc90…1dcd4 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0131, t01=0x0056}
0x1dcd4…1dcde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0131, t01=0x009a}
0x1dcde…1dcf2 Head {h00=0x0010, h01=0x0050, text=»GETCWT EQU *«, t00=0x0131, t01=0x00a4}
0x1dcf2…1dd1e Head {h00=0x0028, h01=0x0050, text=» LD A5,DWTCHP,A6 CHANNEL PARAMETERS «, t00=0x0131, t01=0x00b8}
0x1dd1e…1dd4e Head {h00=0x002c, h01=0x0050, text=» ANK A5,MASKPL CLEAN CHANNEL UNIT INDEX «, t00=0x0131, t01=0x00e4}
0x1dd4e…1dd6a Head {h00=0x0018, h01=0x0050, text=» SLL A5,1 MAKE INDEX«, t00=0x0131, t01=0x0114}
0x1dd6a…1dd80 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRR=0 «, t00=0x0131, t01=0x0130}
0x1dd80…1dd96 Head {h00=0x0012, h01=0x0050, text=» IFF PLCNRL=0 «, t00=0x0131, t01=0x0146}
0x1dd96…1ddbc Head {h00=0x0022, h01=0x0050, text=» LDR* A7,A6 CHANNEL PARAMETER «, t00=0x0131, t01=0x015c}
0x1ddbc…1dddc Head {h00=0x001c, h01=0x0050, text=» ANKL A7,/0500 MASK =10 «, t00=0x0131, t01=0x0182}
0x1dddc…1ddfc Head {h00=0x001c, h01=0x0050, text=» SUKL A7,/0500 REMOTE ? «, t00=0x0132, t01=0x0012}
0x1ddfc…1de14 Head {h00=0x0014, h01=0x0050, text=» RF(Z) GET010 NO«, t00=0x0132, t01=0x0032}
0x1de14…1de3e Head {h00=0x0026, h01=0x0050, text=» ADK A5,8 ADJUST INDEX FOR REMOTE «, t00=0x0132, t01=0x004a}
0x1de3e…1de4a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0132, t01=0x0074}
0x1de4a…1de7a Head {h00=0x002c, h01=0x0050, text=»GET010 LD A5,TABCWT,A5 A5 := CWT ADDRESS«, t00=0x0132, t01=0x0080}
0x1de7a…1de84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x00b0}
0x1de84…1de9a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0132, t01=0x00ba}
0x1de9a…1deb6 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0132, t01=0x00d0}
0x1deb6…1ded0 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0132, t01=0x00ec}
0x1ded0…1dedc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0132, t01=0x0106}
0x1dedc…1def2 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0132, t01=0x0112}
0x1def2…1df02 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0132, t01=0x0128}
0x1df02…1df0e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0132, t01=0x0138}
0x1df0e…1df18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x0144}
0x1df18…1df26 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0132, t01=0x014e}
0x1df26…1df30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0132, t01=0x015c}
0x1df30…1df74 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0132, t01=0x0166}
0x1df74…1df7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x001a}
0x1df7e…1df96 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0133, t01=0x0024}
0x1df96…1dfa6 Head {h00=0x000c, h01=0x0050, text=»* GETFR «, t00=0x0133, t01=0x003c}
0x1dfa6…1dfb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0133, t01=0x004c}
0x1dfb0…1dfc4 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0133, t01=0x0056}
0x1dfc4…1e000 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE CALCULATES THE NUMBER OF OUTSTANDING «, t00=0x0133, t01=0x006a}
0x1e000…1e03a Head {h00=0x0036, h01=0x0050, text=»* FRAMES, IE FRAMES THAT HAVE BEEN TRANSFERRED BUT«, t00=0x0133, t01=0x00a6}
0x1e03a…1e06e Head {h00=0x0030, h01=0x0050, text=»* NOT ACKNOWLEDGED ON LEVEL 3, FOR A LOGICAL«, t00=0x0133, t01=0x00e0}
0x1e06e…1e080 Head {h00=0x000e, h01=0x0050, text=»* CHANNEL.«, t00=0x0133, t01=0x0114}
0x1e080…1e0b8 Head {h00=0x0034, h01=0x0050, text=»* GETIFR GETS NUMBER OF FRAMES RECIEVED BY PLC. «, t00=0x0133, t01=0x0126}
0x1e0b8…1e0ec Head {h00=0x0030, h01=0x0050, text=»* GETOFR GETS NUMBER OF FRAMES SENT BY PLC. «, t00=0x0133, t01=0x015e}
0x1e0ec…1e0f6 (308, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0004}
0x1e0f6…1e106 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0134, t01=0x000e}
0x1e106…1e11e Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETIFR «, t00=0x0134, t01=0x001e}
0x1e11e…1e136 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETOFR «, t00=0x0134, t01=0x0036}
0x1e136…1e140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x004e}
0x1e140…1e150 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0134, t01=0x0058}
0x1e150…1e16c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0134, t01=0x0068}
0x1e16c…1e176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x0084}
0x1e176…1e188 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0134, t01=0x008e}
0x1e188…1e1a0 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0134, t01=0x00a0}
0x1e1a0…1e1cc Head {h00=0x0028, h01=0x0050, text=»* A2 = NUMBER OF OUTSTANDING FRAMES«, t00=0x0134, t01=0x00b8}
0x1e1cc…1e1e4 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0134, t01=0x00e4}
0x1e1e4…1e1ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x00fc}
0x1e1ee…1e232 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0134, t01=0x0106}
0x1e232…1e23c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0134, t01=0x014a}
0x1e23c…1e250 Head {h00=0x0010, h01=0x0050, text=»GETIFR EQU *«, t00=0x0134, t01=0x0154}
0x1e250…1e27e Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x0134, t01=0x0168}
0x1e27e…1e290 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0135, t01=0x0008}
0x1e290…1e2c2 Head {h00=0x002e, h01=0x0050, text=» SRL A2,9 BITS 13-15 := NEXT EXPECTED P(S)«, t00=0x0135, t01=0x001a}
0x1e2c2…1e2f0 Head {h00=0x002a, h01=0x0050, text=» SRL A1,5 BITS 13-15 := LAST SENT P(R)«, t00=0x0135, t01=0x004c}
0x1e2f0…1e310 Head {h00=0x001c, h01=0x0050, text=» RF GF100 TO COMMON PART«, t00=0x0135, t01=0x007a}
0x1e310…1e31a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x009a}
0x1e31a…1e328 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0135, t01=0x00a4}
0x1e328…1e332 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x00b2}
0x1e332…1e346 Head {h00=0x0010, h01=0x0050, text=»GETOFR EQU *«, t00=0x0135, t01=0x00bc}
0x1e346…1e374 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x0135, t01=0x00d0}
0x1e374…1e386 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0135, t01=0x00fe}
0x1e386…1e3b8 Head {h00=0x002e, h01=0x0050, text=» SRL A2,1 BITS 13-15 := NEXT P(S) TO SEND «, t00=0x0135, t01=0x0110}
0x1e3b8…1e3ea Head {h00=0x002e, h01=0x0050, text=» SLC A1,3 BITS 13-15 := LAST RECIEVED P(R)«, t00=0x0135, t01=0x0142}
0x1e3ea…1e3f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x0174}
0x1e3f4…1e3fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0135, t01=0x017e}
0x1e3fe…1e412 Head {h00=0x0010, h01=0x0050, text=»GF100 EQU * «, t00=0x0135, t01=0x0188}
0x1e412…1e43e Head {h00=0x0028, h01=0x0050, text=» SUR A2,A1 A2 := OUTSTANDING FRAMES «, t00=0x0136, t01=0x000c}
0x1e43e…1e462 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/07 CLEAN & MODULO 8«, t00=0x0136, t01=0x0038}
0x1e462…1e46c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x005c}
0x1e46c…1e482 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0136, t01=0x0066}
0x1e482…1e49e Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0136, t01=0x007c}
0x1e49e…1e4b8 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0136, t01=0x0098}
0x1e4b8…1e4c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0136, t01=0x00b2}
0x1e4c4…1e4ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x00be}
0x1e4ce…1e4e4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0136, t01=0x00c8}
0x1e4e4…1e4f4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0136, t01=0x00de}
0x1e4f4…1e500 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0136, t01=0x00ee}
0x1e500…1e50a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x00fa}
0x1e50a…1e518 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0136, t01=0x0104}
0x1e518…1e522 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0112}
0x1e522…1e566 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0136, t01=0x011c}
0x1e566…1e570 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0136, t01=0x0160}
0x1e570…1e588 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0136, t01=0x016a}
0x1e588…1e598 Head {h00=0x000c, h01=0x0050, text=»* FLWINP«, t00=0x0136, t01=0x0182}
0x1e598…1e5a2 (311, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x0004}
0x1e5a2…1e5b6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0137, t01=0x000e}
0x1e5b6…1e5f8 Head {h00=0x003e, h01=0x0050, text=»* THIS ROUTINE HANDLES FLOW CONTROL FOR INPUT. IT FETCHES «, t00=0x0137, t01=0x0022}
0x1e5f8…1e634 Head {h00=0x0038, h01=0x0050, text=»* FLOW CONTROL INFORMATION FROM MESSAGE AND UPDATES «, t00=0x0137, t01=0x0064}
0x1e634…1e64e Head {h00=0x0016, h01=0x0050, text=»* COUNTERS IN DWT.«, t00=0x0137, t01=0x00a0}
0x1e64e…1e684 Head {h00=0x0032, h01=0x0050, text=»* FWIPR IS FOR MESSAGES ONLY CONTAINING P(R). «, t00=0x0137, t01=0x00ba}
0x1e684…1e6be Head {h00=0x0036, h01=0x0050, text=»* FWIPSR IS FOR MESSAGES CONTAINING P(S) AND P(R).«, t00=0x0137, t01=0x00f0}
0x1e6be…1e6e0 Head {h00=0x001e, h01=0x0050, text=»* NO ERROR CHECK IS MADE. «, t00=0x0137, t01=0x012a}
0x1e6e0…1e6ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0137, t01=0x014c}
0x1e6ea…1e6fa Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0137, t01=0x0156}
0x1e6fa…1e710 Head {h00=0x0012, h01=0x0050, text=»* CF A15,FWIPR«, t00=0x0137, t01=0x0166}
0x1e710…1e728 Head {h00=0x0014, h01=0x0050, text=»* CF A15,FWIPSR «, t00=0x0137, t01=0x017c}
0x1e728…1e732 (312, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0004}
0x1e732…1e742 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0138, t01=0x000e}
0x1e742…1e760 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0138, t01=0x001e}
0x1e760…1e77c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0138, t01=0x003c}
0x1e77c…1e786 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x0058}
0x1e786…1e798 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0138, t01=0x0062}
0x1e798…1e7b0 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0138, t01=0x0074}
0x1e7b0…1e7c8 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0138, t01=0x008c}
0x1e7c8…1e7d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x00a4}
0x1e7d2…1e816 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0138, t01=0x00ae}
0x1e816…1e820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0138, t01=0x00f2}
0x1e820…1e834 Head {h00=0x0010, h01=0x0050, text=»FWIPR EQU * «, t00=0x0138, t01=0x00fc}
0x1e834…1e850 Head {h00=0x0018, h01=0x0050, text=» STR A2,A15 PUSH A2 «, t00=0x0138, t01=0x0110}
0x1e850…1e880 Head {h00=0x002c, h01=0x0050, text=» LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT«, t00=0x0138, t01=0x012c}
0x1e880…1e8a8 Head {h00=0x0024, h01=0x0050, text=» ANK A1,/E0 BITS 8-10 = P(R) IN «, t00=0x0138, t01=0x015c}
0x1e8a8…1e8d2 Head {h00=0x0026, h01=0x0050, text=» LC A2,DWTLD2,A6 OLD FLOW CONTROL «, t00=0x0138, t01=0x0184}
0x1e8d2…1e8fe Head {h00=0x0028, h01=0x0050, text=» ANK A2,/0E BITS 12-14 = OLD P(S) IN«, t00=0x0139, t01=0x001e}
0x1e8fe…1e91e Head {h00=0x001c, h01=0x0050, text=» ORR A1,A2 KEEP OLD P(S)«, t00=0x0139, t01=0x004a}
0x1e91e…1e93a Head {h00=0x0018, h01=0x0050, text=» LDR* A2,A15 POP A2 «, t00=0x0139, t01=0x006a}
0x1e93a…1e95a Head {h00=0x001c, h01=0x0050, text=» RF FI100 COMMON ENDING «, t00=0x0139, t01=0x0086}
0x1e95a…1e964 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x00a6}
0x1e964…1e96e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x00b0}
0x1e96e…1e982 Head {h00=0x0010, h01=0x0050, text=»FWIPSR EQU *«, t00=0x0139, t01=0x00ba}
0x1e982…1e9b2 Head {h00=0x002c, h01=0x0050, text=» LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT«, t00=0x0139, t01=0x00ce}
0x1e9b2…1e9cc Head {h00=0x0016, h01=0x0050, text=» ANK A1,/EE CLEAN «, t00=0x0139, t01=0x00fe}
0x1e9cc…1ea04 Head {h00=0x0034, h01=0x0050, text=» ADK A1,/02 BITS 12-14 := NEXT EXPECTED P(S) IN «, t00=0x0139, t01=0x0118}
0x1ea04…1ea20 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/EE MODULO 8«, t00=0x0139, t01=0x0150}
0x1ea20…1ea2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x016c}
0x1ea2a…1ea34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0139, t01=0x0176}
0x1ea34…1ea48 Head {h00=0x0010, h01=0x0050, text=»FI100 EQU * «, t00=0x0139, t01=0x0180}
0x1ea48…1ea76 (314, 0, 400) Head {h00=0x002a, h01=0x0050, text=» SC A1,DWTLD2,A6 SAVE NEW FLOW CONTROL«, t00=0x013a, t01=0x0004}
0x1ea76…1ea80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0032}
0x1ea80…1ea96 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x013a, t01=0x003c}
0x1ea96…1eab2 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x013a, t01=0x0052}
0x1eab2…1eacc Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x013a, t01=0x006e}
0x1eacc…1ead8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013a, t01=0x0088}
0x1ead8…1eae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0094}
0x1eae2…1eaf8 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x013a, t01=0x009e}
0x1eaf8…1eb08 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x013a, t01=0x00b4}
0x1eb08…1eb14 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013a, t01=0x00c4}
0x1eb14…1eb1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x00d0}
0x1eb1e…1eb2c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013a, t01=0x00da}
0x1eb2c…1eb36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x00e8}
0x1eb36…1eb7a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013a, t01=0x00f2}
0x1eb7a…1eb84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0136}
0x1eb84…1eb9c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x013a, t01=0x0140}
0x1eb9c…1ebac Head {h00=0x000c, h01=0x0050, text=»* FLWOUT«, t00=0x013a, t01=0x0158}
0x1ebac…1ebb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013a, t01=0x0168}
0x1ebb6…1ebca Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x013a, t01=0x0172}
0x1ebca…1ec06 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE HANDLES FLOW CONTROL FOR OUTPUT. FLOW«, t00=0x013a, t01=0x0186}
0x1ec06…1ec46 Head {h00=0x003c, h01=0x0050, text=»* CONTROL INFORMATION IS FETCHED FROM DWT, AND COUNTERS «, t00=0x013b, t01=0x0032}
0x1ec46…1ec64 Head {h00=0x001a, h01=0x0050, text=»* IN DWT ARE UPDATED. «, t00=0x013b, t01=0x0072}
0x1ec64…1ec9a Head {h00=0x0032, h01=0x0050, text=»* FWOPR IS FOR MESSAGES CONTAINING ONLY P(R). «, t00=0x013b, t01=0x0090}
0x1ec9a…1ecd4 Head {h00=0x0036, h01=0x0050, text=»* FWOPSR IS FOR MESSAGES CONTAINING P(S) AND P(R).«, t00=0x013b, t01=0x00c6}
0x1ecd4…1ecde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x0100}
0x1ecde…1ecee Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x013b, t01=0x010a}
0x1ecee…1ed04 Head {h00=0x0012, h01=0x0050, text=»* CF A15,FWOPR«, t00=0x013b, t01=0x011a}
0x1ed04…1ed1c Head {h00=0x0014, h01=0x0050, text=»* CF A15,FWOPSR «, t00=0x013b, t01=0x0130}
0x1ed1c…1ed26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x0148}
0x1ed26…1ed36 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x013b, t01=0x0152}
0x1ed36…1ed52 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x013b, t01=0x0162}
0x1ed52…1ed5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013b, t01=0x017e}
0x1ed5c…1ed6e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x013b, t01=0x0188}
0x1ed6e…1ed86 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x013c, t01=0x000a}
0x1ed86…1eda4 Head {h00=0x001a, h01=0x0050, text=»* A2 = BITS 0-7 ZERO«, t00=0x013c, t01=0x0022}
0x1eda4…1edc6 Head {h00=0x001e, h01=0x0050, text=»* BITS 8-10 P(R) TO SEND«, t00=0x013c, t01=0x0040}
0x1edc6…1edde Head {h00=0x0014, h01=0x0050, text=»* BIT 11 ZERO «, t00=0x013c, t01=0x0062}
0x1edde…1ee0c Head {h00=0x002a, h01=0x0050, text=»* BITS 12-14 P(S) TO SEND IF FWOPSR «, t00=0x013c, t01=0x007a}
0x1ee0c…1ee2e Head {h00=0x001e, h01=0x0050, text=»* ELSE ZERO «, t00=0x013c, t01=0x00a8}
0x1ee2e…1ee46 Head {h00=0x0014, h01=0x0050, text=»* BIT 15 ZERO «, t00=0x013c, t01=0x00ca}
0x1ee46…1ee5e Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x013c, t01=0x00e2}
0x1ee5e…1ee68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x00fa}
0x1ee68…1eeac Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013c, t01=0x0104}
0x1eeac…1eeb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013c, t01=0x0148}
0x1eeb6…1eeca Head {h00=0x0010, h01=0x0050, text=»FWOPR EQU * «, t00=0x013c, t01=0x0152}
0x1eeca…1eef8 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x013c, t01=0x0166}
0x1eef8…1ef0a (317, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x013d, t01=0x0004}
0x1ef0a…1ef3e Head {h00=0x0030, h01=0x0050, text=» SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN«, t00=0x013d, t01=0x0016}
0x1ef3e…1ef5c Head {h00=0x001a, h01=0x0050, text=»* (= P(R) TO SEND) «, t00=0x013d, t01=0x004a}
0x1ef5c…1ef76 Head {h00=0x0016, h01=0x0050, text=» ANK A2,/E0 CLEAN «, t00=0x013d, t01=0x0068}
0x1ef76…1efa8 Head {h00=0x002e, h01=0x0050, text=» ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND«, t00=0x013d, t01=0x0082}
0x1efa8…1efd2 Head {h00=0x0026, h01=0x0050, text=» ORR A1,A2 P(S) := SAME AS BEFORE «, t00=0x013d, t01=0x00b4}
0x1efd2…1eff2 Head {h00=0x001c, h01=0x0050, text=» RF FO100 COMMON ENDING «, t00=0x013d, t01=0x00de}
0x1eff2…1effc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x00fe}
0x1effc…1f006 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013d, t01=0x0108}
0x1f006…1f01a Head {h00=0x0010, h01=0x0050, text=»FWOPSR EQU *«, t00=0x013d, t01=0x0112}
0x1f01a…1f048 Head {h00=0x002a, h01=0x0050, text=» LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS«, t00=0x013d, t01=0x0126}
0x1f048…1f05a Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x013d, t01=0x0154}
0x1f05a…1f08e Head {h00=0x0030, h01=0x0050, text=» SRL A2,4 BITS 8-10 := NEXT EXPECTED P(S) IN«, t00=0x013d, t01=0x0166}
0x1f08e…1f0ac Head {h00=0x001a, h01=0x0050, text=»* (= P(R) TO SEND) «, t00=0x013e, t01=0x000a}
0x1f0ac…1f0c6 Head {h00=0x0016, h01=0x0050, text=» ANK A2,/E0 CLEAN «, t00=0x013e, t01=0x0028}
0x1f0c6…1f0f8 Head {h00=0x002e, h01=0x0050, text=» ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND«, t00=0x013e, t01=0x0042}
0x1f0f8…1f120 Head {h00=0x0024, h01=0x0050, text=» ORR A2,A1 COUNTERS FOR MESSAGE «, t00=0x013e, t01=0x0074}
0x1f120…1f132 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x013e, t01=0x009c}
0x1f132…1f15c Head {h00=0x0026, h01=0x0050, text=» ADK A1,/02 INCREMENT P(S) TO SEND«, t00=0x013e, t01=0x00ae}
0x1f15c…1f178 Head {h00=0x0018, h01=0x0050, text=» ANK A1,/EE MODULO 8«, t00=0x013e, t01=0x00d8}
0x1f178…1f182 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00f4}
0x1f182…1f18c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x00fe}
0x1f18c…1f1a0 Head {h00=0x0010, h01=0x0050, text=»FO100 EQU * «, t00=0x013e, t01=0x0108}
0x1f1a0…1f1d6 Head {h00=0x0032, h01=0x0050, text=» SC A1,DWTLD2+1,A6 SAVE FLOW CONTROL COUNTERS «, t00=0x013e, t01=0x011c}
0x1f1d6…1f1e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013e, t01=0x0152}
0x1f1e0…1f1f6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x013e, t01=0x015c}
0x1f1f6…1f212 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x013e, t01=0x0172}
0x1f212…1f22c Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x013e, t01=0x018e}
0x1f22c…1f238 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013f, t01=0x0018}
0x1f238…1f242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x0024}
0x1f242…1f258 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x013f, t01=0x002e}
0x1f258…1f268 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x013f, t01=0x0044}
0x1f268…1f274 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x013f, t01=0x0054}
0x1f274…1f282 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x013f, t01=0x0060}
0x1f282…1f28c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x006e}
0x1f28c…1f2d0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x013f, t01=0x0078}
0x1f2d0…1f2da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x00bc}
0x1f2da…1f2f2 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x013f, t01=0x00c6}
0x1f2f2…1f302 Head {h00=0x000c, h01=0x0050, text=»* WRADDR«, t00=0x013f, t01=0x00de}
0x1f302…1f30c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x013f, t01=0x00ee}
0x1f30c…1f320 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x013f, t01=0x00f8}
0x1f320…1f354 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WRITES THE LINE ADDRESS IN A «, t00=0x013f, t01=0x010c}
0x1f354…1f38e Head {h00=0x0036, h01=0x0050, text=»* MESSAGE. THE ADDRESS CONSISTS OF: DROP ADDRESS, «, t00=0x013f, t01=0x0140}
0x1f38e…1f3c4 Head {h00=0x0032, h01=0x0050, text=»* GROUP NUMBER AND DEVICE ADDRESS. WRADR1 SETS«, t00=0x013f, t01=0x017a}
0x1f3c4…1f3fe Head {h00=0x0036, h01=0x0050, text=»* GROUP=1 INDICATING NO FLOW CONTROL, WRADR2 SETS «, t00=0x0140, t01=0x0020}
0x1f3fe…1f428 Head {h00=0x0026, h01=0x0050, text=»* GROUP=0 INDICATING FLOW CONTROL.«, t00=0x0140, t01=0x005a}
0x1f428…1f432 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x0084}
0x1f432…1f442 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0140, t01=0x008e}
0x1f442…1f45a Head {h00=0x0014, h01=0x0050, text=»* CF A15,WRADR1 «, t00=0x0140, t01=0x009e}
0x1f45a…1f472 Head {h00=0x0014, h01=0x0050, text=»* CF A15,WRADR2 «, t00=0x0140, t01=0x00b6}
0x1f472…1f47c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x00ce}
0x1f47c…1f48c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0140, t01=0x00d8}
0x1f48c…1f4aa Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0140, t01=0x00e8}
0x1f4aa…1f4c6 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0140, t01=0x0106}
0x1f4c6…1f4e2 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0140, t01=0x0122}
0x1f4e2…1f4ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x013e}
0x1f4ec…1f4fe Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0140, t01=0x0148}
0x1f4fe…1f516 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0140, t01=0x015a}
0x1f516…1f52e Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0140, t01=0x0172}
0x1f52e…1f538 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0140, t01=0x018a}
0x1f538…1f57c (321, 0, 400) Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0141, t01=0x0004}
0x1f57c…1f586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x0048}
0x1f586…1f59a Head {h00=0x0010, h01=0x0050, text=»WRADR1 EQU *«, t00=0x0141, t01=0x0052}
0x1f59a…1f5bc Head {h00=0x001e, h01=0x0050, text=» LDK A2,/11 GROUP NUMBER 1«, t00=0x0141, t01=0x0066}
0x1f5bc…1f5dc Head {h00=0x001c, h01=0x0050, text=» RF WA100 TO COMMON PART«, t00=0x0141, t01=0x0088}
0x1f5dc…1f5e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x00a8}
0x1f5e6…1f5f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0141, t01=0x00b2}
0x1f5f4…1f5fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x00c0}
0x1f5fe…1f612 Head {h00=0x0010, h01=0x0050, text=»WRADR2 EQU *«, t00=0x0141, t01=0x00ca}
0x1f612…1f634 Head {h00=0x001e, h01=0x0050, text=» LDK A2,/10 GROUP NUMBER 0«, t00=0x0141, t01=0x00de}
0x1f634…1f63e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x0100}
0x1f63e…1f648 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0141, t01=0x010a}
0x1f648…1f65c Head {h00=0x0010, h01=0x0050, text=»WA100 EQU * «, t00=0x0141, t01=0x0114}
0x1f65c…1f68c Head {h00=0x002c, h01=0x0050, text=» SC A2,X25LGN,A4 GROUP NUMBER TO BUFFER «, t00=0x0141, t01=0x0128}
0x1f68c…1f6b8 Head {h00=0x0028, h01=0x0050, text=» LC A2,DWTCP2,A6 CHANNEL PARAMETERS «, t00=0x0141, t01=0x0158}
0x1f6b8…1f6de Head {h00=0x0022, h01=0x0050, text=» ANK A2,MASKWS CLEAN WS NUMBER«, t00=0x0141, t01=0x0184}
0x1f6de…1f704 Head {h00=0x0022, h01=0x0050, text=» SC A2,CWTCCA+CCRDLS,A5 TO CCA«, t00=0x0142, t01=0x001a}
0x1f704…1f71e Head {h00=0x0016, h01=0x0050, text=» LC A2,DWTCP2+1,A6«, t00=0x0142, t01=0x0040}
0x1f71e…1f74a Head {h00=0x0028, h01=0x0050, text=» ANK A2,MASKLC CLEAN DEVICE ADDRESS «, t00=0x0142, t01=0x005a}
0x1f74a…1f76c Head {h00=0x001e, h01=0x0050, text=» SC A2,X25LCN,A4 TO BUFFER«, t00=0x0142, t01=0x0086}
0x1f76c…1f776 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x00a8}
0x1f776…1f78c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0142, t01=0x00b2}
0x1f78c…1f7a8 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0142, t01=0x00c8}
0x1f7a8…1f7c2 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0142, t01=0x00e4}
0x1f7c2…1f7ce Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0142, t01=0x00fe}
0x1f7ce…1f7d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x010a}
0x1f7d8…1f7ee Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0142, t01=0x0114}
0x1f7ee…1f7fe Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0142, t01=0x012a}
0x1f7fe…1f80a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0142, t01=0x013a}
0x1f80a…1f814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x0146}
0x1f814…1f822 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0142, t01=0x0150}
0x1f822…1f82c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0142, t01=0x015e}
0x1f82c…1f870 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0142, t01=0x0168}
0x1f870…1f87a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x001c}
0x1f87a…1f892 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0143, t01=0x0026}
0x1f892…1f8a2 Head {h00=0x000c, h01=0x0050, text=»* STAHAN«, t00=0x0143, t01=0x003e}
0x1f8a2…1f8ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x004e}
0x1f8ac…1f8c0 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0143, t01=0x0058}
0x1f8c0…1f8f6 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE HANDLES PLC STATUS WORD FOR ONE«, t00=0x0143, t01=0x006c}
0x1f8f6…1f92e Head {h00=0x0034, h01=0x0050, text=»* WORK STATION. IF "NO CONNECTION", "LINK RESET"«, t00=0x0143, t01=0x00a2}
0x1f92e…1f964 Head {h00=0x0032, h01=0x0050, text=»* OR "DCE NOT OPERABLE" IS INDICATED, AN ERROR«, t00=0x0143, t01=0x00da}
0x1f964…1f97a Head {h00=0x0012, h01=0x0050, text=»* CODE WILL BE«, t00=0x0143, t01=0x0110}
0x1f97a…1f9b2 Head {h00=0x0034, h01=0x0050, text=»* SET IN THE WORK STATION STATUS WORD (CWTWSS). «, t00=0x0143, t01=0x0126}
0x1f9b2…1f9de Head {h00=0x0028, h01=0x0050, text=»* OTHER STATUS BITS ARE NOT ALLOWED.«, t00=0x0143, t01=0x015e}
0x1f9de…1f9e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0143, t01=0x018a}
0x1f9e8…1f9f8 (324, 0, 400) Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0144, t01=0x0004}
0x1f9f8…1fa10 Head {h00=0x0014, h01=0x0050, text=»* CF A15,STAHAN «, t00=0x0144, t01=0x0014}
0x1fa10…1fa1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x002c}
0x1fa1a…1fa2a Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0144, t01=0x0036}
0x1fa2a…1fa44 Head {h00=0x0016, h01=0x0050, text=»* A1 = PLC STATUS«, t00=0x0144, t01=0x0046}
0x1fa44…1fa68 Head {h00=0x0020, h01=0x0050, text=»* A2 = WORK STATION NUMBER «, t00=0x0144, t01=0x0060}
0x1fa68…1fa84 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0144, t01=0x0084}
0x1fa84…1fa8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x00a0}
0x1fa8e…1faa0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0144, t01=0x00aa}
0x1faa0…1fac2 Head {h00=0x001e, h01=0x0050, text=»* A1 = DEVICE RETURN CODE«, t00=0x0144, t01=0x00bc}
0x1fac2…1fada Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0144, t01=0x00de}
0x1fada…1fae4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x00f6}
0x1fae4…1fb28 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0144, t01=0x0100}
0x1fb28…1fb32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0144, t01=0x0144}
0x1fb32…1fb46 Head {h00=0x0010, h01=0x0050, text=»STAHAN EQU *«, t00=0x0144, t01=0x014e}
0x1fb46…1fb62 Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x0144, t01=0x0162}
0x1fb62…1fb80 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A1 ANY ERROR? «, t00=0x0144, t01=0x017e}
0x1fb80…1fba0 Head {h00=0x001c, h01=0x0050, text=» RF(Z) SH120 NO, RETURN «, t00=0x0145, t01=0x000c}
0x1fba0…1fbbc Head {h00=0x0018, h01=0x0050, text=» STR A4,A15 PUSH A4 «, t00=0x0145, t01=0x002c}
0x1fbbc…1fbc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0048}
0x1fbc6…1fbd4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0145, t01=0x0052}
0x1fbd4…1fbde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0145, t01=0x0060}
0x1fbde…1fc0a Head {h00=0x0028, h01=0x0050, text=» LDK A1,NOTOPR ASSUME NO CONNECTION «, t00=0x0145, t01=0x006a}
0x1fc0a…1fc30 Head {h00=0x0022, h01=0x0050, text=» ANKL A3,STADNO+STANOC IS IT? «, t00=0x0145, t01=0x0096}
0x1fc30…1fc54 Head {h00=0x0020, h01=0x0050, text=» RF(NZ) SH100 YES, CONTINUE «, t00=0x0145, t01=0x00bc}
0x1fc54…1fc7a Head {h00=0x0022, h01=0x0050, text=» LDK A1,LINERR NO, LINK ERROR «, t00=0x0145, t01=0x00e0}
0x1fc7a…1fc8e Head {h00=0x0010, h01=0x0050, text=»SH100 EQU * «, t00=0x0145, t01=0x0106}
0x1fc8e…1fcb4 Head {h00=0x0022, h01=0x0050, text=» LDR A3,A2 WORK STATION NUMBER«, t00=0x0145, t01=0x011a}
0x1fcb4…1fcd0 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x0145, t01=0x0140}
0x1fcd0…1fcf2 Head {h00=0x001e, h01=0x0050, text=» ADR A3,A5 ADD CWT ADDRESS«, t00=0x0145, t01=0x015c}
0x1fcf2…1fd28 Head {h00=0x0032, h01=0x0050, text=» ADK A3,CWTWSS A3 := ADDRESS OF STATUS FOR WS «, t00=0x0145, t01=0x017e}
0x1fd28…1fd4a Head {h00=0x001e, h01=0x0050, text=» SCR A1,A3 SAVE ERROR CODE«, t00=0x0146, t01=0x0024}
0x1fd4a…1fd74 Head {h00=0x0026, h01=0x0050, text=» LDK A4,WSFERR WORK STATION ERROR «, t00=0x0146, t01=0x0046}
0x1fd74…1fd9a Head {h00=0x0022, h01=0x0050, text=» ANR* A4,A3 ALREADY DETECTED? «, t00=0x0146, t01=0x0070}
0x1fd9a…1fdbc Head {h00=0x001e, h01=0x0050, text=» RF(NZ) SH110 YES, RETURN «, t00=0x0146, t01=0x0096}
0x1fdbc…1fdd2 Head {h00=0x0012, h01=0x0050, text=» LDK A4,WSFERR«, t00=0x0146, t01=0x00b8}
0x1fdd2…1fdf8 Head {h00=0x0022, h01=0x0050, text=» ORRS A4,A3 SET ERROR DETECTED«, t00=0x0146, t01=0x00ce}
0x1fdf8…1fe2c Head {h00=0x0030, h01=0x0050, text=» ST A2,CWTABW,A5 INDICATE ABORT DWT:S FOR WS«, t00=0x0146, t01=0x00f4}
0x1fe2c…1fe36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0146, t01=0x0128}
0x1fe36…1fe4a Head {h00=0x0010, h01=0x0050, text=»SH110 EQU * «, t00=0x0146, t01=0x0132}
0x1fe4a…1fe66 Head {h00=0x0018, h01=0x0050, text=» LDR* A4,A15 POP A4 «, t00=0x0146, t01=0x0146}
0x1fe66…1fe7a Head {h00=0x0010, h01=0x0050, text=»SH120 EQU * «, t00=0x0146, t01=0x0162}
0x1fe7a…1fe96 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 POP A3 «, t00=0x0146, t01=0x0176}
0x1fe96…1fea0 (327, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x0004}
0x1fea0…1feb6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0147, t01=0x000e}
0x1feb6…1fed2 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0147, t01=0x0024}
0x1fed2…1feec Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0147, t01=0x0040}
0x1feec…1fef8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0147, t01=0x005a}
0x1fef8…1ff0e Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0147, t01=0x0066}
0x1ff0e…1ff1e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0147, t01=0x007c}
0x1ff1e…1ff2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0147, t01=0x008c}
0x1ff2a…1ff34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x0098}
0x1ff34…1ff42 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0147, t01=0x00a2}
0x1ff42…1ff4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x00b0}
0x1ff4c…1ff90 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0147, t01=0x00ba}
0x1ff90…1ff9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x00fe}
0x1ff9a…1ffb2 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0147, t01=0x0108}
0x1ffb2…1ffc2 Head {h00=0x000c, h01=0x0050, text=»* GETSTA«, t00=0x0147, t01=0x0120}
0x1ffc2…1ffcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0147, t01=0x0130}
0x1ffcc…1ffe0 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0147, t01=0x013a}
0x1ffe0…20014 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE WILL CHECK THE I/O STATUS FOR«, t00=0x0147, t01=0x014e}
0x20014…20028 Head {h00=0x0010, h01=0x0050, text=»* A DEVICE. «, t00=0x0147, t01=0x0182}
0x20028…2005c Head {h00=0x0030, h01=0x0050, text=»* GETWSS WILL ONLY CHECK THE STATUS FOR THE «, t00=0x0148, t01=0x0008}
0x2005c…2007e Head {h00=0x001e, h01=0x0050, text=»* WORK STATION CONNECTION.«, t00=0x0148, t01=0x003c}
0x2007e…200b2 Head {h00=0x0030, h01=0x0050, text=»* GETLCS WILL CHECK BOTH LOGICAL CHANNEL AND«, t00=0x0148, t01=0x005e}
0x200b2…200d0 Head {h00=0x001a, h01=0x0050, text=»* WORK STATION STATUS.«, t00=0x0148, t01=0x0092}
0x200d0…200da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x00b0}
0x200da…200ea Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0148, t01=0x00ba}
0x200ea…20102 Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETLCS «, t00=0x0148, t01=0x00ca}
0x20102…2011a Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETWSS «, t00=0x0148, t01=0x00e2}
0x2011a…20124 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x00fa}
0x20124…20134 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0148, t01=0x0104}
0x20134…20150 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0148, t01=0x0114}
0x20150…2016c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x0148, t01=0x0130}
0x2016c…20176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0148, t01=0x014c}
0x20176…20188 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0148, t01=0x0156}
0x20188…201a4 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0148, t01=0x0168}
0x201a4…201c2 Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A1«, t00=0x0148, t01=0x0184}
0x201c2…201de Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0149, t01=0x0012}
0x201de…201e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x002e}
0x201e8…2022c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0149, t01=0x0038}
0x2022c…20236 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x007c}
0x20236…2024a Head {h00=0x0010, h01=0x0050, text=»GETLCS EQU *«, t00=0x0149, t01=0x0086}
0x2024a…20256 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0149, t01=0x009a}
0x20256…20272 Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x0149, t01=0x00a6}
0x20272…2027c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0149, t01=0x00c2}
0x2027c…202aa Head {h00=0x002a, h01=0x0050, text=» LDK A1,LINERR SET RETURN CODE IN CASE«, t00=0x0149, t01=0x00cc}
0x202aa…202cc Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTST,A6 DWT STATUS«, t00=0x0149, t01=0x00fa}
0x202cc…202fa Head {h00=0x002a, h01=0x0050, text=» ANK A3,DWFRES RESET PACKET RECIEVED? «, t00=0x0149, t01=0x011c}
0x202fa…2032e Head {h00=0x0030, h01=0x0050, text=» RF(NZ) LS110 YES, RETURN. RET CODE = LINERR«, t00=0x0149, t01=0x014a}
0x2032e…20354 Head {h00=0x0022, h01=0x0050, text=» RF LS100 NOT RESET. CHECK WSS«, t00=0x0149, t01=0x017e}
0x20354…2035e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0014}
0x2035e…20368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x001e}
0x20368…2037c Head {h00=0x0010, h01=0x0050, text=»GETWSS EQU *«, t00=0x014a, t01=0x0028}
0x2037c…20388 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x014a, t01=0x003c}
0x20388…203a4 Head {h00=0x0018, h01=0x0050, text=» STR A3,A15 PUSH A3 «, t00=0x014a, t01=0x0048}
0x203a4…203ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0064}
0x203ae…203b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x006e}
0x203b8…203cc Head {h00=0x0010, h01=0x0050, text=»LS100 EQU * «, t00=0x014a, t01=0x0078}
0x203cc…203ee Head {h00=0x001e, h01=0x0050, text=» LC A3,DWTCP2,A6 WS NUMBER«, t00=0x014a, t01=0x008c}
0x203ee…2040a Head {h00=0x0018, h01=0x0050, text=» ANK A3,MASKWS CLEAN«, t00=0x014a, t01=0x00ae}
0x2040a…20426 Head {h00=0x0018, h01=0x0050, text=» SLA A3,1 MAKE INDEX«, t00=0x014a, t01=0x00ca}
0x20426…20444 Head {h00=0x001a, h01=0x0050, text=» ADR A3,A5 CWT ADDRESS«, t00=0x014a, t01=0x00e6}
0x20444…20466 Head {h00=0x001e, h01=0x0050, text=» LC A1,CWTWSS,A3 WS STATUS«, t00=0x014a, t01=0x0104}
0x20466…20470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0126}
0x20470…2047a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014a, t01=0x0130}
0x2047a…2048e Head {h00=0x0010, h01=0x0050, text=»LS110 EQU * «, t00=0x014a, t01=0x013a}
0x2048e…204aa Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 POP A3 «, t00=0x014a, t01=0x014e}
0x204aa…204ca Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x014a, t01=0x016a}
0x204ca…204f8 Head {h00=0x002a, h01=0x0050, text=» ANK A1,/FF CLEAN RETURN CODE & SET CR«, t00=0x014a, t01=0x018a}
0x204f8…20510 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x014b, t01=0x0028}
0x20510…2051a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x0040}
0x2051a…20528 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014b, t01=0x004a}
0x20528…20532 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x0058}
0x20532…20576 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014b, t01=0x0062}
0x20576…20580 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x00a6}
0x20580…20598 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x014b, t01=0x00b0}
0x20598…205a8 Head {h00=0x000c, h01=0x0050, text=»* PLGTBU«, t00=0x014b, t01=0x00c8}
0x205a8…205b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x00d8}
0x205b2…205c6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x014b, t01=0x00e2}
0x205c6…20602 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE WILL ALLOCATE A BUFFER AND FORMAT IT «, t00=0x014b, t01=0x00f6}
0x20602…20638 Head {h00=0x0032, h01=0x0050, text=»* ACCORDING TO THE FORMAT USED BY THIS DRIVER.«, t00=0x014b, t01=0x0132}
0x20638…20642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014b, t01=0x0168}
0x20642…20652 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x014b, t01=0x0172}
0x20652…2066a Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLGTBU «, t00=0x014b, t01=0x0182}
0x2066a…20674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x000a}
0x20674…20684 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x014c, t01=0x0014}
0x20684…206a6 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x014c, t01=0x0024}
0x206a6…206b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0046}
0x206b0…206c2 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x014c, t01=0x0050}
0x206c2…206f0 Head {h00=0x002a, h01=0x0050, text=»* A2 = LENGTH OF USER PART OF BUFFER «, t00=0x014c, t01=0x0062}
0x206f0…20726 Head {h00=0x0032, h01=0x0050, text=»* A4 = START OF USER PART OF BUFFER (IF ANY) «, t00=0x014c, t01=0x0090}
0x20726…20750 Head {h00=0x0026, h01=0x0050, text=»* CR = NOT 0 IF BUFFER ALLOCATED «, t00=0x014c, t01=0x00c6}
0x20750…20774 Head {h00=0x0020, h01=0x0050, text=»* 0 IF NO BUFFER ALLOCATED «, t00=0x014c, t01=0x00f0}
0x20774…20790 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x014c, t01=0x0114}
0x20790…2079a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x0130}
0x2079a…207de Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014c, t01=0x013a}
0x207de…207e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014c, t01=0x017e}
0x207e8…207fc Head {h00=0x0010, h01=0x0050, text=»PLGTBU EQU *«, t00=0x014c, t01=0x0188}
0x207fc…2081a Head {h00=0x001a, h01=0x0050, text=» LDR* A2,A15 SKIP PSW «, t00=0x014d, t01=0x000c}
0x2081a…20842 Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A15 GET RETURN ADDRESS «, t00=0x014d, t01=0x002a}
0x20842…2086a Head {h00=0x0024, h01=0x0050, text=» CF A15,GETBUF A4 := BUFFER. INH«, t00=0x014d, t01=0x0052}
0x2086a…20890 Head {h00=0x0022, h01=0x0050, text=» ABR(Z) A2 RETURN IF NO BUFFER«, t00=0x014d, t01=0x007a}
0x20890…2089a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014d, t01=0x00a0}
0x2089a…208c2 Head {h00=0x0024, h01=0x0050, text=» ST A2,0,A15 SAVE RETURN ADDRESS«, t00=0x014d, t01=0x00aa}
0x208c2…208ec Head {h00=0x0026, h01=0x0050, text=» ADK A4,BUFHLN START OF USER PART «, t00=0x014d, t01=0x00d2}
0x208ec…2091c Head {h00=0x002c, h01=0x0050, text=» ST A7,BUFLNK,A4 SAVE POOLBLOCK ADDRESS «, t00=0x014d, t01=0x00fc}
0x2091c…20940 Head {h00=0x0020, h01=0x0050, text=» LD A2,POBBUS,A7 BUFFER SIZE«, t00=0x014d, t01=0x012c}
0x20940…20970 Head {h00=0x002c, h01=0x0050, text=» SUK A2,BUFHLN A2 := LENGTH OF USER PART«, t00=0x014d, t01=0x0150}
0x20970…20994 Head {h00=0x0020, h01=0x0050, text=» RF(P) GU100 CONTINUE IF OK «, t00=0x014d, t01=0x0180}
0x20994…209c8 Head {h00=0x0030, h01=0x0050, text=» ANK A2,0 TOO SHORT. BUFFER LENGTH & CR := 0«, t00=0x014e, t01=0x0014}
0x209c8…209dc Head {h00=0x0010, h01=0x0050, text=»GU100 EQU * «, t00=0x014e, t01=0x0048}
0x209dc…20a08 Head {h00=0x0028, h01=0x0050, text=» ST A2,BUFLEN,A4 USER BUFFER LENGTH «, t00=0x014e, t01=0x005c}
0x20a08…20a20 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x014e, t01=0x0088}
0x20a20…20a2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x00a0}
0x20a2a…20a38 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x014e, t01=0x00aa}
0x20a38…20a42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x00b8}
0x20a42…20a86 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014e, t01=0x00c2}
0x20a86…20a90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x0106}
0x20a90…20aa8 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x014e, t01=0x0110}
0x20aa8…20ab8 Head {h00=0x000c, h01=0x0050, text=»* PLRLBU«, t00=0x014e, t01=0x0128}
0x20ab8…20ac2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014e, t01=0x0138}
0x20ac2…20ad6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x014e, t01=0x0142}
0x20ad6…20b0a Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE RELEASES AN I/O BUFFER OF THE«, t00=0x014e, t01=0x0156}
0x20b0a…20b30 Head {h00=0x0022, h01=0x0050, text=»* FORMAT USED BY THIS DRIVER. «, t00=0x014e, t01=0x018a}
0x20b30…20b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0020}
0x20b3a…20b4a Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x014f, t01=0x002a}
0x20b4a…20b62 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLRLBU «, t00=0x014f, t01=0x003a}
0x20b62…20b6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x0052}
0x20b6c…20b7c Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x014f, t01=0x005c}
0x20b7c…20b9a Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x014f, t01=0x006c}
0x20b9a…20ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x008a}
0x20ba4…20bb6 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x014f, t01=0x0094}
0x20bb6…20bce Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x014f, t01=0x00a6}
0x20bce…20be6 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x014f, t01=0x00be}
0x20be6…20c0c Head {h00=0x0022, h01=0x0050, text=»* INTERR. INHIBITED IF CPU 852«, t00=0x014f, t01=0x00d6}
0x20c0c…20c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x00fc}
0x20c16…20c5a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x014f, t01=0x0106}
0x20c5a…20c64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x014f, t01=0x014a}
0x20c64…20c78 Head {h00=0x0010, h01=0x0050, text=»PLRLBU EQU *«, t00=0x014f, t01=0x0154}
0x20c78…20c94 Head {h00=0x0018, h01=0x0050, text=» STR A7,A15 PUSH A7 «, t00=0x014f, t01=0x0168}
0x20c94…20cbe Head {h00=0x0026, h01=0x0050, text=» LD A7,BUFLNK,A4 POOLBLOCK ADDRESS«, t00=0x014f, t01=0x0184}
0x20cbe…20cf4 Head {h00=0x0032, h01=0x0050, text=» SUK A4,BUFHLN A4 :- PHYSICAL START OF BUFFER «, t00=0x0150, t01=0x001e}
0x20cf4…20d20 Head {h00=0x0028, h01=0x0050, text=» CF A15,RELBUF RELEASE BUFFER & INH «, t00=0x0150, t01=0x0054}
0x20d20…20d3c Head {h00=0x0018, h01=0x0050, text=» LDR* A7,A15 POP A7 «, t00=0x0150, t01=0x0080}
0x20d3c…20d46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x009c}
0x20d46…20d5c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0150, t01=0x00a6}
0x20d5c…20d78 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0150, t01=0x00bc}
0x20d78…20d92 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0150, t01=0x00d8}
0x20d92…20d9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0150, t01=0x00f2}
0x20d9e…20db4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0150, t01=0x00fe}
0x20db4…20dc4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0150, t01=0x0114}
0x20dc4…20dd0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0150, t01=0x0124}
0x20dd0…20dde Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0150, t01=0x0130}
0x20dde…20de8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x013e}
0x20de8…20e2c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0150, t01=0x0148}
0x20e2c…20e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0150, t01=0x018c}
0x20e36…20e4e Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0151, t01=0x0008}
0x20e4e…20e5e Head {h00=0x000c, h01=0x0050, text=»* PLCHAR«, t00=0x0151, t01=0x0020}
0x20e5e…20e68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0030}
0x20e68…20e7c Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0151, t01=0x003a}
0x20e7c…20eb0 Head {h00=0x0030, h01=0x0050, text=»* THESE ROUTINES ARE USED TO GET A CHARACTER«, t00=0x0151, t01=0x004e}
0x20eb0…20ee8 Head {h00=0x0034, h01=0x0050, text=»* FROM A BUFFER OR PUT A CHARACTER IN A BUFFER. «, t00=0x0151, t01=0x0082}
0x20ee8…20f20 Head {h00=0x0034, h01=0x0050, text=»* THE BUFFER SHOULD HAVE A HEADER OF THE NORMAL «, t00=0x0151, t01=0x00ba}
0x20f20…20f52 Head {h00=0x002e, h01=0x0050, text=»* PLC FORMAT (SE "BUFFER LAYOUT" CONSTANT «, t00=0x0151, t01=0x00f2}
0x20f52…20f68 Head {h00=0x0012, h01=0x0050, text=»* DEFINITION).«, t00=0x0151, t01=0x0124}
0x20f68…20f72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x013a}
0x20f72…20f82 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0151, t01=0x0144}
0x20f82…20f9a Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLGECH «, t00=0x0151, t01=0x0154}
0x20f9a…20fb2 Head {h00=0x0014, h01=0x0050, text=»* CF A15,PLPUCH «, t00=0x0151, t01=0x016c}
0x20fb2…20fbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0151, t01=0x0184}
0x20fbc…20fcc Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0151, t01=0x018e}
0x20fcc…20fe8 Head {h00=0x0018, h01=0x0050, text=»* A2 = IF PUT CHAR «, t00=0x0152, t01=0x000e}
0x20fe8…21006 Head {h00=0x001a, h01=0x0050, text=»* BITS 0-7 IRRELEVANT«, t00=0x0152, t01=0x002a}
0x21006…21024 Head {h00=0x001a, h01=0x0050, text=»* BITS 8-15 CHARACTER«, t00=0x0152, t01=0x0048}
0x21024…21042 Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x0152, t01=0x0066}
0x21042…2104c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0152, t01=0x0084}
0x2104c…2105e Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0152, t01=0x008e}
0x2105e…2107a Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE «, t00=0x0152, t01=0x00a0}
0x2107a…210a4 Head {h00=0x0026, h01=0x0050, text=»* -1 IF OVERFLOW/UNDERFLOW, ELSE «, t00=0x0152, t01=0x00bc}
0x210a4…210bc Head {h00=0x0014, h01=0x0050, text=»* AT PLPUCH: 0«, t00=0x0152, t01=0x00e6}
0x210bc…210ec Head {h00=0x002c, h01=0x0050, text=»* AT PLGECH: NR OF CHAR LEFT IN BUFFER«, t00=0x0152, t01=0x00fe}
0x210ec…21110 Head {h00=0x0020, h01=0x0050, text=»* A2 = IF PLGECH & A1>=0 : «, t00=0x0152, t01=0x012e}
0x21110…21128 Head {h00=0x0014, h01=0x0050, text=»* BITS 0-7 ZERO«, t00=0x0152, t01=0x0152}
0x21128…21146 Head {h00=0x001a, h01=0x0050, text=»* BITS 8-15 CHARACTER«, t00=0x0152, t01=0x016a}
0x21146…21162 Head {h00=0x0018, h01=0x0050, text=»* INTERR. INHIBITED «, t00=0x0152, t01=0x0188}
0x21162…2116c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0014}
0x2116c…211b0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0153, t01=0x001e}
0x211b0…211ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x0062}
0x211ba…211c8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0153, t01=0x006c}
0x211c8…211d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x007a}
0x211d2…211e6 Head {h00=0x0010, h01=0x0050, text=»PLGECH EQU *«, t00=0x0153, t01=0x0084}
0x211e6…211f2 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0153, t01=0x0098}
0x211f2…211fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0153, t01=0x00a4}
0x211fc…2122e Head {h00=0x002e, h01=0x0050, text=» LD A1,BUFLEN,A4 LENGTH OF TEXT IN BUFFER «, t00=0x0153, t01=0x00ae}
0x2122e…21252 Head {h00=0x0020, h01=0x0050, text=» LD A2,BUFBIX,A4 BYTE INDEX «, t00=0x0153, t01=0x00e0}
0x21252…21264 Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0153, t01=0x0104}
0x21264…2128c Head {h00=0x0024, h01=0x0050, text=» SUK A1,1 A1 := NR OF CHAR LEFT «, t00=0x0153, t01=0x0116}
0x2128c…212b2 Head {h00=0x0022, h01=0x0050, text=» RF(N) CH100 EXIT IF UNDERFLOW«, t00=0x0153, t01=0x013e}
0x212b2…212d8 Head {h00=0x0022, h01=0x0050, text=» IM BUFBIX,A4 INCREMENT INDEX «, t00=0x0153, t01=0x0164}
0x212d8…21308 Head {h00=0x002c, h01=0x0050, text=» ADR A2,A4 ABSOLUTE ADDRESS OF CHARACTER«, t00=0x0153, t01=0x018a}
0x21308…21328 Head {h00=0x001c, h01=0x0050, text=» LCR A2,A2 GET CHARACTER«, t00=0x0154, t01=0x002a}
0x21328…21342 Head {h00=0x0016, h01=0x0050, text=» ANK A2,/FF CLEAN «, t00=0x0154, t01=0x004a}
0x21342…2134c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0064}
0x2134c…2136a Head {h00=0x001a, h01=0x0050, text=» RF CH110 NORMAL EXIT «, t00=0x0154, t01=0x006e}
0x2136a…21374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x008c}
0x21374…2137e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x0096}
0x2137e…21392 Head {h00=0x0010, h01=0x0050, text=»PLPUCH EQU *«, t00=0x0154, t01=0x00a0}
0x21392…2139e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0154, t01=0x00b4}
0x2139e…213a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0154, t01=0x00c0}
0x213a8…213cc Head {h00=0x0020, h01=0x0050, text=» LD A1,BUFBIX,A4 BYTE INDEX «, t00=0x0154, t01=0x00ca}
0x213cc…213f4 Head {h00=0x0024, h01=0x0050, text=» CW A1,BUFLEN,A4 OUTSIDE BUFFER?«, t00=0x0154, t01=0x00ee}
0x213f4…21414 Head {h00=0x001c, h01=0x0050, text=» RF(NL) CH100 YES, ERROR«, t00=0x0154, t01=0x0116}
0x21414…2143a Head {h00=0x0022, h01=0x0050, text=» IM BUFBIX,A4 INCREMENT INDEX «, t00=0x0154, t01=0x0136}
0x2143a…21462 Head {h00=0x0024, h01=0x0050, text=» ADR A1,A4 FREE PLACE IN BUFFER «, t00=0x0154, t01=0x015c}
0x21462…2148c Head {h00=0x0026, h01=0x0050, text=» SCR A2,A1 PUT CHARACTER IN BUFFER«, t00=0x0154, t01=0x0184}
0x2148c…214b0 Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RETURN CODE := OK «, t00=0x0155, t01=0x001e}
0x214b0…214ce Head {h00=0x001a, h01=0x0050, text=» RF CH110 NORMAL EXIT «, t00=0x0155, t01=0x0042}
0x214ce…214d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0060}
0x214d8…214e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x006a}
0x214e2…214f6 Head {h00=0x0010, h01=0x0050, text=»CH100 EQU * «, t00=0x0155, t01=0x0074}
0x214f6…2151e Head {h00=0x0024, h01=0x0050, text=» LDKL A1,-1 RETURN CODE := ERROR«, t00=0x0155, t01=0x0088}
0x2151e…21532 Head {h00=0x0010, h01=0x0050, text=»CH110 EQU * «, t00=0x0155, t01=0x00b0}
0x21532…21552 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x0155, t01=0x00c4}
0x21552…2156a Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x0155, t01=0x00e4}
0x2156a…21574 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x00fc}
0x21574…21582 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0155, t01=0x0106}
0x21582…2158c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0114}
0x2158c…215d0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0155, t01=0x011e}
0x215d0…215da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0155, t01=0x0162}
0x215da…215f2 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0155, t01=0x016c}
0x215f2…21602 Head {h00=0x000c, h01=0x0050, text=»* INTYPE«, t00=0x0155, t01=0x0184}
0x21602…2160c (342, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x0004}
0x2160c…21620 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0156, t01=0x000e}
0x21620…21658 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE CHECKS A GENERAL READ ANSWER FROM«, t00=0x0156, t01=0x0022}
0x21658…21688 Head {h00=0x002c, h01=0x0050, text=»* THE PLC TO DETERMINE TYPE OF MESSAGE. «, t00=0x0156, t01=0x005a}
0x21688…21692 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x008a}
0x21692…216a2 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0156, t01=0x0094}
0x216a2…216ba Head {h00=0x0014, h01=0x0050, text=»* CF A15,INTYPE «, t00=0x0156, t01=0x00a4}
0x216ba…216c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x00bc}
0x216c4…216d4 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0156, t01=0x00c6}
0x216d4…216f0 Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x0156, t01=0x00d6}
0x216f0…216fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x00f2}
0x216fa…2170c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0156, t01=0x00fc}
0x2170c…21724 Head {h00=0x0014, h01=0x0050, text=»* A2 = CHANGED «, t00=0x0156, t01=0x010e}
0x21724…21738 Head {h00=0x0010, h01=0x0050, text=»* A3 = TYPE«, t00=0x0156, t01=0x0126}
0x21738…21750 Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x0156, t01=0x013a}
0x21750…21768 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0156, t01=0x0152}
0x21768…21772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0156, t01=0x016a}
0x21772…217b6 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0156, t01=0x0174}
0x217b6…217c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x0028}
0x217c0…217d4 Head {h00=0x0010, h01=0x0050, text=»INTYPE EQU *«, t00=0x0157, t01=0x0032}
0x217d4…21800 Head {h00=0x0028, h01=0x0050, text=» LDK A2,X25DAT MINIMUM INPUT LENGTH «, t00=0x0157, t01=0x0046}
0x21800…21832 Head {h00=0x002e, h01=0x0050, text=» CW A2,CWTRCA+CCRLEN,A5 LENGTH >= MINIMUM?«, t00=0x0157, t01=0x0072}
0x21832…21850 Head {h00=0x001a, h01=0x0050, text=» RF(G) ITERR NO, ERROR«, t00=0x0157, t01=0x00a4}
0x21850…2185a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x00c2}
0x2185a…21868 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0157, t01=0x00cc}
0x21868…21872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x00da}
0x21872…218a0 Head {h00=0x002a, h01=0x0050, text=» LD A3,CWTRCA+CCRBUF,A5 BUFFER ADDRESS«, t00=0x0157, t01=0x00e4}
0x218a0…218c6 Head {h00=0x0022, h01=0x0050, text=» LC A2,X25LGN,A3 GROUP NUMBER «, t00=0x0157, t01=0x0112}
0x218c6…218de Head {h00=0x0014, h01=0x0050, text=» LDR A4,A2 SAVE «, t00=0x0157, t01=0x0138}
0x218de…218f8 Head {h00=0x0016, h01=0x0050, text=» ANK A4,/0F CLEAN «, t00=0x0157, t01=0x0150}
0x218f8…2191c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) IT120 NOT GROUP ZERO«, t00=0x0157, t01=0x016a}
0x2191c…21926 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0157, t01=0x018e}
0x21926…21958 Head {h00=0x002e, h01=0x0050, text=»* CHANNEL GROUP ZERO. NORMAL MESSAGES. «, t00=0x0158, t01=0x0008}
0x21958…21982 Head {h00=0x0026, h01=0x0050, text=» LC A3,X25FLW,A3 FLOW CONTROL BYTE«, t00=0x0158, t01=0x003a}
0x21982…2199a Head {h00=0x0014, h01=0x0050, text=» LDR A4,A3 SAVE «, t00=0x0158, t01=0x0064}
0x2199a…219b2 Head {h00=0x0014, h01=0x0050, text=» ANK A4,/01 FLAG«, t00=0x0158, t01=0x007c}
0x219b2…219d8 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) IT100 NOT DATA PACKET «, t00=0x0158, t01=0x0094}
0x219d8…21a02 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYDATA ASSUME NORMAL DATA «, t00=0x0158, t01=0x00ba}
0x21a02…21a26 Head {h00=0x0020, h01=0x0050, text=» ANK A2,/80 QUALIFY BIT SET?«, t00=0x0158, t01=0x00e4}
0x21a26…21a52 Head {h00=0x0028, h01=0x0050, text=» RF(Z) ITEXIT NO, NORMAL DATA. EXIT «, t00=0x0158, t01=0x0108}
0x21a52…21a7c Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYSTAT YES, STATUS MESSAGE«, t00=0x0158, t01=0x0134}
0x21a7c…21a94 Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x0158, t01=0x015e}
0x21a94…21a9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0158, t01=0x0176}
0x21a9e…21ab2 Head {h00=0x0010, h01=0x0050, text=»IT100 EQU * «, t00=0x0158, t01=0x0180}
0x21ab2…21adc (345, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LDR A4,A3 SAVE FLOW CONTROL BYTE «, t00=0x0159, t01=0x0004}
0x21adc…21afe Head {h00=0x001e, h01=0x0050, text=» ANK A3,/02 RECIEVE READY?«, t00=0x0159, t01=0x002e}
0x21afe…21b16 Head {h00=0x0014, h01=0x0050, text=» RF(NZ) IT110 NO«, t00=0x0159, t01=0x0050}
0x21b16…21b40 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYRR TYPE := RECIEVE READY«, t00=0x0159, t01=0x0068}
0x21b40…21b58 Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x0159, t01=0x0092}
0x21b58…21b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x00aa}
0x21b62…21b76 Head {h00=0x0010, h01=0x0050, text=»IT110 EQU * «, t00=0x0159, t01=0x00b4}
0x21b76…21ba0 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYRES ASSUME TYPE = RESET «, t00=0x0159, t01=0x00c8}
0x21ba0…21bc0 Head {h00=0x001c, h01=0x0050, text=» ANK A4,/04 IS IT RESET?«, t00=0x0159, t01=0x00f2}
0x21bc0…21be0 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ITEXIT YES, EXIT «, t00=0x0159, t01=0x0112}
0x21be0…21c16 Head {h00=0x0032, h01=0x0050, text=» LDK A3,TYRESC NO, TYPE := RESET CONFIRMATION «, t00=0x0159, t01=0x0132}
0x21c16…21c2e Head {h00=0x0014, h01=0x0050, text=» RF ITEXIT EXIT «, t00=0x0159, t01=0x0168}
0x21c2e…21c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0159, t01=0x0180}
0x21c38…21c46 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0159, t01=0x018a}
0x21c46…21c50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x0008}
0x21c50…21c64 Head {h00=0x0010, h01=0x0050, text=»IT120 EQU * «, t00=0x015a, t01=0x0012}
0x21c64…21c84 Head {h00=0x001c, h01=0x0050, text=»* NOT NORMAL MESSAGE «, t00=0x015a, t01=0x0026}
0x21c84…21cb8 Head {h00=0x0030, h01=0x0050, text=» LDK A3,TYNFLO ASSUME TYPE = NO FLOW CONTROL«, t00=0x015a, t01=0x0046}
0x21cb8…21ce0 Head {h00=0x0024, h01=0x0050, text=» SUK A4,1 IS IT NO FLOW CONTROL?«, t00=0x015a, t01=0x007a}
0x21ce0…21d00 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ITEXIT YES, EXIT «, t00=0x015a, t01=0x00a2}
0x21d00…21d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x00c2}
0x21d0a…21d1e Head {h00=0x0010, h01=0x0050, text=»ITERR EQU * «, t00=0x015a, t01=0x00cc}
0x21d1e…21d48 Head {h00=0x0026, h01=0x0050, text=» LDK A3,TYERR IRRECOVERABLE ERROR «, t00=0x015a, t01=0x00e0}
0x21d48…21d52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015a, t01=0x010a}
0x21d52…21d66 Head {h00=0x0010, h01=0x0050, text=»ITEXIT EQU *«, t00=0x015a, t01=0x0114}
0x21d66…21d7c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x015a, t01=0x0128}
0x21d7c…21d98 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x015a, t01=0x013e}
0x21d98…21db2 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x015a, t01=0x015a}
0x21db2…21dbe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015a, t01=0x0174}
0x21dbe…21dd4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x015a, t01=0x0180}
0x21dd4…21de4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x015b, t01=0x0008}
0x21de4…21df0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015b, t01=0x0018}
0x21df0…21dfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0024}
0x21dfa…21e08 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015b, t01=0x002e}
0x21e08…21e12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x003c}
0x21e12…21e56 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015b, t01=0x0046}
0x21e56…21e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x008a}
0x21e60…21e78 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x015b, t01=0x0094}
0x21e78…21e88 Head {h00=0x000c, h01=0x0050, text=»* OUTBUQ«, t00=0x015b, t01=0x00ac}
0x21e88…21e92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x00bc}
0x21e92…21ea6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x015b, t01=0x00c6}
0x21ea6…21ee2 Head {h00=0x0038, h01=0x0050, text=»* THIS ROUTINE WILL REMOVE A DWT FROM THE QUEUES FOR«, t00=0x015b, t01=0x00da}
0x21ee2…21f1a Head {h00=0x0034, h01=0x0050, text=»* SHORT OR LONG OUTPUT BUFFERS, IF IT IS IN ANY «, t00=0x015b, t01=0x0116}
0x21f1a…21f32 Head {h00=0x0014, h01=0x0050, text=»* OF THE QUEUES.«, t00=0x015b, t01=0x014e}
0x21f32…21f3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015b, t01=0x0166}
0x21f3c…21f4c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x015b, t01=0x0170}
0x21f4c…21f64 Head {h00=0x0014, h01=0x0050, text=»* CF A15,OUTBUQ «, t00=0x015b, t01=0x0180}
0x21f64…21f6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0008}
0x21f6e…21f7e Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x015c, t01=0x0012}
0x21f7e…21f9a Head {h00=0x0018, h01=0x0050, text=»* A5 = CWT ADDRESS «, t00=0x015c, t01=0x0022}
0x21f9a…21fb6 Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS «, t00=0x015c, t01=0x003e}
0x21fb6…21fc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x005a}
0x21fc0…21fd2 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x015c, t01=0x0064}
0x21fd2…21ff4 Head {h00=0x001e, h01=0x0050, text=»* A2 = NOT 0 IF DWT FOUND«, t00=0x015c, t01=0x0076}
0x21ff4…22012 Head {h00=0x001a, h01=0x0050, text=»* 0 IF DWT NOT FOUND«, t00=0x015c, t01=0x0098}
0x22012…2202a Head {h00=0x0014, h01=0x0050, text=»* A4 = CHANGED «, t00=0x015c, t01=0x00b6}
0x2202a…22042 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x015c, t01=0x00ce}
0x22042…2204c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x00e6}
0x2204c…22090 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015c, t01=0x00f0}
0x22090…2209a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015c, t01=0x0134}
0x2209a…220ae Head {h00=0x0010, h01=0x0050, text=»OUTBUQ EQU *«, t00=0x015c, t01=0x013e}
0x220ae…220ca Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x015c, t01=0x0152}
0x220ca…220e6 Head {h00=0x0018, h01=0x0050, text=» STR A7,A15 PUSH A7 «, t00=0x015c, t01=0x016e}
0x220e6…22104 Head {h00=0x001a, h01=0x0050, text=» LDR A4,A6 DWT ADDRESS«, t00=0x015c, t01=0x018a}
0x22104…22126 Head {h00=0x001e, h01=0x0050, text=» ADKL A4,DWTOTQ QUEUE LINK«, t00=0x015d, t01=0x0018}
0x22126…22130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x003a}
0x22130…2214e Head {h00=0x001a, h01=0x0050, text=» LDR A7,A5 CWT ADDRESS«, t00=0x015d, t01=0x0044}
0x2214e…22178 Head {h00=0x0026, h01=0x0050, text=» ADK A7,CWTSBQ SHORT BUFFERS QUEUE«, t00=0x015d, t01=0x0062}
0x22178…221a4 Head {h00=0x0028, h01=0x0050, text=» CF A15,LNKOUT REMOVE DWT FROM QUEUE«, t00=0x015d, t01=0x008c}
0x221a4…221be Head {h00=0x0016, h01=0x0050, text=» LDR A7,A7 FOUND? «, t00=0x015d, t01=0x00b8}
0x221be…221e0 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) OB100 YES, RETURN «, t00=0x015d, t01=0x00d2}
0x221e0…221ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x00f4}
0x221ea…221fc Head {h00=0x000e, h01=0x0050, text=» LDR A7,A5«, t00=0x015d, t01=0x00fe}
0x221fc…22226 Head {h00=0x0026, h01=0x0050, text=» ADKL A7,CWTLBQ LONG BUFFERS QUEUE«, t00=0x015d, t01=0x0110}
0x22226…2224e Head {h00=0x0024, h01=0x0050, text=» CF A15,LNKOUT REMOVE FROM QUEUE«, t00=0x015d, t01=0x013a}
0x2224e…22258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015d, t01=0x0162}
0x22258…2226c Head {h00=0x0010, h01=0x0050, text=»OB100 EQU * «, t00=0x015d, t01=0x016c}
0x2226c…22296 Head {h00=0x0026, h01=0x0050, text=» LDR A2,A7 A2 := FOUND / NOT FOUND«, t00=0x015d, t01=0x0180}
0x22296…222a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x001a}
0x222a0…222bc Head {h00=0x0018, h01=0x0050, text=» LDR* A7,A15 POP A7 «, t00=0x015e, t01=0x0024}
0x222bc…222d8 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x015e, t01=0x0040}
0x222d8…222ee Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x015e, t01=0x005c}
0x222ee…2230a Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x015e, t01=0x0072}
0x2230a…22324 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x015e, t01=0x008e}
0x22324…22330 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015e, t01=0x00a8}
0x22330…22346 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x015e, t01=0x00b4}
0x22346…22356 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x015e, t01=0x00ca}
0x22356…22362 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x015e, t01=0x00da}
0x22362…2236c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x00e6}
0x2236c…2237a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x015e, t01=0x00f0}
0x2237a…22384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x00fe}
0x22384…223c8 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x015e, t01=0x0108}
0x223c8…223d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x014c}
0x223d2…223ea Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x015e, t01=0x0156}
0x223ea…223fa Head {h00=0x000c, h01=0x0050, text=»* LNKFST«, t00=0x015e, t01=0x016e}
0x223fa…22404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015e, t01=0x017e}
0x22404…22418 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x015e, t01=0x0188}
0x22418…2244e Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE LINKS A QUEUE ELEMENT FIRST IN «, t00=0x015f, t01=0x000c}
0x2244e…22478 Head {h00=0x0026, h01=0x0050, text=»* A QUEUE (CLOSEST TO QUEUE HEAD).«, t00=0x015f, t01=0x0042}
0x22478…224ae Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x015f, t01=0x006c}
0x224ae…224e4 Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x015f, t01=0x00a2}
0x224e4…224f6 Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x015f, t01=0x00d8}
0x224f6…22500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x00ea}
0x22500…22510 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x015f, t01=0x00f4}
0x22510…22528 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKFST «, t00=0x015f, t01=0x0104}
0x22528…22532 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x011c}
0x22532…22542 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x015f, t01=0x0126}
0x22542…2256c Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x015f, t01=0x0136}
0x2256c…22594 Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x015f, t01=0x0160}
0x22594…2259e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x015f, t01=0x0188}
0x2259e…225b0 (352, 0, 400) Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0160, t01=0x0004}
0x225b0…225c8 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0160, t01=0x0016}
0x225c8…225e0 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0160, t01=0x002e}
0x225e0…225ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x0046}
0x225ea…2262e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0160, t01=0x0050}
0x2262e…22638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0160, t01=0x0094}
0x22638…2264c Head {h00=0x0010, h01=0x0050, text=»LNKFST EQU *«, t00=0x0160, t01=0x009e}
0x2264c…22674 Head {h00=0x0024, h01=0x0050, text=» LDR* A1,A7 FIRST QUEUE ELEMENT «, t00=0x0160, t01=0x00b2}
0x22674…226a0 Head {h00=0x0028, h01=0x0050, text=» STR A1,A4 SET LINK FROM NEW ELEMENT«, t00=0x0160, t01=0x00da}
0x226a0…226c8 Head {h00=0x0024, h01=0x0050, text=» STR A4,A7 SET NEW ELEMENT FIRST«, t00=0x0160, t01=0x0106}
0x226c8…226de Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0160, t01=0x012e}
0x226de…226f8 Head {h00=0x0016, h01=0x0050, text=» RF LNKRET RETURN «, t00=0x0160, t01=0x0144}
0x226f8…22704 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0160, t01=0x015e}
0x22704…2271a Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0160, t01=0x016a}
0x2271a…2272a Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0160, t01=0x0180}
0x2272a…22736 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0160, t01=0x0190}
0x22736…22740 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x000c}
0x22740…2274e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0161, t01=0x0016}
0x2274e…22758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0024}
0x22758…2279c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0161, t01=0x002e}
0x2279c…227a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x0072}
0x227a6…227be Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0161, t01=0x007c}
0x227be…227ce Head {h00=0x000c, h01=0x0050, text=»* LNKLST«, t00=0x0161, t01=0x0094}
0x227ce…227d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0161, t01=0x00a4}
0x227d8…227ec Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0161, t01=0x00ae}
0x227ec…22820 Head {h00=0x0030, h01=0x0050, text=»* THIS ROUTINE LINKS A QUEUE ELEMENT LAST IN«, t00=0x0161, t01=0x00c2}
0x22820…2284e Head {h00=0x002a, h01=0x0050, text=»* A QUEUE (OPOSITE END TO QUEUE HEAD).«, t00=0x0161, t01=0x00f6}
0x2284e…22884 Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0161, t01=0x0124}
0x22884…228ba Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0161, t01=0x015a}
0x228ba…228cc Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0161, t01=0x0190}
0x228cc…228d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0012}
0x228d6…228e6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0162, t01=0x001c}
0x228e6…228fe Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKLST «, t00=0x0162, t01=0x002c}
0x228fe…22908 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0044}
0x22908…22918 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0162, t01=0x004e}
0x22918…22942 Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0162, t01=0x005e}
0x22942…2296a Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0162, t01=0x0088}
0x2296a…22974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x00b0}
0x22974…22986 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0162, t01=0x00ba}
0x22986…2299e Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0162, t01=0x00cc}
0x2299e…229b6 Head {h00=0x0014, h01=0x0050, text=»* A7 = CHANGED «, t00=0x0162, t01=0x00e4}
0x229b6…229ce Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0162, t01=0x00fc}
0x229ce…229d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0114}
0x229d8…22a1c Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0162, t01=0x011e}
0x22a1c…22a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0162, t01=0x0162}
0x22a26…22a3a Head {h00=0x0010, h01=0x0050, text=»LNKLST EQU *«, t00=0x0162, t01=0x016c}
0x22a3a…22a62 Head {h00=0x0024, h01=0x0050, text=» LDR A1,A7 SAVE PRESENT ELEMENT «, t00=0x0162, t01=0x0180}
0x22a62…22a82 Head {h00=0x001c, h01=0x0050, text=» LDR* A7,A7 NEXT ELEMENT«, t00=0x0163, t01=0x0018}
0x22a82…22ab6 Head {h00=0x0030, h01=0x0050, text=» RB(NZ) LNKLST CONTINUE IF NOT LAST ELEMENT «, t00=0x0163, t01=0x0038}
0x22ab6…22ae4 Head {h00=0x002a, h01=0x0050, text=» STR A4,A1 LINK NEW ELEMENT AFTER LAST«, t00=0x0163, t01=0x006c}
0x22ae4…22b12 Head {h00=0x002a, h01=0x0050, text=» CMR A4 SET END MARKER IN LAST ELEMENT«, t00=0x0163, t01=0x009a}
0x22b12…22b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x00c8}
0x22b1c…22b2a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0163, t01=0x00d2}
0x22b2a…22b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x00e0}
0x22b34…22b4a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0163, t01=0x00ea}
0x22b4a…22b64 Head {h00=0x0016, h01=0x0050, text=» RF LNKRET RETURN «, t00=0x0163, t01=0x0100}
0x22b64…22b70 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0163, t01=0x011a}
0x22b70…22b86 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0163, t01=0x0126}
0x22b86…22b96 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0163, t01=0x013c}
0x22b96…22ba2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0163, t01=0x014c}
0x22ba2…22bac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0158}
0x22bac…22bba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0163, t01=0x0162}
0x22bba…22bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0163, t01=0x0170}
0x22bc4…22c08 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0163, t01=0x017a}
0x22c08…22c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x002e}
0x22c12…22c2a Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0164, t01=0x0038}
0x22c2a…22c3a Head {h00=0x000c, h01=0x0050, text=»* LNKOUT«, t00=0x0164, t01=0x0050}
0x22c3a…22c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0060}
0x22c44…22c58 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0164, t01=0x006a}
0x22c58…22c90 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE REMOVES AN ELEMENT FROM A QUEUE. «, t00=0x0164, t01=0x007e}
0x22c90…22cc6 Head {h00=0x0032, h01=0x0050, text=»* ONE WORD IN EACH ELEMENT IS USED AS A LINK. «, t00=0x0164, t01=0x00b6}
0x22cc6…22cfc Head {h00=0x0032, h01=0x0050, text=»* END OF QUEUE IS INDICATED BY LINK=0 IN LAST «, t00=0x0164, t01=0x00ec}
0x22cfc…22d0e Head {h00=0x000e, h01=0x0050, text=»* ELEMENT.«, t00=0x0164, t01=0x0122}
0x22d0e…22d18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0134}
0x22d18…22d28 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0164, t01=0x013e}
0x22d28…22d40 Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKOUT «, t00=0x0164, t01=0x014e}
0x22d40…22d4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0164, t01=0x0166}
0x22d4a…22d5a Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0164, t01=0x0170}
0x22d5a…22d84 Head {h00=0x0026, h01=0x0050, text=»* A4 = QUEUE ELEMENT LINK ADDRESS«, t00=0x0164, t01=0x0180}
0x22d84…22dac Head {h00=0x0024, h01=0x0050, text=»* A7 = QUEUE HEAD LINK ADDRESS «, t00=0x0165, t01=0x001a}
0x22dac…22db6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0042}
0x22db6…22dc8 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0165, t01=0x004c}
0x22dc8…22de0 Head {h00=0x0014, h01=0x0050, text=»* A1 = CHANGED «, t00=0x0165, t01=0x005e}
0x22de0…22e08 Head {h00=0x0024, h01=0x0050, text=»* A7 = =0 IF ELEMENT NOT FOUND «, t00=0x0165, t01=0x0076}
0x22e08…22e28 Head {h00=0x001c, h01=0x0050, text=»* ><0 IF ELEMENT FOUND «, t00=0x0165, t01=0x009e}
0x22e28…22e40 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x0165, t01=0x00be}
0x22e40…22e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x00d6}
0x22e4a…22e8e Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0165, t01=0x00e0}
0x22e8e…22e98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0165, t01=0x0124}
0x22e98…22eac Head {h00=0x0010, h01=0x0050, text=»LNKOUT EQU *«, t00=0x0165, t01=0x012e}
0x22eac…22ed4 Head {h00=0x0024, h01=0x0050, text=» LDR A1,A7 SAVE PRESENT ELEMENT «, t00=0x0165, t01=0x0142}
0x22ed4…22ef4 Head {h00=0x001c, h01=0x0050, text=» LDR* A7,A7 NEXT ELEMENT«, t00=0x0165, t01=0x016a}
0x22ef4…22f1e Head {h00=0x0026, h01=0x0050, text=» RF(Z) LO100 EXIT IF END OF QUEUE «, t00=0x0165, t01=0x018a}
0x22f1e…22f40 Head {h00=0x001e, h01=0x0050, text=» CWR A4,A7 ELEMENT FOUND? «, t00=0x0166, t01=0x0024}
0x22f40…22f66 Head {h00=0x0022, h01=0x0050, text=» RB(NE) LNKOUT NO, CHECK NEXT «, t00=0x0166, t01=0x0046}
0x22f66…22f70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x006c}
0x22f70…22f7e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0166, t01=0x0076}
0x22f7e…22f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x0084}
0x22f88…22fb8 Head {h00=0x002c, h01=0x0050, text=» LDR* A7,A7 ELEMENT AFTER WANTED ELEMENT«, t00=0x0166, t01=0x008e}
0x22fb8…22fea Head {h00=0x002e, h01=0x0050, text=» STR A7,A1 SET LINK FROM PREVIOUS TO NEXT «, t00=0x0166, t01=0x00be}
0x22fea…23012 Head {h00=0x0024, h01=0x0050, text=» LDK A7,1 INDICATE ELEMENT FOUND«, t00=0x0166, t01=0x00f0}
0x23012…23026 Head {h00=0x0010, h01=0x0050, text=»LO100 EQU * «, t00=0x0166, t01=0x0118}
0x23026…23030 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x012c}
0x23030…2303a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0166, t01=0x0136}
0x2303a…23050 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0166, t01=0x0140}
0x23050…23064 Head {h00=0x0010, h01=0x0050, text=»LNKRET EQU *«, t00=0x0166, t01=0x0156}
0x23064…23090 Head {h00=0x0028, h01=0x0050, text=»* COMMON EXIT FOR QUEUE ROUTINES «, t00=0x0166, t01=0x016a}
0x23090…230ca Head {h00=0x0036, h01=0x0050, text=»* RETURN WITHOUT CHANGING INTERRUPT ENABLE FLAG«, t00=0x0167, t01=0x0008}
0x230ca…230e6 Head {h00=0x0018, h01=0x0050, text=» ADKL A15,2 SKIP PSW«, t00=0x0167, t01=0x0042}
0x230e6…23100 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0167, t01=0x005e}
0x23100…2310c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0167, t01=0x0078}
0x2310c…23116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0084}
0x23116…2312c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0167, t01=0x008e}
0x2312c…2313c Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0167, t01=0x00a4}
0x2313c…23148 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0167, t01=0x00b4}
0x23148…23152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00c0}
0x23152…23160 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0167, t01=0x00ca}
0x23160…2316a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00d8}
0x2316a…23174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00e2}
0x23174…2317e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00ec}
0x2317e…23188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x00f6}
0x23188…231cc Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0167, t01=0x0100}
0x231cc…231d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0144}
0x231d6…231fe Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS«, t00=0x0167, t01=0x014e}
0x231fe…23208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0167, t01=0x0176}
0x23208…2323e Head {h00=0x0032, h01=0x0050, text=»* TBUFF = TOSS BUFFER HANDLING SUBROUTINES«, t00=0x0167, t01=0x0180}
0x2323e…23248 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0026}
0x23248…23252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0030}
0x23252…2325c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x003a}
0x2325c…232a0 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0168, t01=0x0044}
0x232a0…232aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0168, t01=0x0088}
0x232aa…232e4 Head {h00=0x0036, h01=0x0050, text=»* THIS PROGRAM CONTAINS A SET OF BUFFER HANDLING«, t00=0x0168, t01=0x0092}
0x232e4…2331e Head {h00=0x0036, h01=0x0050, text=»* SUBROUTINES. THEY OPERATE ON BUFFERS ORGANIZED«, t00=0x0168, t01=0x00cc}
0x2331e…23356 Head {h00=0x0034, h01=0x0050, text=»* IN BUFFER POOLS. A BUFFER POOL CONSISTS OF A«, t00=0x0168, t01=0x0106}
0x23356…23390 Head {h00=0x0036, h01=0x0050, text=»* POOLBLOCK FOR CONTROL INFORMATION, AND ONE OR «, t00=0x0168, t01=0x013e}
0x23390…233c8 Head {h00=0x0034, h01=0x0050, text=»* MORE BUFFER AREAS. THE POOLBLOCK AND BUFFER «, t00=0x0168, t01=0x0178}
0x233c8…233fc Head {h00=0x0030, h01=0x0050, text=»* AREA(S) SHOULD BE SUPPLIED BY THE USER. «, t00=0x0169, t01=0x0020}
0x233fc…23406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x0054}
0x23406…2343a Head {h00=0x0030, h01=0x0050, text=»* ROUTINES IN ORDER OF APPEARANCE IN CODE:«, t00=0x0169, t01=0x005e}
0x2343a…23444 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x0092}
0x23444…2345c Head {h00=0x0014, h01=0x0050, text=»* NAME FUNCTION «, t00=0x0169, t01=0x009c}
0x2345c…23466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x00b4}
0x23466…2348c Head {h00=0x0022, h01=0x0050, text=»* GETBUF GET BUFFER FROM POOL «, t00=0x0169, t01=0x00be}
0x2348c…234b2 Head {h00=0x0022, h01=0x0050, text=»* RELBUF RETURN BUFFER TO POOL«, t00=0x0169, t01=0x00e4}
0x234b2…234dc Head {h00=0x0026, h01=0x0050, text=»* AREBUF DIVIDE AREA INTO BUFFERS «, t00=0x0169, t01=0x010a}
0x234dc…234e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x0134}
0x234e6…234f4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0169, t01=0x013e}
0x234f4…234fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0169, t01=0x014c}
0x234fe…23514 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0169, t01=0x0156}
0x23514…2352a Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0169, t01=0x016c}
0x2352a…23540 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0169, t01=0x0182}
0x23540…2354a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0008}
0x2354a…23554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0012}
0x23554…2357c Head {h00=0x0024, h01=0x0050, text=»* POOLBLOCK LAYOUT DEFINITION«, t00=0x016a, t01=0x001c}
0x2357c…23586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x0044}
0x23586…235ac Head {h00=0x0022, h01=0x0050, text=»* POOLBLOCK WORD OFFSETS «, t00=0x016a, t01=0x004e}
0x235ac…235ce Head {h00=0x001e, h01=0x0050, text=»POBID EQU 0 POOL IDENTITY «, t00=0x016a, t01=0x0074}
0x235ce…235f0 Head {h00=0x001e, h01=0x0050, text=»POBFLG EQU 2 BINARY FLAGS «, t00=0x016a, t01=0x0096}
0x235f0…23618 Head {h00=0x0024, h01=0x0050, text=»POBFRE EQU 4 FREE LIST LINK HEAD«, t00=0x016a, t01=0x00b8}
0x23618…23640 Head {h00=0x0024, h01=0x0050, text=»POBBUS EQU 6 BUFFER SIZE (BYTES)«, t00=0x016a, t01=0x00e0}
0x23640…23666 Head {h00=0x0022, h01=0x0050, text=»POBARS EQU 8 AREA SIZE (BYTES)«, t00=0x016a, t01=0x0108}
0x23666…23670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x012e}
0x23670…23690 Head {h00=0x001c, h01=0x0050, text=»* POOLBLOCK LENGTH «, t00=0x016a, t01=0x0138}
0x23690…236b4 Head {h00=0x0020, h01=0x0050, text=»POBLEN EQU 10 LENGTH (BYTES)«, t00=0x016a, t01=0x0158}
0x236b4…236be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016a, t01=0x017c}
0x236be…236cc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016a, t01=0x0186}
0x236cc…236d6 (363, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0004}
0x236d6…2371a Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016b, t01=0x000e}
0x2371a…23724 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0052}
0x23724…2373c Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x016b, t01=0x005c}
0x2373c…2374c Head {h00=0x000c, h01=0x0050, text=»* GETBUF«, t00=0x016b, t01=0x0074}
0x2374c…23756 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0084}
0x23756…2376a Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x016b, t01=0x008e}
0x2376a…237a2 Head {h00=0x0034, h01=0x0050, text=»* THIS ROUTINE FETCHES ONE BUFFER FROM A BUFFER «, t00=0x016b, t01=0x00a2}
0x237a2…237cc Head {h00=0x0026, h01=0x0050, text=»* POOL AND GIVES IT TO THE CALLER.«, t00=0x016b, t01=0x00da}
0x237cc…237d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0104}
0x237d6…237e6 Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x016b, t01=0x010e}
0x237e6…237fe Head {h00=0x0014, h01=0x0050, text=»* CF A15,GETBUF «, t00=0x016b, t01=0x011e}
0x237fe…23808 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0136}
0x23808…23818 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x016b, t01=0x0140}
0x23818…2383a Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x016b, t01=0x0150}
0x2383a…23844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016b, t01=0x0172}
0x23844…23856 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x016b, t01=0x017c}
0x23856…23888 Head {h00=0x002e, h01=0x0050, text=»* A4 = BUFFER ADDRESS IF BUFFER ALLOCATED«, t00=0x016b, t01=0x018e}
0x23888…2389e Head {h00=0x0012, h01=0x0050, text=»* ELSE ZERO«, t00=0x016c, t01=0x0030}
0x2389e…238bc Head {h00=0x001a, h01=0x0050, text=»* CR = CONTENTS OF A4«, t00=0x016c, t01=0x0046}
0x238bc…238d8 Head {h00=0x0018, h01=0x0050, text=»* INTERR.= INHIBITED«, t00=0x016c, t01=0x0064}
0x238d8…238e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0080}
0x238e2…23926 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016c, t01=0x008a}
0x23926…23930 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x00ce}
0x23930…23944 Head {h00=0x0010, h01=0x0050, text=»GETBUF EQU *«, t00=0x016c, t01=0x00d8}
0x23944…23950 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x016c, t01=0x00ec}
0x23950…23978 Head {h00=0x0024, h01=0x0050, text=» LD A4,POBFRE,A7 FREE LIST START«, t00=0x016c, t01=0x00f8}
0x23978…239a2 Head {h00=0x0026, h01=0x0050, text=» RF(Z) GB100 NO BUFFER LEFT. EXIT «, t00=0x016c, t01=0x0120}
0x239a2…239ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x014a}
0x239ac…239ba Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016c, t01=0x0154}
0x239ba…239c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016c, t01=0x0162}
0x239c4…239e0 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x016c, t01=0x016c}
0x239e0…23a0a Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A4 NEW START OF FREE LIST«, t00=0x016c, t01=0x0188}
0x23a0a…23a30 Head {h00=0x0022, h01=0x0050, text=» ST A1,POBFRE,A7 TO POOLBLOCK «, t00=0x016d, t01=0x0022}
0x23a30…23a4c Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x016d, t01=0x0048}
0x23a4c…23a56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0064}
0x23a56…23a6a Head {h00=0x0010, h01=0x0050, text=»GB100 EQU * «, t00=0x016d, t01=0x006e}
0x23a6a…23a8a Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x016d, t01=0x0082}
0x23a8a…23ab2 Head {h00=0x0024, h01=0x0050, text=» LDR A4,A4 CR := CONTENTS OF A4 «, t00=0x016d, t01=0x00a2}
0x23ab2…23aca Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x016d, t01=0x00ca}
0x23aca…23ad4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x00e2}
0x23ad4…23ae2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016d, t01=0x00ec}
0x23ae2…23aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x00fa}
0x23aec…23b30 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016d, t01=0x0104}
0x23b30…23b3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x0148}
0x23b3a…23b52 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x016d, t01=0x0152}
0x23b52…23b62 Head {h00=0x000c, h01=0x0050, text=»* RELBUF«, t00=0x016d, t01=0x016a}
0x23b62…23b6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016d, t01=0x017a}
0x23b6c…23b80 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x016d, t01=0x0184}
0x23b80…23bb6 Head {h00=0x0032, h01=0x0050, text=»* THIS ROUTINE RELEASES ONE BUFFER AND RETURNS«, t00=0x016e, t01=0x0008}
0x23bb6…23bd4 Head {h00=0x001a, h01=0x0050, text=»* IT TO A BUFFER POOL.«, t00=0x016e, t01=0x003e}
0x23bd4…23bde Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x005c}
0x23bde…23bee Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x016e, t01=0x0066}
0x23bee…23c06 Head {h00=0x0014, h01=0x0050, text=»* CF A15,RELBUF «, t00=0x016e, t01=0x0076}
0x23c06…23c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x008e}
0x23c10…23c20 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x016e, t01=0x0098}
0x23c20…23c3e Head {h00=0x001a, h01=0x0050, text=»* A4 = BUFFER ADDRESS«, t00=0x016e, t01=0x00a8}
0x23c3e…23c60 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x016e, t01=0x00c6}
0x23c60…23c6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x00e8}
0x23c6a…23c7c Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x016e, t01=0x00f2}
0x23c7c…23c94 Head {h00=0x0014, h01=0x0050, text=»* CR = CHANGED «, t00=0x016e, t01=0x0104}
0x23c94…23cb0 Head {h00=0x0018, h01=0x0050, text=»* INTERR.= INHIBITED«, t00=0x016e, t01=0x011c}
0x23cb0…23cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x0138}
0x23cba…23cfe Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016e, t01=0x0142}
0x23cfe…23d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016e, t01=0x0186}
0x23d08…23d1c Head {h00=0x0010, h01=0x0050, text=»RELBUF EQU *«, t00=0x016e, t01=0x0190}
0x23d1c…23d28 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x016f, t01=0x0014}
0x23d28…23d44 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x016f, t01=0x0020}
0x23d44…23d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x003c}
0x23d4e…23d7a Head {h00=0x0028, h01=0x0050, text=» LD A1,POBFRE,A7 OLD FREE LIST START«, t00=0x016f, t01=0x0046}
0x23d7a…23da2 Head {h00=0x0024, h01=0x0050, text=» STR A1,A4 LINK AFTER NEW BUFFER«, t00=0x016f, t01=0x0072}
0x23da2…23dd2 Head {h00=0x002c, h01=0x0050, text=» ST A4,POBFRE,A7 SET NEW FREE LIST START«, t00=0x016f, t01=0x009a}
0x23dd2…23ddc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x00ca}
0x23ddc…23df8 Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A15 POP A1 «, t00=0x016f, t01=0x00d4}
0x23df8…23e18 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,4 ADJUST STACK«, t00=0x016f, t01=0x00f0}
0x23e18…23e30 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x016f, t01=0x0110}
0x23e30…23e3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0128}
0x23e3a…23e48 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x016f, t01=0x0132}
0x23e48…23e52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x0140}
0x23e52…23e96 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x016f, t01=0x014a}
0x23e96…23ea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x016f, t01=0x018e}
0x23ea0…23eb8 Head {h00=0x0014, h01=0x0050, text=»* ROUTINE NAME: «, t00=0x0170, t01=0x0008}
0x23eb8…23ec8 Head {h00=0x000c, h01=0x0050, text=»* AREBUF«, t00=0x0170, t01=0x0020}
0x23ec8…23ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0170, t01=0x0030}
0x23ed2…23ee6 Head {h00=0x0010, h01=0x0050, text=»* FUNCTION: «, t00=0x0170, t01=0x003a}
0x23ee6…23f20 Head {h00=0x0036, h01=0x0050, text=»* THIS ROUTINE ALLOCATES A SPECIFIED DATA AREA TO «, t00=0x0170, t01=0x004e}
0x23f20…23f56 Head {h00=0x0032, h01=0x0050, text=»* A BUFFER POOL. THIS CAN BE DONE IN TWO WAYS.«, t00=0x0170, t01=0x0088}
0x23f56…23f8a Head {h00=0x0030, h01=0x0050, text=»* "INIBUF" IS USED WHEN A NEW BUFFER POOL IS«, t00=0x0170, t01=0x00be}
0x23f8a…23fc0 Head {h00=0x0032, h01=0x0050, text=»* INITIATED. IT DIVIDES THE AREA INTO BUFFERS,«, t00=0x0170, t01=0x00f2}
0x23fc0…23ffa Head {h00=0x0036, h01=0x0050, text=»* LINKS THE BUFFERS IN A CHAIN FROM THE FREE LIST «, t00=0x0170, t01=0x0128}
0x23ffa…24032 Head {h00=0x0034, h01=0x0050, text=»* HEAD IN POOLBLOCK, AND PUTS AN END MARKER (-1)«, t00=0x0170, t01=0x0162}
0x24032…2406c Head {h00=0x0036, h01=0x0050, text=»* IN THE LAST BUFFER. "LNKBUF" IS USED WHEN A NEW «, t00=0x0171, t01=0x000a}
0x2406c…240a2 Head {h00=0x0032, h01=0x0050, text=»* AREA IS ADDED TO AN EXISTING BUFFER POOL. IT«, t00=0x0171, t01=0x0044}
0x240a2…240d8 Head {h00=0x0032, h01=0x0050, text=»* DIVIDES THE AREA INTO BUFFERS, AND LINKS THE«, t00=0x0171, t01=0x007a}
0x240d8…24102 Head {h00=0x0026, h01=0x0050, text=»* BUFFERS FIRST IN THE FREE LIST. «, t00=0x0171, t01=0x00b0}
0x24102…2410c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x00da}
0x2410c…2411c Head {h00=0x000c, h01=0x0050, text=»* CALL: «, t00=0x0171, t01=0x00e4}
0x2411c…24134 Head {h00=0x0014, h01=0x0050, text=»* CF A15,INIBUF «, t00=0x0171, t01=0x00f4}
0x24134…2414c Head {h00=0x0014, h01=0x0050, text=»* CF A15,LNKBUF «, t00=0x0171, t01=0x010c}
0x2414c…24156 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x0124}
0x24156…24166 Head {h00=0x000c, h01=0x0050, text=»* INPUT:«, t00=0x0171, t01=0x012e}
0x24166…24182 Head {h00=0x0018, h01=0x0050, text=»* A4 = AREA ADDRESS«, t00=0x0171, t01=0x013e}
0x24182…241a4 Head {h00=0x001e, h01=0x0050, text=»* A7 = POOLBLOCK ADDRESS «, t00=0x0171, t01=0x015a}
0x241a4…241ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0171, t01=0x017c}
0x241ae…241c0 Head {h00=0x000e, h01=0x0050, text=»* OUTPUT: «, t00=0x0171, t01=0x0186}
0x241c0…241e2 Head {h00=0x001e, h01=0x0050, text=»* CR = CHANGED IF CPU852 «, t00=0x0172, t01=0x0008}
0x241e2…241ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x002a}
0x241ec…24230 Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0172, t01=0x0034}
0x24230…2423a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x0078}
0x2423a…24248 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0172, t01=0x0082}
0x24248…24252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x0090}
0x24252…24266 Head {h00=0x0010, h01=0x0050, text=»INIBUF EQU *«, t00=0x0172, t01=0x009a}
0x24266…2427c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0172, t01=0x00ae}
0x2427c…24298 Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0172, t01=0x00c4}
0x24298…242a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0172, t01=0x00e0}
0x242a4…242ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x00ec}
0x242ae…242c4 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0172, t01=0x00f6}
0x242c4…242e2 Head {h00=0x001a, h01=0x0050, text=» MSR 4,A15 PUSH A1-A4 «, t00=0x0172, t01=0x010c}
0x242e2…242ee Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0172, t01=0x012a}
0x242ee…242f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x0136}
0x242f8…24320 Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 MARKER FOR LAST BUFFER«, t00=0x0172, t01=0x0140}
0x24320…24344 Head {h00=0x0020, h01=0x0050, text=» RF IL100 GO TO COMMON PART «, t00=0x0172, t01=0x0168}
0x24344…2434e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0172, t01=0x018c}
0x2434e…24358 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0008}
0x24358…2436c Head {h00=0x0010, h01=0x0050, text=»LNKBUF EQU *«, t00=0x0173, t01=0x0012}
0x2436c…24382 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0173, t01=0x0026}
0x24382…2439e Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 PUSH A1 «, t00=0x0173, t01=0x003c}
0x2439e…243aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0173, t01=0x0058}
0x243aa…243b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0064}
0x243b4…243ca Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0173, t01=0x006e}
0x243ca…243e8 Head {h00=0x001a, h01=0x0050, text=» MSR 4,A15 PUSH A1-A4 «, t00=0x0173, t01=0x0084}
0x243e8…243f4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0173, t01=0x00a2}
0x243f4…243fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00ae}
0x243fe…2442a Head {h00=0x0028, h01=0x0050, text=» LD A1,POBFRE,A7 LINK TO OLD BUFFERS«, t00=0x0173, t01=0x00b8}
0x2442a…24434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00e4}
0x24434…2443e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x00ee}
0x2443e…24452 Head {h00=0x0010, h01=0x0050, text=»IL100 EQU * «, t00=0x0173, t01=0x00f8}
0x24452…2445c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x010c}
0x2445c…2448a Head {h00=0x002a, h01=0x0050, text=»* COMMON PART FOR INIBUF AND LNKBUF«, t00=0x0173, t01=0x0116}
0x2448a…24494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0173, t01=0x0144}
0x24494…244aa Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0173, t01=0x014e}
0x244aa…244c8 Head {h00=0x001a, h01=0x0050, text=» STR A2,A15 PUSH A2-A4«, t00=0x0173, t01=0x0164}
0x244c8…244dc Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x0173, t01=0x0182}
0x244dc…244f0 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x0174, t01=0x0008}
0x244f0…244fc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0174, t01=0x001c}
0x244fc…24506 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0028}
0x24506…24514 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0174, t01=0x0032}
0x24514…2451e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x0040}
0x2451e…24530 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0174, t01=0x004a}
0x24530…24556 Head {h00=0x0022, h01=0x0050, text=» ADK A2,POBFRE FREE LIST START«, t00=0x0174, t01=0x005c}
0x24556…24568 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x0174, t01=0x0082}
0x24568…2458c Head {h00=0x0020, h01=0x0050, text=» AD A3,POBARS,A7 END OF AREA«, t00=0x0174, t01=0x0094}
0x2458c…245c0 Head {h00=0x0030, h01=0x0050, text=» SU A3,POBBUS,A7 HIGEST BUFFER START IN AREA«, t00=0x0174, t01=0x00b8}
0x245c0…245ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0174, t01=0x00ec}
0x245ca…245de Head {h00=0x0010, h01=0x0050, text=»IL110 EQU * «, t00=0x0174, t01=0x00f6}
0x245de…245fe Head {h00=0x001c, h01=0x0050, text=»* BUFFER LINKING LOOP«, t00=0x0174, t01=0x010a}
0x245fe…24622 Head {h00=0x0020, h01=0x0050, text=» SRL A3,1 SHIFT ADDRESS =15 «, t00=0x0174, t01=0x012a}
0x24622…2463a Head {h00=0x0014, h01=0x0050, text=» SRL A4,1 . =15 «, t00=0x0174, t01=0x014e}
0x2463a…24658 Head {h00=0x001a, h01=0x0050, text=» CWR A4,A3 ROOM LEFT? «, t00=0x0174, t01=0x0166}
0x24658…24678 Head {h00=0x001c, h01=0x0050, text=» RF(G) IL120 NO, FINISH «, t00=0x0174, t01=0x0184}
0x24678…24682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x0014}
0x24682…2469a Head {h00=0x0014, h01=0x0050, text=» SLL A3,1 . =15 «, t00=0x0175, t01=0x001e}
0x2469a…246b2 Head {h00=0x0014, h01=0x0050, text=» SLL A4,1 . =15 «, t00=0x0175, t01=0x0036}
0x246b2…246e6 Head {h00=0x0030, h01=0x0050, text=» STR A4,A2 SET LINK FROM PREVIOUS TO PRESENT«, t00=0x0175, t01=0x004e}
0x246e6…24706 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 NEW PREVIOUS «, t00=0x0175, t01=0x0082}
0x24706…2472a Head {h00=0x0020, h01=0x0050, text=» AD A4,POBBUS,A7 NEW PRESENT«, t00=0x0175, t01=0x00a2}
0x2472a…2474c Head {h00=0x001e, h01=0x0050, text=» RB IL110 TAKE NEXT BUFFER«, t00=0x0175, t01=0x00c6}
0x2474c…24756 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x00e8}
0x24756…2476a Head {h00=0x0010, h01=0x0050, text=»IL120 EQU * «, t00=0x0175, t01=0x00f2}
0x2476a…24782 Head {h00=0x0014, h01=0x0050, text=» SLL A3,1 . =15 «, t00=0x0175, t01=0x0106}
0x24782…2479a Head {h00=0x0014, h01=0x0050, text=» SLL A4,1 . =15 «, t00=0x0175, t01=0x011e}
0x2479a…247cc Head {h00=0x002e, h01=0x0050, text=» STR A1,A2 SET LINK OR END IN LAST BUFFER «, t00=0x0175, t01=0x0136}
0x247cc…247d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0175, t01=0x0168}
0x247d6…247ec Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0175, t01=0x0172}
0x247ec…2480a Head {h00=0x001a, h01=0x0050, text=» LDR* A4,A15 POP A1-A4«, t00=0x0175, t01=0x0188}
0x2480a…2481e Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x0176, t01=0x0016}
0x2481e…24832 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0176, t01=0x002a}
0x24832…24846 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0176, t01=0x003e}
0x24846…24866 Head {h00=0x001c, h01=0x0050, text=» ADKL A15,2 ADJUST STACK«, t00=0x0176, t01=0x0052}
0x24866…24880 Head {h00=0x0016, h01=0x0050, text=» LDR* P,A15 RETURN«, t00=0x0176, t01=0x0072}
0x24880…2488c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0176, t01=0x008c}
0x2488c…24896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x0098}
0x24896…248ac Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x0176, t01=0x00a2}
0x248ac…248c8 Head {h00=0x0018, h01=0x0050, text=» MLR 4,A15 POP A1-A4«, t00=0x0176, t01=0x00b8}
0x248c8…248d8 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0176, t01=0x00d4}
0x248d8…248e4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0176, t01=0x00e4}
0x248e4…248ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x00f0}
0x248ee…24904 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0176, t01=0x00fa}
0x24904…24912 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0176, t01=0x0110}
0x24912…2491c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x011e}
0x2491c…2494e Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0176, t01=0x0128}
0x2494e…24958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0176, t01=0x015a}
0x24958…24978 Head {h00=0x001c, h01=0x0050, text=»* ROUTINE NAMES: LOGCOM «, t00=0x0176, t01=0x0164}
0x24978…24998 Head {h00=0x001c, h01=0x0050, text=»* LOGIOC «, t00=0x0176, t01=0x0184}
0x24998…249b8 Head {h00=0x001c, h01=0x0050, text=»* LOGATT «, t00=0x0177, t01=0x0014}
0x249b8…249ec Head {h00=0x0030, h01=0x0050, text=»* FUNCTION: LOG MSG TYPE AND CCR+BUFFER«, t00=0x0177, t01=0x0034}
0x249ec…24a2a Head {h00=0x003a, h01=0x0050, text=»* DLSSEL SPECIFIES DLS TO BE SELECTED «, t00=0x0177, t01=0x0068}
0x24a2a…24a54 Head {h00=0x0026, h01=0x0050, text=»* 0 MEANS LOG ALL «, t00=0x0177, t01=0x00a6}
0x24a54…24a5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0177, t01=0x00d0}
0x24a5e…24a96 Head {h00=0x0034, h01=0x0050, text=»* RECORD FORMAT: BYTE 1-2 MSG TYPE (CO,RE,AT) «, t00=0x0177, t01=0x00da}
0x24a96…24ac4 Head {h00=0x002a, h01=0x0050, text=»* BYTE 3 DLS INDEX «, t00=0x0177, t01=0x0112}
0x24ac4…24af4 Head {h00=0x002c, h01=0x0050, text=»* BYTE 4 COMMAND CODE«, t00=0x0177, t01=0x0140}
0x24af4…24b20 Head {h00=0x0028, h01=0x0050, text=»* BYTE 5-6 STATUS-1«, t00=0x0177, t01=0x0170}
0x24b20…24b52 Head {h00=0x002e, h01=0x0050, text=»* BYTE 7 BUFFER LENGTH «, t00=0x0178, t01=0x000c}
0x24b52…24b86 Head {h00=0x0030, h01=0x0050, text=»* BYTE 8 PACKET HEADER -1«, t00=0x0178, t01=0x003e}
0x24b86…24bcc Head {h00=0x0042, h01=0x0050, text=»* BYTE 9 PACKET HEADER -2 (LOGICAL CHANNEL)«, t00=0x0178, t01=0x0072}
0x24bcc…24c0e Head {h00=0x003e, h01=0x0050, text=»* BYTE 10 PACKET HEADER -3 (FLOW CONTOL)«, t00=0x0178, t01=0x00b8}
0x24c0e…24c48 Head {h00=0x0036, h01=0x0050, text=»* BYTE 11-16 6 FIRST DATA BYTES «, t00=0x0178, t01=0x00fa}
0x24c48…24c80 Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0178, t01=0x0134}
0x24c80…24c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0178, t01=0x016c}
0x24c8a…24caa Head {h00=0x001c, h01=0x0050, text=»DLSSEL DATA 0 0=LOG ALL «, t00=0x0178, t01=0x0176}
0x24caa…24ccc Head {h00=0x001e, h01=0x0050, text=»* ELSE DLS TO BE LOGGED «, t00=0x0179, t01=0x0008}
0x24ccc…24cd8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0179, t01=0x002a}
0x24cd8…24cec Head {h00=0x0010, h01=0x0050, text=»PLCLOG EQU *«, t00=0x0179, t01=0x0036}
0x24cec…24d02 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x0179, t01=0x004a}
0x24d02…24d38 Head {h00=0x0032, h01=0x0050, text=»LOGPTR DATA LOGARE RECORD POINTER IN LOG AREA «, t00=0x0179, t01=0x0060}
0x24d38…24d58 Head {h00=0x001c, h01=0x0050, text=»LOGARE RES 960 LOG AREA «, t00=0x0179, t01=0x0096}
0x24d58…24d6c Head {h00=0x0010, h01=0x0050, text=»LOGEND EQU *«, t00=0x0179, t01=0x00b6}
0x24d6c…24d98 Head {h00=0x0028, h01=0x0050, text=» DATA 'ENDLOG' MARK END OF LOG AREA «, t00=0x0179, t01=0x00ca}
0x24d98…24dce Head {h00=0x0032, h01=0x0050, text=»*-------------------------------------------- «, t00=0x0179, t01=0x00f6}
0x24dce…24df4 Head {h00=0x0022, h01=0x0050, text=»LOGCOM EQU * SUBROUTINE ENTRY «, t00=0x0179, t01=0x012c}
0x24df4…24e0a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0179, t01=0x0152}
0x24e0a…24e1e Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x0179, t01=0x0168}
0x24e1e…24e32 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x0179, t01=0x017c}
0x24e32…24e46 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x0179, t01=0x0190}
0x24e46…24e52 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017a, t01=0x0014}
0x24e52…24e68 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017a, t01=0x0020}
0x24e68…24e7e Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x017a, t01=0x0036}
0x24e7e…24e9c Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x017a, t01=0x004c}
0x24e9c…24ea8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017a, t01=0x006a}
0x24ea8…24ebe Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017a, t01=0x0076}
0x24ebe…24edc Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'CO' MSG TYPE«, t00=0x017a, t01=0x008c}
0x24edc…24efe Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTCCA CCA OFFSET «, t00=0x017a, t01=0x00aa}
0x24efe…24f10 Head {h00=0x000e, h01=0x0050, text=» RF LOG:10«, t00=0x017a, t01=0x00cc}
0x24f10…24f18 Head {h00=0x0004, h01=0x0050, t00=0x017a, t01=0x00de}
0x24f18…24f3e Head {h00=0x0022, h01=0x0050, text=»LOGIOC EQU * SUBROUTINE ENTRY «, t00=0x017a, t01=0x00e6}
0x24f3e…24f54 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x017a, t01=0x010c}
0x24f54…24f68 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x017a, t01=0x0122}
0x24f68…24f7c Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x017a, t01=0x0136}
0x24f7c…24f90 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x017a, t01=0x014a}
0x24f90…24f9c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017a, t01=0x015e}
0x24f9c…24fb2 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017a, t01=0x016a}
0x24fb2…24fc8 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x017a, t01=0x0180}
0x24fc8…24fe6 Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x017b, t01=0x0008}
0x24fe6…24ff2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017b, t01=0x0026}
0x24ff2…25008 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017b, t01=0x0032}
0x25008…25026 Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'RE' MSG TYPE«, t00=0x017b, t01=0x0048}
0x25026…25048 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTRCA RCA OFFSET «, t00=0x017b, t01=0x0066}
0x25048…2505a Head {h00=0x000e, h01=0x0050, text=» RF LOG:10«, t00=0x017b, t01=0x0088}
0x2505a…25062 Head {h00=0x0004, h01=0x0050, t00=0x017b, t01=0x009a}
0x25062…25088 Head {h00=0x0022, h01=0x0050, text=»LOGATT EQU * SUBROUTINE ENTRY «, t00=0x017b, t01=0x00a2}
0x25088…2509e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x017b, t01=0x00c8}
0x2509e…250b2 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x017b, t01=0x00de}
0x250b2…250c6 Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x017b, t01=0x00f2}
0x250c6…250da Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x017b, t01=0x0106}
0x250da…250e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017b, t01=0x011a}
0x250e6…250fc Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017b, t01=0x0126}
0x250fc…25112 Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x017b, t01=0x013c}
0x25112…25130 Head {h00=0x001a, h01=0x0050, text=» MSR 3,A15 PUSH A1-A3 «, t00=0x017b, t01=0x0152}
0x25130…2513c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017b, t01=0x0170}
0x2513c…25152 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017b, t01=0x017c}
0x25152…25170 (380, 0, 400) Head {h00=0x001a, h01=0x0050, text=» LDKL A1,'AT' MSG TYPE«, t00=0x017c, t01=0x0004}
0x25170…25192 Head {h00=0x001e, h01=0x0050, text=» LDK A2,CWTRCA RCA OFFSET «, t00=0x017c, t01=0x0022}
0x25192…251c6 Head {h00=0x0030, h01=0x0050, text=»*------------------------------------------ «, t00=0x017c, t01=0x0044}
0x251c6…251e6 Head {h00=0x001c, h01=0x0050, text=»LOG:10 EQU * COMMON PART«, t00=0x017c, t01=0x0078}
0x251e6…251fc Head {h00=0x0012, h01=0x0050, text=» LD A3,LOGPTR «, t00=0x017c, t01=0x0098}
0x251fc…2521c Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 LOG MSG TYPE «, t00=0x017c, t01=0x00ae}
0x2521c…25236 Head {h00=0x0016, h01=0x0050, text=» ADR A2,A5 CCR PTR«, t00=0x017c, t01=0x00ce}
0x25236…25258 Head {h00=0x001e, h01=0x0050, text=» LD A1,DLSSEL SELECTED DLS«, t00=0x017c, t01=0x00e8}
0x25258…25276 Head {h00=0x001a, h01=0x0050, text=» RF(Z) LOG:15 LOG ALL «, t00=0x017c, t01=0x010a}
0x25276…2528e Head {h00=0x0014, h01=0x0050, text=» CC A1,CCRDLS,A2«, t00=0x017c, t01=0x0128}
0x2528e…252b6 Head {h00=0x0024, h01=0x0050, text=» RF(NE) LOG:20 NOT SELECTED,SKIP«, t00=0x017c, t01=0x0140}
0x252b6…252ca Head {h00=0x0010, h01=0x0050, text=»LOG:15 EQU *«, t00=0x017c, t01=0x0168}
0x252ca…252ec Head {h00=0x001e, h01=0x0050, text=» LD A1,CCRDLS,A2 DLS INDEX«, t00=0x017c, t01=0x017c}
0x252ec…25312 Head {h00=0x0022, h01=0x0050, text=» ST A1,2,A3 +COMMAND INTO LOG «, t00=0x017d, t01=0x000e}
0x25312…25334 Head {h00=0x001e, h01=0x0050, text=» LD A1,CCRSTA,A2 STATUS-1 «, t00=0x017d, t01=0x0034}
0x25334…25354 Head {h00=0x001c, h01=0x0050, text=» ST A1,4,A3 LOG STATUS-1«, t00=0x017d, t01=0x0056}
0x25354…2537a Head {h00=0x0022, h01=0x0050, text=» LD A1,CCRLEN,A2 BUFFER LENGTH«, t00=0x017d, t01=0x0076}
0x2537a…25396 Head {h00=0x0018, h01=0x0050, text=» SC A1,6,A3 INTO LOG«, t00=0x017d, t01=0x009c}
0x25396…253be Head {h00=0x0024, h01=0x0050, text=» LD A2,CCRBUF,A2 BUFFER ADDRESS «, t00=0x017d, t01=0x00b8}
0x253be…253da Head {h00=0x0018, h01=0x0050, text=» LDR* A1,A2 BYTE 0-1«, t00=0x017d, t01=0x00e0}
0x253da…253fe Head {h00=0x0020, h01=0x0050, text=» SC A1,8,A3 PACKET HEADER 2 «, t00=0x017d, t01=0x00fc}
0x253fe…25410 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017d, t01=0x0120}
0x25410…25434 Head {h00=0x0020, h01=0x0050, text=» SC A1,7,A3 PACKET HEADER 1 «, t00=0x017d, t01=0x0132}
0x25434…25460 Head {h00=0x0028, h01=0x0050, text=» LD A1,2,A2 PACKET HEADER 3+ BYTE 1 «, t00=0x017d, t01=0x0156}
0x25460…25474 Head {h00=0x0010, h01=0x0050, text=» SC A1,10,A3«, t00=0x017d, t01=0x0182}
0x25474…25486 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017e, t01=0x0008}
0x25486…2549a Head {h00=0x0010, h01=0x0050, text=» SC A1,9,A3 «, t00=0x017e, t01=0x001a}
0x2549a…254b6 Head {h00=0x0018, h01=0x0050, text=» LD A1,4,A2 BYTE 2-3«, t00=0x017e, t01=0x002e}
0x254b6…254ca Head {h00=0x0010, h01=0x0050, text=» SC A1,12,A3«, t00=0x017e, t01=0x004a}
0x254ca…254dc Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017e, t01=0x005e}
0x254dc…254f0 Head {h00=0x0010, h01=0x0050, text=» SC A1,11,A3«, t00=0x017e, t01=0x0070}
0x254f0…2550c Head {h00=0x0018, h01=0x0050, text=» LD A1,6,A2 BYTE 4-5«, t00=0x017e, t01=0x0084}
0x2550c…25520 Head {h00=0x0010, h01=0x0050, text=» SC A1,14,A3«, t00=0x017e, t01=0x00a0}
0x25520…25532 Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017e, t01=0x00b4}
0x25532…25546 Head {h00=0x0010, h01=0x0050, text=» SC A1,13,A3«, t00=0x017e, t01=0x00c6}
0x25546…2555a Head {h00=0x0010, h01=0x0050, text=» LD A1,8,A2 «, t00=0x017e, t01=0x00da}
0x2555a…2556c Head {h00=0x000e, h01=0x0050, text=» SRL A1,8 «, t00=0x017e, t01=0x00ee}
0x2556c…25580 Head {h00=0x0010, h01=0x0050, text=» SC A1,15,A3«, t00=0x017e, t01=0x0100}
0x25580…25592 Head {h00=0x000e, h01=0x0050, text=» ADK A3,16«, t00=0x017e, t01=0x0114}
0x25592…255c0 Head {h00=0x002a, h01=0x0050, text=» ST A3,LOGPTR NEXT RECORD IN LOG AREA «, t00=0x017e, t01=0x0126}
0x255c0…255e8 Head {h00=0x0024, h01=0x0050, text=» CWK A3,LOGEND END OF LOG AREA? «, t00=0x017e, t01=0x0154}
0x255e8…25602 Head {h00=0x0016, h01=0x0050, text=» RF(NE) LOG:20 NO!«, t00=0x017e, t01=0x017c}
0x25602…25624 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,LOGARE RESET PTR «, t00=0x017f, t01=0x0008}
0x25624…2563a Head {h00=0x0012, h01=0x0050, text=» ST A1,LOGPTR «, t00=0x017f, t01=0x002a}
0x2563a…2564e Head {h00=0x0010, h01=0x0050, text=»LOG:20 EQU *«, t00=0x017f, t01=0x0040}
0x2564e…25664 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x017f, t01=0x0054}
0x25664…25680 Head {h00=0x0018, h01=0x0050, text=» LDR* A3,A15 RESTORE«, t00=0x017f, t01=0x006a}
0x25680…25694 Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x017f, t01=0x0086}
0x25694…256a8 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x017f, t01=0x009a}
0x256a8…256bc Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x017f, t01=0x00ae}
0x256bc…256d4 Head {h00=0x0014, h01=0x0050, text=» ABR* A15 RETURN«, t00=0x017f, t01=0x00c2}
0x256d4…256e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017f, t01=0x00da}
0x256e0…256f6 Head {h00=0x0012, h01=0x0050, text=» IFF UTTEST=0 «, t00=0x017f, t01=0x00e6}
0x256f6…2570c Head {h00=0x0012, h01=0x0050, text=» IFF CPU852=1 «, t00=0x017f, t01=0x00fc}
0x2570c…2571e Head {h00=0x000e, h01=0x0050, text=» MLR 3,A15«, t00=0x017f, t01=0x0112}
0x2571e…2572e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x017f, t01=0x0124}
0x2572e…2573a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x017f, t01=0x0134}
0x2573a…25744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x0140}
0x25744…2574e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x017f, t01=0x014a}
0x2574e…2575a Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x017f, t01=0x0154}
0x2575a…2575e Head {h00=0x4004, h01=0x0000}
0x2575e…25760 01 7f ┆ ┆
0x25760…25762 01 60 ┆ `┆
0x25762…2576a (384, 1, 8) 20 04 00 00 01 80 00 04 ┆ ┆
0x2576a…258fa (385, 0, 400) 0x00[0x190]
[…0x3…]