|
|
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: 14344 (0x3808)
Notes: pts_type(SC)
Names: »DRIC01.SC«
└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
└─⟦this⟧ »TOSSWORK/DRIC01.SC«
IDENT DRIC01 REL 10.0 80-03-14 870105041000 * * ********************************************** * * PHILIPS TERMINAL SYSTEM PTS * * DRIC01 = INTERTASK COMMUNICATION HANDLER * * * * * * ********************************************** * * THIS MODULE HANDLES THE INTERTASK COMMUNICATION * EJECT DRIC01 * * ORDERS: * * /02 READ, NOT ADDRESSED * /06 WRITE, NOT ADDRESSED * /0A READ, ADDRESSED * /0B WRITE, ADDRESSED * /39 SET TIMEOUT * * ENTRY PARAMETERS: * * A5 STACK BASE 2 * A6 DWT ADDRESS * A7 ORDER CODE * A8 ECB ADDRESS * A12 ADDRESS TO DRIVER ADDRESS BLOCK * EJECT DRIC01 * * *********** * ENTRIES * *********** * * ENTRY ITAD ADDRESS BLOCK ENTRY IT:BUF INTERTASK DRIVER BUFFER (MMU) EJECT DRIC01 * * ************* * EXTERNALS * ************* * * EXTRN TDISP DISPATCHER EXTRN TENDIO ENDIO EXTRN DISIOE REQUEST ERROR EXTRN DISEND TENDIO AND DISPATCH EXTRN DWTST DWT STATUS EXTRN DWTECB ECB ADDRESS EXTRN DWTADR DRIVER ADDRESS BLOCK EXTRN DWTTAB DWT TTAB ADDRESS EXTRN BUFLEN DRIVER BUFFER LENGTH EXTRN SETIMP TIMER EXTRN FNDTID FIND TTAB ADDRESS FROM TID EXTRN TTB:ST TASK STATUS EXTRN TTB:TD TERMINAL DEVICES EXTRN IHRTN RTN A15 WITHOUT ENABLING INTERRUPTS EXTRN ECBBA ECB BUFFER ADDRESS EXTRN ECBRL ECB REQUESTED LENGTH EXTRN ECBEL ECB EFFECTIVE LENGTH EXTRN ECBCW ECB CONTROL WORD EJECT DRIC01 TOSSIO * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * * MMU BUFFER SIZE * X:A EQU 50 DVBLEN EQU X:A * * INTERTASK DEVICE INDEX * DEVIND EQU 8 * EJECT DRIC01 * * ********************* * DWT DISPLACEMENTS * ********************* * * DWTDRD EQU /10 START OF DRIVER DEFINED PART * IFT MMUPAG=0 START EQU DWTDRD XIF * IFT MMUPAG=1 START EQU DWTDRD+4 XIF * DWTTP EQU START+/00 TIMER POINTER DWTIME EQU START+/02 TIME DWTANC EQU START+/04 POINTER TO FIRST DWT IN QUEUE DWTQUE EQU START+/06 QUEUE ANCHOR ADDRESS * EJECT DRIC01 * * ***************** * ADDRESS BLOCK * ***************** * * DATA DVBLEN+DVBLEN MMU BUFFER SIZE DATA DEVIND INTERTASK DEVICE INDEX ITAD DATA ICAD ACTIVATION ADDRESS DATA ITABRT ABORT ADDRESS * * RD:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED READ REQ. WR:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED WRITE REQ. * * INTERTASK DRIVER BUFFER (MMU) * IT:BUF EQU * IFT MMUPAG=1 RES DVBLEN+1 MMU BUFFER XIF * EJECT DRIC01 * * A C T I V A T I O N * ICAD EQU * LDR A1,A7 ORDER CODE TO A1 SUK A1,2 ABL(Z) RD:NAD READ NOT ADDRESSED SUK A1,4 ABL(Z) WR:NAD WRITE NOT ADDRESSED SUK A1,4 RF(Z) RD:ADR READ ADDRESSED SUK A1,1 RF(Z) WR:ADR WRITE ADDRESSED SUK A1,/2E RF(NZ) DIS:OE REQUEST ERROR * * S E T T I M E O U T * LD A2,ECBCW,A8 GET TIME ST A2,DWTIME,A6 RF END:IO * EJECT DRIC01 * * R E A D, A D D R E S S E D * * W R I T E, A D D R E S S E D * RD:ADR EQU * READ, ADDRESSED WR:ADR EQU * WRITE, ADDRESSED * * FIND TTAB OF ADDRESSED TASK * LD A7,ECBCW,A8 TID CF A15,FNDTID TTAB ADDRESS TO A2 ADK A2,0 SET CR RF(Z) DIS:OE NOT FOUND ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE LDR* A1,A2 TABLE LENGTH LDR A7,A12 DRIVER ADDRESS BLOCK XRK A7,1 IF INPUT, POINT TO OUTPUT BLOCK AND V.V. * EJECT DRIC01 * * FIND DWT OF ADDRESSED TASK * ITC:05 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS SUK A1,4 RF(N) DIS:OE NOT FOUND * LDR* A4,A2 DWT ADDRESS CW A7,DWTADR,A4 SEARCHED DWT RB(NE) ITC:05 NO, TRY NEXT * LDR A2,A4 LD A1,DWTST,A2 ANY REQUEST RF(N) ITC:40 NO! * LD A1,DWTQUE,A2 GET QUEUE ANCHOR ADDRESS CWR A1,A6 CHECK QUEUE ANCHOR RF(E) ITC:10 REQUEST ISSUED FOR THIS TASK * ANK A7,1 RF(Z) ITC:35 READ CWK A1,RD:QUE RF(NE) ITC:50 NO * * ABORT TIMER IF ANY * ITC:10 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE ANK A7,1 RF(Z) RD:N05 READ * EJECT DRIC01 * * MOVE BUFFER * ITC:15 EQU * LD A8,DWTECB,A6 SENDING ECB ENB GIVE OTHER TASKS A CHANCE LDK A1,0 LD A9,DWTECB,A2 RECEIVING ECB LD A3,ECBRL,A8 SENDING REQUESTED LENGTH RF(NP) DIS:OE CW A3,ECBRL,A9 RF(NG) ITC:20 LDK A1,8 RETURN CODE (INCORRECT LENGTH) LD A3,ECBRL,A9 RF(NP) DIS:OE * ITC:20 EQU * IFT MMUPAG=1 LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE RF(NG) ITC:25 MMU BUFFER LARGE ENOUGH LDKL A1,/8008 NO, INDICATE ERROR ABL DISEND BRANCH TO DISPATCHER VIA TENDIO * ITC:25 EQU * XIF * ST A3,ECBEL,A8 EFFECTIVE LENGTH ST A3,ECBEL,A9 EFFECTIVE LENGTH * EJECT DRIC01 * * IFT MMUPAG=0 LD A4,ECBBA,A8 SENDING BUFFER ADDRESS LD A7,ECBBA,A9 RECEIVING BUFFER ADDRESS * ITC:30 EQU * LCR A9,A4 SCR A9,A7 ADK A4,1 ADK A7,1 SUK A3,1 RB(P) ITC:30 XIF * CF A15,TENDIO END WRITE LDR A6,A2 * IFT MMUPAG=1 LD A3,ECBBA,A8 GET SENDING BUFFER ADDRESS ANK A3,1 RF(Z) ITC:30 BUFFER ADDRESS EVEN ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN RF END:IO * ITC:30 EQU * SUK A3,2 A3 := /FFFE ANS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS EVEN XIF * END:IO CF A15,TENDIO END READ * T:DISP ABL TDISP * EJECT DRIC01 * * ITC:35 EQU * CWK A1,WR:QUE RB(E) ITC:10 COMPLEMENTARY REQUEST * * OUEUE REQUEST * ITC:40 LDK A7,0 INDICATE ADDRESSED REQUEST * ITC:50 EQU * LD A3,DWTIME,A6 TIME RF(Z) TWR:30 ADK A3,1 RF(Z) ITC:70 NO TIMING WANTED SUK A3,1 RF(N) DIS:OE NEGATIVE TIME LDR A1,A6 DWTOUT = PARAM. WHEN WRITE, ELSE DWTIN LDK A4,DWTTP ADR A4,A6 TIMER POINTER ST A3,TIME CF A15,SETIMP SET TIMER DATA TIMOUT TIMEOUT ADDRESS TIME DATA 0 * EJECT DRIC01 * * INSERT IN QUEUE WITHIN PRIORITY * ITC:70 EQU * ST A2,DWTQUE,A6 STORE QUEUE ANCHOR IN DWT LD A5,DWTTAB,A6 TTAB ADDRESS LD A1,TTB:ST+1,A5 LEVEL SUK A7,1 RF(P) ITC:80 NOT-ADDRESSED REQUEST ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE * ITC:80 LDR A4,A2 SAVE LDR* A2,A2 NEXT IN QUEUE RF(Z) ITC:90 END FOUND LD A5,DWTTAB,A2 TTAB ADDRESS CC A1,TTB:ST+1,A5 COMPARE LEVELS RB(NL) ITC:80 * ITC:90 STR A2,A6 INSERT IN QUEUE STR A6,A4 RB T:DISP * DIS:OE ABL DISIOE REQUEST ERROR * EJECT DRIC01 * * R E A D, N O T A D D R E S S E D * RD:NAD EQU * READ, NOT ADDRESSED LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS RF(NZ) RD:N10 ANYTHING IN QUEUE LD A2,WR:QUE CHECK QUEUE OF NOT ADDRESSED WRITE REQ. RF(Z) RD:N20 QUEUE EMPTY LDR* A3,A2 NO, REMOVE FROM QUEUE ST A3,WR:QUE UPDATE QUEUE ANCHOR * RD:N00 EQU * CF A15,ABTIM2 ABORT TIMER IF ANY * RD:N05 EQU * XRR A2,A6 EXCHANGE A2 AND A6 XRR A6,A2 XRR A2,A6 RB ITC:15 * RD:N10 LDR* A3,A2 REMOVE FROM QUEUE ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR RB RD:N00 * RD:N20 LDKL A2,RD:QUE GET RD:QUE ADDRESS RB ITC:50 INSERT IN QUEUE * EJECT DRIC01 * * W R I T E, N O T A D D R E S S E D * WR:NAD EQU * WRITE, NOT ADDRESSED LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS RF(NZ) WR:N10 ANYTHING IN QUEUE LD A2,RD:QUE CHECK QUEUE OF NOT ADDRESSED READ REQ. RF(Z) WR:N20 QUEUE EMPTY LDR* A3,A2 NO, REMOVE FROM QUEUE ST A3,RD:QUE UPDATE QUEUE ANCHOR * WR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY RB ITC:15 * WR:N10 LDR* A3,A2 REMOVE FROM QUEUE ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR RB WR:N05 * WR:N20 LDKL A2,WR:QUE GET WR:QUE ADDRESS RB ITC:50 * EJECT DRIC01 * * T I M E O U T * TIMOUT LDR A6,A1 DWT ADDRESS CM* 0,A2 RESET TIMER POINTER LDR A2,A6 CF A15,ITAB10 REMOVE FROM QUEUE * TWR:30 EQU * CMR A6 RESET QUEUE LINK LDK A1,/40 RETURN CODE RB END:IO * EJECT DRIC01 * * I T A B R T * * THIS SUBROUTINE IS CALLED FROM TABORT. * IT WILL UPDATE QUEUE AND ABORT TIMER (IF ANY). * * INPUT: A6 = DWT ADDRESS * * OUTPUT: A1-A4 ARE DESTROYED * ITABRT EQU * LDR A2,A6 * ITAB05 EQU * CF A15,ABTIM ABORT TIMER * * REMOVE DWT FROM QUEUE * ITAB10 EQU * LD A1,DWTQUE,A2 GET QUEUE ACHHOR CWK A1,RD:QUE RF(E) ITAB20 NOT-ADDRESSED READ REQUEST CWK A1,WR:QUE RF(E) ITAB20 NOT-ADDRESSED WRITE REQUEST ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE * EJECT DRIC01 * * ITAB20 LDR A4,A1 SAVE LDR* A1,A1 NEXT IN QUEUE CWR A1,A2 SEARCHED DWT RB(NE) ITAB20 NO! LDR* A3,A1 REMOVE FROM QUEUE STR A3,A4 UPDATE QUEUE LINKS CMR A2 RESET QUEUE LINK * IFT CPU852=1 RF IH:RTN XIF * IFT CPU852=0 RTN A15 XIF * EJECT DRIC01 * * A B T I M * * SUBROUTINE FOR ABORTING TIMER (IF ANY). * * INPUT: A2 = DWT ADDRESS * * OUTPUT: A1, A3 ARE DESTROYED * ABTIM2 EQU * CMR A2 RESET QUEUE LINK * ABTIM LDK A1,DWTTP ADR A1,A2 TIMER POINTER ADDRESS LDR* A3,A1 RF(Z) IH:RTN NO TIMER ACTIVE CM* 0,A1 CMR A1 INDICATE NO TIMER SET * IFT CPU852=1 IH:RTN ABL IHRTN XIF * IFT CPU852=0 IH:RTN RTN A15 XIF * * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRIC01 REL 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004c}
0x0052…0088 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0000, t01=0x0056}
0x0088…0092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008c}
0x0092…00ba Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0096}
0x00ba…00c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00be}
0x00c4…00f8 Head {h00=0x0030, h01=0x0050, text=»* DRIC01 = INTERTASK COMMUNICATION HANDLER«, t00=0x0000, t01=0x00c8}
0x00f8…0102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…010c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…012a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0124}
0x012a…0134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012e}
0x0134…016a Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0000, t01=0x0138}
0x016a…0174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016e}
0x0174…01b0 Head {h00=0x0038, h01=0x0050, text=»* THIS MODULE HANDLES THE INTERTASK COMMUNICATION «, t00=0x0000, t01=0x0178}
0x01b0…01ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0024}
0x01ba…01d2 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0001, t01=0x002e}
0x01d2…01dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0046}
0x01dc…01f0 Head {h00=0x0010, h01=0x0050, text=»* ORDERS: «, t00=0x0001, t01=0x0050}
0x01f0…01fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0064}
0x01fa…021e Head {h00=0x0020, h01=0x0050, text=»* /02 READ, NOT ADDRESSED«, t00=0x0001, t01=0x006e}
0x021e…0244 Head {h00=0x0022, h01=0x0050, text=»* /06 WRITE, NOT ADDRESSED «, t00=0x0001, t01=0x0092}
0x0244…0264 Head {h00=0x001c, h01=0x0050, text=»* /0A READ, ADDRESSED«, t00=0x0001, t01=0x00b8}
0x0264…0286 Head {h00=0x001e, h01=0x0050, text=»* /0B WRITE, ADDRESSED «, t00=0x0001, t01=0x00d8}
0x0286…02a2 Head {h00=0x0018, h01=0x0050, text=»* /39 SET TIMEOUT«, t00=0x0001, t01=0x00fa}
0x02a2…02ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0116}
0x02ac…02ca Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETERS: «, t00=0x0001, t01=0x0120}
0x02ca…02d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013e}
0x02d4…02f2 Head {h00=0x001a, h01=0x0050, text=»* A5 STACK BASE 2 «, t00=0x0001, t01=0x0148}
0x02f2…030e Head {h00=0x0018, h01=0x0050, text=»* A6 DWT ADDRESS«, t00=0x0001, t01=0x0166}
0x030e…032a Head {h00=0x0018, h01=0x0050, text=»* A7 ORDER CODE «, t00=0x0001, t01=0x0182}
0x032a…0346 Head {h00=0x0018, h01=0x0050, text=»* A8 ECB ADDRESS«, t00=0x0002, t01=0x000e}
0x0346…0376 Head {h00=0x002c, h01=0x0050, text=»* A12 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0002, t01=0x002a}
0x0376…0380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005a}
0x0380…0398 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0002, t01=0x0064}
0x0398…03a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007c}
0x03a2…03ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0086}
0x03ac…03c0 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0090}
0x03c0…03d4 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x00a4}
0x03d4…03e8 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00b8}
0x03e8…03f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00cc}
0x03f2…03fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d6}
0x03fc…041e Head {h00=0x001e, h01=0x0050, text=» ENTRY ITAD ADDRESS BLOCK «, t00=0x0002, t01=0x00e0}
0x041e…0452 Head {h00=0x0030, h01=0x0050, text=» ENTRY IT:BUF INTERTASK DRIVER BUFFER (MMU) «, t00=0x0002, t01=0x0102}
0x0452…046a Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0002, t01=0x0136}
0x046a…0474 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014e}
0x0474…047e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0158}
0x047e…0494 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x0162}
0x0494…04aa Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x0178}
0x04aa…04c0 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x018e}
0x04c0…04ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0014}
0x04ca…04d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x001e}
0x04d4…04f4 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0003, t01=0x0028}
0x04f4…0510 Head {h00=0x0018, h01=0x0050, text=» EXTRN TENDIO ENDIO «, t00=0x0003, t01=0x0048}
0x0510…0534 Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x0064}
0x0534…055e Head {h00=0x0026, h01=0x0050, text=» EXTRN DISEND TENDIO AND DISPATCH «, t00=0x0003, t01=0x0088}
0x055e…057e Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0003, t01=0x00b2}
0x057e…05a0 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0003, t01=0x00d2}
0x05a0…05ca Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK«, t00=0x0003, t01=0x00f4}
0x05ca…05f0 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTTAB DWT TTAB ADDRESS«, t00=0x0003, t01=0x011e}
0x05f0…061a Head {h00=0x0026, h01=0x0050, text=» EXTRN BUFLEN DRIVER BUFFER LENGTH«, t00=0x0003, t01=0x0144}
0x061a…0636 Head {h00=0x0018, h01=0x0050, text=» EXTRN SETIMP TIMER «, t00=0x0003, t01=0x016e}
0x0636…0666 Head {h00=0x002c, h01=0x0050, text=» EXTRN FNDTID FIND TTAB ADDRESS FROM TID«, t00=0x0003, t01=0x018a}
0x0666…0688 Head {h00=0x001e, h01=0x0050, text=» EXTRN TTB:ST TASK STATUS «, t00=0x0004, t01=0x002a}
0x0688…06ae Head {h00=0x0022, h01=0x0050, text=» EXTRN TTB:TD TERMINAL DEVICES«, t00=0x0004, t01=0x004c}
0x06ae…06e6 Head {h00=0x0034, h01=0x0050, text=» EXTRN IHRTN RTN A15 WITHOUT ENABLING INTERRUPTS«, t00=0x0004, t01=0x0072}
0x06e6…070e Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x00aa}
0x070e…0738 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x00d2}
0x0738…0762 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0004, t01=0x00fc}
0x0762…0788 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0004, t01=0x0126}
0x0788…07a8 Head {h00=0x001c, h01=0x0050, text=» EJECT DRIC01 TOSSIO«, t00=0x0004, t01=0x014c}
0x07a8…07b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x016c}
0x07b2…07bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0176}
0x07bc…07ee Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0004, t01=0x0180}
0x07ee…07f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0022}
0x07f8…0816 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0005, t01=0x002c}
0x0816…0820 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004a}
0x0820…0852 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0005, t01=0x0054}
0x0852…085c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0086}
0x085c…088e Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0005, t01=0x0090}
0x088e…08bc Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0005, t01=0x00c2}
0x08bc…08c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f0}
0x08c6…08da Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0005, t01=0x00fa}
0x08da…08e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010e}
0x08e4…08ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0118}
0x08ee…0928 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0005, t01=0x0122}
0x0928…095a Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0005, t01=0x015c}
0x095a…0964 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x018e}
0x0964…0978 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0006, t01=0x0008}
0x0978…0982 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x001c}
0x0982…099c Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0006, t01=0x0026}
0x099c…09a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0040}
0x09a6…09b8 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 50«, t00=0x0006, t01=0x004a}
0x09b8…09ce Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:A«, t00=0x0006, t01=0x005c}
0x09ce…09d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0072}
0x09d8…09f8 Head {h00=0x001c, h01=0x0050, text=»* INTERTASK DEVICE INDEX«, t00=0x0006, t01=0x007c}
0x09f8…0a02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009c}
0x0a02…0a16 Head {h00=0x0010, h01=0x0050, text=»DEVIND EQU 8«, t00=0x0006, t01=0x00a6}
0x0a16…0a20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ba}
0x0a20…0a38 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0006, t01=0x00c4}
0x0a38…0a42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00dc}
0x0a42…0a4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e6}
0x0a4c…0a6a Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0006, t01=0x00f0}
0x0a6a…0a88 Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS * «, t00=0x0006, t01=0x010e}
0x0a88…0aa6 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0006, t01=0x012c}
0x0aa6…0ab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014a}
0x0ab0…0aba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0154}
0x0aba…0aee Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0006, t01=0x015e}
0x0aee…0af8 (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af8…0b0e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0007, t01=0x000e}
0x0b0e…0b26 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0007, t01=0x0024}
0x0b26…0b32 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x003c}
0x0b32…0b3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0048}
0x0b3c…0b52 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0007, t01=0x0052}
0x0b52…0b6c Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0007, t01=0x0068}
0x0b6c…0b78 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x0082}
0x0b78…0b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x008e}
0x0b82…0bac Head {h00=0x0026, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER «, t00=0x0007, t01=0x0098}
0x0bac…0bce Head {h00=0x001e, h01=0x0050, text=»DWTIME EQU START+/02 TIME «, t00=0x0007, t01=0x00c2}
0x0bce…0c08 Head {h00=0x0036, h01=0x0050, text=»DWTANC EQU START+/04 POINTER TO FIRST DWT IN QUEUE«, t00=0x0007, t01=0x00e4}
0x0c08…0c3a Head {h00=0x002e, h01=0x0050, text=»DWTQUE EQU START+/06 QUEUE ANCHOR ADDRESS «, t00=0x0007, t01=0x011e}
0x0c3a…0c44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0150}
0x0c44…0c5c Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0007, t01=0x015a}
0x0c5c…0c66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0172}
0x0c66…0c70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x017c}
0x0c70…0c8a Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0007, t01=0x0186}
0x0c8a…0ca4 Head {h00=0x0016, h01=0x0050, text=»* ADDRESS BLOCK * «, t00=0x0008, t01=0x0010}
0x0ca4…0cbe Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0008, t01=0x002a}
0x0cbe…0cc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0044}
0x0cc8…0cd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x004e}
0x0cd2…0cfe Head {h00=0x0028, h01=0x0050, text=» DATA DVBLEN+DVBLEN MMU BUFFER SIZE «, t00=0x0008, t01=0x0058}
0x0cfe…0d2a Head {h00=0x0028, h01=0x0050, text=» DATA DEVIND INTERTASK DEVICE INDEX «, t00=0x0008, t01=0x0084}
0x0d2a…0d54 Head {h00=0x0026, h01=0x0050, text=»ITAD DATA ICAD ACTIVATION ADDRESS «, t00=0x0008, t01=0x00b0}
0x0d54…0d76 Head {h00=0x001e, h01=0x0050, text=» DATA ITABRT ABORT ADDRESS«, t00=0x0008, t01=0x00da}
0x0d76…0d80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00fc}
0x0d80…0d8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0106}
0x0d8a…0dc4 Head {h00=0x0036, h01=0x0050, text=»RD:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED READ REQ.«, t00=0x0008, t01=0x0110}
0x0dc4…0e00 Head {h00=0x0038, h01=0x0050, text=»WR:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED WRITE REQ. «, t00=0x0008, t01=0x014a}
0x0e00…0e0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0186}
0x0e0a…0e32 Head {h00=0x0024, h01=0x0050, text=»* INTERTASK DRIVER BUFFER (MMU) «, t00=0x0008, t01=0x0190}
0x0e32…0e3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0028}
0x0e3c…0e50 Head {h00=0x0010, h01=0x0050, text=»IT:BUF EQU *«, t00=0x0009, t01=0x0032}
0x0e50…0e66 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0009, t01=0x0046}
0x0e66…0e88 Head {h00=0x001e, h01=0x0050, text=» RES DVBLEN+1 MMU BUFFER «, t00=0x0009, t01=0x005c}
0x0e88…0e94 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x007e}
0x0e94…0e9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x008a}
0x0e9e…0eb6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0009, t01=0x0094}
0x0eb6…0ec0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ac}
0x0ec0…0ede Head {h00=0x001a, h01=0x0050, text=»* A C T I V A T I O N «, t00=0x0009, t01=0x00b6}
0x0ede…0ee8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d4}
0x0ee8…0efa Head {h00=0x000e, h01=0x0050, text=»ICAD EQU *«, t00=0x0009, t01=0x00de}
0x0efa…0f1e Head {h00=0x0020, h01=0x0050, text=» LDR A1,A7 ORDER CODE TO A1 «, t00=0x0009, t01=0x00f0}
0x0f1e…0f30 Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0009, t01=0x0114}
0x0f30…0f5a Head {h00=0x0026, h01=0x0050, text=» ABL(Z) RD:NAD READ NOT ADDRESSED «, t00=0x0009, t01=0x0126}
0x0f5a…0f6c Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0009, t01=0x0150}
0x0f6c…0f96 Head {h00=0x0026, h01=0x0050, text=» ABL(Z) WR:NAD WRITE NOT ADDRESSED«, t00=0x0009, t01=0x0162}
0x0f96…0fa8 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0009, t01=0x018c}
0x0fa8…0fcc Head {h00=0x0020, h01=0x0050, text=» RF(Z) RD:ADR READ ADDRESSED«, t00=0x000a, t01=0x000e}
0x0fcc…0fde Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000a, t01=0x0032}
0x0fde…1004 Head {h00=0x0022, h01=0x0050, text=» RF(Z) WR:ADR WRITE ADDRESSED «, t00=0x000a, t01=0x0044}
0x1004…1018 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2E «, t00=0x000a, t01=0x006a}
0x1018…103c Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DIS:OE REQUEST ERROR«, t00=0x000a, t01=0x007e}
0x103c…1046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a2}
0x1046…1068 Head {h00=0x001e, h01=0x0050, text=»* S E T T I M E O U T«, t00=0x000a, t01=0x00ac}
0x1068…1072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00ce}
0x1072…1092 Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIME«, t00=0x000a, t01=0x00d8}
0x1092…10aa Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTIME,A6«, t00=0x000a, t01=0x00f8}
0x10aa…10bc Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x000a, t01=0x0110}
0x10bc…10c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0122}
0x10c6…10de Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000a, t01=0x012c}
0x10de…10e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0144}
0x10e8…110c Head {h00=0x0020, h01=0x0050, text=»* R E A D, A D D R E S S E D«, t00=0x000a, t01=0x014e}
0x110c…1116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0172}
0x1116…113c Head {h00=0x0022, h01=0x0050, text=»* W R I T E, A D D R E S S E D«, t00=0x000a, t01=0x017c}
0x113c…1146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0012}
0x1146…116a Head {h00=0x0020, h01=0x0050, text=»RD:ADR EQU * READ, ADDRESSED«, t00=0x000b, t01=0x001c}
0x116a…1190 Head {h00=0x0022, h01=0x0050, text=»WR:ADR EQU * WRITE, ADDRESSED «, t00=0x000b, t01=0x0040}
0x1190…119a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0066}
0x119a…11c2 Head {h00=0x0024, h01=0x0050, text=»* FIND TTAB OF ADDRESSED TASK«, t00=0x000b, t01=0x0070}
0x11c2…11cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0098}
0x11cc…11e8 Head {h00=0x0018, h01=0x0050, text=» LD A7,ECBCW,A8 TID «, t00=0x000b, t01=0x00a2}
0x11e8…1212 Head {h00=0x0026, h01=0x0050, text=» CF A15,FNDTID TTAB ADDRESS TO A2 «, t00=0x000b, t01=0x00be}
0x1212…122a Head {h00=0x0014, h01=0x0050, text=» ADK A2,0 SET CR«, t00=0x000b, t01=0x00e8}
0x122a…124a Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIS:OE NOT FOUND «, t00=0x000b, t01=0x0100}
0x124a…1282 Head {h00=0x0034, h01=0x0050, text=» ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE«, t00=0x000b, t01=0x0120}
0x1282…12a2 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 TABLE LENGTH«, t00=0x000b, t01=0x0158}
0x12a2…12ca Head {h00=0x0024, h01=0x0050, text=» LDR A7,A12 DRIVER ADDRESS BLOCK«, t00=0x000b, t01=0x0178}
0x12ca…1304 Head {h00=0x0036, h01=0x0050, text=» XRK A7,1 IF INPUT, POINT TO OUTPUT BLOCK AND V.V.«, t00=0x000c, t01=0x0010}
0x1304…130e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004a}
0x130e…1326 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000c, t01=0x0054}
0x1326…1330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x006c}
0x1330…1358 Head {h00=0x0024, h01=0x0050, text=»* FIND DWT OF ADDRESSED TASK «, t00=0x000c, t01=0x0076}
0x1358…1362 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x009e}
0x1362…1396 Head {h00=0x0030, h01=0x0050, text=»ITC:05 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS «, t00=0x000c, t01=0x00a8}
0x1396…13a8 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000c, t01=0x00dc}
0x13a8…13c8 Head {h00=0x001c, h01=0x0050, text=» RF(N) DIS:OE NOT FOUND «, t00=0x000c, t01=0x00ee}
0x13c8…13d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x010e}
0x13d2…13f2 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A2 DWT ADDRESS «, t00=0x000c, t01=0x0118}
0x13f2…1418 Head {h00=0x0022, h01=0x0050, text=» CW A7,DWTADR,A4 SEARCHED DWT «, t00=0x000c, t01=0x0138}
0x1418…143c Head {h00=0x0020, h01=0x0050, text=» RB(NE) ITC:05 NO, TRY NEXT «, t00=0x000c, t01=0x015e}
0x143c…1446 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0182}
0x1446…1458 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x000c, t01=0x018c}
0x1458…147c Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTST,A2 ANY REQUEST «, t00=0x000d, t01=0x000e}
0x147c…1496 Head {h00=0x0016, h01=0x0050, text=» RF(N) ITC:40 NO! «, t00=0x000d, t01=0x0032}
0x1496…14a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x004c}
0x14a0…14d2 Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTQUE,A2 GET QUEUE ANCHOR ADDRESS «, t00=0x000d, t01=0x0056}
0x14d2…14f8 Head {h00=0x0022, h01=0x0050, text=» CWR A1,A6 CHECK QUEUE ANCHOR «, t00=0x000d, t01=0x0088}
0x14f8…152a Head {h00=0x002e, h01=0x0050, text=» RF(E) ITC:10 REQUEST ISSUED FOR THIS TASK«, t00=0x000d, t01=0x00ae}
0x152a…1534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00e0}
0x1534…1546 Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x000d, t01=0x00ea}
0x1546…1560 Head {h00=0x0016, h01=0x0050, text=» RF(Z) ITC:35 READ«, t00=0x000d, t01=0x00fc}
0x1560…1576 Head {h00=0x0012, h01=0x0050, text=» CWK A1,RD:QUE«, t00=0x000d, t01=0x0116}
0x1576…1590 Head {h00=0x0016, h01=0x0050, text=» RF(NE) ITC:50 NO «, t00=0x000d, t01=0x012c}
0x1590…159a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0146}
0x159a…15ba Head {h00=0x001c, h01=0x0050, text=»* ABORT TIMER IF ANY «, t00=0x000d, t01=0x0150}
0x15ba…15c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0170}
0x15c4…1606 Head {h00=0x003e, h01=0x0050, text=»ITC:10 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE«, t00=0x000d, t01=0x017a}
0x1606…1618 Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x000e, t01=0x002c}
0x1618…1632 Head {h00=0x0016, h01=0x0050, text=» RF(Z) RD:N05 READ«, t00=0x000e, t01=0x003e}
0x1632…163c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0058}
0x163c…1654 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000e, t01=0x0062}
0x1654…165e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x007a}
0x165e…1676 Head {h00=0x0014, h01=0x0050, text=»* MOVE BUFFER«, t00=0x000e, t01=0x0084}
0x1676…1680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009c}
0x1680…1694 Head {h00=0x0010, h01=0x0050, text=»ITC:15 EQU *«, t00=0x000e, t01=0x00a6}
0x1694…16b8 Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 SENDING ECB«, t00=0x000e, t01=0x00ba}
0x16b8…16e0 Head {h00=0x0024, h01=0x0050, text=» ENB GIVE OTHER TASKS A CHANCE «, t00=0x000e, t01=0x00de}
0x16e0…16f2 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x000e, t01=0x0106}
0x16f2…1718 Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A2 RECEIVING ECB«, t00=0x000e, t01=0x0118}
0x1718…1748 Head {h00=0x002c, h01=0x0050, text=» LD A3,ECBRL,A8 SENDING REQUESTED LENGTH«, t00=0x000e, t01=0x013e}
0x1748…175e Head {h00=0x0012, h01=0x0050, text=» RF(NP) DIS:OE«, t00=0x000e, t01=0x016e}
0x175e…1776 Head {h00=0x0014, h01=0x0050, text=» CW A3,ECBRL,A9 «, t00=0x000e, t01=0x0184}
0x1776…178c Head {h00=0x0012, h01=0x0050, text=» RF(NG) ITC:20«, t00=0x000f, t01=0x000c}
0x178c…17bc Head {h00=0x002c, h01=0x0050, text=» LDK A1,8 RETURN CODE (INCORRECT LENGTH)«, t00=0x000f, t01=0x0022}
0x17bc…17d4 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBRL,A9 «, t00=0x000f, t01=0x0052}
0x17d4…17ea Head {h00=0x0012, h01=0x0050, text=» RF(NP) DIS:OE«, t00=0x000f, t01=0x006a}
0x17ea…17f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0080}
0x17f4…1808 Head {h00=0x0010, h01=0x0050, text=»ITC:20 EQU *«, t00=0x000f, t01=0x008a}
0x1808…181e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x009e}
0x181e…1858 Head {h00=0x0036, h01=0x0050, text=» LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x000f, t01=0x00b4}
0x1858…1886 Head {h00=0x002a, h01=0x0050, text=» CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE«, t00=0x000f, t01=0x00ee}
0x1886…18b4 Head {h00=0x002a, h01=0x0050, text=» RF(NG) ITC:25 MMU BUFFER LARGE ENOUGH«, t00=0x000f, t01=0x011c}
0x18b4…18de Head {h00=0x0026, h01=0x0050, text=» LDKL A1,/8008 NO, INDICATE ERROR «, t00=0x000f, t01=0x014a}
0x18de…1912 Head {h00=0x0030, h01=0x0050, text=» ABL DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x000f, t01=0x0174}
0x1912…191c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0018}
0x191c…1930 Head {h00=0x0010, h01=0x0050, text=»ITC:25 EQU *«, t00=0x0010, t01=0x0022}
0x1930…193c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0036}
0x193c…1946 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0042}
0x1946…194e Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x004c}
0x194e…1976 Head {h00=0x0024, h01=0x0050, text=» ST A3,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0010, t01=0x0054}
0x1976…199e Head {h00=0x0024, h01=0x0050, text=» ST A3,ECBEL,A9 EFFECTIVE LENGTH«, t00=0x0010, t01=0x007c}
0x199e…19a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a4}
0x19a8…19c0 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0010, t01=0x00ae}
0x19c0…19ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c6}
0x19ca…19d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d0}
0x19d4…19ea Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0010, t01=0x00da}
0x19ea…1a18 Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBBA,A8 SENDING BUFFER ADDRESS«, t00=0x0010, t01=0x00f0}
0x1a18…1a48 Head {h00=0x002c, h01=0x0050, text=» LD A7,ECBBA,A9 RECEIVING BUFFER ADDRESS«, t00=0x0010, t01=0x011e}
0x1a48…1a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x014e}
0x1a52…1a66 Head {h00=0x0010, h01=0x0050, text=»ITC:30 EQU *«, t00=0x0010, t01=0x0158}
0x1a66…1a78 Head {h00=0x000e, h01=0x0050, text=» LCR A9,A4«, t00=0x0010, t01=0x016c}
0x1a78…1a8a Head {h00=0x000e, h01=0x0050, text=» SCR A9,A7«, t00=0x0010, t01=0x017e}
0x1a8a…1a9c Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0010, t01=0x0190}
0x1a9c…1aae Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x0011, t01=0x0012}
0x1aae…1ac0 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0011, t01=0x0024}
0x1ac0…1ad6 Head {h00=0x0012, h01=0x0050, text=» RB(P) ITC:30 «, t00=0x0011, t01=0x0036}
0x1ad6…1ae2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x004c}
0x1ae2…1aec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0058}
0x1aec…1b0c Head {h00=0x001c, h01=0x0050, text=» CF A15,TENDIO END WRITE«, t00=0x0011, t01=0x0062}
0x1b0c…1b1e Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x0011, t01=0x0082}
0x1b1e…1b28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0094}
0x1b28…1b3e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0011, t01=0x009e}
0x1b3e…1b70 Head {h00=0x002e, h01=0x0050, text=» LD A3,ECBBA,A8 GET SENDING BUFFER ADDRESS«, t00=0x0011, t01=0x00b4}
0x1b70…1b82 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0011, t01=0x00e6}
0x1b82…1bac Head {h00=0x0026, h01=0x0050, text=» RF(Z) ITC:30 BUFFER ADDRESS EVEN «, t00=0x0011, t01=0x00f8}
0x1bac…1bea Head {h00=0x003a, h01=0x0050, text=» ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN «, t00=0x0011, t01=0x0122}
0x1bea…1bfc Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x0011, t01=0x0160}
0x1bfc…1c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0172}
0x1c06…1c1a Head {h00=0x0010, h01=0x0050, text=»ITC:30 EQU *«, t00=0x0011, t01=0x017c}
0x1c1a…1c38 Head {h00=0x001a, h01=0x0050, text=» SUK A3,2 A3 := /FFFE «, t00=0x0011, t01=0x0190}
0x1c38…1c74 Head {h00=0x0038, h01=0x0050, text=» ANS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS EVEN «, t00=0x0012, t01=0x001e}
0x1c74…1c80 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x005a}
0x1c80…1c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0066}
0x1c8a…1cb0 Head {h00=0x0022, h01=0x0050, text=»END:IO CF A15,TENDIO END READ «, t00=0x0012, t01=0x0070}
0x1cb0…1cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0096}
0x1cba…1cd2 Head {h00=0x0014, h01=0x0050, text=»T:DISP ABL TDISP«, t00=0x0012, t01=0x00a0}
0x1cd2…1cdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b8}
0x1cdc…1cf4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0012, t01=0x00c2}
0x1cf4…1cfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00da}
0x1cfe…1d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e4}
0x1d08…1d1c Head {h00=0x0010, h01=0x0050, text=»ITC:35 EQU *«, t00=0x0012, t01=0x00ee}
0x1d1c…1d32 Head {h00=0x0012, h01=0x0050, text=» CWK A1,WR:QUE«, t00=0x0012, t01=0x0102}
0x1d32…1d5e Head {h00=0x0028, h01=0x0050, text=» RB(E) ITC:10 COMPLEMENTARY REQUEST «, t00=0x0012, t01=0x0118}
0x1d5e…1d68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0144}
0x1d68…1d80 Head {h00=0x0014, h01=0x0050, text=»* OUEUE REQUEST «, t00=0x0012, t01=0x014e}
0x1d80…1d8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0166}
0x1d8a…1dbc Head {h00=0x002e, h01=0x0050, text=»ITC:40 LDK A7,0 INDICATE ADDRESSED REQUEST«, t00=0x0012, t01=0x0170}
0x1dbc…1dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0012}
0x1dc6…1dda Head {h00=0x0010, h01=0x0050, text=»ITC:50 EQU *«, t00=0x0013, t01=0x001c}
0x1dda…1df8 Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTIME,A6 TIME «, t00=0x0013, t01=0x0030}
0x1df8…1e0e Head {h00=0x0012, h01=0x0050, text=» RF(Z) TWR:30 «, t00=0x0013, t01=0x004e}
0x1e0e…1e20 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0013, t01=0x0064}
0x1e20…1e46 Head {h00=0x0022, h01=0x0050, text=» RF(Z) ITC:70 NO TIMING WANTED«, t00=0x0013, t01=0x0076}
0x1e46…1e58 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0013, t01=0x009c}
0x1e58…1e7c Head {h00=0x0020, h01=0x0050, text=» RF(N) DIS:OE NEGATIVE TIME «, t00=0x0013, t01=0x00ae}
0x1e7c…1eb6 Head {h00=0x0036, h01=0x0050, text=» LDR A1,A6 DWTOUT = PARAM. WHEN WRITE, ELSE DWTIN «, t00=0x0013, t01=0x00d2}
0x1eb6…1ecc Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTTP «, t00=0x0013, t01=0x010c}
0x1ecc…1eec Head {h00=0x001c, h01=0x0050, text=» ADR A4,A6 TIMER POINTER«, t00=0x0013, t01=0x0122}
0x1eec…1f00 Head {h00=0x0010, h01=0x0050, text=» ST A3,TIME «, t00=0x0013, t01=0x0142}
0x1f00…1f20 Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIMER«, t00=0x0013, t01=0x0156}
0x1f20…1f44 Head {h00=0x0020, h01=0x0050, text=» DATA TIMOUT TIMEOUT ADDRESS«, t00=0x0013, t01=0x0176}
0x1f44…1f58 Head {h00=0x0010, h01=0x0050, text=»TIME DATA 0 «, t00=0x0014, t01=0x000a}
0x1f58…1f62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x001e}
0x1f62…1f7a Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0014, t01=0x0028}
0x1f7a…1f84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0040}
0x1f84…1fb0 Head {h00=0x0028, h01=0x0050, text=»* INSERT IN QUEUE WITHIN PRIORITY«, t00=0x0014, t01=0x004a}
0x1fb0…1fba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0076}
0x1fba…1fce Head {h00=0x0010, h01=0x0050, text=»ITC:70 EQU *«, t00=0x0014, t01=0x0080}
0x1fce…2000 Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTQUE,A6 STORE QUEUE ANCHOR IN DWT«, t00=0x0014, t01=0x0094}
0x2000…2026 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x0014, t01=0x00c6}
0x2026…2046 Head {h00=0x001c, h01=0x0050, text=» LD A1,TTB:ST+1,A5 LEVEL«, t00=0x0014, t01=0x00ec}
0x2046…2058 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0014, t01=0x010c}
0x2058…2084 Head {h00=0x0028, h01=0x0050, text=» RF(P) ITC:80 NOT-ADDRESSED REQUEST «, t00=0x0014, t01=0x011e}
0x2084…20c2 Head {h00=0x003a, h01=0x0050, text=» ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE «, t00=0x0014, t01=0x014a}
0x20c2…20cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0188}
0x20cc…20ea (21, 0, 400) Head {h00=0x001a, h01=0x0050, text=»ITC:80 LDR A4,A2 SAVE «, t00=0x0015, t01=0x0004}
0x20ea…210c Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A2 NEXT IN QUEUE «, t00=0x0015, t01=0x0022}
0x210c…212c Head {h00=0x001c, h01=0x0050, text=» RF(Z) ITC:90 END FOUND «, t00=0x0015, t01=0x0044}
0x212c…2152 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A2 TTAB ADDRESS «, t00=0x0015, t01=0x0064}
0x2152…217c Head {h00=0x0026, h01=0x0050, text=» CC A1,TTB:ST+1,A5 COMPARE LEVELS «, t00=0x0015, t01=0x008a}
0x217c…2192 Head {h00=0x0012, h01=0x0050, text=» RB(NL) ITC:80«, t00=0x0015, t01=0x00b4}
0x2192…219c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ca}
0x219c…21c4 Head {h00=0x0024, h01=0x0050, text=»ITC:90 STR A2,A6 INSERT IN QUEUE«, t00=0x0015, t01=0x00d4}
0x21c4…21d6 Head {h00=0x000e, h01=0x0050, text=» STR A6,A4«, t00=0x0015, t01=0x00fc}
0x21d6…21e8 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0015, t01=0x010e}
0x21e8…21f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0120}
0x21f2…221a Head {h00=0x0024, h01=0x0050, text=»DIS:OE ABL DISIOE REQUEST ERROR «, t00=0x0015, t01=0x012a}
0x221a…2224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0152}
0x2224…223c Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0015, t01=0x015c}
0x223c…2246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0174}
0x2246…2272 Head {h00=0x0028, h01=0x0050, text=»* R E A D, N O T A D D R E S S E D «, t00=0x0015, t01=0x017e}
0x2272…227c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x001a}
0x227c…22a4 Head {h00=0x0024, h01=0x0050, text=»RD:NAD EQU * READ, NOT ADDRESSED«, t00=0x0016, t01=0x0024}
0x22a4…22e4 Head {h00=0x003c, h01=0x0050, text=» LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS«, t00=0x0016, t01=0x004c}
0x22e4…230c Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RD:N10 ANYTHING IN QUEUE«, t00=0x0016, t01=0x008c}
0x230c…234a Head {h00=0x003a, h01=0x0050, text=» LD A2,WR:QUE CHECK QUEUE OF NOT ADDRESSED WRITE REQ. «, t00=0x0016, t01=0x00b4}
0x234a…236c Head {h00=0x001e, h01=0x0050, text=» RF(Z) RD:N20 QUEUE EMPTY «, t00=0x0016, t01=0x00f2}
0x236c…2396 Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A2 NO, REMOVE FROM QUEUE «, t00=0x0016, t01=0x0114}
0x2396…23c0 Head {h00=0x0026, h01=0x0050, text=» ST A3,WR:QUE UPDATE QUEUE ANCHOR «, t00=0x0016, t01=0x013e}
0x23c0…23ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0168}
0x23ca…23de Head {h00=0x0010, h01=0x0050, text=»RD:N00 EQU *«, t00=0x0016, t01=0x0172}
0x23de…2408 Head {h00=0x0026, h01=0x0050, text=» CF A15,ABTIM2 ABORT TIMER IF ANY «, t00=0x0016, t01=0x0186}
0x2408…2412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0020}
0x2412…2426 Head {h00=0x0010, h01=0x0050, text=»RD:N05 EQU *«, t00=0x0017, t01=0x002a}
0x2426…244c Head {h00=0x0022, h01=0x0050, text=» XRR A2,A6 EXCHANGE A2 AND A6 «, t00=0x0017, t01=0x003e}
0x244c…245e Head {h00=0x000e, h01=0x0050, text=» XRR A6,A2«, t00=0x0017, t01=0x0064}
0x245e…2470 Head {h00=0x000e, h01=0x0050, text=» XRR A2,A6«, t00=0x0017, t01=0x0076}
0x2470…2482 Head {h00=0x000e, h01=0x0050, text=» RB ITC:15«, t00=0x0017, t01=0x0088}
0x2482…248c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x009a}
0x248c…24b8 Head {h00=0x0028, h01=0x0050, text=»RD:N10 LDR* A3,A2 REMOVE FROM QUEUE «, t00=0x0017, t01=0x00a4}
0x24b8…24e4 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR«, t00=0x0017, t01=0x00d0}
0x24e4…24f6 Head {h00=0x000e, h01=0x0050, text=» RB RD:N00«, t00=0x0017, t01=0x00fc}
0x24f6…2500 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x010e}
0x2500…2530 Head {h00=0x002c, h01=0x0050, text=»RD:N20 LDKL A2,RD:QUE GET RD:QUE ADDRESS«, t00=0x0017, t01=0x0118}
0x2530…2552 Head {h00=0x001e, h01=0x0050, text=» RB ITC:50 INSERT IN QUEUE«, t00=0x0017, t01=0x0148}
0x2552…255c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x016a}
0x255c…2574 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0017, t01=0x0174}
0x2574…257e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x018c}
0x257e…25ac Head {h00=0x002a, h01=0x0050, text=»* W R I T E, N O T A D D R E S S E D «, t00=0x0018, t01=0x0008}
0x25ac…25b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0036}
0x25b6…25e0 Head {h00=0x0026, h01=0x0050, text=»WR:NAD EQU * WRITE, NOT ADDRESSED «, t00=0x0018, t01=0x0040}
0x25e0…2620 Head {h00=0x003c, h01=0x0050, text=» LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS «, t00=0x0018, t01=0x006a}
0x2620…2648 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) WR:N10 ANYTHING IN QUEUE«, t00=0x0018, t01=0x00aa}
0x2648…2684 Head {h00=0x0038, h01=0x0050, text=» LD A2,RD:QUE CHECK QUEUE OF NOT ADDRESSED READ REQ.«, t00=0x0018, t01=0x00d2}
0x2684…26a6 Head {h00=0x001e, h01=0x0050, text=» RF(Z) WR:N20 QUEUE EMPTY «, t00=0x0018, t01=0x010e}
0x26a6…26d0 Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A2 NO, REMOVE FROM QUEUE «, t00=0x0018, t01=0x0130}
0x26d0…26fa Head {h00=0x0026, h01=0x0050, text=» ST A3,RD:QUE UPDATE QUEUE ANCHOR «, t00=0x0018, t01=0x015a}
0x26fa…2704 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0184}
0x2704…2734 Head {h00=0x002c, h01=0x0050, text=»WR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY «, t00=0x0018, t01=0x018e}
0x2734…2746 Head {h00=0x000e, h01=0x0050, text=» RB ITC:15«, t00=0x0019, t01=0x002e}
0x2746…2750 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0040}
0x2750…277c Head {h00=0x0028, h01=0x0050, text=»WR:N10 LDR* A3,A2 REMOVE FROM QUEUE «, t00=0x0019, t01=0x004a}
0x277c…27a8 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR«, t00=0x0019, t01=0x0076}
0x27a8…27ba Head {h00=0x000e, h01=0x0050, text=» RB WR:N05«, t00=0x0019, t01=0x00a2}
0x27ba…27c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00b4}
0x27c4…27f4 Head {h00=0x002c, h01=0x0050, text=»WR:N20 LDKL A2,WR:QUE GET WR:QUE ADDRESS«, t00=0x0019, t01=0x00be}
0x27f4…2806 Head {h00=0x000e, h01=0x0050, text=» RB ITC:50«, t00=0x0019, t01=0x00ee}
0x2806…2810 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0100}
0x2810…2828 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0019, t01=0x010a}
0x2828…2832 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0122}
0x2832…284a Head {h00=0x0014, h01=0x0050, text=»* T I M E O U T «, t00=0x0019, t01=0x012c}
0x284a…2854 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0144}
0x2854…2878 Head {h00=0x0020, h01=0x0050, text=»TIMOUT LDR A6,A1 DWT ADDRESS«, t00=0x0019, t01=0x014e}
0x2878…289e Head {h00=0x0022, h01=0x0050, text=» CM* 0,A2 RESET TIMER POINTER «, t00=0x0019, t01=0x0172}
0x289e…28b0 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x001a, t01=0x0008}
0x28b0…28d8 Head {h00=0x0024, h01=0x0050, text=» CF A15,ITAB10 REMOVE FROM QUEUE«, t00=0x001a, t01=0x001a}
0x28d8…28e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0042}
0x28e2…28f6 Head {h00=0x0010, h01=0x0050, text=»TWR:30 EQU *«, t00=0x001a, t01=0x004c}
0x28f6…2916 Head {h00=0x001c, h01=0x0050, text=» CMR A6 RESET QUEUE LINK«, t00=0x001a, t01=0x0060}
0x2916…2936 Head {h00=0x001c, h01=0x0050, text=» LDK A1,/40 RETURN CODE «, t00=0x001a, t01=0x0080}
0x2936…2948 Head {h00=0x000e, h01=0x0050, text=» RB END:IO«, t00=0x001a, t01=0x00a0}
0x2948…2952 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00b2}
0x2952…296a Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001a, t01=0x00bc}
0x296a…2974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d4}
0x2974…298a Head {h00=0x0012, h01=0x0050, text=»* I T A B R T «, t00=0x001a, t01=0x00de}
0x298a…2994 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00f4}
0x2994…29c6 Head {h00=0x002e, h01=0x0050, text=»* THIS SUBROUTINE IS CALLED FROM TABORT. «, t00=0x001a, t01=0x00fe}
0x29c6…2a00 Head {h00=0x0036, h01=0x0050, text=»* IT WILL UPDATE QUEUE AND ABORT TIMER (IF ANY). «, t00=0x001a, t01=0x0130}
0x2a00…2a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016a}
0x2a0a…2a2e Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS «, t00=0x001a, t01=0x0174}
0x2a2e…2a38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0008}
0x2a38…2a5e Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED«, t00=0x001b, t01=0x0012}
0x2a5e…2a68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0038}
0x2a68…2a7c Head {h00=0x0010, h01=0x0050, text=»ITABRT EQU *«, t00=0x001b, t01=0x0042}
0x2a7c…2a8e Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x001b, t01=0x0056}
0x2a8e…2a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0068}
0x2a98…2aac Head {h00=0x0010, h01=0x0050, text=»ITAB05 EQU *«, t00=0x001b, t01=0x0072}
0x2aac…2ace Head {h00=0x001e, h01=0x0050, text=» CF A15,ABTIM ABORT TIMER «, t00=0x001b, t01=0x0086}
0x2ace…2ad8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a8}
0x2ad8…2af8 Head {h00=0x001c, h01=0x0050, text=»* REMOVE DWT FROM QUEUE «, t00=0x001b, t01=0x00b2}
0x2af8…2b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d2}
0x2b02…2b16 Head {h00=0x0010, h01=0x0050, text=»ITAB10 EQU *«, t00=0x001b, t01=0x00dc}
0x2b16…2b40 Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTQUE,A2 GET QUEUE ACHHOR «, t00=0x001b, t01=0x00f0}
0x2b40…2b56 Head {h00=0x0012, h01=0x0050, text=» CWK A1,RD:QUE«, t00=0x001b, t01=0x011a}
0x2b56…2b86 Head {h00=0x002c, h01=0x0050, text=» RF(E) ITAB20 NOT-ADDRESSED READ REQUEST«, t00=0x001b, t01=0x0130}
0x2b86…2b9c Head {h00=0x0012, h01=0x0050, text=» CWK A1,WR:QUE«, t00=0x001b, t01=0x0160}
0x2b9c…2bce Head {h00=0x002e, h01=0x0050, text=» RF(E) ITAB20 NOT-ADDRESSED WRITE REQUEST «, t00=0x001b, t01=0x0176}
0x2bce…2c0c Head {h00=0x003a, h01=0x0050, text=» ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE «, t00=0x001c, t01=0x0018}
0x2c0c…2c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0056}
0x2c16…2c2e Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001c, t01=0x0060}
0x2c2e…2c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0078}
0x2c38…2c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0082}
0x2c42…2c60 Head {h00=0x001a, h01=0x0050, text=»ITAB20 LDR A4,A1 SAVE «, t00=0x001c, t01=0x008c}
0x2c60…2c82 Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A1 NEXT IN QUEUE «, t00=0x001c, t01=0x00aa}
0x2c82…2ca2 Head {h00=0x001c, h01=0x0050, text=» CWR A1,A2 SEARCHED DWT «, t00=0x001c, t01=0x00cc}
0x2ca2…2cbc Head {h00=0x0016, h01=0x0050, text=» RB(NE) ITAB20 NO!«, t00=0x001c, t01=0x00ec}
0x2cbc…2ce2 Head {h00=0x0022, h01=0x0050, text=» LDR* A3,A1 REMOVE FROM QUEUE «, t00=0x001c, t01=0x0106}
0x2ce2…2d08 Head {h00=0x0022, h01=0x0050, text=» STR A3,A4 UPDATE QUEUE LINKS «, t00=0x001c, t01=0x012c}
0x2d08…2d28 Head {h00=0x001c, h01=0x0050, text=» CMR A2 RESET QUEUE LINK«, t00=0x001c, t01=0x0152}
0x2d28…2d32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0172}
0x2d32…2d48 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001c, t01=0x017c}
0x2d48…2d5a (29, 0, 400) Head {h00=0x000e, h01=0x0050, text=» RF IH:RTN«, t00=0x001d, t01=0x0004}
0x2d5a…2d66 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0016}
0x2d66…2d70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0022}
0x2d70…2d86 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001d, t01=0x002c}
0x2d86…2d96 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x001d, t01=0x0042}
0x2d96…2da2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0052}
0x2da2…2dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x005e}
0x2dac…2dc4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001d, t01=0x0068}
0x2dc4…2dce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0080}
0x2dce…2de2 Head {h00=0x0010, h01=0x0050, text=»* A B T I M «, t00=0x001d, t01=0x008a}
0x2de2…2dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x009e}
0x2dec…2e1e Head {h00=0x002e, h01=0x0050, text=»* SUBROUTINE FOR ABORTING TIMER (IF ANY).«, t00=0x001d, t01=0x00a8}
0x2e1e…2e28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00da}
0x2e28…2e4c Head {h00=0x0020, h01=0x0050, text=»* INPUT: A2 = DWT ADDRESS «, t00=0x001d, t01=0x00e4}
0x2e4c…2e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0108}
0x2e56…2e7e Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A1, A3 ARE DESTROYED «, t00=0x001d, t01=0x0112}
0x2e7e…2e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x013a}
0x2e88…2e9c Head {h00=0x0010, h01=0x0050, text=»ABTIM2 EQU *«, t00=0x001d, t01=0x0144}
0x2e9c…2ebc Head {h00=0x001c, h01=0x0050, text=» CMR A2 RESET QUEUE LINK«, t00=0x001d, t01=0x0158}
0x2ebc…2ec6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0178}
0x2ec6…2ee0 Head {h00=0x0016, h01=0x0050, text=»ABTIM LDK A1,DWTTP«, t00=0x001d, t01=0x0182}
0x2ee0…2f08 Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 TIMER POINTER ADDRESS«, t00=0x001e, t01=0x000c}
0x2f08…2f1c Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A1 «, t00=0x001e, t01=0x0034}
0x2f1c…2f42 Head {h00=0x0022, h01=0x0050, text=» RF(Z) IH:RTN NO TIMER ACTIVE «, t00=0x001e, t01=0x0048}
0x2f42…2f54 Head {h00=0x000e, h01=0x0050, text=» CM* 0,A1 «, t00=0x001e, t01=0x006e}
0x2f54…2f7a Head {h00=0x0022, h01=0x0050, text=» CMR A1 INDICATE NO TIMER SET «, t00=0x001e, t01=0x0080}
0x2f7a…2f84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a6}
0x2f84…2f9a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001e, t01=0x00b0}
0x2f9a…2fb2 Head {h00=0x0014, h01=0x0050, text=»IH:RTN ABL IHRTN«, t00=0x001e, t01=0x00c6}
0x2fb2…2fbe Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00de}
0x2fbe…2fc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ea}
0x2fc8…2fde Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001e, t01=0x00f4}
0x2fde…2ff4 Head {h00=0x0012, h01=0x0050, text=»IH:RTN RTN A15«, t00=0x001e, t01=0x010a}
0x2ff4…3000 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0120}
0x3000…300a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x012c}
0x300a…3014 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0136}
0x3014…301e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0140}
0x301e…302a Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001e, t01=0x014a}
0x302a…302e Head {h00=0x4004, h01=0x0000}
0x302e…3032 00 1e 01 56 ┆ V┆
0x3032…303a (31, 1, 8) 20 04 00 00 00 1f 00 04 ┆ ┆
0x303a…308a (32, 0, 400) 5c 43 46 5c 41 31 34 2c 43 52 4e 47 45 54 5c 43 55 52 52 45 4e 43 59 20 00 17 01 90 00 18 00 50 5c 4c 44 4b 5c 41 33 2c 30 5c 4e 45 57 20 53 54 41 54 55 53 00 18 00 20 00 20 00 50 5c 4c 43 5c 41 34 2c 43 52 4e 53 54 41 2c 41 32 5c 4f 4c 44 ┆ CF A14,CRNGET CURRENCY P LDK A3,0 NEW STATUS P LC A4,CRNSTA,A2 OLD┆
0x308a…30da 20 53 54 41 54 55 53 20 00 18 00 3c 00 14 00 50 5c 53 43 5c 41 33 2c 43 52 4e 53 54 41 2c 41 32 00 18 00 60 00 28 00 50 5c 41 42 49 5c 54 49 4f 44 4d 46 2c 41 35 5c 42 52 41 4e 43 48 20 54 4f 20 44 4d 20 46 55 4e 43 54 49 4f 4e 00 18 00 78 ┆ STATUS < P SC A3,CRNSTA,A2 ` ( P ABI TIODMF,A5 BRANCH TO DM FUNCTION x┆
0x30da…312a 00 06 00 50 2a 20 00 18 00 a4 00 22 00 50 2a 20 20 20 41 31 20 3d 20 46 44 42 20 41 44 44 52 45 53 53 20 44 41 54 41 20 46 49 4c 45 00 18 00 ae 00 24 00 50 2a 20 20 20 41 32 20 3d 20 43 55 52 52 45 4e 43 59 20 42 55 46 46 45 52 20 41 44 44 ┆ P* " P* A1 = FDB ADDRESS DATA FILE $ P* A2 = CURRENCY BUFFER ADD┆
0x312a…317a 52 45 53 53 00 18 00 d4 00 26 00 50 2a 20 20 20 41 34 20 3d 20 4f 4c 44 20 53 54 41 54 55 53 20 49 4e 20 52 49 47 48 54 20 42 59 54 45 20 00 18 00 fc 00 2a 00 50 2a 20 20 20 41 35 20 3d 20 4f 52 44 45 52 20 43 4f 44 45 20 41 54 20 45 4e 54 ┆RESS & P* A4 = OLD STATUS IN RIGHT BYTE * P* A5 = ORDER CODE AT ENT┆
0x317a…31ca 52 59 20 54 4f 20 54 49 4f 44 4d 20 00 18 01 26 00 30 00 50 2a 20 20 20 41 36 20 3d 20 46 44 42 20 41 44 44 52 45 53 53 20 46 49 4c 45 20 44 45 56 49 43 45 20 55 53 45 52 20 51 55 45 55 45 20 00 18 01 54 00 1c 00 50 2a 20 20 20 41 37 20 3d ┆RY TO TIODM & 0 P* A6 = FDB ADDRESS FILE DEVICE USER QUEUE T P* A7 =┆
0x31ca…321a (33, 0, 400) 20 55 53 45 52 20 4f 52 44 45 52 20 57 4f 52 44 00 18 01 88 00 1e 00 50 2a 20 20 20 41 38 20 3d 20 55 53 45 52 20 45 43 42 20 41 44 44 52 45 53 53 20 00 19 00 18 00 0a 00 50 5c 45 4a 45 43 54 00 19 00 3a 00 1c 00 50 52 44 53 54 41 54 5c 45 ┆ USER ORDER WORD P* A8 = USER ECB ADDRESS P EJECT : PRDSTAT E┆
0x321a…326a 51 55 5c 2a 5c 52 45 41 44 20 53 54 41 54 55 53 00 19 00 48 00 20 00 50 5c 53 43 5c 41 34 2c 43 52 4e 53 54 41 2c 41 32 5c 53 54 41 54 55 53 20 43 48 41 52 00 19 00 68 00 10 00 50 5c 41 4e 4b 5c 41 34 2c 2f 46 46 20 00 19 00 8c 00 22 00 50 ┆QU * READ STATUS H P SC A4,CRNSTA,A2 STATUS CHAR h P ANK A4,/FF " P┆
0x326a…32ba 5c 53 54 5c 41 34 2c 45 43 42 43 57 2c 41 38 5c 52 45 54 55 52 4e 20 53 54 41 54 55 53 20 00 19 00 a0 00 12 00 50 5c 43 4d 5c 45 43 42 43 57 2b 32 2c 41 38 00 19 00 c6 00 1a 00 50 5c 4c 44 4b 5c 41 31 2c 30 5c 52 45 54 20 43 4f 44 45 20 4f ┆ ST A4,ECBCW,A8 RETURN STATUS P CM ECBCW+2,A8 P LDK A1,0 RET CODE O┆
0x32ba…330a 4b 20 00 19 00 dc 00 10 00 50 5c 41 42 4c 5c 54 49 4f 44 4d 58 20 00 19 00 fa 00 0a 00 50 5c 45 4a 45 43 54 00 19 01 0e 00 1a 00 50 52 45 41 44 5c 45 51 55 5c 2a 5c 52 45 41 44 20 4f 52 44 45 52 53 00 19 01 1c 00 12 00 50 5c 4c 44 4b 4c 5c ┆K P ABL TIODMX P EJECT PREAD EQU * READ ORDERS P LDKL ┆
0x330a…335a 41 33 2c 2f 31 30 30 20 00 19 01 3a 00 16 00 50 5c 54 4d 5c 41 33 2c 41 37 5c 54 45 53 54 20 42 49 54 00 19 01 50 00 20 00 50 5c 52 46 28 4e 5a 29 5c 52 45 41 44 44 49 5c 4f 50 54 49 4f 4e 20 44 49 52 45 43 54 00 19 01 6a 00 12 00 50 5c 4c ┆A3,/100 : P TM A3,A7 TEST BIT P P RF(NZ) READDI OPTION DIRECT j P L┆
0x335a…33aa (34, 0, 400) 44 4b 4c 5c 41 33 2c 2f 37 30 30 20 00 19 01 8e 00 0e 00 50 5c 54 4d 5c 41 33 2c 41 37 20 00 1a 00 14 00 28 00 50 5c 52 42 28 4e 5a 29 5c 54 49 4f 44 31 39 5c 4e 4f 54 20 4f 50 54 49 4f 4e 20 53 45 51 55 45 4e 54 49 41 4c 00 1a 00 26 00 18 ┆DKL A3,/700 P TM A3,A7 ( P RB(NZ) TIOD19 NOT OPTION SEQUENTIAL & ┆
0x33aa…33fa 00 50 5c 53 52 4c 5c 41 37 2c 31 30 5c 49 4e 44 45 58 20 2a 20 32 00 1a 00 52 00 1c 00 50 5c 41 42 4c 28 5a 29 5c 53 45 51 52 45 41 5c 53 45 51 20 52 45 41 44 20 00 1a 00 6e 00 26 00 50 5c 41 42 4c 5c 49 58 52 44 4e 58 5c 49 4e 44 45 58 45 ┆ P SRL A7,10 INDEX * 2 R P ABL(Z) SEQREA SEQ READ n & P ABL IXRDNX INDEXE┆
0x33fa…344a 44 20 53 45 51 20 52 45 41 44 20 4e 45 58 54 20 00 1a 00 8e 00 1c 00 50 52 45 41 44 44 49 5c 45 51 55 5c 2a 5c 44 49 52 45 43 54 20 52 45 41 44 00 1a 00 b8 00 18 00 50 5c 53 52 4c 5c 41 37 2c 31 30 5c 49 4e 44 45 58 20 2a 20 32 00 1a 00 d8 ┆D SEQ READ NEXT PREADDI EQU * DIRECT READ P SRL A7,10 INDEX * 2 ┆
0x344a…349a 00 26 00 50 5c 41 42 4c 28 5a 29 5c 52 41 4e 52 45 41 5c 44 49 52 45 43 54 20 52 41 4e 44 4f 4d 20 52 45 41 44 46 00 1a 00 f4 00 22 00 50 5c 52 46 5c 49 58 52 41 52 45 5c 49 4e 44 45 58 45 44 20 44 49 52 45 43 54 20 52 45 41 44 00 1a 01 1e ┆ & P ABL(Z) RANREA DIRECT RANDOM READF " P RF IXRARE INDEXED DIRECT READ ┆
0x349a…34ea 00 12 00 50 5c 49 46 54 5c 49 4e 44 58 41 43 3d 30 20 00 1a 01 44 00 0a 00 50 5c 45 4a 45 43 54 00 1a 01 5a 00 10 00 50 49 58 52 44 4e 58 5c 45 51 55 5c 2a 00 1a 01 68 00 10 00 50 49 58 52 41 52 45 5c 45 51 55 5c 2a 00 1a 01 7c 00 10 00 50 ┆ P IFT INDXAC=0 D P EJECT Z PIXRDNX EQU * h PIXRARE EQU * | P┆
0x34ea…353a (35, 0, 400) 49 58 49 4e 53 5c 45 51 55 5c 2a 20 00 1a 01 90 00 0e 00 50 5c 52 42 5c 54 49 4f 44 31 39 00 1b 00 14 00 08 00 50 5c 58 49 46 00 1b 00 26 00 0a 00 50 5c 45 4a 45 43 54 00 1b 00 32 00 1c 00 50 57 52 49 54 45 5c 45 51 55 5c 2a 5c 57 52 49 54 ┆IXINS EQU * P RB TIOD19 P XIF & P EJECT 2 PWRITE EQU * WRIT┆
0x353a…358a 45 20 4f 52 44 45 52 53 00 1b 00 40 00 14 00 50 5c 4c 43 5c 41 33 2c 46 44 42 44 42 52 2c 41 36 00 1b 00 60 00 1a 00 50 5c 41 4e 4b 5c 41 33 2c 2f 33 5c 53 48 41 52 41 42 49 4c 49 54 59 00 1b 00 78 00 26 00 50 5c 52 42 28 5a 29 5c 54 49 4f ┆E ORDERS @ P LC A3,FDBDBR,A6 ` P ANK A3,/3 SHARABILITY x & P RB(Z) TIO┆
0x358a…35da 44 31 39 5c 4f 4e 4c 59 20 49 4e 50 55 54 20 41 43 43 45 50 54 45 44 20 00 1b 00 96 00 12 00 50 5c 4c 44 4b 4c 5c 41 34 2c 2f 31 30 30 20 00 1b 00 c0 00 22 00 50 5c 4c 43 5c 41 33 2c 46 44 42 4e 49 46 2c 41 36 5c 4e 52 20 4f 46 20 49 4e 44 ┆D19 ONLY INPUT ACCEPTED P LDKL A4,/100 " P LC A3,FDBNIF,A6 NR OF IND┆
0x35da…362a 45 58 45 53 00 1b 00 d6 00 10 00 50 5c 41 4e 4b 5c 41 33 2c 2f 46 46 20 00 1b 00 fc 00 1a 00 50 5c 52 46 28 4e 5a 29 5c 57 52 49 54 45 32 5c 49 4e 44 45 58 45 44 00 1b 01 10 00 0e 00 50 5c 54 4d 5c 41 34 2c 41 37 5c 00 1b 01 2e 00 1a 00 50 ┆EXES P ANK A3,/FF P RF(NZ) WRITE2 INDEXED P TM A4,A7 . P┆
0x362a…367a 5c 41 42 4c 28 4e 5a 29 5c 54 49 4f 44 4d 42 5c 44 49 52 45 43 54 00 1b 01 40 00 12 00 50 5c 41 4e 4b 4c 5c 41 37 2c 2f 37 30 30 20 00 1b 01 5e 00 24 00 50 5c 41 42 4c 28 5a 29 5c 53 45 51 57 52 49 5c 53 45 51 55 45 4e 54 49 41 4c 20 57 52 ┆ ABL(NZ) TIODMB DIRECT @ P ANKL A7,/700 ^ $ P ABL(Z) SEQWRI SEQUENTIAL WR┆
0x367a…36ca (36, 0, 398) 49 54 45 20 00 1b 01 74 00 12 00 50 5c 52 42 5c 54 49 4f 44 31 39 5c 45 52 52 00 1c 00 0c 00 18 00 50 57 52 49 54 45 32 5c 45 51 55 5c 2a 5c 49 4e 44 45 58 45 44 00 1c 00 22 00 0e 00 50 5c 54 4d 5c 41 34 2c 41 37 20 00 1c 00 3e 00 22 00 50 ┆ITE t P RB TIOD19 ERR PWRITE2 EQU * INDEXED " P TM A4,A7 > " P┆
0x36ca…371a 5c 41 42 4c 28 4e 5a 29 5c 49 58 49 4e 53 5c 49 4e 44 45 58 45 44 20 49 4e 53 45 52 54 20 00 1c 00 50 00 1a 00 50 5c 52 42 5c 54 49 4f 44 31 39 5c 4e 4f 54 20 41 4c 4c 4f 57 45 44 00 1c 00 76 00 0a 00 50 5c 45 4a 45 43 54 00 1c 00 94 00 20 ┆ ABL(NZ) IXINS INDEXED INSERT P P RB TIOD19 NOT ALLOWED v P EJECT ┆
0x371a…376a 00 50 52 45 57 52 49 54 5c 45 51 55 5c 2a 5c 52 45 57 52 49 54 45 20 4f 52 44 45 52 53 20 00 1c 00 a2 00 06 00 50 2a 20 00 1c 00 c6 00 1e 00 50 44 45 4c 45 54 45 5c 45 51 55 5c 2a 5c 44 45 4c 45 54 45 20 4f 52 44 45 52 53 00 1c 00 d0 00 06 ┆ PREWRIT EQU * REWRITE ORDERS P* PDELETE EQU * DELETE ORDERS ┆
0x376a…37ba 00 50 2a 20 00 1c 00 f2 00 14 00 50 5c 4c 43 5c 41 33 2c 46 44 42 44 42 52 2c 41 36 00 1c 00 fc 00 1a 00 50 5c 41 4e 4b 5c 41 33 2c 2f 33 5c 53 48 41 52 41 42 49 4c 49 54 59 00 1c 01 14 00 24 00 50 5c 52 42 28 5a 29 5c 54 49 4f 44 31 39 5c ┆ P* P LC A3,FDBDBR,A6 P ANK A3,/3 SHARABILITY $ P RB(Z) TIOD19 ┆
0x37ba…3808 4f 4e 4c 59 20 49 4e 50 55 54 20 41 4c 4c 4f 57 45 44 00 1c 01 32 00 20 00 50 5c 4c 43 5c 41 33 2c 46 44 42 4e 49 46 2c 41 36 5c 4e 52 20 4f 46 20 49 4e 44 45 58 00 1c 01 5a 00 10 00 50 5c 41 4e 4b 5c 41 33 2c 2f 46 46 20 00 1c 01 7e ┆ONLY INPUT ALLOWED 2 P LC A3,FDBNIF,A6 NR OF INDEX Z P ANK A3,/FF ~┆