|
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: 14016 (0x36c0)
Notes: pts_type(SC)
Names: »DRIC01.SC«
└─⟦a25d6defe⟧ Bits:30009676 Philips computer tape "600210"
└─⟦this⟧ »M:92SP/DRIC01.SC«
IDENT DRIC01 9.2DK 1 83-09-16 870105040920 DK1, TID IN ECBCW RECV'NG TASK =DK0, MMU BUF SIZE 80-03-11 * * ********************************************** * * 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 ITABRT ABORT INTERTASK REQUEST 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 DWTSB1 STACK BASE 1 IN DWT 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 ECBRC ECB RETURN CODE 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 1 * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 0 * * MMU BUFFER SIZE * X:A EQU 50 X:Q EQU 575 DK0 DVBLEN EQU 575+X:Q DK0 * * INTERTASK DEVICE INDEX * X:B EQU 8 DEVIND EQU X:B * 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 RF(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? CW A2,DWTTAB,A6 RF(E) DIS:OE ILLEGAL TID? 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 * ADR:20 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) ADR:20 NO, TRY NEXT * LDR A2,A4 LD A1,DWTST,A2 ANY REQUEST? RF(N) ADR:40 NO! * LD A1,DWTQUE,A2 GET QUEUE ANCHOR ADDRESS CWR A1,A6 CHECK QUEUE ANCHOR RF(E) ADR:30 REQUEST ISSUED FOR THIS TASK? * ANK A7,1 RF(Z) ADR:25 READ? CWK A1,RD:QUE RF(E) ADR:30 COMPLEMENTARY REQUEST? RF ADR:50 NO * EJECT DRIC01 * * ADR:25 CWK A1,WR:QUE RF(NE) ADR:50 NO COMPLEMENTARY REQUEST? * * ABORT TIMER IF ANY * ADR:30 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE ANK A7,1 RF(Z) RD:N05 READ? * * MOVE BUFFER * ADR:35 EQU * LDKL A5,DWTSB1 GET STACK BASE ADR A5,A6 CF A5,MOVBUF CF A15,TENDIO END WRITE LDR A6,A2 * IFT MMUPAG=1 LD A3,ECBBA,A8 GET SENDING BUFFER ADDRESS ANK A3,1 RF(Z) ADR:38 BUFFER ADDRESS EVEN? ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN RF END:IO * ADR:38 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 * * OUEUE REQUEST * ADR:40 LDK A7,0 INDICATE ADDRESSED REQUEST * ADR:50 EQU * LD A3,DWTIME,A6 TIME RF(Z) TWR:30 ADK A3,1 RF(Z) ADR: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 * ADR: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) ADR:80 NOT-ADDRESSED REQUEST? ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE * ADR:80 LDR A4,A2 SAVE LDR* A2,A2 NEXT IN QUEUE RF(Z) ADR:90 END FOUND? LD A5,DWTTAB,A2 TTAB ADDRESS CC A1,TTB:ST+1,A5 COMPARE LEVELS RB(NL) ADR:80 * ADR: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 * LDR A4,A6 EXCHANGE A2 AND A6 LDR A6,A2 LDR A2,A4 RB ADR:35 * 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 ADR: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 ADR:35 * 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 ADR: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 * EJECT DRIC01 * * M O V B U F * * SUBROUTINE TO MOVE BUFFER FROM SENDING TASK * TO ADDRESSED TASK. * EFFECTIVE LENGTH IN BOTH INPUT AND OUTPUT ECB ARE SET. * A1 WILL CONTAIN RETURN CODE /8 IF SENDING REQUESTED LENGTH * WAS GREATER THAN RECEIVING REQUESTED LENGTH. * TENDIO WILL PERFORM THE MOVE IN SYSTEMS WITH MMU. * * INPUT PARAMETERS: * A2 RECEIVING DWT * A5 STACK POINTER * A6 SENDING DWT * * REGISTER USAGE: * A1 RETURN CODE * A2 DWT RECEIVING TASK * A3 WORKING REGISTER * A4 BUFFER POINTER * A5 STACKPOINTER * A6 DWT SENDING TASK * A7 RECEIVING BUFFER POINTER * A8 ECB ADDRESS SENDING TASK * A9 ECB ADDRESS RECEIVING TASK * MOVBUF EQU * LD A8,DWTECB,A6 SENDING ECB ENB GIVE OTHER TASKS A CHANCE * EJECT DRIC01 * * LD A9,DWTECB,A2 RECEIVING ECB LD A1,DWTTAB,A6 GET TID SENDING TASK DK1 LD A1,2,A1 DK1 ST A1,ECBCW,A9 GIVE IT TO RECEIVER DK1 LDK A1,0 ORIG. INSTRUCTION MOVED DK1 LD A3,ECBRL,A8 SENDING REQUESTED LENGTH RB(N) DIS:OE CW A3,ECBRL,A9 RF(NG) MOV:05 LDK A1,8 RETURN CODE (INCORRECT LENGTH) LD A3,ECBRL,A9 RB(N) DIS:OE * MOV:05 EQU * IFT MMUPAG=1 LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE RF(NG) MOV:10 MMU BUFFER LARGE ENOUGH? LDKL A1,/8008 NO, INDICATE ERROR ABL DISEND BRANCH TO DISPATCHER VIA TENDIO * MOV:10 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 * MOV:15 EQU * SUK A3,1 RF(N) MOV:20 ALL CHARACTERS MOVED? LCR A9,A4 SCR A9,A7 ADK A4,1 ADK A7,1 RB MOV:15 * MOV:20 EQU * XIF * INH RTN A5 * * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DRIC01 9.2DK 1 83-09-16 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0068 Head {h00=0x0026, h01=0x0050, text=» DK1, TID IN ECBCW RECV'NG TASK «, t00=0x0000, t01=0x0042}
0x0068…0086 Head {h00=0x001a, h01=0x0050, text=» =DK0, MMU BUF SIZE «, t00=0x0000, t01=0x006c}
0x0086…009a Head {h00=0x0010, h01=0x0050, text=» 80-03-11 «, t00=0x0000, t01=0x008a}
0x009a…00a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x009e}
0x00a4…00ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00a8}
0x00ae…00e4 Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0000, t01=0x00b2}
0x00e4…00ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x00ee…0116 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00f2}
0x0116…0120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…0154 Head {h00=0x0030, h01=0x0050, text=»* DRIC01 = INTERTASK COMMUNICATION HANDLER«, t00=0x0000, t01=0x0124}
0x0154…015e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0158}
0x015e…0168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0162}
0x0168…0172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016c}
0x0172…017c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0176}
0x017c…0186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x0186…0190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x018a}
0x0190…01c6 (1, 0, 400) Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0001, t01=0x0004}
0x01c6…01d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003a}
0x01d0…020c Head {h00=0x0038, h01=0x0050, text=»* THIS MODULE HANDLES THE INTERTASK COMMUNICATION «, t00=0x0001, t01=0x0044}
0x020c…0216 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0080}
0x0216…022e Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0001, t01=0x008a}
0x022e…0238 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a2}
0x0238…024c Head {h00=0x0010, h01=0x0050, text=»* ORDERS: «, t00=0x0001, t01=0x00ac}
0x024c…0256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c0}
0x0256…027a Head {h00=0x0020, h01=0x0050, text=»* /02 READ, NOT ADDRESSED«, t00=0x0001, t01=0x00ca}
0x027a…02a0 Head {h00=0x0022, h01=0x0050, text=»* /06 WRITE, NOT ADDRESSED «, t00=0x0001, t01=0x00ee}
0x02a0…02c0 Head {h00=0x001c, h01=0x0050, text=»* /0A READ, ADDRESSED«, t00=0x0001, t01=0x0114}
0x02c0…02e2 Head {h00=0x001e, h01=0x0050, text=»* /0B WRITE, ADDRESSED «, t00=0x0001, t01=0x0134}
0x02e2…02fe Head {h00=0x0018, h01=0x0050, text=»* /39 SET TIMEOUT«, t00=0x0001, t01=0x0156}
0x02fe…0308 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0172}
0x0308…0326 Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETERS: «, t00=0x0001, t01=0x017c}
0x0326…0330 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x000a}
0x0330…034e Head {h00=0x001a, h01=0x0050, text=»* A5 STACK BASE 2 «, t00=0x0002, t01=0x0014}
0x034e…036a Head {h00=0x0018, h01=0x0050, text=»* A6 DWT ADDRESS«, t00=0x0002, t01=0x0032}
0x036a…0386 Head {h00=0x0018, h01=0x0050, text=»* A7 ORDER CODE «, t00=0x0002, t01=0x004e}
0x0386…03a2 Head {h00=0x0018, h01=0x0050, text=»* A8 ECB ADDRESS«, t00=0x0002, t01=0x006a}
0x03a2…03d2 Head {h00=0x002c, h01=0x0050, text=»* A12 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0002, t01=0x0086}
0x03d2…03dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b6}
0x03dc…03f4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0002, t01=0x00c0}
0x03f4…03fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d8}
0x03fe…0408 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e2}
0x0408…041c Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00ec}
0x041c…0430 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x0100}
0x0430…0444 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0114}
0x0444…044e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0128}
0x044e…0458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0132}
0x0458…047a Head {h00=0x001e, h01=0x0050, text=» ENTRY ITAD ADDRESS BLOCK «, t00=0x0002, t01=0x013c}
0x047a…04a8 Head {h00=0x002a, h01=0x0050, text=» ENTRY ITABRT ABORT INTERTASK REQUEST «, t00=0x0002, t01=0x015e}
0x04a8…04dc Head {h00=0x0030, h01=0x0050, text=» ENTRY IT:BUF INTERTASK DRIVER BUFFER (MMU) «, t00=0x0002, t01=0x018c}
0x04dc…04f4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0003, t01=0x0030}
0x04f4…04fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0048}
0x04fe…0508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0052}
0x0508…051e Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x005c}
0x051e…0534 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x0072}
0x0534…054a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x0088}
0x054a…0554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009e}
0x0554…055e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00a8}
0x055e…057e Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0003, t01=0x00b2}
0x057e…059a Head {h00=0x0018, h01=0x0050, text=» EXTRN TENDIO ENDIO «, t00=0x0003, t01=0x00d2}
0x059a…05be Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x00ee}
0x05be…05e8 Head {h00=0x0026, h01=0x0050, text=» EXTRN DISEND TENDIO AND DISPATCH «, t00=0x0003, t01=0x0112}
0x05e8…0608 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0003, t01=0x013c}
0x0608…062a Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0003, t01=0x015c}
0x062a…0654 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK«, t00=0x0003, t01=0x017e}
0x0654…067a Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTTAB DWT TTAB ADDRESS«, t00=0x0004, t01=0x0018}
0x067a…06a4 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB1 STACK BASE 1 IN DWT «, t00=0x0004, t01=0x003e}
0x06a4…06ce Head {h00=0x0026, h01=0x0050, text=» EXTRN BUFLEN DRIVER BUFFER LENGTH«, t00=0x0004, t01=0x0068}
0x06ce…06ea Head {h00=0x0018, h01=0x0050, text=» EXTRN SETIMP TIMER «, t00=0x0004, t01=0x0092}
0x06ea…071a Head {h00=0x002c, h01=0x0050, text=» EXTRN FNDTID FIND TTAB ADDRESS FROM TID«, t00=0x0004, t01=0x00ae}
0x071a…073c Head {h00=0x001e, h01=0x0050, text=» EXTRN TTB:ST TASK STATUS «, t00=0x0004, t01=0x00de}
0x073c…0762 Head {h00=0x0022, h01=0x0050, text=» EXTRN TTB:TD TERMINAL DEVICES«, t00=0x0004, t01=0x0100}
0x0762…079a Head {h00=0x0034, h01=0x0050, text=» EXTRN IHRTN RTN A15 WITHOUT ENABLING INTERRUPTS«, t00=0x0004, t01=0x0126}
0x079a…07c2 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x015e}
0x07c2…07ec Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x0186}
0x07ec…0816 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0020}
0x0816…083a Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x004a}
0x083a…0860 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x006e}
0x0860…0880 Head {h00=0x001c, h01=0x0050, text=» EJECT DRIC01 TOSSIO«, t00=0x0005, t01=0x0094}
0x0880…088a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b4}
0x088a…0894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00be}
0x0894…08c6 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0005, t01=0x00c8}
0x08c6…08d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00fa}
0x08d0…08ee Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0005, t01=0x0104}
0x08ee…08f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0122}
0x08f8…092a Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0005, t01=0x012c}
0x092a…0934 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x015e}
0x0934…0966 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0005, t01=0x0168}
0x0966…0994 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0006, t01=0x000a}
0x0994…099e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0038}
0x099e…09b2 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0006, t01=0x0042}
0x09b2…09bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0056}
0x09bc…09f6 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0006, t01=0x0060}
0x09f6…0a28 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0006, t01=0x009a}
0x0a28…0a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00cc}
0x0a32…0a46 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0006, t01=0x00d6}
0x0a46…0a50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ea}
0x0a50…0a6a Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0006, t01=0x00f4}
0x0a6a…0a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010e}
0x0a74…0a86 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 50«, t00=0x0006, t01=0x0118}
0x0a86…0a9e Head {h00=0x0014, h01=0x0050, text=»X:Q EQU 575 DK0«, t00=0x0006, t01=0x012a}
0x0a9e…0abe Head {h00=0x001c, h01=0x0050, text=»DVBLEN EQU 575+X:Q DK0 «, t00=0x0006, t01=0x0142}
0x0abe…0ac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x0ac8…0ae8 Head {h00=0x001c, h01=0x0050, text=»* INTERTASK DEVICE INDEX«, t00=0x0006, t01=0x016c}
0x0ae8…0af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018c}
0x0af2…0b04 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 8 «, t00=0x0007, t01=0x0008}
0x0b04…0b1a Head {h00=0x0012, h01=0x0050, text=»DEVIND EQU X:B«, t00=0x0007, t01=0x001a}
0x0b1a…0b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0030}
0x0b24…0b3c Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0007, t01=0x003a}
0x0b3c…0b46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0052}
0x0b46…0b50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005c}
0x0b50…0b6e Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0007, t01=0x0066}
0x0b6e…0b8c Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS * «, t00=0x0007, t01=0x0084}
0x0b8c…0baa Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0007, t01=0x00a2}
0x0baa…0bb4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c0}
0x0bb4…0bbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ca}
0x0bbe…0bf2 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0007, t01=0x00d4}
0x0bf2…0bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0108}
0x0bfc…0c12 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0007, t01=0x0112}
0x0c12…0c2a Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0007, t01=0x0128}
0x0c2a…0c36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x0140}
0x0c36…0c40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x014c}
0x0c40…0c56 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0007, t01=0x0156}
0x0c56…0c70 Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0007, t01=0x016c}
0x0c70…0c7c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x0186}
0x0c7c…0c86 (8, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0004}
0x0c86…0cb0 Head {h00=0x0026, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER «, t00=0x0008, t01=0x000e}
0x0cb0…0cd2 Head {h00=0x001e, h01=0x0050, text=»DWTIME EQU START+/02 TIME «, t00=0x0008, t01=0x0038}
0x0cd2…0d0c Head {h00=0x0036, h01=0x0050, text=»DWTANC EQU START+/04 POINTER TO FIRST DWT IN QUEUE«, t00=0x0008, t01=0x005a}
0x0d0c…0d3e Head {h00=0x002e, h01=0x0050, text=»DWTQUE EQU START+/06 QUEUE ANCHOR ADDRESS «, t00=0x0008, t01=0x0094}
0x0d3e…0d48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c6}
0x0d48…0d60 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0008, t01=0x00d0}
0x0d60…0d6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e8}
0x0d6a…0d74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f2}
0x0d74…0d8e Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0008, t01=0x00fc}
0x0d8e…0da8 Head {h00=0x0016, h01=0x0050, text=»* ADDRESS BLOCK * «, t00=0x0008, t01=0x0116}
0x0da8…0dc2 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0008, t01=0x0130}
0x0dc2…0dcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x014a}
0x0dcc…0dd6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0154}
0x0dd6…0e02 Head {h00=0x0028, h01=0x0050, text=» DATA DVBLEN+DVBLEN MMU BUFFER SIZE «, t00=0x0008, t01=0x015e}
0x0e02…0e2e Head {h00=0x0028, h01=0x0050, text=» DATA DEVIND INTERTASK DEVICE INDEX «, t00=0x0008, t01=0x018a}
0x0e2e…0e58 Head {h00=0x0026, h01=0x0050, text=»ITAD DATA ICAD ACTIVATION ADDRESS «, t00=0x0009, t01=0x0026}
0x0e58…0e7a Head {h00=0x001e, h01=0x0050, text=» DATA ITABRT ABORT ADDRESS«, t00=0x0009, t01=0x0050}
0x0e7a…0e84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0072}
0x0e84…0e8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007c}
0x0e8e…0ec8 Head {h00=0x0036, h01=0x0050, text=»RD:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED READ REQ.«, t00=0x0009, t01=0x0086}
0x0ec8…0f04 Head {h00=0x0038, h01=0x0050, text=»WR:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED WRITE REQ. «, t00=0x0009, t01=0x00c0}
0x0f04…0f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00fc}
0x0f0e…0f36 Head {h00=0x0024, h01=0x0050, text=»* INTERTASK DRIVER BUFFER (MMU) «, t00=0x0009, t01=0x0106}
0x0f36…0f40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x012e}
0x0f40…0f54 Head {h00=0x0010, h01=0x0050, text=»IT:BUF EQU *«, t00=0x0009, t01=0x0138}
0x0f54…0f6a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0009, t01=0x014c}
0x0f6a…0f8c Head {h00=0x001e, h01=0x0050, text=» RES DVBLEN+1 MMU BUFFER «, t00=0x0009, t01=0x0162}
0x0f8c…0f98 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0184}
0x0f98…0fa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0190}
0x0fa2…0fba Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000a, t01=0x000a}
0x0fba…0fc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0022}
0x0fc4…0fe2 Head {h00=0x001a, h01=0x0050, text=»* A C T I V A T I O N «, t00=0x000a, t01=0x002c}
0x0fe2…0fec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x004a}
0x0fec…0ffe Head {h00=0x000e, h01=0x0050, text=»ICAD EQU *«, t00=0x000a, t01=0x0054}
0x0ffe…1022 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A7 ORDER CODE TO A1 «, t00=0x000a, t01=0x0066}
0x1022…1034 Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x000a, t01=0x008a}
0x1034…105e Head {h00=0x0026, h01=0x0050, text=» RF(Z) RD:NAD READ NOT ADDRESSED? «, t00=0x000a, t01=0x009c}
0x105e…1070 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000a, t01=0x00c6}
0x1070…109c Head {h00=0x0028, h01=0x0050, text=» ABL(Z) WR:NAD WRITE NOT ADDRESSED? «, t00=0x000a, t01=0x00d8}
0x109c…10ae Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000a, t01=0x0104}
0x10ae…10d4 Head {h00=0x0022, h01=0x0050, text=» RF(Z) RD:ADR READ ADDRESSED? «, t00=0x000a, t01=0x0116}
0x10d4…10e6 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000a, t01=0x013c}
0x10e6…110c Head {h00=0x0022, h01=0x0050, text=» RF(Z) WR:ADR WRITE ADDRESSED?«, t00=0x000a, t01=0x014e}
0x110c…1120 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2E «, t00=0x000a, t01=0x0174}
0x1120…1146 Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DIS:OE REQUEST ERROR? «, t00=0x000a, t01=0x0188}
0x1146…1150 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001e}
0x1150…1172 Head {h00=0x001e, h01=0x0050, text=»* S E T T I M E O U T«, t00=0x000b, t01=0x0028}
0x1172…117c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x004a}
0x117c…119c Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIME«, t00=0x000b, t01=0x0054}
0x119c…11b4 Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTIME,A6«, t00=0x000b, t01=0x0074}
0x11b4…11c6 Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x000b, t01=0x008c}
0x11c6…11d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x009e}
0x11d0…11e8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000b, t01=0x00a8}
0x11e8…11f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c0}
0x11f2…1216 Head {h00=0x0020, h01=0x0050, text=»* R E A D, A D D R E S S E D«, t00=0x000b, t01=0x00ca}
0x1216…1220 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ee}
0x1220…1246 Head {h00=0x0022, h01=0x0050, text=»* W R I T E, A D D R E S S E D«, t00=0x000b, t01=0x00f8}
0x1246…1250 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x011e}
0x1250…1274 Head {h00=0x0020, h01=0x0050, text=»RD:ADR EQU * READ, ADDRESSED«, t00=0x000b, t01=0x0128}
0x1274…129a Head {h00=0x0022, h01=0x0050, text=»WR:ADR EQU * WRITE, ADDRESSED «, t00=0x000b, t01=0x014c}
0x129a…12a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0172}
0x12a4…12cc Head {h00=0x0024, h01=0x0050, text=»* FIND TTAB OF ADDRESSED TASK«, t00=0x000b, t01=0x017c}
0x12cc…12d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0014}
0x12d6…12f2 Head {h00=0x0018, h01=0x0050, text=» LD A7,ECBCW,A8 TID «, t00=0x000c, t01=0x001e}
0x12f2…131c Head {h00=0x0026, h01=0x0050, text=» CF A15,FNDTID TTAB ADDRESS TO A2 «, t00=0x000c, t01=0x003a}
0x131c…1334 Head {h00=0x0014, h01=0x0050, text=» ADK A2,0 SET CR«, t00=0x000c, t01=0x0064}
0x1334…1354 Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIS:OE NOT FOUND?«, t00=0x000c, t01=0x007c}
0x1354…136c Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTTAB,A6«, t00=0x000c, t01=0x009c}
0x136c…138e Head {h00=0x001e, h01=0x0050, text=» RF(E) DIS:OE ILLEGAL TID?«, t00=0x000c, t01=0x00b4}
0x138e…13c6 Head {h00=0x0034, h01=0x0050, text=» ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE«, t00=0x000c, t01=0x00d6}
0x13c6…13e6 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 TABLE LENGTH«, t00=0x000c, t01=0x010e}
0x13e6…140e Head {h00=0x0024, h01=0x0050, text=» LDR A7,A12 DRIVER ADDRESS BLOCK«, t00=0x000c, t01=0x012e}
0x140e…1448 Head {h00=0x0036, h01=0x0050, text=» XRK A7,1 IF INPUT, POINT TO OUTPUT BLOCK AND V.V.«, t00=0x000c, t01=0x0156}
0x1448…1452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0190}
0x1452…146a Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000d, t01=0x000a}
0x146a…1474 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0022}
0x1474…149c Head {h00=0x0024, h01=0x0050, text=»* FIND DWT OF ADDRESSED TASK «, t00=0x000d, t01=0x002c}
0x149c…14a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0054}
0x14a6…14da Head {h00=0x0030, h01=0x0050, text=»ADR:20 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS «, t00=0x000d, t01=0x005e}
0x14da…14ec Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000d, t01=0x0092}
0x14ec…150c Head {h00=0x001c, h01=0x0050, text=» RF(N) DIS:OE NOT FOUND?«, t00=0x000d, t01=0x00a4}
0x150c…1516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c4}
0x1516…1536 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A2 DWT ADDRESS «, t00=0x000d, t01=0x00ce}
0x1536…155c Head {h00=0x0022, h01=0x0050, text=» CW A7,DWTADR,A4 SEARCHED DWT?«, t00=0x000d, t01=0x00ee}
0x155c…1580 Head {h00=0x0020, h01=0x0050, text=» RB(NE) ADR:20 NO, TRY NEXT «, t00=0x000d, t01=0x0114}
0x1580…158a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0138}
0x158a…159c Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x000d, t01=0x0142}
0x159c…15c0 Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTST,A2 ANY REQUEST?«, t00=0x000d, t01=0x0154}
0x15c0…15da Head {h00=0x0016, h01=0x0050, text=» RF(N) ADR:40 NO! «, t00=0x000d, t01=0x0178}
0x15da…15e4 (14, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0004}
0x15e4…1616 Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTQUE,A2 GET QUEUE ANCHOR ADDRESS «, t00=0x000e, t01=0x000e}
0x1616…163c Head {h00=0x0022, h01=0x0050, text=» CWR A1,A6 CHECK QUEUE ANCHOR «, t00=0x000e, t01=0x0040}
0x163c…1670 Head {h00=0x0030, h01=0x0050, text=» RF(E) ADR:30 REQUEST ISSUED FOR THIS TASK? «, t00=0x000e, t01=0x0066}
0x1670…167a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009a}
0x167a…168c Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x000e, t01=0x00a4}
0x168c…16a8 Head {h00=0x0018, h01=0x0050, text=» RF(Z) ADR:25 READ? «, t00=0x000e, t01=0x00b6}
0x16a8…16be Head {h00=0x0012, h01=0x0050, text=» CWK A1,RD:QUE«, t00=0x000e, t01=0x00d2}
0x16be…16ea Head {h00=0x0028, h01=0x0050, text=» RF(E) ADR:30 COMPLEMENTARY REQUEST?«, t00=0x000e, t01=0x00e8}
0x16ea…1700 Head {h00=0x0012, h01=0x0050, text=» RF ADR:50 NO «, t00=0x000e, t01=0x0114}
0x1700…170a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012a}
0x170a…1722 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000e, t01=0x0134}
0x1722…172c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014c}
0x172c…1736 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0156}
0x1736…1752 Head {h00=0x0018, h01=0x0050, text=»ADR:25 CWK A1,WR:QUE«, t00=0x000e, t01=0x0160}
0x1752…1782 Head {h00=0x002c, h01=0x0050, text=» RF(NE) ADR:50 NO COMPLEMENTARY REQUEST?«, t00=0x000e, t01=0x017c}
0x1782…178c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001c}
0x178c…17ac Head {h00=0x001c, h01=0x0050, text=»* ABORT TIMER IF ANY «, t00=0x000f, t01=0x0026}
0x17ac…17b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0046}
0x17b6…17f8 Head {h00=0x003e, h01=0x0050, text=»ADR:30 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE«, t00=0x000f, t01=0x0050}
0x17f8…180a Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x000f, t01=0x0092}
0x180a…1826 Head {h00=0x0018, h01=0x0050, text=» RF(Z) RD:N05 READ? «, t00=0x000f, t01=0x00a4}
0x1826…1830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c0}
0x1830…1848 Head {h00=0x0014, h01=0x0050, text=»* MOVE BUFFER«, t00=0x000f, t01=0x00ca}
0x1848…1852 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e2}
0x1852…1866 Head {h00=0x0010, h01=0x0050, text=»ADR:35 EQU *«, t00=0x000f, t01=0x00ec}
0x1866…188c Head {h00=0x0022, h01=0x0050, text=» LDKL A5,DWTSB1 GET STACK BASE«, t00=0x000f, t01=0x0100}
0x188c…189e Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x000f, t01=0x0126}
0x189e…18b4 Head {h00=0x0012, h01=0x0050, text=» CF A5,MOVBUF «, t00=0x000f, t01=0x0138}
0x18b4…18d4 Head {h00=0x001c, h01=0x0050, text=» CF A15,TENDIO END WRITE«, t00=0x000f, t01=0x014e}
0x18d4…18e6 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x000f, t01=0x016e}
0x18e6…18f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0180}
0x18f0…1906 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x018a}
0x1906…1938 Head {h00=0x002e, h01=0x0050, text=» LD A3,ECBBA,A8 GET SENDING BUFFER ADDRESS«, t00=0x0010, t01=0x0010}
0x1938…194a Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0010, t01=0x0042}
0x194a…1974 Head {h00=0x0026, h01=0x0050, text=» RF(Z) ADR:38 BUFFER ADDRESS EVEN?«, t00=0x0010, t01=0x0054}
0x1974…19b2 Head {h00=0x003a, h01=0x0050, text=» ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN «, t00=0x0010, t01=0x007e}
0x19b2…19c4 Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x0010, t01=0x00bc}
0x19c4…19ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ce}
0x19ce…19e2 Head {h00=0x0010, h01=0x0050, text=»ADR:38 EQU *«, t00=0x0010, t01=0x00d8}
0x19e2…1a00 Head {h00=0x001a, h01=0x0050, text=» SUK A3,2 A3 := /FFFE «, t00=0x0010, t01=0x00ec}
0x1a00…1a3c Head {h00=0x0038, h01=0x0050, text=» ANS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS EVEN «, t00=0x0010, t01=0x010a}
0x1a3c…1a48 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0146}
0x1a48…1a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0152}
0x1a52…1a78 Head {h00=0x0022, h01=0x0050, text=»END:IO CF A15,TENDIO END READ «, t00=0x0010, t01=0x015c}
0x1a78…1a82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0182}
0x1a82…1a9a Head {h00=0x0014, h01=0x0050, text=»T:DISP ABL TDISP«, t00=0x0010, t01=0x018c}
0x1a9a…1aa4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0014}
0x1aa4…1abc Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0011, t01=0x001e}
0x1abc…1ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0036}
0x1ac6…1ade Head {h00=0x0014, h01=0x0050, text=»* OUEUE REQUEST «, t00=0x0011, t01=0x0040}
0x1ade…1ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0058}
0x1ae8…1b1a Head {h00=0x002e, h01=0x0050, text=»ADR:40 LDK A7,0 INDICATE ADDRESSED REQUEST«, t00=0x0011, t01=0x0062}
0x1b1a…1b24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0094}
0x1b24…1b38 Head {h00=0x0010, h01=0x0050, text=»ADR:50 EQU *«, t00=0x0011, t01=0x009e}
0x1b38…1b56 Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTIME,A6 TIME «, t00=0x0011, t01=0x00b2}
0x1b56…1b6c Head {h00=0x0012, h01=0x0050, text=» RF(Z) TWR:30 «, t00=0x0011, t01=0x00d0}
0x1b6c…1b7e Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0011, t01=0x00e6}
0x1b7e…1ba6 Head {h00=0x0024, h01=0x0050, text=» RF(Z) ADR:70 NO TIMING WANTED? «, t00=0x0011, t01=0x00f8}
0x1ba6…1bb8 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0011, t01=0x0120}
0x1bb8…1bdc Head {h00=0x0020, h01=0x0050, text=» RF(N) DIS:OE NEGATIVE TIME?«, t00=0x0011, t01=0x0132}
0x1bdc…1c16 Head {h00=0x0036, h01=0x0050, text=» LDR A1,A6 DWTOUT = PARAM. WHEN WRITE, ELSE DWTIN «, t00=0x0011, t01=0x0156}
0x1c16…1c2c Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTTP «, t00=0x0011, t01=0x0190}
0x1c2c…1c4c Head {h00=0x001c, h01=0x0050, text=» ADR A4,A6 TIMER POINTER«, t00=0x0012, t01=0x0016}
0x1c4c…1c60 Head {h00=0x0010, h01=0x0050, text=» ST A3,TIME «, t00=0x0012, t01=0x0036}
0x1c60…1c80 Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIMER«, t00=0x0012, t01=0x004a}
0x1c80…1ca4 Head {h00=0x0020, h01=0x0050, text=» DATA TIMOUT TIMEOUT ADDRESS«, t00=0x0012, t01=0x006a}
0x1ca4…1cb8 Head {h00=0x0010, h01=0x0050, text=»TIME DATA 0 «, t00=0x0012, t01=0x008e}
0x1cb8…1cc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a2}
0x1cc2…1cda Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0012, t01=0x00ac}
0x1cda…1ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00c4}
0x1ce4…1d10 Head {h00=0x0028, h01=0x0050, text=»* INSERT IN QUEUE WITHIN PRIORITY«, t00=0x0012, t01=0x00ce}
0x1d10…1d1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00fa}
0x1d1a…1d2e Head {h00=0x0010, h01=0x0050, text=»ADR:70 EQU *«, t00=0x0012, t01=0x0104}
0x1d2e…1d60 Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTQUE,A6 STORE QUEUE ANCHOR IN DWT«, t00=0x0012, t01=0x0118}
0x1d60…1d86 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x0012, t01=0x014a}
0x1d86…1da6 Head {h00=0x001c, h01=0x0050, text=» LD A1,TTB:ST+1,A5 LEVEL«, t00=0x0012, t01=0x0170}
0x1da6…1db8 Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0012, t01=0x0190}
0x1db8…1de4 Head {h00=0x0028, h01=0x0050, text=» RF(P) ADR:80 NOT-ADDRESSED REQUEST?«, t00=0x0013, t01=0x0012}
0x1de4…1e22 Head {h00=0x003a, h01=0x0050, text=» ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE «, t00=0x0013, t01=0x003e}
0x1e22…1e2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x007c}
0x1e2c…1e4a Head {h00=0x001a, h01=0x0050, text=»ADR:80 LDR A4,A2 SAVE «, t00=0x0013, t01=0x0086}
0x1e4a…1e6c Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A2 NEXT IN QUEUE «, t00=0x0013, t01=0x00a4}
0x1e6c…1e8c Head {h00=0x001c, h01=0x0050, text=» RF(Z) ADR:90 END FOUND?«, t00=0x0013, t01=0x00c6}
0x1e8c…1eb2 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A2 TTAB ADDRESS «, t00=0x0013, t01=0x00e6}
0x1eb2…1edc Head {h00=0x0026, h01=0x0050, text=» CC A1,TTB:ST+1,A5 COMPARE LEVELS «, t00=0x0013, t01=0x010c}
0x1edc…1ef2 Head {h00=0x0012, h01=0x0050, text=» RB(NL) ADR:80«, t00=0x0013, t01=0x0136}
0x1ef2…1efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x014c}
0x1efc…1f24 Head {h00=0x0024, h01=0x0050, text=»ADR:90 STR A2,A6 INSERT IN QUEUE«, t00=0x0013, t01=0x0156}
0x1f24…1f36 Head {h00=0x000e, h01=0x0050, text=» STR A6,A4«, t00=0x0013, t01=0x017e}
0x1f36…1f48 Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0013, t01=0x0190}
0x1f48…1f52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0012}
0x1f52…1f7a Head {h00=0x0024, h01=0x0050, text=»DIS:OE ABL DISIOE REQUEST ERROR «, t00=0x0014, t01=0x001c}
0x1f7a…1f84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0044}
0x1f84…1f9c Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0014, t01=0x004e}
0x1f9c…1fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0066}
0x1fa6…1fd2 Head {h00=0x0028, h01=0x0050, text=»* R E A D, N O T A D D R E S S E D «, t00=0x0014, t01=0x0070}
0x1fd2…1fdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x009c}
0x1fdc…2004 Head {h00=0x0024, h01=0x0050, text=»RD:NAD EQU * READ, NOT ADDRESSED«, t00=0x0014, t01=0x00a6}
0x2004…2044 Head {h00=0x003c, h01=0x0050, text=» LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS«, t00=0x0014, t01=0x00ce}
0x2044…206e Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RD:N10 ANYTHING IN QUEUE? «, t00=0x0014, t01=0x010e}
0x206e…20ac Head {h00=0x003a, h01=0x0050, text=» LD A2,WR:QUE CHECK QUEUE OF NOT ADDRESSED WRITE REQ. «, t00=0x0014, t01=0x0138}
0x20ac…20ce Head {h00=0x001e, h01=0x0050, text=» RF(Z) RD:N20 QUEUE EMPTY?«, t00=0x0014, t01=0x0176}
0x20ce…20f8 Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A2 NO, REMOVE FROM QUEUE «, t00=0x0015, t01=0x0008}
0x20f8…2122 Head {h00=0x0026, h01=0x0050, text=» ST A3,WR:QUE UPDATE QUEUE ANCHOR «, t00=0x0015, t01=0x0032}
0x2122…212c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005c}
0x212c…2140 Head {h00=0x0010, h01=0x0050, text=»RD:N00 EQU *«, t00=0x0015, t01=0x0066}
0x2140…216a Head {h00=0x0026, h01=0x0050, text=» CF A15,ABTIM2 ABORT TIMER IF ANY «, t00=0x0015, t01=0x007a}
0x216a…2174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a4}
0x2174…2188 Head {h00=0x0010, h01=0x0050, text=»RD:N05 EQU *«, t00=0x0015, t01=0x00ae}
0x2188…21ae Head {h00=0x0022, h01=0x0050, text=» LDR A4,A6 EXCHANGE A2 AND A6 «, t00=0x0015, t01=0x00c2}
0x21ae…21c0 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x0015, t01=0x00e8}
0x21c0…21d2 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0015, t01=0x00fa}
0x21d2…21e4 Head {h00=0x000e, h01=0x0050, text=» RB ADR:35«, t00=0x0015, t01=0x010c}
0x21e4…21ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x011e}
0x21ee…221a Head {h00=0x0028, h01=0x0050, text=»RD:N10 LDR* A3,A2 REMOVE FROM QUEUE «, t00=0x0015, t01=0x0128}
0x221a…2246 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR«, t00=0x0015, t01=0x0154}
0x2246…2258 Head {h00=0x000e, h01=0x0050, text=» RB RD:N00«, t00=0x0015, t01=0x0180}
0x2258…2262 (22, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0004}
0x2262…2292 Head {h00=0x002c, h01=0x0050, text=»RD:N20 LDKL A2,RD:QUE GET RD:QUE ADDRESS«, t00=0x0016, t01=0x000e}
0x2292…22b4 Head {h00=0x001e, h01=0x0050, text=» RB ADR:50 INSERT IN QUEUE«, t00=0x0016, t01=0x003e}
0x22b4…22be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0060}
0x22be…22d6 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0016, t01=0x006a}
0x22d6…22e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0082}
0x22e0…230e Head {h00=0x002a, h01=0x0050, text=»* W R I T E, N O T A D D R E S S E D «, t00=0x0016, t01=0x008c}
0x230e…2318 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ba}
0x2318…2342 Head {h00=0x0026, h01=0x0050, text=»WR:NAD EQU * WRITE, NOT ADDRESSED «, t00=0x0016, t01=0x00c4}
0x2342…2382 Head {h00=0x003c, h01=0x0050, text=» LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS «, t00=0x0016, t01=0x00ee}
0x2382…23ac Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WR:N10 ANYTHING IN QUEUE? «, t00=0x0016, t01=0x012e}
0x23ac…23e8 Head {h00=0x0038, h01=0x0050, text=» LD A2,RD:QUE CHECK QUEUE OF NOT ADDRESSED READ REQ.«, t00=0x0016, t01=0x0158}
0x23e8…240a (23, 0, 400) Head {h00=0x001e, h01=0x0050, text=» RF(Z) WR:N20 QUEUE EMPTY?«, t00=0x0017, t01=0x0004}
0x240a…2434 Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A2 NO, REMOVE FROM QUEUE «, t00=0x0017, t01=0x0026}
0x2434…245e Head {h00=0x0026, h01=0x0050, text=» ST A3,RD:QUE UPDATE QUEUE ANCHOR «, t00=0x0017, t01=0x0050}
0x245e…2468 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x007a}
0x2468…2498 Head {h00=0x002c, h01=0x0050, text=»WR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY «, t00=0x0017, t01=0x0084}
0x2498…24aa Head {h00=0x000e, h01=0x0050, text=» RB ADR:35«, t00=0x0017, t01=0x00b4}
0x24aa…24b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c6}
0x24b4…24e0 Head {h00=0x0028, h01=0x0050, text=»WR:N10 LDR* A3,A2 REMOVE FROM QUEUE «, t00=0x0017, t01=0x00d0}
0x24e0…250c Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR«, t00=0x0017, t01=0x00fc}
0x250c…251e Head {h00=0x000e, h01=0x0050, text=» RB WR:N05«, t00=0x0017, t01=0x0128}
0x251e…2528 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x013a}
0x2528…2558 Head {h00=0x002c, h01=0x0050, text=»WR:N20 LDKL A2,WR:QUE GET WR:QUE ADDRESS«, t00=0x0017, t01=0x0144}
0x2558…256a Head {h00=0x000e, h01=0x0050, text=» RB ADR:50«, t00=0x0017, t01=0x0174}
0x256a…2574 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0186}
0x2574…258c Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0017, t01=0x0190}
0x258c…2596 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0018}
0x2596…25ae Head {h00=0x0014, h01=0x0050, text=»* T I M E O U T «, t00=0x0018, t01=0x0022}
0x25ae…25b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x003a}
0x25b8…25dc Head {h00=0x0020, h01=0x0050, text=»TIMOUT LDR A6,A1 DWT ADDRESS«, t00=0x0018, t01=0x0044}
0x25dc…2602 Head {h00=0x0022, h01=0x0050, text=» CM* 0,A2 RESET TIMER POINTER «, t00=0x0018, t01=0x0068}
0x2602…2614 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x0018, t01=0x008e}
0x2614…263c Head {h00=0x0024, h01=0x0050, text=» CF A15,ITAB10 REMOVE FROM QUEUE«, t00=0x0018, t01=0x00a0}
0x263c…2646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00c8}
0x2646…265a Head {h00=0x0010, h01=0x0050, text=»TWR:30 EQU *«, t00=0x0018, t01=0x00d2}
0x265a…267a Head {h00=0x001c, h01=0x0050, text=» CMR A6 RESET QUEUE LINK«, t00=0x0018, t01=0x00e6}
0x267a…269a Head {h00=0x001c, h01=0x0050, text=» LDK A1,/40 RETURN CODE «, t00=0x0018, t01=0x0106}
0x269a…26ac Head {h00=0x000e, h01=0x0050, text=» RB END:IO«, t00=0x0018, t01=0x0126}
0x26ac…26b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0138}
0x26b6…26ce Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0018, t01=0x0142}
0x26ce…26d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x015a}
0x26d8…26ee Head {h00=0x0012, h01=0x0050, text=»* I T A B R T «, t00=0x0018, t01=0x0164}
0x26ee…26f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x017a}
0x26f8…272a Head {h00=0x002e, h01=0x0050, text=»* THIS SUBROUTINE IS CALLED FROM TABORT. «, t00=0x0018, t01=0x0184}
0x272a…2764 Head {h00=0x0036, h01=0x0050, text=»* IT WILL UPDATE QUEUE AND ABORT TIMER (IF ANY). «, t00=0x0019, t01=0x0026}
0x2764…276e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0060}
0x276e…2792 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS «, t00=0x0019, t01=0x006a}
0x2792…279c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x008e}
0x279c…27c2 Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED«, t00=0x0019, t01=0x0098}
0x27c2…27cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00be}
0x27cc…27e0 Head {h00=0x0010, h01=0x0050, text=»ITABRT EQU *«, t00=0x0019, t01=0x00c8}
0x27e0…27f2 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x0019, t01=0x00dc}
0x27f2…27fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ee}
0x27fc…2810 Head {h00=0x0010, h01=0x0050, text=»ITAB05 EQU *«, t00=0x0019, t01=0x00f8}
0x2810…2832 Head {h00=0x001e, h01=0x0050, text=» CF A15,ABTIM ABORT TIMER «, t00=0x0019, t01=0x010c}
0x2832…283c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x012e}
0x283c…285c Head {h00=0x001c, h01=0x0050, text=»* REMOVE DWT FROM QUEUE «, t00=0x0019, t01=0x0138}
0x285c…2866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0158}
0x2866…287a Head {h00=0x0010, h01=0x0050, text=»ITAB10 EQU *«, t00=0x0019, t01=0x0162}
0x287a…28a4 Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTQUE,A2 GET QUEUE ACHHOR «, t00=0x0019, t01=0x0176}
0x28a4…28ba Head {h00=0x0012, h01=0x0050, text=» CWK A1,RD:QUE«, t00=0x001a, t01=0x0010}
0x28ba…28ec Head {h00=0x002e, h01=0x0050, text=» RF(E) ITAB20 NOT-ADDRESSED READ REQUEST? «, t00=0x001a, t01=0x0026}
0x28ec…2902 Head {h00=0x0012, h01=0x0050, text=» CWK A1,WR:QUE«, t00=0x001a, t01=0x0058}
0x2902…2934 Head {h00=0x002e, h01=0x0050, text=» RF(E) ITAB20 NOT-ADDRESSED WRITE REQUEST?«, t00=0x001a, t01=0x006e}
0x2934…2972 Head {h00=0x003a, h01=0x0050, text=» ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE «, t00=0x001a, t01=0x00a0}
0x2972…297c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00de}
0x297c…2994 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001a, t01=0x00e8}
0x2994…299e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0100}
0x299e…29a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x010a}
0x29a8…29c6 Head {h00=0x001a, h01=0x0050, text=»ITAB20 LDR A4,A1 SAVE «, t00=0x001a, t01=0x0114}
0x29c6…29e8 Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A1 NEXT IN QUEUE «, t00=0x001a, t01=0x0132}
0x29e8…2a08 Head {h00=0x001c, h01=0x0050, text=» CWR A1,A2 SEARCHED DWT?«, t00=0x001a, t01=0x0154}
0x2a08…2a22 Head {h00=0x0016, h01=0x0050, text=» RB(NE) ITAB20 NO!«, t00=0x001a, t01=0x0174}
0x2a22…2a48 Head {h00=0x0022, h01=0x0050, text=» LDR* A3,A1 REMOVE FROM QUEUE «, t00=0x001a, t01=0x018e}
0x2a48…2a6e Head {h00=0x0022, h01=0x0050, text=» STR A3,A4 UPDATE QUEUE LINKS «, t00=0x001b, t01=0x0024}
0x2a6e…2a8e Head {h00=0x001c, h01=0x0050, text=» CMR A2 RESET QUEUE LINK«, t00=0x001b, t01=0x004a}
0x2a8e…2a98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006a}
0x2a98…2aae Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001b, t01=0x0074}
0x2aae…2ac0 Head {h00=0x000e, h01=0x0050, text=» RF IH:RTN«, t00=0x001b, t01=0x008a}
0x2ac0…2acc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x009c}
0x2acc…2ad6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a8}
0x2ad6…2aec Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001b, t01=0x00b2}
0x2aec…2afc Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x001b, t01=0x00c8}
0x2afc…2b08 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00d8}
0x2b08…2b12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00e4}
0x2b12…2b2a Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001b, t01=0x00ee}
0x2b2a…2b34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0106}
0x2b34…2b48 Head {h00=0x0010, h01=0x0050, text=»* A B T I M «, t00=0x001b, t01=0x0110}
0x2b48…2b52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0124}
0x2b52…2b84 Head {h00=0x002e, h01=0x0050, text=»* SUBROUTINE FOR ABORTING TIMER (IF ANY).«, t00=0x001b, t01=0x012e}
0x2b84…2b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0160}
0x2b8e…2bb2 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A2 = DWT ADDRESS «, t00=0x001b, t01=0x016a}
0x2bb2…2bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x018e}
0x2bbc…2be4 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A1, A3 ARE DESTROYED «, t00=0x001c, t01=0x0008}
0x2be4…2bee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0030}
0x2bee…2c02 Head {h00=0x0010, h01=0x0050, text=»ABTIM2 EQU *«, t00=0x001c, t01=0x003a}
0x2c02…2c22 Head {h00=0x001c, h01=0x0050, text=» CMR A2 RESET QUEUE LINK«, t00=0x001c, t01=0x004e}
0x2c22…2c2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x006e}
0x2c2c…2c46 Head {h00=0x0016, h01=0x0050, text=»ABTIM LDK A1,DWTTP«, t00=0x001c, t01=0x0078}
0x2c46…2c6e Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 TIMER POINTER ADDRESS«, t00=0x001c, t01=0x0092}
0x2c6e…2c82 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A1 «, t00=0x001c, t01=0x00ba}
0x2c82…2ca8 Head {h00=0x0022, h01=0x0050, text=» RF(Z) IH:RTN NO TIMER ACTIVE?«, t00=0x001c, t01=0x00ce}
0x2ca8…2cba Head {h00=0x000e, h01=0x0050, text=» CM* 0,A1 «, t00=0x001c, t01=0x00f4}
0x2cba…2ce0 Head {h00=0x0022, h01=0x0050, text=» CMR A1 INDICATE NO TIMER SET «, t00=0x001c, t01=0x0106}
0x2ce0…2cea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012c}
0x2cea…2d00 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001c, t01=0x0136}
0x2d00…2d18 Head {h00=0x0014, h01=0x0050, text=»IH:RTN ABL IHRTN«, t00=0x001c, t01=0x014c}
0x2d18…2d24 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0164}
0x2d24…2d2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0170}
0x2d2e…2d44 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001c, t01=0x017a}
0x2d44…2d5a Head {h00=0x0012, h01=0x0050, text=»IH:RTN RTN A15«, t00=0x001c, t01=0x0190}
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…2d88 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001d, t01=0x002c}
0x2d88…2d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0044}
0x2d92…2da8 Head {h00=0x0012, h01=0x0050, text=»* M O V B U F «, t00=0x001d, t01=0x004e}
0x2da8…2db2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0064}
0x2db2…2dea Head {h00=0x0034, h01=0x0050, text=»* SUBROUTINE TO MOVE BUFFER FROM SENDING TASK «, t00=0x001d, t01=0x006e}
0x2dea…2e08 Head {h00=0x001a, h01=0x0050, text=»* TO ADDRESSED TASK.«, t00=0x001d, t01=0x00a6}
0x2e08…2e4a Head {h00=0x003e, h01=0x0050, text=»* EFFECTIVE LENGTH IN BOTH INPUT AND OUTPUT ECB ARE SET.«, t00=0x001d, t01=0x00c4}
0x2e4a…2e90 Head {h00=0x0042, h01=0x0050, text=»* A1 WILL CONTAIN RETURN CODE /8 IF SENDING REQUESTED LENGTH«, t00=0x001d, t01=0x0106}
0x2e90…2ec8 Head {h00=0x0034, h01=0x0050, text=»* WAS GREATER THAN RECEIVING REQUESTED LENGTH.«, t00=0x001d, t01=0x014c}
0x2ec8…2f06 Head {h00=0x003a, h01=0x0050, text=»* TENDIO WILL PERFORM THE MOVE IN SYSTEMS WITH MMU. «, t00=0x001d, t01=0x0184}
0x2f06…2f10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0032}
0x2f10…2f2e Head {h00=0x001a, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x001e, t01=0x003c}
0x2f2e…2f4c Head {h00=0x001a, h01=0x0050, text=»* A2 RECEIVING DWT «, t00=0x001e, t01=0x005a}
0x2f4c…2f6a Head {h00=0x001a, h01=0x0050, text=»* A5 STACK POINTER «, t00=0x001e, t01=0x0078}
0x2f6a…2f86 Head {h00=0x0018, h01=0x0050, text=»* A6 SENDING DWT «, t00=0x001e, t01=0x0096}
0x2f86…2f90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b2}
0x2f90…2fac Head {h00=0x0018, h01=0x0050, text=»* REGISTER USAGE: «, t00=0x001e, t01=0x00bc}
0x2fac…2fc8 Head {h00=0x0018, h01=0x0050, text=»* A1 RETURN CODE «, t00=0x001e, t01=0x00d8}
0x2fc8…2fea Head {h00=0x001e, h01=0x0050, text=»* A2 DWT RECEIVING TASK«, t00=0x001e, t01=0x00f4}
0x2fea…300a Head {h00=0x001c, h01=0x0050, text=»* A3 WORKING REGISTER«, t00=0x001e, t01=0x0116}
0x300a…3028 Head {h00=0x001a, h01=0x0050, text=»* A4 BUFFER POINTER«, t00=0x001e, t01=0x0136}
0x3028…3044 Head {h00=0x0018, h01=0x0050, text=»* A5 STACKPOINTER«, t00=0x001e, t01=0x0154}
0x3044…3064 Head {h00=0x001c, h01=0x0050, text=»* A6 DWT SENDING TASK«, t00=0x001e, t01=0x0170}
0x3064…308c Head {h00=0x0024, h01=0x0050, text=»* A7 RECEIVING BUFFER POINTER«, t00=0x001e, t01=0x0190}
0x308c…30b4 Head {h00=0x0024, h01=0x0050, text=»* A8 ECB ADDRESS SENDING TASK«, t00=0x001f, t01=0x0028}
0x30b4…30de Head {h00=0x0026, h01=0x0050, text=»* A9 ECB ADDRESS RECEIVING TASK«, t00=0x001f, t01=0x0050}
0x30de…30e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x007a}
0x30e8…30fc Head {h00=0x0010, h01=0x0050, text=»MOVBUF EQU *«, t00=0x001f, t01=0x0084}
0x30fc…3120 Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 SENDING ECB«, t00=0x001f, t01=0x0098}
0x3120…3148 Head {h00=0x0024, h01=0x0050, text=» ENB GIVE OTHER TASKS A CHANCE «, t00=0x001f, t01=0x00bc}
0x3148…3152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e4}
0x3152…316a Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001f, t01=0x00ee}
0x316a…3174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0106}
0x3174…317e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0110}
0x317e…31a4 Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A2 RECEIVING ECB«, t00=0x001f, t01=0x011a}
0x31a4…31d6 Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTTAB,A6 GET TID SENDING TASK DK1 «, t00=0x001f, t01=0x0140}
0x31d6…31f0 Head {h00=0x0016, h01=0x0050, text=» LD A1,2,A1 DK1 «, t00=0x001f, t01=0x0172}
0x31f0…3220 Head {h00=0x002c, h01=0x0050, text=» ST A1,ECBCW,A9 GIVE IT TO RECEIVER DK1 «, t00=0x001f, t01=0x018c}
0x3220…324e Head {h00=0x002a, h01=0x0050, text=» LDK A1,0 ORIG. INSTRUCTION MOVED DK1 «, t00=0x0020, t01=0x002c}
0x324e…327e Head {h00=0x002c, h01=0x0050, text=» LD A3,ECBRL,A8 SENDING REQUESTED LENGTH«, t00=0x0020, t01=0x005a}
0x327e…3294 Head {h00=0x0012, h01=0x0050, text=» RB(N) DIS:OE «, t00=0x0020, t01=0x008a}
0x3294…32ac Head {h00=0x0014, h01=0x0050, text=» CW A3,ECBRL,A9 «, t00=0x0020, t01=0x00a0}
0x32ac…32c2 Head {h00=0x0012, h01=0x0050, text=» RF(NG) MOV:05«, t00=0x0020, t01=0x00b8}
0x32c2…32f2 Head {h00=0x002c, h01=0x0050, text=» LDK A1,8 RETURN CODE (INCORRECT LENGTH)«, t00=0x0020, t01=0x00ce}
0x32f2…330a Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBRL,A9 «, t00=0x0020, t01=0x00fe}
0x330a…3320 Head {h00=0x0012, h01=0x0050, text=» RB(N) DIS:OE «, t00=0x0020, t01=0x0116}
0x3320…332a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x012c}
0x332a…333e Head {h00=0x0010, h01=0x0050, text=»MOV:05 EQU *«, t00=0x0020, t01=0x0136}
0x333e…3354 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0020, t01=0x014a}
0x3354…338e Head {h00=0x0036, h01=0x0050, text=» LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0020, t01=0x0160}
0x338e…33bc Head {h00=0x002a, h01=0x0050, text=» CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE«, t00=0x0021, t01=0x000a}
0x33bc…33ec Head {h00=0x002c, h01=0x0050, text=» RF(NG) MOV:10 MMU BUFFER LARGE ENOUGH? «, t00=0x0021, t01=0x0038}
0x33ec…3416 Head {h00=0x0026, h01=0x0050, text=» LDKL A1,/8008 NO, INDICATE ERROR «, t00=0x0021, t01=0x0068}
0x3416…344a Head {h00=0x0030, h01=0x0050, text=» ABL DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x0021, t01=0x0092}
0x344a…3454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00c6}
0x3454…3468 Head {h00=0x0010, h01=0x0050, text=»MOV:10 EQU *«, t00=0x0021, t01=0x00d0}
0x3468…3474 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x00e4}
0x3474…347e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00f0}
0x347e…3486 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x00fa}
0x3486…34ae Head {h00=0x0024, h01=0x0050, text=» ST A3,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0021, t01=0x0102}
0x34ae…34d6 Head {h00=0x0024, h01=0x0050, text=» ST A3,ECBEL,A9 EFFECTIVE LENGTH«, t00=0x0021, t01=0x012a}
0x34d6…34e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0152}
0x34e0…34f8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0021, t01=0x015c}
0x34f8…3502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0174}
0x3502…350c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x017e}
0x350c…3522 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0021, t01=0x0188}
0x3522…3550 Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBBA,A8 SENDING BUFFER ADDRESS«, t00=0x0022, t01=0x000e}
0x3550…3580 Head {h00=0x002c, h01=0x0050, text=» LD A7,ECBBA,A9 RECEIVING BUFFER ADDRESS«, t00=0x0022, t01=0x003c}
0x3580…358a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x006c}
0x358a…359e Head {h00=0x0010, h01=0x0050, text=»MOV:15 EQU *«, t00=0x0022, t01=0x0076}
0x359e…35b0 Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0022, t01=0x008a}
0x35b0…35dc Head {h00=0x0028, h01=0x0050, text=» RF(N) MOV:20 ALL CHARACTERS MOVED? «, t00=0x0022, t01=0x009c}
0x35dc…35ee Head {h00=0x000e, h01=0x0050, text=» LCR A9,A4«, t00=0x0022, t01=0x00c8}
0x35ee…3600 Head {h00=0x000e, h01=0x0050, text=» SCR A9,A7«, t00=0x0022, t01=0x00da}
0x3600…3612 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0022, t01=0x00ec}
0x3612…3624 Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x0022, t01=0x00fe}
0x3624…3636 Head {h00=0x000e, h01=0x0050, text=» RB MOV:15«, t00=0x0022, t01=0x0110}
0x3636…3640 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0122}
0x3640…3654 Head {h00=0x0010, h01=0x0050, text=»MOV:20 EQU *«, t00=0x0022, t01=0x012c}
0x3654…3660 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0140}
0x3660…366a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x014c}
0x366a…3676 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0022, t01=0x0156}
0x3676…3686 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0022, t01=0x0162}
0x3686…3690 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0172}
0x3690…369a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x017c}
0x369a…36a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0186}
0x36a4…36b0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0022, t01=0x0190}
0x36b0…36b4 Head {h00=0x4004, h01=0x0000}
0x36b4…36b8 00 23 00 0c ┆ # ┆
0x36b8…36c0 (36, 1, 8) 20 04 00 00 00 24 00 04 ┆ $ ┆