|
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: 14220 (0x378c)
Notes: pts_type(SC)
Names: »DRIC01.SC«
└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
└─⟦this⟧ »M:92OD/DRIC01.SC«
IDENT DRIC01 9.2DK 0 80-01-02 870105040920 =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 200 DK0 DVBLEN EQU 200+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 * * LDK A1,0 LD A9,DWTECB,A2 RECEIVING ECB 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 0 80-01-02 870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005c Head {h00=0x001a, h01=0x0050, text=» =DK0, MMU BUF SIZE «, t00=0x0000, t01=0x0042}
0x005c…0070 Head {h00=0x0010, h01=0x0050, text=» 80-03-11 «, t00=0x0000, t01=0x0060}
0x0070…007a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0074}
0x007a…0084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007e}
0x0084…00ba Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0000, t01=0x0088}
0x00ba…00c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00be}
0x00c4…00ec Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00c8}
0x00ec…00f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f0}
0x00f6…012a Head {h00=0x0030, h01=0x0050, text=»* DRIC01 = INTERTASK COMMUNICATION HANDLER«, t00=0x0000, t01=0x00fa}
0x012a…0134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012e}
0x0134…013e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0138}
0x013e…0148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0142}
0x0148…0152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014c}
0x0152…015c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0156}
0x015c…0166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0160}
0x0166…019c Head {h00=0x0032, h01=0x0050, text=»**********************************************«, t00=0x0000, t01=0x016a}
0x019c…01a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0010}
0x01a6…01e2 Head {h00=0x0038, h01=0x0050, text=»* THIS MODULE HANDLES THE INTERTASK COMMUNICATION «, t00=0x0001, t01=0x001a}
0x01e2…01ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0056}
0x01ec…0204 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0001, t01=0x0060}
0x0204…020e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0078}
0x020e…0222 Head {h00=0x0010, h01=0x0050, text=»* ORDERS: «, t00=0x0001, t01=0x0082}
0x0222…022c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0096}
0x022c…0250 Head {h00=0x0020, h01=0x0050, text=»* /02 READ, NOT ADDRESSED«, t00=0x0001, t01=0x00a0}
0x0250…0276 Head {h00=0x0022, h01=0x0050, text=»* /06 WRITE, NOT ADDRESSED «, t00=0x0001, t01=0x00c4}
0x0276…0296 Head {h00=0x001c, h01=0x0050, text=»* /0A READ, ADDRESSED«, t00=0x0001, t01=0x00ea}
0x0296…02b8 Head {h00=0x001e, h01=0x0050, text=»* /0B WRITE, ADDRESSED «, t00=0x0001, t01=0x010a}
0x02b8…02d4 Head {h00=0x0018, h01=0x0050, text=»* /39 SET TIMEOUT«, t00=0x0001, t01=0x012c}
0x02d4…02de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0148}
0x02de…02fc Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETERS: «, t00=0x0001, t01=0x0152}
0x02fc…0306 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0170}
0x0306…0324 Head {h00=0x001a, h01=0x0050, text=»* A5 STACK BASE 2 «, t00=0x0001, t01=0x017a}
0x0324…0340 Head {h00=0x0018, h01=0x0050, text=»* A6 DWT ADDRESS«, t00=0x0002, t01=0x0008}
0x0340…035c Head {h00=0x0018, h01=0x0050, text=»* A7 ORDER CODE «, t00=0x0002, t01=0x0024}
0x035c…0378 Head {h00=0x0018, h01=0x0050, text=»* A8 ECB ADDRESS«, t00=0x0002, t01=0x0040}
0x0378…03a8 Head {h00=0x002c, h01=0x0050, text=»* A12 ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0002, t01=0x005c}
0x03a8…03b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x008c}
0x03b2…03ca Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0002, t01=0x0096}
0x03ca…03d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ae}
0x03d4…03de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b8}
0x03de…03f2 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00c2}
0x03f2…0406 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x00d6}
0x0406…041a Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00ea}
0x041a…0424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fe}
0x0424…042e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0108}
0x042e…0450 Head {h00=0x001e, h01=0x0050, text=» ENTRY ITAD ADDRESS BLOCK «, t00=0x0002, t01=0x0112}
0x0450…047e Head {h00=0x002a, h01=0x0050, text=» ENTRY ITABRT ABORT INTERTASK REQUEST «, t00=0x0002, t01=0x0134}
0x047e…04b2 Head {h00=0x0030, h01=0x0050, text=» ENTRY IT:BUF INTERTASK DRIVER BUFFER (MMU) «, t00=0x0002, t01=0x0162}
0x04b2…04ca Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0003, t01=0x0008}
0x04ca…04d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0020}
0x04d4…04de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002a}
0x04de…04f4 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x0034}
0x04f4…050a Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x004a}
0x050a…0520 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x0060}
0x0520…052a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0076}
0x052a…0534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0080}
0x0534…0554 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0003, t01=0x008a}
0x0554…0570 Head {h00=0x0018, h01=0x0050, text=» EXTRN TENDIO ENDIO «, t00=0x0003, t01=0x00aa}
0x0570…0594 Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0003, t01=0x00c6}
0x0594…05be Head {h00=0x0026, h01=0x0050, text=» EXTRN DISEND TENDIO AND DISPATCH «, t00=0x0003, t01=0x00ea}
0x05be…05de Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0003, t01=0x0114}
0x05de…0600 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0003, t01=0x0134}
0x0600…062a Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK«, t00=0x0003, t01=0x0156}
0x062a…0650 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTTAB DWT TTAB ADDRESS«, t00=0x0003, t01=0x0180}
0x0650…067a Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB1 STACK BASE 1 IN DWT «, t00=0x0004, t01=0x0016}
0x067a…06a4 Head {h00=0x0026, h01=0x0050, text=» EXTRN BUFLEN DRIVER BUFFER LENGTH«, t00=0x0004, t01=0x0040}
0x06a4…06c0 Head {h00=0x0018, h01=0x0050, text=» EXTRN SETIMP TIMER «, t00=0x0004, t01=0x006a}
0x06c0…06f0 Head {h00=0x002c, h01=0x0050, text=» EXTRN FNDTID FIND TTAB ADDRESS FROM TID«, t00=0x0004, t01=0x0086}
0x06f0…0712 Head {h00=0x001e, h01=0x0050, text=» EXTRN TTB:ST TASK STATUS «, t00=0x0004, t01=0x00b6}
0x0712…0738 Head {h00=0x0022, h01=0x0050, text=» EXTRN TTB:TD TERMINAL DEVICES«, t00=0x0004, t01=0x00d8}
0x0738…0770 Head {h00=0x0034, h01=0x0050, text=» EXTRN IHRTN RTN A15 WITHOUT ENABLING INTERRUPTS«, t00=0x0004, t01=0x00fe}
0x0770…0798 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0004, t01=0x0136}
0x0798…07c2 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x015e}
0x07c2…07ec Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0004, t01=0x0188}
0x07ec…0810 Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x0022}
0x0810…0836 Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0005, t01=0x0046}
0x0836…0856 Head {h00=0x001c, h01=0x0050, text=» EJECT DRIC01 TOSSIO«, t00=0x0005, t01=0x006c}
0x0856…0860 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008c}
0x0860…086a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0096}
0x086a…089c Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0005, t01=0x00a0}
0x089c…08a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d2}
0x08a6…08c4 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0005, t01=0x00dc}
0x08c4…08ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00fa}
0x08ce…0900 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0005, t01=0x0104}
0x0900…090a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0136}
0x090a…093c Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0005, t01=0x0140}
0x093c…096a Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0005, t01=0x0172}
0x096a…0974 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0010}
0x0974…0988 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0006, t01=0x001a}
0x0988…0992 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002e}
0x0992…09cc Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0006, t01=0x0038}
0x09cc…09fe Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0006, t01=0x0072}
0x09fe…0a08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a4}
0x0a08…0a1c Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0006, t01=0x00ae}
0x0a1c…0a26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c2}
0x0a26…0a40 Head {h00=0x0016, h01=0x0050, text=»* MMU BUFFER SIZE «, t00=0x0006, t01=0x00cc}
0x0a40…0a4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e6}
0x0a4a…0a5c Head {h00=0x000e, h01=0x0050, text=»X:A EQU 50«, t00=0x0006, t01=0x00f0}
0x0a5c…0a74 Head {h00=0x0014, h01=0x0050, text=»X:Q EQU 200 DK0«, t00=0x0006, t01=0x0102}
0x0a74…0a94 Head {h00=0x001c, h01=0x0050, text=»DVBLEN EQU 200+X:Q DK0 «, t00=0x0006, t01=0x011a}
0x0a94…0a9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013a}
0x0a9e…0abe Head {h00=0x001c, h01=0x0050, text=»* INTERTASK DEVICE INDEX«, t00=0x0006, t01=0x0144}
0x0abe…0ac8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0164}
0x0ac8…0ada Head {h00=0x000e, h01=0x0050, text=»X:B EQU 8 «, t00=0x0006, t01=0x016e}
0x0ada…0af0 Head {h00=0x0012, h01=0x0050, text=»DEVIND EQU X:B«, t00=0x0006, t01=0x0180}
0x0af0…0afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0008}
0x0afa…0b12 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0007, t01=0x0012}
0x0b12…0b1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002a}
0x0b1c…0b26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0034}
0x0b26…0b44 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0007, t01=0x003e}
0x0b44…0b62 Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS * «, t00=0x0007, t01=0x005c}
0x0b62…0b80 Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0007, t01=0x007a}
0x0b80…0b8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0098}
0x0b8a…0b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a2}
0x0b94…0bc8 Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0007, t01=0x00ac}
0x0bc8…0bd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e0}
0x0bd2…0be8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0007, t01=0x00ea}
0x0be8…0c00 Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0007, t01=0x0100}
0x0c00…0c0c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x0118}
0x0c0c…0c16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0124}
0x0c16…0c2c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0007, t01=0x012e}
0x0c2c…0c46 Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0007, t01=0x0144}
0x0c46…0c52 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x015e}
0x0c52…0c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x016a}
0x0c5c…0c86 Head {h00=0x0026, h01=0x0050, text=»DWTTP EQU START+/00 TIMER POINTER «, t00=0x0007, t01=0x0174}
0x0c86…0ca8 Head {h00=0x001e, h01=0x0050, text=»DWTIME EQU START+/02 TIME «, t00=0x0008, t01=0x000e}
0x0ca8…0ce2 Head {h00=0x0036, h01=0x0050, text=»DWTANC EQU START+/04 POINTER TO FIRST DWT IN QUEUE«, t00=0x0008, t01=0x0030}
0x0ce2…0d14 Head {h00=0x002e, h01=0x0050, text=»DWTQUE EQU START+/06 QUEUE ANCHOR ADDRESS «, t00=0x0008, t01=0x006a}
0x0d14…0d1e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x009c}
0x0d1e…0d36 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0008, t01=0x00a6}
0x0d36…0d40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00be}
0x0d40…0d4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c8}
0x0d4a…0d64 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0008, t01=0x00d2}
0x0d64…0d7e Head {h00=0x0016, h01=0x0050, text=»* ADDRESS BLOCK * «, t00=0x0008, t01=0x00ec}
0x0d7e…0d98 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0008, t01=0x0106}
0x0d98…0da2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0120}
0x0da2…0dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x012a}
0x0dac…0dd8 Head {h00=0x0028, h01=0x0050, text=» DATA DVBLEN+DVBLEN MMU BUFFER SIZE «, t00=0x0008, t01=0x0134}
0x0dd8…0e04 Head {h00=0x0028, h01=0x0050, text=» DATA DEVIND INTERTASK DEVICE INDEX «, t00=0x0008, t01=0x0160}
0x0e04…0e2e Head {h00=0x0026, h01=0x0050, text=»ITAD DATA ICAD ACTIVATION ADDRESS «, t00=0x0008, t01=0x018c}
0x0e2e…0e50 Head {h00=0x001e, h01=0x0050, text=» DATA ITABRT ABORT ADDRESS«, t00=0x0009, t01=0x0026}
0x0e50…0e5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0048}
0x0e5a…0e64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0052}
0x0e64…0e9e Head {h00=0x0036, h01=0x0050, text=»RD:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED READ REQ.«, t00=0x0009, t01=0x005c}
0x0e9e…0eda Head {h00=0x0038, h01=0x0050, text=»WR:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED WRITE REQ. «, t00=0x0009, t01=0x0096}
0x0eda…0ee4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d2}
0x0ee4…0f0c Head {h00=0x0024, h01=0x0050, text=»* INTERTASK DRIVER BUFFER (MMU) «, t00=0x0009, t01=0x00dc}
0x0f0c…0f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0104}
0x0f16…0f2a Head {h00=0x0010, h01=0x0050, text=»IT:BUF EQU *«, t00=0x0009, t01=0x010e}
0x0f2a…0f40 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0009, t01=0x0122}
0x0f40…0f62 Head {h00=0x001e, h01=0x0050, text=» RES DVBLEN+1 MMU BUFFER «, t00=0x0009, t01=0x0138}
0x0f62…0f6e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x015a}
0x0f6e…0f78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0166}
0x0f78…0f90 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0009, t01=0x0170}
0x0f90…0f9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0188}
0x0f9a…0fb8 (10, 0, 400) Head {h00=0x001a, h01=0x0050, text=»* A C T I V A T I O N «, t00=0x000a, t01=0x0004}
0x0fb8…0fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0022}
0x0fc2…0fd4 Head {h00=0x000e, h01=0x0050, text=»ICAD EQU *«, t00=0x000a, t01=0x002c}
0x0fd4…0ff8 Head {h00=0x0020, h01=0x0050, text=» LDR A1,A7 ORDER CODE TO A1 «, t00=0x000a, t01=0x003e}
0x0ff8…100a Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x000a, t01=0x0062}
0x100a…1034 Head {h00=0x0026, h01=0x0050, text=» RF(Z) RD:NAD READ NOT ADDRESSED? «, t00=0x000a, t01=0x0074}
0x1034…1046 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000a, t01=0x009e}
0x1046…1072 Head {h00=0x0028, h01=0x0050, text=» ABL(Z) WR:NAD WRITE NOT ADDRESSED? «, t00=0x000a, t01=0x00b0}
0x1072…1084 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000a, t01=0x00dc}
0x1084…10aa Head {h00=0x0022, h01=0x0050, text=» RF(Z) RD:ADR READ ADDRESSED? «, t00=0x000a, t01=0x00ee}
0x10aa…10bc Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000a, t01=0x0114}
0x10bc…10e2 Head {h00=0x0022, h01=0x0050, text=» RF(Z) WR:ADR WRITE ADDRESSED?«, t00=0x000a, t01=0x0126}
0x10e2…10f6 Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2E «, t00=0x000a, t01=0x014c}
0x10f6…111c Head {h00=0x0022, h01=0x0050, text=» RF(NZ) DIS:OE REQUEST ERROR? «, t00=0x000a, t01=0x0160}
0x111c…1126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0186}
0x1126…1148 Head {h00=0x001e, h01=0x0050, text=»* S E T T I M E O U T«, t00=0x000a, t01=0x0190}
0x1148…1152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0022}
0x1152…1172 Head {h00=0x001c, h01=0x0050, text=» LD A2,ECBCW,A8 GET TIME«, t00=0x000b, t01=0x002c}
0x1172…118a Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTIME,A6«, t00=0x000b, t01=0x004c}
0x118a…119c Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x000b, t01=0x0064}
0x119c…11a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0076}
0x11a6…11be Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000b, t01=0x0080}
0x11be…11c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0098}
0x11c8…11ec Head {h00=0x0020, h01=0x0050, text=»* R E A D, A D D R E S S E D«, t00=0x000b, t01=0x00a2}
0x11ec…11f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c6}
0x11f6…121c Head {h00=0x0022, h01=0x0050, text=»* W R I T E, A D D R E S S E D«, t00=0x000b, t01=0x00d0}
0x121c…1226 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00f6}
0x1226…124a Head {h00=0x0020, h01=0x0050, text=»RD:ADR EQU * READ, ADDRESSED«, t00=0x000b, t01=0x0100}
0x124a…1270 Head {h00=0x0022, h01=0x0050, text=»WR:ADR EQU * WRITE, ADDRESSED «, t00=0x000b, t01=0x0124}
0x1270…127a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014a}
0x127a…12a2 Head {h00=0x0024, h01=0x0050, text=»* FIND TTAB OF ADDRESSED TASK«, t00=0x000b, t01=0x0154}
0x12a2…12ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017c}
0x12ac…12c8 Head {h00=0x0018, h01=0x0050, text=» LD A7,ECBCW,A8 TID «, t00=0x000b, t01=0x0186}
0x12c8…12f2 Head {h00=0x0026, h01=0x0050, text=» CF A15,FNDTID TTAB ADDRESS TO A2 «, t00=0x000c, t01=0x0012}
0x12f2…130a Head {h00=0x0014, h01=0x0050, text=» ADK A2,0 SET CR«, t00=0x000c, t01=0x003c}
0x130a…132a Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIS:OE NOT FOUND?«, t00=0x000c, t01=0x0054}
0x132a…1342 Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTTAB,A6«, t00=0x000c, t01=0x0074}
0x1342…1364 Head {h00=0x001e, h01=0x0050, text=» RF(E) DIS:OE ILLEGAL TID?«, t00=0x000c, t01=0x008c}
0x1364…139c Head {h00=0x0034, h01=0x0050, text=» ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE«, t00=0x000c, t01=0x00ae}
0x139c…13bc Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A2 TABLE LENGTH«, t00=0x000c, t01=0x00e6}
0x13bc…13e4 Head {h00=0x0024, h01=0x0050, text=» LDR A7,A12 DRIVER ADDRESS BLOCK«, t00=0x000c, t01=0x0106}
0x13e4…141e Head {h00=0x0036, h01=0x0050, text=» XRK A7,1 IF INPUT, POINT TO OUTPUT BLOCK AND V.V.«, t00=0x000c, t01=0x012e}
0x141e…1428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0168}
0x1428…1440 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000c, t01=0x0172}
0x1440…144a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018a}
0x144a…1472 (13, 0, 400) Head {h00=0x0024, h01=0x0050, text=»* FIND DWT OF ADDRESSED TASK «, t00=0x000d, t01=0x0004}
0x1472…147c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x002c}
0x147c…14b0 Head {h00=0x0030, h01=0x0050, text=»ADR:20 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS «, t00=0x000d, t01=0x0036}
0x14b0…14c2 Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x000d, t01=0x006a}
0x14c2…14e2 Head {h00=0x001c, h01=0x0050, text=» RF(N) DIS:OE NOT FOUND?«, t00=0x000d, t01=0x007c}
0x14e2…14ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x009c}
0x14ec…150c Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A2 DWT ADDRESS «, t00=0x000d, t01=0x00a6}
0x150c…1532 Head {h00=0x0022, h01=0x0050, text=» CW A7,DWTADR,A4 SEARCHED DWT?«, t00=0x000d, t01=0x00c6}
0x1532…1556 Head {h00=0x0020, h01=0x0050, text=» RB(NE) ADR:20 NO, TRY NEXT «, t00=0x000d, t01=0x00ec}
0x1556…1560 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0110}
0x1560…1572 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x000d, t01=0x011a}
0x1572…1596 Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTST,A2 ANY REQUEST?«, t00=0x000d, t01=0x012c}
0x1596…15b0 Head {h00=0x0016, h01=0x0050, text=» RF(N) ADR:40 NO! «, t00=0x000d, t01=0x0150}
0x15b0…15ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016a}
0x15ba…15ec Head {h00=0x002e, h01=0x0050, text=» LD A1,DWTQUE,A2 GET QUEUE ANCHOR ADDRESS «, t00=0x000d, t01=0x0174}
0x15ec…1612 Head {h00=0x0022, h01=0x0050, text=» CWR A1,A6 CHECK QUEUE ANCHOR «, t00=0x000e, t01=0x0016}
0x1612…1646 Head {h00=0x0030, h01=0x0050, text=» RF(E) ADR:30 REQUEST ISSUED FOR THIS TASK? «, t00=0x000e, t01=0x003c}
0x1646…1650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0070}
0x1650…1662 Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x000e, t01=0x007a}
0x1662…167e Head {h00=0x0018, h01=0x0050, text=» RF(Z) ADR:25 READ? «, t00=0x000e, t01=0x008c}
0x167e…1694 Head {h00=0x0012, h01=0x0050, text=» CWK A1,RD:QUE«, t00=0x000e, t01=0x00a8}
0x1694…16c0 Head {h00=0x0028, h01=0x0050, text=» RF(E) ADR:30 COMPLEMENTARY REQUEST?«, t00=0x000e, t01=0x00be}
0x16c0…16d6 Head {h00=0x0012, h01=0x0050, text=» RF ADR:50 NO «, t00=0x000e, t01=0x00ea}
0x16d6…16e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0100}
0x16e0…16f8 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x000e, t01=0x010a}
0x16f8…1702 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0122}
0x1702…170c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012c}
0x170c…1728 Head {h00=0x0018, h01=0x0050, text=»ADR:25 CWK A1,WR:QUE«, t00=0x000e, t01=0x0136}
0x1728…1758 Head {h00=0x002c, h01=0x0050, text=» RF(NE) ADR:50 NO COMPLEMENTARY REQUEST?«, t00=0x000e, t01=0x0152}
0x1758…1762 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0182}
0x1762…1782 Head {h00=0x001c, h01=0x0050, text=»* ABORT TIMER IF ANY «, t00=0x000e, t01=0x018c}
0x1782…178c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001c}
0x178c…17ce Head {h00=0x003e, h01=0x0050, text=»ADR:30 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE«, t00=0x000f, t01=0x0026}
0x17ce…17e0 Head {h00=0x000e, h01=0x0050, text=» ANK A7,1 «, t00=0x000f, t01=0x0068}
0x17e0…17fc Head {h00=0x0018, h01=0x0050, text=» RF(Z) RD:N05 READ? «, t00=0x000f, t01=0x007a}
0x17fc…1806 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0096}
0x1806…181e Head {h00=0x0014, h01=0x0050, text=»* MOVE BUFFER«, t00=0x000f, t01=0x00a0}
0x181e…1828 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b8}
0x1828…183c Head {h00=0x0010, h01=0x0050, text=»ADR:35 EQU *«, t00=0x000f, t01=0x00c2}
0x183c…1862 Head {h00=0x0022, h01=0x0050, text=» LDKL A5,DWTSB1 GET STACK BASE«, t00=0x000f, t01=0x00d6}
0x1862…1874 Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x000f, t01=0x00fc}
0x1874…188a Head {h00=0x0012, h01=0x0050, text=» CF A5,MOVBUF «, t00=0x000f, t01=0x010e}
0x188a…18aa Head {h00=0x001c, h01=0x0050, text=» CF A15,TENDIO END WRITE«, t00=0x000f, t01=0x0124}
0x18aa…18bc Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x000f, t01=0x0144}
0x18bc…18c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0156}
0x18c6…18dc Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x0160}
0x18dc…190e Head {h00=0x002e, h01=0x0050, text=» LD A3,ECBBA,A8 GET SENDING BUFFER ADDRESS«, t00=0x000f, t01=0x0176}
0x190e…1920 Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0010, t01=0x0018}
0x1920…194a Head {h00=0x0026, h01=0x0050, text=» RF(Z) ADR:38 BUFFER ADDRESS EVEN?«, t00=0x0010, t01=0x002a}
0x194a…1988 Head {h00=0x003a, h01=0x0050, text=» ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN «, t00=0x0010, t01=0x0054}
0x1988…199a Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x0010, t01=0x0092}
0x199a…19a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a4}
0x19a4…19b8 Head {h00=0x0010, h01=0x0050, text=»ADR:38 EQU *«, t00=0x0010, t01=0x00ae}
0x19b8…19d6 Head {h00=0x001a, h01=0x0050, text=» SUK A3,2 A3 := /FFFE «, t00=0x0010, t01=0x00c2}
0x19d6…1a12 Head {h00=0x0038, h01=0x0050, text=» ANS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS EVEN «, t00=0x0010, t01=0x00e0}
0x1a12…1a1e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x011c}
0x1a1e…1a28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0128}
0x1a28…1a4e Head {h00=0x0022, h01=0x0050, text=»END:IO CF A15,TENDIO END READ «, t00=0x0010, t01=0x0132}
0x1a4e…1a58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0158}
0x1a58…1a70 Head {h00=0x0014, h01=0x0050, text=»T:DISP ABL TDISP«, t00=0x0010, t01=0x0162}
0x1a70…1a7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x017a}
0x1a7a…1a92 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0010, t01=0x0184}
0x1a92…1a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x000c}
0x1a9c…1ab4 Head {h00=0x0014, h01=0x0050, text=»* OUEUE REQUEST «, t00=0x0011, t01=0x0016}
0x1ab4…1abe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x002e}
0x1abe…1af0 Head {h00=0x002e, h01=0x0050, text=»ADR:40 LDK A7,0 INDICATE ADDRESSED REQUEST«, t00=0x0011, t01=0x0038}
0x1af0…1afa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006a}
0x1afa…1b0e Head {h00=0x0010, h01=0x0050, text=»ADR:50 EQU *«, t00=0x0011, t01=0x0074}
0x1b0e…1b2c Head {h00=0x001a, h01=0x0050, text=» LD A3,DWTIME,A6 TIME «, t00=0x0011, t01=0x0088}
0x1b2c…1b42 Head {h00=0x0012, h01=0x0050, text=» RF(Z) TWR:30 «, t00=0x0011, t01=0x00a6}
0x1b42…1b54 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0011, t01=0x00bc}
0x1b54…1b7c Head {h00=0x0024, h01=0x0050, text=» RF(Z) ADR:70 NO TIMING WANTED? «, t00=0x0011, t01=0x00ce}
0x1b7c…1b8e Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0011, t01=0x00f6}
0x1b8e…1bb2 Head {h00=0x0020, h01=0x0050, text=» RF(N) DIS:OE NEGATIVE TIME?«, t00=0x0011, t01=0x0108}
0x1bb2…1bec Head {h00=0x0036, h01=0x0050, text=» LDR A1,A6 DWTOUT = PARAM. WHEN WRITE, ELSE DWTIN «, t00=0x0011, t01=0x012c}
0x1bec…1c02 Head {h00=0x0012, h01=0x0050, text=» LDK A4,DWTTP «, t00=0x0011, t01=0x0166}
0x1c02…1c22 Head {h00=0x001c, h01=0x0050, text=» ADR A4,A6 TIMER POINTER«, t00=0x0011, t01=0x017c}
0x1c22…1c36 Head {h00=0x0010, h01=0x0050, text=» ST A3,TIME «, t00=0x0012, t01=0x000c}
0x1c36…1c56 Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIMER«, t00=0x0012, t01=0x0020}
0x1c56…1c7a Head {h00=0x0020, h01=0x0050, text=» DATA TIMOUT TIMEOUT ADDRESS«, t00=0x0012, t01=0x0040}
0x1c7a…1c8e Head {h00=0x0010, h01=0x0050, text=»TIME DATA 0 «, t00=0x0012, t01=0x0064}
0x1c8e…1c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0078}
0x1c98…1cb0 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0012, t01=0x0082}
0x1cb0…1cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x009a}
0x1cba…1ce6 Head {h00=0x0028, h01=0x0050, text=»* INSERT IN QUEUE WITHIN PRIORITY«, t00=0x0012, t01=0x00a4}
0x1ce6…1cf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d0}
0x1cf0…1d04 Head {h00=0x0010, h01=0x0050, text=»ADR:70 EQU *«, t00=0x0012, t01=0x00da}
0x1d04…1d36 Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTQUE,A6 STORE QUEUE ANCHOR IN DWT«, t00=0x0012, t01=0x00ee}
0x1d36…1d5c Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A6 TTAB ADDRESS «, t00=0x0012, t01=0x0120}
0x1d5c…1d7c Head {h00=0x001c, h01=0x0050, text=» LD A1,TTB:ST+1,A5 LEVEL«, t00=0x0012, t01=0x0146}
0x1d7c…1d8e Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0012, t01=0x0166}
0x1d8e…1dba Head {h00=0x0028, h01=0x0050, text=» RF(P) ADR:80 NOT-ADDRESSED REQUEST?«, t00=0x0012, t01=0x0178}
0x1dba…1df8 Head {h00=0x003a, h01=0x0050, text=» ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE «, t00=0x0013, t01=0x0014}
0x1df8…1e02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0052}
0x1e02…1e20 Head {h00=0x001a, h01=0x0050, text=»ADR:80 LDR A4,A2 SAVE «, t00=0x0013, t01=0x005c}
0x1e20…1e42 Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A2 NEXT IN QUEUE «, t00=0x0013, t01=0x007a}
0x1e42…1e62 Head {h00=0x001c, h01=0x0050, text=» RF(Z) ADR:90 END FOUND?«, t00=0x0013, t01=0x009c}
0x1e62…1e88 Head {h00=0x0022, h01=0x0050, text=» LD A5,DWTTAB,A2 TTAB ADDRESS «, t00=0x0013, t01=0x00bc}
0x1e88…1eb2 Head {h00=0x0026, h01=0x0050, text=» CC A1,TTB:ST+1,A5 COMPARE LEVELS «, t00=0x0013, t01=0x00e2}
0x1eb2…1ec8 Head {h00=0x0012, h01=0x0050, text=» RB(NL) ADR:80«, t00=0x0013, t01=0x010c}
0x1ec8…1ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0122}
0x1ed2…1efa Head {h00=0x0024, h01=0x0050, text=»ADR:90 STR A2,A6 INSERT IN QUEUE«, t00=0x0013, t01=0x012c}
0x1efa…1f0c Head {h00=0x000e, h01=0x0050, text=» STR A6,A4«, t00=0x0013, t01=0x0154}
0x1f0c…1f1e Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x0013, t01=0x0166}
0x1f1e…1f28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0178}
0x1f28…1f50 Head {h00=0x0024, h01=0x0050, text=»DIS:OE ABL DISIOE REQUEST ERROR «, t00=0x0013, t01=0x0182}
0x1f50…1f5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x001a}
0x1f5a…1f72 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0014, t01=0x0024}
0x1f72…1f7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x003c}
0x1f7c…1fa8 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=0x0046}
0x1fa8…1fb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0072}
0x1fb2…1fda Head {h00=0x0024, h01=0x0050, text=»RD:NAD EQU * READ, NOT ADDRESSED«, t00=0x0014, t01=0x007c}
0x1fda…201a Head {h00=0x003c, h01=0x0050, text=» LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS«, t00=0x0014, t01=0x00a4}
0x201a…2044 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RD:N10 ANYTHING IN QUEUE? «, t00=0x0014, t01=0x00e4}
0x2044…2082 Head {h00=0x003a, h01=0x0050, text=» LD A2,WR:QUE CHECK QUEUE OF NOT ADDRESSED WRITE REQ. «, t00=0x0014, t01=0x010e}
0x2082…20a4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) RD:N20 QUEUE EMPTY?«, t00=0x0014, t01=0x014c}
0x20a4…20ce Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A2 NO, REMOVE FROM QUEUE «, t00=0x0014, t01=0x016e}
0x20ce…20f8 Head {h00=0x0026, h01=0x0050, text=» ST A3,WR:QUE UPDATE QUEUE ANCHOR «, t00=0x0015, t01=0x0008}
0x20f8…2102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0032}
0x2102…2116 Head {h00=0x0010, h01=0x0050, text=»RD:N00 EQU *«, t00=0x0015, t01=0x003c}
0x2116…2140 Head {h00=0x0026, h01=0x0050, text=» CF A15,ABTIM2 ABORT TIMER IF ANY «, t00=0x0015, t01=0x0050}
0x2140…214a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x007a}
0x214a…215e Head {h00=0x0010, h01=0x0050, text=»RD:N05 EQU *«, t00=0x0015, t01=0x0084}
0x215e…2184 Head {h00=0x0022, h01=0x0050, text=» LDR A4,A6 EXCHANGE A2 AND A6 «, t00=0x0015, t01=0x0098}
0x2184…2196 Head {h00=0x000e, h01=0x0050, text=» LDR A6,A2«, t00=0x0015, t01=0x00be}
0x2196…21a8 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0015, t01=0x00d0}
0x21a8…21ba Head {h00=0x000e, h01=0x0050, text=» RB ADR:35«, t00=0x0015, t01=0x00e2}
0x21ba…21c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f4}
0x21c4…21f0 Head {h00=0x0028, h01=0x0050, text=»RD:N10 LDR* A3,A2 REMOVE FROM QUEUE «, t00=0x0015, t01=0x00fe}
0x21f0…221c Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR«, t00=0x0015, t01=0x012a}
0x221c…222e Head {h00=0x000e, h01=0x0050, text=» RB RD:N00«, t00=0x0015, t01=0x0156}
0x222e…2238 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0168}
0x2238…2268 Head {h00=0x002c, h01=0x0050, text=»RD:N20 LDKL A2,RD:QUE GET RD:QUE ADDRESS«, t00=0x0015, t01=0x0172}
0x2268…228a Head {h00=0x001e, h01=0x0050, text=» RB ADR:50 INSERT IN QUEUE«, t00=0x0016, t01=0x0012}
0x228a…2294 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0034}
0x2294…22ac Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0016, t01=0x003e}
0x22ac…22b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0056}
0x22b6…22e4 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=0x0060}
0x22e4…22ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008e}
0x22ee…2318 Head {h00=0x0026, h01=0x0050, text=»WR:NAD EQU * WRITE, NOT ADDRESSED «, t00=0x0016, t01=0x0098}
0x2318…2358 Head {h00=0x003c, h01=0x0050, text=» LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS «, t00=0x0016, t01=0x00c2}
0x2358…2382 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WR:N10 ANYTHING IN QUEUE? «, t00=0x0016, t01=0x0102}
0x2382…23be Head {h00=0x0038, h01=0x0050, text=» LD A2,RD:QUE CHECK QUEUE OF NOT ADDRESSED READ REQ.«, t00=0x0016, t01=0x012c}
0x23be…23e0 Head {h00=0x001e, h01=0x0050, text=» RF(Z) WR:N20 QUEUE EMPTY?«, t00=0x0016, t01=0x0168}
0x23e0…240a Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A2 NO, REMOVE FROM QUEUE «, t00=0x0016, t01=0x018a}
0x240a…2434 Head {h00=0x0026, h01=0x0050, text=» ST A3,RD:QUE UPDATE QUEUE ANCHOR «, t00=0x0017, t01=0x0024}
0x2434…243e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004e}
0x243e…246e Head {h00=0x002c, h01=0x0050, text=»WR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY «, t00=0x0017, t01=0x0058}
0x246e…2480 Head {h00=0x000e, h01=0x0050, text=» RB ADR:35«, t00=0x0017, t01=0x0088}
0x2480…248a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x009a}
0x248a…24b6 Head {h00=0x0028, h01=0x0050, text=»WR:N10 LDR* A3,A2 REMOVE FROM QUEUE «, t00=0x0017, t01=0x00a4}
0x24b6…24e2 Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR«, t00=0x0017, t01=0x00d0}
0x24e2…24f4 Head {h00=0x000e, h01=0x0050, text=» RB WR:N05«, t00=0x0017, t01=0x00fc}
0x24f4…24fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x010e}
0x24fe…252e Head {h00=0x002c, h01=0x0050, text=»WR:N20 LDKL A2,WR:QUE GET WR:QUE ADDRESS«, t00=0x0017, t01=0x0118}
0x252e…2540 Head {h00=0x000e, h01=0x0050, text=» RB ADR:50«, t00=0x0017, t01=0x0148}
0x2540…254a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x015a}
0x254a…2562 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0017, t01=0x0164}
0x2562…256c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x017c}
0x256c…2584 Head {h00=0x0014, h01=0x0050, text=»* T I M E O U T «, t00=0x0017, t01=0x0186}
0x2584…258e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x000e}
0x258e…25b2 Head {h00=0x0020, h01=0x0050, text=»TIMOUT LDR A6,A1 DWT ADDRESS«, t00=0x0018, t01=0x0018}
0x25b2…25d8 Head {h00=0x0022, h01=0x0050, text=» CM* 0,A2 RESET TIMER POINTER «, t00=0x0018, t01=0x003c}
0x25d8…25ea Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x0018, t01=0x0062}
0x25ea…2612 Head {h00=0x0024, h01=0x0050, text=» CF A15,ITAB10 REMOVE FROM QUEUE«, t00=0x0018, t01=0x0074}
0x2612…261c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x009c}
0x261c…2630 Head {h00=0x0010, h01=0x0050, text=»TWR:30 EQU *«, t00=0x0018, t01=0x00a6}
0x2630…2650 Head {h00=0x001c, h01=0x0050, text=» CMR A6 RESET QUEUE LINK«, t00=0x0018, t01=0x00ba}
0x2650…2670 Head {h00=0x001c, h01=0x0050, text=» LDK A1,/40 RETURN CODE «, t00=0x0018, t01=0x00da}
0x2670…2682 Head {h00=0x000e, h01=0x0050, text=» RB END:IO«, t00=0x0018, t01=0x00fa}
0x2682…268c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x010c}
0x268c…26a4 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0018, t01=0x0116}
0x26a4…26ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x012e}
0x26ae…26c4 Head {h00=0x0012, h01=0x0050, text=»* I T A B R T «, t00=0x0018, t01=0x0138}
0x26c4…26ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x014e}
0x26ce…2700 Head {h00=0x002e, h01=0x0050, text=»* THIS SUBROUTINE IS CALLED FROM TABORT. «, t00=0x0018, t01=0x0158}
0x2700…273a Head {h00=0x0036, h01=0x0050, text=»* IT WILL UPDATE QUEUE AND ABORT TIMER (IF ANY). «, t00=0x0018, t01=0x018a}
0x273a…2744 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0034}
0x2744…2768 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS «, t00=0x0019, t01=0x003e}
0x2768…2772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0062}
0x2772…2798 Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED«, t00=0x0019, t01=0x006c}
0x2798…27a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0092}
0x27a2…27b6 Head {h00=0x0010, h01=0x0050, text=»ITABRT EQU *«, t00=0x0019, t01=0x009c}
0x27b6…27c8 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x0019, t01=0x00b0}
0x27c8…27d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00c2}
0x27d2…27e6 Head {h00=0x0010, h01=0x0050, text=»ITAB05 EQU *«, t00=0x0019, t01=0x00cc}
0x27e6…2808 Head {h00=0x001e, h01=0x0050, text=» CF A15,ABTIM ABORT TIMER «, t00=0x0019, t01=0x00e0}
0x2808…2812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0102}
0x2812…2832 Head {h00=0x001c, h01=0x0050, text=»* REMOVE DWT FROM QUEUE «, t00=0x0019, t01=0x010c}
0x2832…283c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x012c}
0x283c…2850 Head {h00=0x0010, h01=0x0050, text=»ITAB10 EQU *«, t00=0x0019, t01=0x0136}
0x2850…287a Head {h00=0x0026, h01=0x0050, text=» LD A1,DWTQUE,A2 GET QUEUE ACHHOR «, t00=0x0019, t01=0x014a}
0x287a…2890 Head {h00=0x0012, h01=0x0050, text=» CWK A1,RD:QUE«, t00=0x0019, t01=0x0174}
0x2890…28c2 Head {h00=0x002e, h01=0x0050, text=» RF(E) ITAB20 NOT-ADDRESSED READ REQUEST? «, t00=0x0019, t01=0x018a}
0x28c2…28d8 Head {h00=0x0012, h01=0x0050, text=» CWK A1,WR:QUE«, t00=0x001a, t01=0x002c}
0x28d8…290a Head {h00=0x002e, h01=0x0050, text=» RF(E) ITAB20 NOT-ADDRESSED WRITE REQUEST?«, t00=0x001a, t01=0x0042}
0x290a…2948 Head {h00=0x003a, h01=0x0050, text=» ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE «, t00=0x001a, t01=0x0074}
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…297e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00de}
0x297e…299c Head {h00=0x001a, h01=0x0050, text=»ITAB20 LDR A4,A1 SAVE «, t00=0x001a, t01=0x00e8}
0x299c…29be Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A1 NEXT IN QUEUE «, t00=0x001a, t01=0x0106}
0x29be…29de Head {h00=0x001c, h01=0x0050, text=» CWR A1,A2 SEARCHED DWT?«, t00=0x001a, t01=0x0128}
0x29de…29f8 Head {h00=0x0016, h01=0x0050, text=» RB(NE) ITAB20 NO!«, t00=0x001a, t01=0x0148}
0x29f8…2a1e Head {h00=0x0022, h01=0x0050, text=» LDR* A3,A1 REMOVE FROM QUEUE «, t00=0x001a, t01=0x0162}
0x2a1e…2a44 Head {h00=0x0022, h01=0x0050, text=» STR A3,A4 UPDATE QUEUE LINKS «, t00=0x001a, t01=0x0188}
0x2a44…2a64 Head {h00=0x001c, h01=0x0050, text=» CMR A2 RESET QUEUE LINK«, t00=0x001b, t01=0x001e}
0x2a64…2a6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x003e}
0x2a6e…2a84 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001b, t01=0x0048}
0x2a84…2a96 Head {h00=0x000e, h01=0x0050, text=» RF IH:RTN«, t00=0x001b, t01=0x005e}
0x2a96…2aa2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0070}
0x2aa2…2aac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x007c}
0x2aac…2ac2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001b, t01=0x0086}
0x2ac2…2ad2 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x001b, t01=0x009c}
0x2ad2…2ade Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00ac}
0x2ade…2ae8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00b8}
0x2ae8…2b00 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001b, t01=0x00c2}
0x2b00…2b0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00da}
0x2b0a…2b1e Head {h00=0x0010, h01=0x0050, text=»* A B T I M «, t00=0x001b, t01=0x00e4}
0x2b1e…2b28 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00f8}
0x2b28…2b5a Head {h00=0x002e, h01=0x0050, text=»* SUBROUTINE FOR ABORTING TIMER (IF ANY).«, t00=0x001b, t01=0x0102}
0x2b5a…2b64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0134}
0x2b64…2b88 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A2 = DWT ADDRESS «, t00=0x001b, t01=0x013e}
0x2b88…2b92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0162}
0x2b92…2bba Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A1, A3 ARE DESTROYED «, t00=0x001b, t01=0x016c}
0x2bba…2bc4 (28, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0004}
0x2bc4…2bd8 Head {h00=0x0010, h01=0x0050, text=»ABTIM2 EQU *«, t00=0x001c, t01=0x000e}
0x2bd8…2bf8 Head {h00=0x001c, h01=0x0050, text=» CMR A2 RESET QUEUE LINK«, t00=0x001c, t01=0x0022}
0x2bf8…2c02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0042}
0x2c02…2c1c Head {h00=0x0016, h01=0x0050, text=»ABTIM LDK A1,DWTTP«, t00=0x001c, t01=0x004c}
0x2c1c…2c44 Head {h00=0x0024, h01=0x0050, text=» ADR A1,A2 TIMER POINTER ADDRESS«, t00=0x001c, t01=0x0066}
0x2c44…2c58 Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A1 «, t00=0x001c, t01=0x008e}
0x2c58…2c7e Head {h00=0x0022, h01=0x0050, text=» RF(Z) IH:RTN NO TIMER ACTIVE?«, t00=0x001c, t01=0x00a2}
0x2c7e…2c90 Head {h00=0x000e, h01=0x0050, text=» CM* 0,A1 «, t00=0x001c, t01=0x00c8}
0x2c90…2cb6 Head {h00=0x0022, h01=0x0050, text=» CMR A1 INDICATE NO TIMER SET «, t00=0x001c, t01=0x00da}
0x2cb6…2cc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0100}
0x2cc0…2cd6 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001c, t01=0x010a}
0x2cd6…2cee Head {h00=0x0014, h01=0x0050, text=»IH:RTN ABL IHRTN«, t00=0x001c, t01=0x0120}
0x2cee…2cfa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0138}
0x2cfa…2d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0144}
0x2d04…2d1a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001c, t01=0x014e}
0x2d1a…2d30 Head {h00=0x0012, h01=0x0050, text=»IH:RTN RTN A15«, t00=0x001c, t01=0x0164}
0x2d30…2d3c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x017a}
0x2d3c…2d46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0186}
0x2d46…2d5e Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001c, t01=0x0190}
0x2d5e…2d68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0018}
0x2d68…2d7e Head {h00=0x0012, h01=0x0050, text=»* M O V B U F «, t00=0x001d, t01=0x0022}
0x2d7e…2d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0038}
0x2d88…2dc0 Head {h00=0x0034, h01=0x0050, text=»* SUBROUTINE TO MOVE BUFFER FROM SENDING TASK «, t00=0x001d, t01=0x0042}
0x2dc0…2dde Head {h00=0x001a, h01=0x0050, text=»* TO ADDRESSED TASK.«, t00=0x001d, t01=0x007a}
0x2dde…2e20 Head {h00=0x003e, h01=0x0050, text=»* EFFECTIVE LENGTH IN BOTH INPUT AND OUTPUT ECB ARE SET.«, t00=0x001d, t01=0x0098}
0x2e20…2e66 Head {h00=0x0042, h01=0x0050, text=»* A1 WILL CONTAIN RETURN CODE /8 IF SENDING REQUESTED LENGTH«, t00=0x001d, t01=0x00da}
0x2e66…2e9e Head {h00=0x0034, h01=0x0050, text=»* WAS GREATER THAN RECEIVING REQUESTED LENGTH.«, t00=0x001d, t01=0x0120}
0x2e9e…2edc Head {h00=0x003a, h01=0x0050, text=»* TENDIO WILL PERFORM THE MOVE IN SYSTEMS WITH MMU. «, t00=0x001d, t01=0x0158}
0x2edc…2ee6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0008}
0x2ee6…2f04 Head {h00=0x001a, h01=0x0050, text=»* INPUT PARAMETERS: «, t00=0x001e, t01=0x0012}
0x2f04…2f22 Head {h00=0x001a, h01=0x0050, text=»* A2 RECEIVING DWT «, t00=0x001e, t01=0x0030}
0x2f22…2f40 Head {h00=0x001a, h01=0x0050, text=»* A5 STACK POINTER «, t00=0x001e, t01=0x004e}
0x2f40…2f5c Head {h00=0x0018, h01=0x0050, text=»* A6 SENDING DWT «, t00=0x001e, t01=0x006c}
0x2f5c…2f66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0088}
0x2f66…2f82 Head {h00=0x0018, h01=0x0050, text=»* REGISTER USAGE: «, t00=0x001e, t01=0x0092}
0x2f82…2f9e Head {h00=0x0018, h01=0x0050, text=»* A1 RETURN CODE «, t00=0x001e, t01=0x00ae}
0x2f9e…2fc0 Head {h00=0x001e, h01=0x0050, text=»* A2 DWT RECEIVING TASK«, t00=0x001e, t01=0x00ca}
0x2fc0…2fe0 Head {h00=0x001c, h01=0x0050, text=»* A3 WORKING REGISTER«, t00=0x001e, t01=0x00ec}
0x2fe0…2ffe Head {h00=0x001a, h01=0x0050, text=»* A4 BUFFER POINTER«, t00=0x001e, t01=0x010c}
0x2ffe…301a Head {h00=0x0018, h01=0x0050, text=»* A5 STACKPOINTER«, t00=0x001e, t01=0x012a}
0x301a…303a Head {h00=0x001c, h01=0x0050, text=»* A6 DWT SENDING TASK«, t00=0x001e, t01=0x0146}
0x303a…3062 Head {h00=0x0024, h01=0x0050, text=»* A7 RECEIVING BUFFER POINTER«, t00=0x001e, t01=0x0166}
0x3062…308a Head {h00=0x0024, h01=0x0050, text=»* A8 ECB ADDRESS SENDING TASK«, t00=0x001e, t01=0x018e}
0x308a…30b4 Head {h00=0x0026, h01=0x0050, text=»* A9 ECB ADDRESS RECEIVING TASK«, t00=0x001f, t01=0x0026}
0x30b4…30be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0050}
0x30be…30d2 Head {h00=0x0010, h01=0x0050, text=»MOVBUF EQU *«, t00=0x001f, t01=0x005a}
0x30d2…30f6 Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 SENDING ECB«, t00=0x001f, t01=0x006e}
0x30f6…311e Head {h00=0x0024, h01=0x0050, text=» ENB GIVE OTHER TASKS A CHANCE «, t00=0x001f, t01=0x0092}
0x311e…3128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ba}
0x3128…3140 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x001f, t01=0x00c4}
0x3140…314a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00dc}
0x314a…3154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e6}
0x3154…3166 Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x001f, t01=0x00f0}
0x3166…318c Head {h00=0x0022, h01=0x0050, text=» LD A9,DWTECB,A2 RECEIVING ECB«, t00=0x001f, t01=0x0102}
0x318c…31bc Head {h00=0x002c, h01=0x0050, text=» LD A3,ECBRL,A8 SENDING REQUESTED LENGTH«, t00=0x001f, t01=0x0128}
0x31bc…31d2 Head {h00=0x0012, h01=0x0050, text=» RB(N) DIS:OE «, t00=0x001f, t01=0x0158}
0x31d2…31ea Head {h00=0x0014, h01=0x0050, text=» CW A3,ECBRL,A9 «, t00=0x001f, t01=0x016e}
0x31ea…3200 Head {h00=0x0012, h01=0x0050, text=» RF(NG) MOV:05«, t00=0x001f, t01=0x0186}
0x3200…3230 Head {h00=0x002c, h01=0x0050, text=» LDK A1,8 RETURN CODE (INCORRECT LENGTH)«, t00=0x0020, t01=0x000c}
0x3230…3248 Head {h00=0x0014, h01=0x0050, text=» LD A3,ECBRL,A9 «, t00=0x0020, t01=0x003c}
0x3248…325e Head {h00=0x0012, h01=0x0050, text=» RB(N) DIS:OE «, t00=0x0020, t01=0x0054}
0x325e…3268 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x006a}
0x3268…327c Head {h00=0x0010, h01=0x0050, text=»MOV:05 EQU *«, t00=0x0020, t01=0x0074}
0x327c…3292 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0020, t01=0x0088}
0x3292…32cc Head {h00=0x0036, h01=0x0050, text=» LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK «, t00=0x0020, t01=0x009e}
0x32cc…32fa Head {h00=0x002a, h01=0x0050, text=» CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE«, t00=0x0020, t01=0x00d8}
0x32fa…332a Head {h00=0x002c, h01=0x0050, text=» RF(NG) MOV:10 MMU BUFFER LARGE ENOUGH? «, t00=0x0020, t01=0x0106}
0x332a…3354 Head {h00=0x0026, h01=0x0050, text=» LDKL A1,/8008 NO, INDICATE ERROR «, t00=0x0020, t01=0x0136}
0x3354…3388 Head {h00=0x0030, h01=0x0050, text=» ABL DISEND BRANCH TO DISPATCHER VIA TENDIO «, t00=0x0020, t01=0x0160}
0x3388…3392 (33, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0004}
0x3392…33a6 Head {h00=0x0010, h01=0x0050, text=»MOV:10 EQU *«, t00=0x0021, t01=0x000e}
0x33a6…33b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0022}
0x33b2…33bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002e}
0x33bc…33c4 Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0038}
0x33c4…33ec Head {h00=0x0024, h01=0x0050, text=» ST A3,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0021, t01=0x0040}
0x33ec…3414 Head {h00=0x0024, h01=0x0050, text=» ST A3,ECBEL,A9 EFFECTIVE LENGTH«, t00=0x0021, t01=0x0068}
0x3414…341e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0090}
0x341e…3436 Head {h00=0x0014, h01=0x0050, text=» EJECT DRIC01 «, t00=0x0021, t01=0x009a}
0x3436…3440 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00b2}
0x3440…344a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00bc}
0x344a…3460 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0021, t01=0x00c6}
0x3460…348e Head {h00=0x002a, h01=0x0050, text=» LD A4,ECBBA,A8 SENDING BUFFER ADDRESS«, t00=0x0021, t01=0x00dc}
0x348e…34be Head {h00=0x002c, h01=0x0050, text=» LD A7,ECBBA,A9 RECEIVING BUFFER ADDRESS«, t00=0x0021, t01=0x010a}
0x34be…34c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x013a}
0x34c8…34dc Head {h00=0x0010, h01=0x0050, text=»MOV:15 EQU *«, t00=0x0021, t01=0x0144}
0x34dc…34ee Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0021, t01=0x0158}
0x34ee…351a Head {h00=0x0028, h01=0x0050, text=» RF(N) MOV:20 ALL CHARACTERS MOVED? «, t00=0x0021, t01=0x016a}
0x351a…352c Head {h00=0x000e, h01=0x0050, text=» LCR A9,A4«, t00=0x0022, t01=0x0008}
0x352c…353e Head {h00=0x000e, h01=0x0050, text=» SCR A9,A7«, t00=0x0022, t01=0x001a}
0x353e…3550 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0022, t01=0x002c}
0x3550…3562 Head {h00=0x000e, h01=0x0050, text=» ADK A7,1 «, t00=0x0022, t01=0x003e}
0x3562…3574 Head {h00=0x000e, h01=0x0050, text=» RB MOV:15«, t00=0x0022, t01=0x0050}
0x3574…357e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0062}
0x357e…3592 Head {h00=0x0010, h01=0x0050, text=»MOV:20 EQU *«, t00=0x0022, t01=0x006c}
0x3592…359e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0080}
0x359e…35a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x008c}
0x35a8…35b4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0022, t01=0x0096}
0x35b4…35c4 Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0022, t01=0x00a2}
0x35c4…35ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00b2}
0x35ce…35d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00bc}
0x35d8…35e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c6}
0x35e2…35ee Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0022, t01=0x00d0}
0x35ee…35f2 Head {h00=0x4004, h01=0x0000}
0x35f2…35f6 00 22 00 dc ┆ " ┆
0x35f6…35fe (35, 1, 8) 20 04 00 00 00 23 00 04 ┆ # ┆
0x35fe…364e (36, 0, 398) 2d 41 44 44 52 45 53 53 00 0b 01 76 00 28 00 50 53 4f 50 44 41 5c 45 51 55 5c 2f 32 45 5c 53 2e 4f 2e 50 2e 20 44 45 56 49 43 45 20 41 44 44 52 45 53 53 20 00 0c 00 10 00 2a 00 50 53 54 41 4c 45 4e 5c 45 51 55 5c 35 31 32 5c 4d 41 58 20 53 ┆-ADDRESS v ( PSOPDA EQU /2E S.O.P. DEVICE ADDRESS * PSTALEN EQU 512 MAX S┆
0x364e…369e 54 41 4e 44 41 52 44 20 53 45 43 2e 20 4c 45 4e 2e 20 00 0c 00 3c 00 28 00 50 54 4f 53 4c 45 4e 5c 45 51 55 5c 34 31 30 5c 4d 41 58 20 54 4f 53 53 20 53 45 43 2e 20 4c 45 4e 47 54 48 20 00 0c 00 6a 00 22 00 50 49 42 4d 4c 45 4e 5c 45 51 55 ┆TANDARD SEC. LEN. < ( PTOSLEN EQU 410 MAX TOSS SEC. LENGTH j " PIBMLEN EQU┆
0x369e…36ee 5c 31 32 38 5c 49 42 4d 20 53 45 43 2e 20 4c 45 4e 47 54 48 00 0c 00 96 00 28 00 50 42 4f 45 5c 45 51 55 5c 32 38 5c 42 45 47 49 4e 20 4f 46 20 45 58 54 45 4e 54 20 50 4f 53 49 54 49 4f 4e 20 00 0c 00 bc 00 26 00 50 45 4f 45 5c 45 51 55 5c ┆ 128 IBM SEC. LENGTH ( PBOE EQU 28 BEGIN OF EXTENT POSITION & PEOE EQU ┆
0x36ee…373e 33 34 5c 45 4e 44 20 4f 46 20 45 58 54 45 4e 54 20 50 4f 53 49 54 49 4f 4e 20 00 0c 00 e8 00 24 00 50 45 4f 44 5c 45 51 55 5c 37 34 5c 45 4e 44 20 4f 46 20 44 41 54 41 20 50 4f 53 49 54 49 4f 4e 20 00 0c 01 12 00 20 00 50 54 49 4d 45 5c 45 ┆34 END OF EXTENT POSITION $ PEOD EQU 74 END OF DATA POSITION PTIME E┆
0x373e…378c 51 55 5c 32 30 5c 44 45 4c 41 59 20 2d 20 50 4f 57 45 52 20 4f 4e 00 0c 01 3a 00 26 00 50 4f 50 45 4e 54 49 5c 45 51 55 5c 31 30 5c 44 45 4c 41 59 20 41 54 20 4f 50 45 4e 20 4f 52 44 45 52 53 00 0c 01 5e 00 06 00 50 2a 20 00 0c 01 88 ┆QU 20 DELAY - POWER ON : & POPENTI EQU 10 DELAY AT OPEN ORDERS ^ P* ┆