|
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: 14302 (0x37de)
Notes: pts_type(SC)
Names: »DSKSUB.SC«
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
└─⟦this⟧ »MONGEN/DSKSUB.SC«
IDENT DSKSUB REL 11.0 81-01-26 870105041100 =1, DM NVL BITS TAKEN AWAY PRR 11.0 80-11-19 CHLO * **************************************** * * PHILIPS TERMINAL SYSTEM PTS * * * DSKSUB = DISC SUBROUTINES * * * * * **************************************** * * * DSKSUB HOLDS THE FOLLOWING DISC * AND FILE MANAGEMENT SUBROUTINES: * * - VOLCLR = CLEAR VOLUME NAME(S) IN DISC DWT * - VOLNAM = MOVE VOLUME NAME FROM DWT TO USER BUFFER * - VOLADR = COMPUTE VOLUME NAME ADDRESS IN DWT * - NVLCHK = CHECK IF NEW VOLUME LOADED FOR CALLING TASK * - VOLGET = MOVE VOLUME NAME FROM DISC BUFFER TO DWT * - NEWVOL = SET NEW VOLUME LOADED BITS * - INXDWT = COMPUTE DWT ADDRESS + DOUBLE INDEX * - NVLTAB = TTAB ADDRESSES FOR TASKS TO HAVE NVL * * EJECT DSKSUB * * *********** * ENTRIES * *********** * * ENTRY VOLCLR CLEAR VOLUME NAMES IN DWT ENTRY VOLNAM MOVE VOLUME NAME FROM DWT TO USER BUFFER ENTRY VOLADR COMPUTE VOLUME NAME ADDRESS IN DWT ENTRY NVLCHK CHECK FOR NEW VOLUME LOADED ENTRY VOLGET MOVE VOLUME NAME FROM DISC BUFFER TO DWT ENTRY NEWVOL SET NEW VOLUME LOADED BITS ENTRY INXDWT COMPUTE DWT ADDRESS + DOUBLE INDEX ENTRY NVLTAB TTAB ADDRESSES FOR TASKS TO HAVE NVL * =1 ENTRY NVLEND END OF NVLTAB ENTRY NVLBIT NVL BIT MASK EJECT DSKSUB * * ************* * EXTERNALS * ************* * * EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS EXTRN TTABLD LDTASK TTAB EXTRN TTABFM FMTASK TTAB EXTRN SCTFWT FWT CHAIN START ADDRESS EXTRN DWTORD SAVE AREA INDEX AND ORDER EXTRN DWTOR INDEX AND ORDER EXTRN DWTTAB TTAB ADDRESS EXTRN DWTUEC USER ECB ADDRESS EXTRN DWTVOL VOLUME NAME EXTRN DWTNVL NEW VOLUME LOADED FLAG EXTRN EWTVOL VOLUME FILE CODE EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT EXTRN FWTPAR ACCESS PARAMETERS EXTRN TTB:MT MMU TABLE EXTRN ECBBA ECB BUFFER ADDRESS EXTRN ECBRL ECB REQUESTED LENGTH EXTRN ECBEL ECB EFFECTIVE LENGTH EJECT DSKSUB * * *************************************** * * 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 * * * A PROGRAM VERSION USING TOSS DISC PAGING * IS OBTAINED BY SETTING DSKPAG EQU 1. * DSKPAG EQU 1 * * * A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK * BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. * SWPBLK EQU 0 * EJECT DSKSUB * * * A PROGRAM VERSION SUPPORTING FILE MANAGEMENT * IS OBTAINED BY SETTING FILMAN EQU 1. * X:A EQU 0 FILMAN EQU 1 * * * A PROGRAM VERSION SUPPORTING DATA MANAGEMENT * IS OBTAINED BY SETTING DATMAN EQU 1. * X:B EQU 0 DATMAN EQU 1 * EJECT DSKSUB * * ********** * VOLCLR * ********** * * * VOLCLR WILL CLEAR THE REQUESTED VOLUME NAME(S) * IN THE REQUESTED DISC DWT. * * INPUT: A1 = NUMBER OF BYTES TO CLEAR * A6 = DWT ADDRESS * * OUTPUT: A1, A2 ARE DESTROYED * VOLCLR EQU * LDR A2,A1 CF A15,VOLADR VOLUME NAME ADDRESS * VCLR10 EQU * CMR A1 CLEAR ONE WORD ADK A1,2 INCREMENT POINTER SUK A2,2 DECREMENT LOOP COUNTER RB(P) VCLR10 RF RETURN * EJECT DSKSUB * * ********** * VOLNAM * ********** * * * VOLNAM WILL MOVE THE VOLUME NAME OF SELECTED DISC * TO THE USER BUFFER IF REQUESTED LENGTH = 6. * * INPUT: A6 = DWT ADDRESS * A8 = ECB ADDRESS * * OUTPUT: A1-A4 ARE DESTROYED * VOLNAM EQU * LD A1,ECBRL,A8 REQUESTED LENGTH SUK A1,6 RF(NE) RETURN NO VOLUME NAME WANTED CF A15,VOLADR GET DWT VOLUME ADDRESS ST A4,ECBEL,A8 SET EFFECTIVE LENGTH * IFT MMUPAG=0 LD A2,ECBBA,A8 USER BUFFER ADDRESS * EJECT DSKSUB * * VNAM10 EQU * LDR* A3,A1 MOVE ONE WORD STR A3,A2 ADK A1,2 INCREMENT BUFFER POINTERS ADK A2,2 SUK A4,2 DECREMENT LOOP COUNTER RB(P) VNAM10 RF RETURN XIF * IFT MMUPAG=1 LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK TS -30,A15 SAVE RUNNING MMU TL TTB:MT,A2 LOAD USER MMU LD A2,DWTUEC,A6 USER ECB ADDRESS EL A2,ECBBA,A2 USER BUFFER ADDRESS MVSU A4 MOVE VOLUME NAME TL -30,A15 RESTORE RUNNING MMU RTN A15 XIF * EJECT DSKSUB * * ********** * VOLADR * ********** * * * INPUT: A6 = DWT ADDRESS * * OUTPUT: A1 = VOLUME NAME ADDRESS * A4 = 6 * VOLADR EQU * LC A4,DWTOR,A6 INDEX * VOLA05 EQU * LDKL A1,DWTVOL-6 ADR A1,A6 ANK A4,/3 * VOLA10 EQU * ADK A1,6 UPDATE ADDRESS SUK A4,1 RB(NN) VOLA10 LDK A4,6 RF RETURN * EJECT DSKSUB * * ********** * NVLCHK * ********** * * * NVLCHK IS CALLED AT ACTIVATION FROM DISC DRIVER * TO CHECK IF THE RETURN CODE "NEW VOLUME LOADED" * IS TO BE RETURNED TO THE CALLING TASK (RC=/20). * * INPUT: A6 = DWT ADDRESS * * OUTPUT: A1 = RETURN CODE (/20 IF NVL, ELSE 0) * A2 = DWT ADDRESS + DOUBLE INDEX * A3, A4 ARE DESTROYED * NVLCHK EQU * LD A2,DWTOR,A6 INDEX AND ORDER ST A2,DWTORD,A6 SAVE FOR RECOVERY PURPOSES SRL A2,7 DOUBLE INDEX ADR A2,A6 LD A1,DWTNVL,A2 NVL FLAG ANKL A1,/7FFF RESET BIT 0 (FIRST REQUEST BIT) ST A1,DWTNVL,A2 ANKL A1,/3FFF NOT 1ST REQ. OR FIX DISK RF(Z) RETURN RETURN IF NO NVL LD A4,DWTTAB,A6 TTAB ADDRESS LDK A1,1 LDKL A3,NVLTAB NVLTAB ADDRESS * EJECT DSKSUB * * NVL:10 EQU * CWK A3,NVLEND CHECK IF END OF TABLE REACHED RF(E) NVL:20 END OF NVLTAB CWR* A4,A3 CHECK TTAB ADDRESS RF(E) NVL:20 NVL FOR THIS TASK SLL A1,1 SHIFT NVL BIT MASK ADK A3,2 POINT TO NEXT TTAB IN NVLTAB RB NVL:10 * NVL:20 EQU * AN A1,DWTNVL,A2 CHECK IF NVL FOR THIS TASK RF(Z) RETURN NO NVL FOR THIS TASK XRS A1,DWTNVL,A2 RESET NVL BIT LDK A1,/20 RETURN CODE * EJECT DSKSUB * * RETURN EQU * COMMON RETURN LABEL IFT CPU852=1 ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS XIF * IFT CPU852=0 RTN A15 XIF * EJECT DSKSUB * * ********** * VOLGET * ********** * * * VOLGET WILL READ VOLUME NAME FROM DISC BUFFER * TO DISC DWT AND CHECK IF THERE IS A NEW VOLUME MOUNTED. * * INPUT: A2 = DISC BUFFER ADDRESS * A3 = FILE CODE (FOR DRIVE WITH INDEX = 0) * BIT 0 SET MEANS TEST STATUS ORDER * A6 = DWT ADDRESS * * OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX * A1-A3, A7-A8 ARE DESTROYED * * VOLGET EQU * CF A15,VOLADR DWT VOLUME NAME ADDRESS LDK A7,0 RESET NVL FLAG * VGET10 EQU * LDR* A8,A2 ONE WORD OF NEW VOLUME NAME CWR* A8,A1 COMPARE WITH OLD VOLUME NAME RF(E) VGET20 LDK A7,1 SET NVL FLAG STR A8,A1 STORE NEW VOLUME NAME * EJECT DSKSUB * * VGET20 EQU * ADK A1,2 INCREMENT BUFFER POINTERS ADK A2,2 SUK A4,2 DECREMENT LOOP COUNTER RB(P) VGET10 CF A15,INXDWT ADK A7,0 CHECK NVL FLAG RB(Z) RETURN RETURN IF NO NVL SLA A3,1 CHECK IF TEST STATUS OR RECOVERY RB(O) RETURN TEST STATUS, NO NVL SRA A3,1 FILE CODE WITHOUT SIGN BIT LD A7,DWTNVL,A4 NVL FLAGS RB(N) RETURN NO REQUESTS SO FAR ON THIS DISC SLL A7,1 RB(N) RETURN FIXED DISC, NO NVL * EJECT DSKSUB * * ********** * NEWVOL * ********** * * * NEWVOL IS ENTERED FROM THE ROUTINE VOLGET WHEN IT HAS * DETECTED THAT A NEW VOLUME HAS BEEN MOUNTED. * THE NEW VOLUME LOADED FLAG IS THEN SET BY THIS * ROUTINE FOR THE CONCERNED FILE CODE AND FILES * OPENED ON THAT VOLUME. TASKS REPRESENTED IN THE * TABLE NVLTAB WILL GET RETURN CODE /20 AT THE * NEXT REQUEST ON THAT FILE CODE. * * INPUT: A3 = FILE CODE (DISC ONE FOR DRIVER) * A4 = DWT ADDRESS + DOUBLE INDEX * A6 = DWT ADDRESS * * OUTPUT: A3 = ACTUAL FILE CODE * A1-A2 ARE DESTROYED * NEWVOL EQU * LD A2,NVLBIT NVL BIT MASK ST A2,DWTNVL,A4 INDICATE NEW VOLUME LOADED LC A2,DWTOR,A6 INDEX ANK A2,/3 ADR A3,A2 ACTUAL FILE CODE * EJECT DSKSUB * * IFT FILMAN=0 RB RETURN XIF * IFT FILMAN=1 LDKL A1,SCTFWT ADDRESS TO FWT POINTER * * SET NEW VOLUME LOADED FOR ALL FILES ON CONCERNED VOLUME * NEW:10 EQU * LDR* A2,A1 NEXT FWT ADDRESS RB(Z) RETURN NO MORE FWT:S LDR A1,A2 SAVE FWT ADDRESS ADKL A2,FWTEW1 ADDRESS TO FIRST EWT STRUCTURE * NEW:20 EQU * LDR* A2,A2 ADDRESS TO 2ND EWT BLOCK CC A3,EWTVOL,A2 CHECK FILE CODE RF(NE) NEW:30 LDKL A2,/8000 NVL BIT ORS A2,FWTPAR,A1 INDICATE NEW VOLUME LOADED RB NEW:10 * NEW:30 EQU * LDR* A2,A2 ADDRESS TO NEXT EWT STRUCTURE RB(Z) NEW:10 END OF THIS EWT STRUCTURE RB NEW:20 CONTINUE WITH NEXT EXTENT XIF * EJECT DSKSUB * * ********** * INXDWT * ********** * * * INXDWT WILL COMPUTE THE DWT ADDRESS ADDED TO THE DOUBLED INDEX. * * INPUT: A6 = DWT ADDRESS * * OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX * NO REGISTERS ARE DESTROYED * INXDWT EQU * LC A4,DWTOR,A6 INDEX ANK A4,/3 ADR A4,A4 DOUBLE INDEX ADR A4,A6 RB RETURN * EJECT DSKSUB * * ********** * NVLTAB * ********** * * * NVLTAB HOLDS THE TTAB ADDRESSES OF THE TASKS * THAT WILL RECEIVE NEW VOLUME LOADED WHEN A NEW * VOLUME HAS BEEN MOUNTED. * * BIT NO IN DWTNVL NVLTAB EQU * IFT FILMAN=1 DATA TTABFM FMTASK TTAB 15 * IFF DSKPAG+SWPBLK=0 DATA TTABLD LDTASK TTAB 14 XIF * =1 IFT FILMAN=1 NVLEND EQU * * NVLBIT DATA 0 NVL BIT MASK XIF * EJECT DSKSUB * * IFT FILMAN=0 IFF DSKPAG+SWPBLK=0 DATA TTABLD LDTASK TTAB * NVLEND EQU * * NVLBIT DATA 3 NVL BIT MASK XIF * IFT FILMAN=0 IFT DSKPAG+SWPBLK=0 * NVLEND EQU * * NVLBIT DATA 1 NVL BIT MASK XIF * * * END
0x0000…0036 (0, 0, 398) Head {h00=0x0032, h01=0x0050, text=» IDENT DSKSUB REL 11.0 81-01-26 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0064 Head {h00=0x0022, h01=0x0050, text=» =1, DM NVL BITS TAKEN AWAY «, t00=0x0000, t01=0x0042}
0x0064…0088 Head {h00=0x0020, h01=0x0050, text=» PRR 11.0 80-11-19 CHLO «, t00=0x0000, t01=0x0068}
0x0088…0092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008c}
0x0092…00c2 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0000, t01=0x0096}
0x00c2…00cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c6}
0x00cc…00fc Head {h00=0x002c, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS *«, t00=0x0000, t01=0x00d0}
0x00fc…0106 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0100}
0x0106…0136 Head {h00=0x002c, h01=0x0050, text=»* DSKSUB = DISC SUBROUTINES *«, t00=0x0000, t01=0x010a}
0x0136…0140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013a}
0x0140…014a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0144}
0x014a…0154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014e}
0x0154…015e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0158}
0x015e…018e Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0000, t01=0x0162}
0x018e…0198 (1, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0004}
0x0198…01a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000e}
0x01a2…01ce Head {h00=0x0028, h01=0x0050, text=»* DSKSUB HOLDS THE FOLLOWING DISC «, t00=0x0001, t01=0x0018}
0x01ce…01fa Head {h00=0x0028, h01=0x0050, text=»* AND FILE MANAGEMENT SUBROUTINES:«, t00=0x0001, t01=0x0044}
0x01fa…0204 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0070}
0x0204…023c Head {h00=0x0034, h01=0x0050, text=»* - VOLCLR = CLEAR VOLUME NAME(S) IN DISC DWT «, t00=0x0001, t01=0x007a}
0x023c…027c Head {h00=0x003c, h01=0x0050, text=»* - VOLNAM = MOVE VOLUME NAME FROM DWT TO USER BUFFER «, t00=0x0001, t01=0x00b2}
0x027c…02b6 Head {h00=0x0036, h01=0x0050, text=»* - VOLADR = COMPUTE VOLUME NAME ADDRESS IN DWT «, t00=0x0001, t01=0x00f2}
0x02b6…02f8 Head {h00=0x003e, h01=0x0050, text=»* - NVLCHK = CHECK IF NEW VOLUME LOADED FOR CALLING TASK«, t00=0x0001, t01=0x012c}
0x02f8…0338 Head {h00=0x003c, h01=0x0050, text=»* - VOLGET = MOVE VOLUME NAME FROM DISC BUFFER TO DWT «, t00=0x0001, t01=0x016e}
0x0338…036a Head {h00=0x002e, h01=0x0050, text=»* - NEWVOL = SET NEW VOLUME LOADED BITS «, t00=0x0002, t01=0x001e}
0x036a…03a4 Head {h00=0x0036, h01=0x0050, text=»* - INXDWT = COMPUTE DWT ADDRESS + DOUBLE INDEX «, t00=0x0002, t01=0x0050}
0x03a4…03e0 Head {h00=0x0038, h01=0x0050, text=»* - NVLTAB = TTAB ADDRESSES FOR TASKS TO HAVE NVL «, t00=0x0002, t01=0x008a}
0x03e0…03ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c6}
0x03ea…03f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d0}
0x03f4…040a Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x0002, t01=0x00da}
0x040a…0414 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00f0}
0x0414…041e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fa}
0x041e…0432 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0104}
0x0432…0446 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x0118}
0x0446…045a Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x012c}
0x045a…0464 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x0464…046e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014a}
0x046e…049e Head {h00=0x002c, h01=0x0050, text=» ENTRY VOLCLR CLEAR VOLUME NAMES IN DWT «, t00=0x0002, t01=0x0154}
0x049e…04dc Head {h00=0x003a, h01=0x0050, text=» ENTRY VOLNAM MOVE VOLUME NAME FROM DWT TO USER BUFFER«, t00=0x0002, t01=0x0184}
0x04dc…0514 Head {h00=0x0034, h01=0x0050, text=» ENTRY VOLADR COMPUTE VOLUME NAME ADDRESS IN DWT«, t00=0x0003, t01=0x0032}
0x0514…0546 Head {h00=0x002e, h01=0x0050, text=» ENTRY NVLCHK CHECK FOR NEW VOLUME LOADED «, t00=0x0003, t01=0x006a}
0x0546…0584 Head {h00=0x003a, h01=0x0050, text=» ENTRY VOLGET MOVE VOLUME NAME FROM DISC BUFFER TO DWT«, t00=0x0003, t01=0x009c}
0x0584…05b4 Head {h00=0x002c, h01=0x0050, text=» ENTRY NEWVOL SET NEW VOLUME LOADED BITS«, t00=0x0003, t01=0x00da}
0x05b4…05ec Head {h00=0x0034, h01=0x0050, text=» ENTRY INXDWT COMPUTE DWT ADDRESS + DOUBLE INDEX«, t00=0x0003, t01=0x010a}
0x05ec…0626 Head {h00=0x0036, h01=0x0050, text=» ENTRY NVLTAB TTAB ADDRESSES FOR TASKS TO HAVE NVL«, t00=0x0003, t01=0x0142}
0x0626…0636 Head {h00=0x000c, h01=0x0050, text=»* =1 «, t00=0x0003, t01=0x017c}
0x0636…065a Head {h00=0x0020, h01=0x0050, text=» ENTRY NVLEND END OF NVLTAB «, t00=0x0003, t01=0x018c}
0x065a…067c Head {h00=0x001e, h01=0x0050, text=» ENTRY NVLBIT NVL BIT MASK«, t00=0x0004, t01=0x0020}
0x067c…0692 Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x0004, t01=0x0042}
0x0692…069c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0058}
0x069c…06a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0062}
0x06a6…06bc Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x006c}
0x06bc…06d2 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x0082}
0x06d2…06e8 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0098}
0x06e8…06f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ae}
0x06f2…06fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b8}
0x06fc…0734 Head {h00=0x0034, h01=0x0050, text=» EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS «, t00=0x0004, t01=0x00c2}
0x0734…0756 Head {h00=0x001e, h01=0x0050, text=» EXTRN TTABLD LDTASK TTAB «, t00=0x0004, t01=0x00fa}
0x0756…0778 Head {h00=0x001e, h01=0x0050, text=» EXTRN TTABFM FMTASK TTAB «, t00=0x0004, t01=0x011c}
0x0778…07a6 Head {h00=0x002a, h01=0x0050, text=» EXTRN SCTFWT FWT CHAIN START ADDRESS «, t00=0x0004, t01=0x013e}
0x07a6…07d6 Head {h00=0x002c, h01=0x0050, text=» EXTRN DWTORD SAVE AREA INDEX AND ORDER «, t00=0x0004, t01=0x016c}
0x07d6…07fa Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTOR INDEX AND ORDER«, t00=0x0005, t01=0x000c}
0x07fa…081c Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS«, t00=0x0005, t01=0x0030}
0x081c…0842 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB ADDRESS«, t00=0x0005, t01=0x0052}
0x0842…0864 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTVOL VOLUME NAME «, t00=0x0005, t01=0x0078}
0x0864…0890 Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTNVL NEW VOLUME LOADED FLAG«, t00=0x0005, t01=0x009a}
0x0890…08b6 Head {h00=0x0022, h01=0x0050, text=» EXTRN EWTVOL VOLUME FILE CODE«, t00=0x0005, t01=0x00c6}
0x08b6…08ec Head {h00=0x0032, h01=0x0050, text=» EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT «, t00=0x0005, t01=0x00ec}
0x08ec…0914 Head {h00=0x0024, h01=0x0050, text=» EXTRN FWTPAR ACCESS PARAMETERS «, t00=0x0005, t01=0x0122}
0x0914…0934 Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:MT MMU TABLE «, t00=0x0005, t01=0x014a}
0x0934…095c Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0005, t01=0x016a}
0x095c…0986 (6, 0, 398) Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0006, t01=0x0004}
0x0986…09b0 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0006, t01=0x002e}
0x09b0…09c6 Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x0006, t01=0x0058}
0x09c6…09d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006e}
0x09d0…09da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0078}
0x09da…0a0a Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0006, t01=0x0082}
0x0a0a…0a14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b2}
0x0a14…0a32 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0006, t01=0x00bc}
0x0a32…0a3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00da}
0x0a3c…0a6c Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0006, t01=0x00e4}
0x0a6c…0a76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0114}
0x0a76…0a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011e}
0x0a80…0ab2 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0006, t01=0x0128}
0x0ab2…0ae0 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0006, t01=0x015a}
0x0ae0…0aea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0188}
0x0aea…0afe (7, 0, 398) Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0007, t01=0x0004}
0x0afe…0b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0018}
0x0b08…0b12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0022}
0x0b12…0b4c Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x002c}
0x0b4c…0b7e Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x0066}
0x0b7e…0b88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0098}
0x0b88…0b9c Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0007, t01=0x00a2}
0x0b9c…0ba6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00b6}
0x0ba6…0bb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c0}
0x0bb0…0be2 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x0007, t01=0x00ca}
0x0be2…0c10 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x0007, t01=0x00fc}
0x0c10…0c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012a}
0x0c1a…0c2e Head {h00=0x0010, h01=0x0050, text=»DSKPAG EQU 1«, t00=0x0007, t01=0x0134}
0x0c2e…0c38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0148}
0x0c38…0c42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0152}
0x0c42…0c7c Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK «, t00=0x0007, t01=0x015c}
0x0c7c…0cb2 Head {h00=0x0032, h01=0x0050, text=»* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. «, t00=0x0008, t01=0x0008}
0x0cb2…0cbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x003e}
0x0cbc…0cd0 Head {h00=0x0010, h01=0x0050, text=»SWPBLK EQU 0«, t00=0x0008, t01=0x0048}
0x0cd0…0cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x005c}
0x0cda…0cf2 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0008, t01=0x0066}
0x0cf2…0cfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x007e}
0x0cfc…0d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0088}
0x0d06…0d3c Head {h00=0x0032, h01=0x0050, text=»* A PROGRAM VERSION SUPPORTING FILE MANAGEMENT«, t00=0x0008, t01=0x0092}
0x0d3c…0d6a Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING FILMAN EQU 1.«, t00=0x0008, t01=0x00c8}
0x0d6a…0d74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f6}
0x0d74…0d86 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0008, t01=0x0100}
0x0d86…0d9a Head {h00=0x0010, h01=0x0050, text=»FILMAN EQU 1«, t00=0x0008, t01=0x0112}
0x0d9a…0da4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0126}
0x0da4…0dae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0130}
0x0dae…0de4 Head {h00=0x0032, h01=0x0050, text=»* A PROGRAM VERSION SUPPORTING DATA MANAGEMENT«, t00=0x0008, t01=0x013a}
0x0de4…0e12 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING DATMAN EQU 1.«, t00=0x0008, t01=0x0170}
0x0e12…0e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000e}
0x0e1c…0e2e Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0009, t01=0x0018}
0x0e2e…0e42 Head {h00=0x0010, h01=0x0050, text=»DATMAN EQU 1«, t00=0x0009, t01=0x002a}
0x0e42…0e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x003e}
0x0e4c…0e64 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0009, t01=0x0048}
0x0e64…0e6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0060}
0x0e6e…0e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006a}
0x0e78…0e8a Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x0074}
0x0e8a…0e9c Head {h00=0x000e, h01=0x0050, text=»* VOLCLR *«, t00=0x0009, t01=0x0086}
0x0e9c…0eae Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x0098}
0x0eae…0eb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00aa}
0x0eb8…0ec2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b4}
0x0ec2…0efc Head {h00=0x0036, h01=0x0050, text=»* VOLCLR WILL CLEAR THE REQUESTED VOLUME NAME(S)«, t00=0x0009, t01=0x00be}
0x0efc…0f22 Head {h00=0x0022, h01=0x0050, text=»* IN THE REQUESTED DISC DWT.«, t00=0x0009, t01=0x00f8}
0x0f22…0f2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x011e}
0x0f2c…0f5e Head {h00=0x002e, h01=0x0050, text=»* INPUT: A1 = NUMBER OF BYTES TO CLEAR «, t00=0x0009, t01=0x0128}
0x0f5e…0f82 Head {h00=0x0020, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0009, t01=0x015a}
0x0f82…0f8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x017e}
0x0f8c…0fb4 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A1, A2 ARE DESTROYED«, t00=0x0009, t01=0x0188}
0x0fb4…0fbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0020}
0x0fbe…0fd2 Head {h00=0x0010, h01=0x0050, text=»VOLCLR EQU *«, t00=0x000a, t01=0x002a}
0x0fd2…0fe4 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x000a, t01=0x003e}
0x0fe4…100e Head {h00=0x0026, h01=0x0050, text=» CF A15,VOLADR VOLUME NAME ADDRESS«, t00=0x000a, t01=0x0050}
0x100e…1018 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x007a}
0x1018…102c Head {h00=0x0010, h01=0x0050, text=»VCLR10 EQU *«, t00=0x000a, t01=0x0084}
0x102c…104a Head {h00=0x001a, h01=0x0050, text=» CMR A1 CLEAR ONE WORD«, t00=0x000a, t01=0x0098}
0x104a…106e Head {h00=0x0020, h01=0x0050, text=» ADK A1,2 INCREMENT POINTER «, t00=0x000a, t01=0x00b6}
0x106e…1096 Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 DECREMENT LOOP COUNTER«, t00=0x000a, t01=0x00da}
0x1096…10ac Head {h00=0x0012, h01=0x0050, text=» RB(P) VCLR10 «, t00=0x000a, t01=0x0102}
0x10ac…10be Head {h00=0x000e, h01=0x0050, text=» RF RETURN«, t00=0x000a, t01=0x0118}
0x10be…10c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x012a}
0x10c8…10de Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x000a, t01=0x0134}
0x10de…10e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x014a}
0x10e8…10f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0154}
0x10f2…1104 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000a, t01=0x015e}
0x1104…1116 Head {h00=0x000e, h01=0x0050, text=»* VOLNAM *«, t00=0x000a, t01=0x0170}
0x1116…1128 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000a, t01=0x0182}
0x1128…1132 (11, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0004}
0x1132…113c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000e}
0x113c…117a Head {h00=0x003a, h01=0x0050, text=»* VOLNAM WILL MOVE THE VOLUME NAME OF SELECTED DISC «, t00=0x000b, t01=0x0018}
0x117a…11b2 Head {h00=0x0034, h01=0x0050, text=»* TO THE USER BUFFER IF REQUESTED LENGTH = 6. «, t00=0x000b, t01=0x0056}
0x11b2…11bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008e}
0x11bc…11e0 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x000b, t01=0x0098}
0x11e0…1204 Head {h00=0x0020, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x000b, t01=0x00bc}
0x1204…120e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00e0}
0x120e…1236 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x000b, t01=0x00ea}
0x1236…1240 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0112}
0x1240…1254 Head {h00=0x0010, h01=0x0050, text=»VOLNAM EQU *«, t00=0x000b, t01=0x011c}
0x1254…127c Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x000b, t01=0x0130}
0x127c…128e Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x000b, t01=0x0158}
0x128e…12ba Head {h00=0x0028, h01=0x0050, text=» RF(NE) RETURN NO VOLUME NAME WANTED«, t00=0x000b, t01=0x016a}
0x12ba…12e8 Head {h00=0x002a, h01=0x0050, text=» CF A15,VOLADR GET DWT VOLUME ADDRESS «, t00=0x000c, t01=0x0008}
0x12e8…1314 Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBEL,A8 SET EFFECTIVE LENGTH«, t00=0x000c, t01=0x0036}
0x1314…131e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0062}
0x131e…1334 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000c, t01=0x006c}
0x1334…1360 Head {h00=0x0028, h01=0x0050, text=» LD A2,ECBBA,A8 USER BUFFER ADDRESS «, t00=0x000c, t01=0x0082}
0x1360…136a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ae}
0x136a…1382 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x000c, t01=0x00b8}
0x1382…138c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d0}
0x138c…1396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00da}
0x1396…13aa Head {h00=0x0010, h01=0x0050, text=»VNAM10 EQU *«, t00=0x000c, t01=0x00e4}
0x13aa…13cc Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A1 MOVE ONE WORD «, t00=0x000c, t01=0x00f8}
0x13cc…13de Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x000c, t01=0x011a}
0x13de…140a Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT BUFFER POINTERS «, t00=0x000c, t01=0x012c}
0x140a…141c Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x000c, t01=0x0158}
0x141c…1444 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 DECREMENT LOOP COUNTER«, t00=0x000c, t01=0x016a}
0x1444…145a (13, 0, 398) Head {h00=0x0012, h01=0x0050, text=» RB(P) VNAM10 «, t00=0x000d, t01=0x0004}
0x145a…146c Head {h00=0x000e, h01=0x0050, text=» RF RETURN«, t00=0x000d, t01=0x001a}
0x146c…1478 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x002c}
0x1478…1482 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0038}
0x1482…1498 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000d, t01=0x0042}
0x1498…14ce Head {h00=0x0032, h01=0x0050, text=» LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK «, t00=0x000d, t01=0x0058}
0x14ce…14f2 Head {h00=0x0020, h01=0x0050, text=» TS -30,A15 SAVE RUNNING MMU«, t00=0x000d, t01=0x008e}
0x14f2…1516 Head {h00=0x0020, h01=0x0050, text=» TL TTB:MT,A2 LOAD USER MMU «, t00=0x000d, t01=0x00b2}
0x1516…1540 Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTUEC,A6 USER ECB ADDRESS «, t00=0x000d, t01=0x00d6}
0x1540…156c Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A2 USER BUFFER ADDRESS «, t00=0x000d, t01=0x0100}
0x156c…158e Head {h00=0x001e, h01=0x0050, text=» MVSU A4 MOVE VOLUME NAME «, t00=0x000d, t01=0x012c}
0x158e…15b6 Head {h00=0x0024, h01=0x0050, text=» TL -30,A15 RESTORE RUNNING MMU «, t00=0x000d, t01=0x014e}
0x15b6…15c6 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x000d, t01=0x0176}
0x15c6…15d2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0186}
0x15d2…15dc (14, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0004}
0x15dc…15f2 Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x000e, t01=0x000e}
0x15f2…15fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0024}
0x15fc…1606 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x002e}
0x1606…1618 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x0038}
0x1618…162a Head {h00=0x000e, h01=0x0050, text=»* VOLADR *«, t00=0x000e, t01=0x004a}
0x162a…163c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x005c}
0x163c…1646 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006e}
0x1646…1650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0078}
0x1650…1674 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x000e, t01=0x0082}
0x1674…167e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a6}
0x167e…16aa Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: A1 = VOLUME NAME ADDRESS«, t00=0x000e, t01=0x00b0}
0x16aa…16be Head {h00=0x0010, h01=0x0050, text=»* A4 = 6 «, t00=0x000e, t01=0x00dc}
0x16be…16c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f0}
0x16c8…16dc Head {h00=0x0010, h01=0x0050, text=»VOLADR EQU *«, t00=0x000e, t01=0x00fa}
0x16dc…16fa Head {h00=0x001a, h01=0x0050, text=» LC A4,DWTOR,A6 INDEX «, t00=0x000e, t01=0x010e}
0x16fa…1704 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012c}
0x1704…1718 Head {h00=0x0010, h01=0x0050, text=»VOLA05 EQU *«, t00=0x000e, t01=0x0136}
0x1718…1732 Head {h00=0x0016, h01=0x0050, text=» LDKL A1,DWTVOL-6 «, t00=0x000e, t01=0x014a}
0x1732…1744 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x000e, t01=0x0164}
0x1744…1756 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/3«, t00=0x000e, t01=0x0176}
0x1756…1760 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0188}
0x1760…1774 (15, 0, 400) Head {h00=0x0010, h01=0x0050, text=»VOLA10 EQU *«, t00=0x000f, t01=0x0004}
0x1774…1794 Head {h00=0x001c, h01=0x0050, text=» ADK A1,6 UPDATE ADDRESS«, t00=0x000f, t01=0x0018}
0x1794…17a6 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x000f, t01=0x0038}
0x17a6…17bc Head {h00=0x0012, h01=0x0050, text=» RB(NN) VOLA10«, t00=0x000f, t01=0x004a}
0x17bc…17ce Head {h00=0x000e, h01=0x0050, text=» LDK A4,6 «, t00=0x000f, t01=0x0060}
0x17ce…17e0 Head {h00=0x000e, h01=0x0050, text=» RF RETURN«, t00=0x000f, t01=0x0072}
0x17e0…17ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0084}
0x17ea…1802 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x000f, t01=0x008e}
0x1802…180c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a6}
0x180c…1816 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b0}
0x1816…1828 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x00ba}
0x1828…183a Head {h00=0x000e, h01=0x0050, text=»* NVLCHK *«, t00=0x000f, t01=0x00cc}
0x183a…184c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x00de}
0x184c…1856 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f0}
0x1856…1860 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00fa}
0x1860…189c Head {h00=0x0038, h01=0x0050, text=»* NVLCHK IS CALLED AT ACTIVATION FROM DISC DRIVER «, t00=0x000f, t01=0x0104}
0x189c…18d8 Head {h00=0x0038, h01=0x0050, text=»* TO CHECK IF THE RETURN CODE "NEW VOLUME LOADED" «, t00=0x000f, t01=0x0140}
0x18d8…1914 Head {h00=0x0038, h01=0x0050, text=»* IS TO BE RETURNED TO THE CALLING TASK (RC=/20). «, t00=0x000f, t01=0x017c}
0x1914…191e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0028}
0x191e…1942 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x0010, t01=0x0032}
0x1942…194c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0056}
0x194c…1986 Head {h00=0x0036, h01=0x0050, text=»* OUTPUT: A1 = RETURN CODE (/20 IF NVL, ELSE 0) «, t00=0x0010, t01=0x0060}
0x1986…19ba Head {h00=0x0030, h01=0x0050, text=»* A2 = DWT ADDRESS + DOUBLE INDEX «, t00=0x0010, t01=0x009a}
0x19ba…19e2 Head {h00=0x0024, h01=0x0050, text=»* A3, A4 ARE DESTROYED«, t00=0x0010, t01=0x00ce}
0x19e2…19ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f6}
0x19ec…1a00 Head {h00=0x0010, h01=0x0050, text=»NVLCHK EQU *«, t00=0x0010, t01=0x0100}
0x1a00…1a28 Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTOR,A6 INDEX AND ORDER «, t00=0x0010, t01=0x0114}
0x1a28…1a5c Head {h00=0x0030, h01=0x0050, text=» ST A2,DWTORD,A6 SAVE FOR RECOVERY PURPOSES «, t00=0x0010, t01=0x013c}
0x1a5c…1a7a Head {h00=0x001a, h01=0x0050, text=» SRL A2,7 DOUBLE INDEX«, t00=0x0010, t01=0x0170}
0x1a7a…1a8c Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0010, t01=0x018e}
0x1a8c…1aae Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTNVL,A2 NVL FLAG «, t00=0x0011, t01=0x0010}
0x1aae…1ae4 Head {h00=0x0032, h01=0x0050, text=» ANKL A1,/7FFF RESET BIT 0 (FIRST REQUEST BIT)«, t00=0x0011, t01=0x0032}
0x1ae4…1afc Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTNVL,A2«, t00=0x0011, t01=0x0068}
0x1afc…1b2c Head {h00=0x002c, h01=0x0050, text=» ANKL A1,/3FFF NOT 1ST REQ. OR FIX DISK «, t00=0x0011, t01=0x0080}
0x1b2c…1b52 Head {h00=0x0022, h01=0x0050, text=» RF(Z) RETURN RETURN IF NO NVL«, t00=0x0011, t01=0x00b0}
0x1b52…1b78 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTTAB,A6 TTAB ADDRESS «, t00=0x0011, t01=0x00d6}
0x1b78…1b8a Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0011, t01=0x00fc}
0x1b8a…1bb0 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,NVLTAB NVLTAB ADDRESS«, t00=0x0011, t01=0x010e}
0x1bb0…1bba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0134}
0x1bba…1bd2 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0011, t01=0x013e}
0x1bd2…1bdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0156}
0x1bdc…1be6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0160}
0x1be6…1bfa Head {h00=0x0010, h01=0x0050, text=»NVL:10 EQU *«, t00=0x0011, t01=0x016a}
0x1bfa…1c2e Head {h00=0x0030, h01=0x0050, text=» CWK A3,NVLEND CHECK IF END OF TABLE REACHED«, t00=0x0011, t01=0x017e}
0x1c2e…1c52 Head {h00=0x0020, h01=0x0050, text=» RF(E) NVL:20 END OF NVLTAB «, t00=0x0012, t01=0x0022}
0x1c52…1c78 Head {h00=0x0022, h01=0x0050, text=» CWR* A4,A3 CHECK TTAB ADDRESS«, t00=0x0012, t01=0x0046}
0x1c78…1ca0 Head {h00=0x0024, h01=0x0050, text=» RF(E) NVL:20 NVL FOR THIS TASK «, t00=0x0012, t01=0x006c}
0x1ca0…1cc4 Head {h00=0x0020, h01=0x0050, text=» SLL A1,1 SHIFT NVL BIT MASK«, t00=0x0012, t01=0x0094}
0x1cc4…1cf2 Head {h00=0x002a, h01=0x0050, text=» ADK A3,2 POINT TO NEXT TTAB IN NVLTAB«, t00=0x0012, t01=0x00b8}
0x1cf2…1d04 Head {h00=0x000e, h01=0x0050, text=» RB NVL:10«, t00=0x0012, t01=0x00e6}
0x1d04…1d0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00f8}
0x1d0e…1d22 Head {h00=0x0010, h01=0x0050, text=»NVL:20 EQU *«, t00=0x0012, t01=0x0102}
0x1d22…1d56 Head {h00=0x0030, h01=0x0050, text=» AN A1,DWTNVL,A2 CHECK IF NVL FOR THIS TASK «, t00=0x0012, t01=0x0116}
0x1d56…1d80 Head {h00=0x0026, h01=0x0050, text=» RF(Z) RETURN NO NVL FOR THIS TASK«, t00=0x0012, t01=0x014a}
0x1d80…1da8 Head {h00=0x0024, h01=0x0050, text=» XRS A1,DWTNVL,A2 RESET NVL BIT «, t00=0x0012, t01=0x0174}
0x1da8…1dc8 Head {h00=0x001c, h01=0x0050, text=» LDK A1,/20 RETURN CODE «, t00=0x0013, t01=0x000c}
0x1dc8…1dd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x002c}
0x1dd2…1dea Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0013, t01=0x0036}
0x1dea…1df4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x004e}
0x1df4…1dfe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0058}
0x1dfe…1e26 Head {h00=0x0024, h01=0x0050, text=»RETURN EQU * COMMON RETURN LABEL«, t00=0x0013, t01=0x0062}
0x1e26…1e3c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0013, t01=0x008a}
0x1e3c…1e72 Head {h00=0x0032, h01=0x0050, text=» ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS «, t00=0x0013, t01=0x00a0}
0x1e72…1e7e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00d6}
0x1e7e…1e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e2}
0x1e88…1e9e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0013, t01=0x00ec}
0x1e9e…1eae Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0013, t01=0x0102}
0x1eae…1eba Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0112}
0x1eba…1ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x011e}
0x1ec4…1edc Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0013, t01=0x0128}
0x1edc…1ee6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0140}
0x1ee6…1ef0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x014a}
0x1ef0…1f02 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0013, t01=0x0154}
0x1f02…1f14 Head {h00=0x000e, h01=0x0050, text=»* VOLGET *«, t00=0x0013, t01=0x0166}
0x1f14…1f26 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0013, t01=0x0178}
0x1f26…1f30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018a}
0x1f30…1f3a (20, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0004}
0x1f3a…1f74 Head {h00=0x0036, h01=0x0050, text=»* VOLGET WILL READ VOLUME NAME FROM DISC BUFFER «, t00=0x0014, t01=0x000e}
0x1f74…1fb8 Head {h00=0x0040, h01=0x0050, text=»* TO DISC DWT AND CHECK IF THERE IS A NEW VOLUME MOUNTED. «, t00=0x0014, t01=0x0048}
0x1fb8…1fc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x008c}
0x1fc2…1fee Head {h00=0x0028, h01=0x0050, text=»* INPUT: A2 = DISC BUFFER ADDRESS«, t00=0x0014, t01=0x0096}
0x1fee…2024 Head {h00=0x0032, h01=0x0050, text=»* A3 = FILE CODE (FOR DRIVE WITH INDEX = 0)«, t00=0x0014, t01=0x00c2}
0x2024…2058 Head {h00=0x0030, h01=0x0050, text=»* BIT 0 SET MEANS TEST STATUS ORDER «, t00=0x0014, t01=0x00f8}
0x2058…207c Head {h00=0x0020, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0014, t01=0x012c}
0x207c…2086 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0150}
0x2086…20ba Head {h00=0x0030, h01=0x0050, text=»* OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX «, t00=0x0014, t01=0x015a}
0x20ba…20e8 Head {h00=0x002a, h01=0x0050, text=»* A1-A3, A7-A8 ARE DESTROYED«, t00=0x0014, t01=0x018e}
0x20e8…20f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x002c}
0x20f2…20fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0036}
0x20fc…2110 Head {h00=0x0010, h01=0x0050, text=»VOLGET EQU *«, t00=0x0015, t01=0x0040}
0x2110…213e Head {h00=0x002a, h01=0x0050, text=» CF A15,VOLADR DWT VOLUME NAME ADDRESS«, t00=0x0015, t01=0x0054}
0x213e…215e Head {h00=0x001c, h01=0x0050, text=» LDK A7,0 RESET NVL FLAG«, t00=0x0015, t01=0x0082}
0x215e…2168 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a2}
0x2168…217c Head {h00=0x0010, h01=0x0050, text=»VGET10 EQU *«, t00=0x0015, t01=0x00ac}
0x217c…21ac Head {h00=0x002c, h01=0x0050, text=» LDR* A8,A2 ONE WORD OF NEW VOLUME NAME «, t00=0x0015, t01=0x00c0}
0x21ac…21dc Head {h00=0x002c, h01=0x0050, text=» CWR* A8,A1 COMPARE WITH OLD VOLUME NAME«, t00=0x0015, t01=0x00f0}
0x21dc…21f2 Head {h00=0x0012, h01=0x0050, text=» RF(E) VGET20 «, t00=0x0015, t01=0x0120}
0x21f2…2210 Head {h00=0x001a, h01=0x0050, text=» LDK A7,1 SET NVL FLAG«, t00=0x0015, t01=0x0136}
0x2210…2238 Head {h00=0x0024, h01=0x0050, text=» STR A8,A1 STORE NEW VOLUME NAME«, t00=0x0015, t01=0x0154}
0x2238…2242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017c}
0x2242…225a Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0015, t01=0x0186}
0x225a…2264 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x000e}
0x2264…226e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0018}
0x226e…2282 Head {h00=0x0010, h01=0x0050, text=»VGET20 EQU *«, t00=0x0016, t01=0x0022}
0x2282…22ae Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT BUFFER POINTERS «, t00=0x0016, t01=0x0036}
0x22ae…22c0 Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x0016, t01=0x0062}
0x22c0…22e8 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 DECREMENT LOOP COUNTER«, t00=0x0016, t01=0x0074}
0x22e8…22fe Head {h00=0x0012, h01=0x0050, text=» RB(P) VGET10 «, t00=0x0016, t01=0x009c}
0x22fe…2314 Head {h00=0x0012, h01=0x0050, text=» CF A15,INXDWT«, t00=0x0016, t01=0x00b2}
0x2314…2334 Head {h00=0x001c, h01=0x0050, text=» ADK A7,0 CHECK NVL FLAG«, t00=0x0016, t01=0x00c8}
0x2334…235a Head {h00=0x0022, h01=0x0050, text=» RB(Z) RETURN RETURN IF NO NVL«, t00=0x0016, t01=0x00e8}
0x235a…238c Head {h00=0x002e, h01=0x0050, text=» SLA A3,1 CHECK IF TEST STATUS OR RECOVERY«, t00=0x0016, t01=0x010e}
0x238c…23b6 Head {h00=0x0026, h01=0x0050, text=» RB(O) RETURN TEST STATUS, NO NVL «, t00=0x0016, t01=0x0140}
0x23b6…23e2 Head {h00=0x0028, h01=0x0050, text=» SRA A3,1 FILE CODE WITHOUT SIGN BIT«, t00=0x0016, t01=0x016a}
0x23e2…2404 Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTNVL,A4 NVL FLAGS«, t00=0x0017, t01=0x0008}
0x2404…243a Head {h00=0x0032, h01=0x0050, text=» RB(N) RETURN NO REQUESTS SO FAR ON THIS DISC «, t00=0x0017, t01=0x002a}
0x243a…244c Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x0017, t01=0x0060}
0x244c…2474 Head {h00=0x0024, h01=0x0050, text=» RB(N) RETURN FIXED DISC, NO NVL«, t00=0x0017, t01=0x0072}
0x2474…247e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x009a}
0x247e…2496 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0017, t01=0x00a4}
0x2496…24a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00bc}
0x24a0…24aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c6}
0x24aa…24bc Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0017, t01=0x00d0}
0x24bc…24ce Head {h00=0x000e, h01=0x0050, text=»* NEWVOL *«, t00=0x0017, t01=0x00e2}
0x24ce…24e0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0017, t01=0x00f4}
0x24e0…24ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0106}
0x24ea…24f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0110}
0x24f4…2536 Head {h00=0x003e, h01=0x0050, text=»* NEWVOL IS ENTERED FROM THE ROUTINE VOLGET WHEN IT HAS «, t00=0x0017, t01=0x011a}
0x2536…256e Head {h00=0x0034, h01=0x0050, text=»* DETECTED THAT A NEW VOLUME HAS BEEN MOUNTED.«, t00=0x0017, t01=0x015c}
0x256e…25a8 (24, 0, 400) Head {h00=0x0036, h01=0x0050, text=»* THE NEW VOLUME LOADED FLAG IS THEN SET BY THIS«, t00=0x0018, t01=0x0004}
0x25a8…25e2 Head {h00=0x0036, h01=0x0050, text=»* ROUTINE FOR THE CONCERNED FILE CODE AND FILES «, t00=0x0018, t01=0x003e}
0x25e2…261e Head {h00=0x0038, h01=0x0050, text=»* OPENED ON THAT VOLUME. TASKS REPRESENTED IN THE «, t00=0x0018, t01=0x0078}
0x261e…2656 Head {h00=0x0034, h01=0x0050, text=»* TABLE NVLTAB WILL GET RETURN CODE /20 AT THE«, t00=0x0018, t01=0x00b4}
0x2656…2682 Head {h00=0x0028, h01=0x0050, text=»* NEXT REQUEST ON THAT FILE CODE. «, t00=0x0018, t01=0x00ec}
0x2682…268c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0118}
0x268c…26c4 Head {h00=0x0034, h01=0x0050, text=»* INPUT: A3 = FILE CODE (DISC ONE FOR DRIVER)«, t00=0x0018, t01=0x0122}
0x26c4…26f0 Head {h00=0x0028, h01=0x0050, text=»* A4 = DWT ADDRESS + DOUBLE INDEX«, t00=0x0018, t01=0x015a}
0x26f0…2714 Head {h00=0x0020, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0018, t01=0x0186}
0x2714…271e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x001a}
0x271e…2748 Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A3 = ACTUAL FILE CODE «, t00=0x0019, t01=0x0024}
0x2748…2768 Head {h00=0x001c, h01=0x0050, text=»* A1-A2 ARE DESTROYED«, t00=0x0019, t01=0x004e}
0x2768…2772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x006e}
0x2772…2786 Head {h00=0x0010, h01=0x0050, text=»NEWVOL EQU *«, t00=0x0019, t01=0x0078}
0x2786…27a8 Head {h00=0x001e, h01=0x0050, text=» LD A2,NVLBIT NVL BIT MASK«, t00=0x0019, t01=0x008c}
0x27a8…27dc Head {h00=0x0030, h01=0x0050, text=» ST A2,DWTNVL,A4 INDICATE NEW VOLUME LOADED «, t00=0x0019, t01=0x00ae}
0x27dc…27fa Head {h00=0x001a, h01=0x0050, text=» LC A2,DWTOR,A6 INDEX «, t00=0x0019, t01=0x00e2}
0x27fa…280c Head {h00=0x000e, h01=0x0050, text=» ANK A2,/3«, t00=0x0019, t01=0x0100}
0x280c…2830 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A2 ACTUAL FILE CODE «, t00=0x0019, t01=0x0112}
0x2830…283a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0136}
0x283a…2852 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0019, t01=0x0140}
0x2852…285c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0158}
0x285c…2866 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0162}
0x2866…287c Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=0 «, t00=0x0019, t01=0x016c}
0x287c…288e Head {h00=0x000e, h01=0x0050, text=» RB RETURN«, t00=0x0019, t01=0x0182}
0x288e…289a (26, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0004}
0x289a…28a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0010}
0x28a4…28ba Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=1 «, t00=0x001a, t01=0x001a}
0x28ba…28e8 Head {h00=0x002a, h01=0x0050, text=» LDKL A1,SCTFWT ADDRESS TO FWT POINTER«, t00=0x001a, t01=0x0030}
0x28e8…28f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005e}
0x28f2…2934 Head {h00=0x003e, h01=0x0050, text=»* SET NEW VOLUME LOADED FOR ALL FILES ON CONCERNED VOLUME «, t00=0x001a, t01=0x0068}
0x2934…293e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00aa}
0x293e…2952 Head {h00=0x0010, h01=0x0050, text=»NEW:10 EQU *«, t00=0x001a, t01=0x00b4}
0x2952…2976 Head {h00=0x0020, h01=0x0050, text=» LDR* A2,A1 NEXT FWT ADDRESS«, t00=0x001a, t01=0x00c8}
0x2976…299a Head {h00=0x0020, h01=0x0050, text=» RB(Z) RETURN NO MORE FWT:S «, t00=0x001a, t01=0x00ec}
0x299a…29be Head {h00=0x0020, h01=0x0050, text=» LDR A1,A2 SAVE FWT ADDRESS «, t00=0x001a, t01=0x0110}
0x29be…29f4 Head {h00=0x0032, h01=0x0050, text=» ADKL A2,FWTEW1 ADDRESS TO FIRST EWT STRUCTURE«, t00=0x001a, t01=0x0134}
0x29f4…29fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016a}
0x29fe…2a12 Head {h00=0x0010, h01=0x0050, text=»NEW:20 EQU *«, t00=0x001a, t01=0x0174}
0x2a12…2a3e Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A2 ADDRESS TO 2ND EWT BLOCK«, t00=0x001a, t01=0x0188}
0x2a3e…2a66 Head {h00=0x0024, h01=0x0050, text=» CC A3,EWTVOL,A2 CHECK FILE CODE«, t00=0x001b, t01=0x0024}
0x2a66…2a7c Head {h00=0x0012, h01=0x0050, text=» RF(NE) NEW:30«, t00=0x001b, t01=0x004c}
0x2a7c…2a9a Head {h00=0x001a, h01=0x0050, text=» LDKL A2,/8000 NVL BIT«, t00=0x001b, t01=0x0062}
0x2a9a…2ace Head {h00=0x0030, h01=0x0050, text=» ORS A2,FWTPAR,A1 INDICATE NEW VOLUME LOADED«, t00=0x001b, t01=0x0080}
0x2ace…2ae0 Head {h00=0x000e, h01=0x0050, text=» RB NEW:10«, t00=0x001b, t01=0x00b4}
0x2ae0…2aea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00c6}
0x2aea…2afe Head {h00=0x0010, h01=0x0050, text=»NEW:30 EQU *«, t00=0x001b, t01=0x00d0}
0x2afe…2b30 Head {h00=0x002e, h01=0x0050, text=» LDR* A2,A2 ADDRESS TO NEXT EWT STRUCTURE «, t00=0x001b, t01=0x00e4}
0x2b30…2b60 Head {h00=0x002c, h01=0x0050, text=» RB(Z) NEW:10 END OF THIS EWT STRUCTURE «, t00=0x001b, t01=0x0116}
0x2b60…2b8c Head {h00=0x0028, h01=0x0050, text=» RB NEW:20 CONTINUE WITH NEXT EXTENT«, t00=0x001b, t01=0x0146}
0x2b8c…2b98 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0172}
0x2b98…2ba2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x017e}
0x2ba2…2bba Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x001b, t01=0x0188}
0x2bba…2bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0010}
0x2bc4…2bce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x001a}
0x2bce…2be0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001c, t01=0x0024}
0x2be0…2bf2 Head {h00=0x000e, h01=0x0050, text=»* INXDWT *«, t00=0x001c, t01=0x0036}
0x2bf2…2c04 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001c, t01=0x0048}
0x2c04…2c0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x005a}
0x2c0e…2c18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0064}
0x2c18…2c64 Head {h00=0x0048, h01=0x0050, text=»* INXDWT WILL COMPUTE THE DWT ADDRESS ADDED TO THE DOUBLED INDEX. «, t00=0x001c, t01=0x006e}
0x2c64…2c6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ba}
0x2c6e…2c92 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x001c, t01=0x00c4}
0x2c92…2c9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00e8}
0x2c9c…2cd0 Head {h00=0x0030, h01=0x0050, text=»* OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX «, t00=0x001c, t01=0x00f2}
0x2cd0…2cfe Head {h00=0x002a, h01=0x0050, text=»* NO REGISTERS ARE DESTROYED«, t00=0x001c, t01=0x0126}
0x2cfe…2d08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0154}
0x2d08…2d1c Head {h00=0x0010, h01=0x0050, text=»INXDWT EQU *«, t00=0x001c, t01=0x015e}
0x2d1c…2d3a Head {h00=0x001a, h01=0x0050, text=» LC A4,DWTOR,A6 INDEX «, t00=0x001c, t01=0x0172}
0x2d3a…2d4c Head {h00=0x000e, h01=0x0050, text=» ANK A4,/3«, t00=0x001c, t01=0x0190}
0x2d4c…2d6c Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 DOUBLE INDEX «, t00=0x001d, t01=0x0012}
0x2d6c…2d7e Head {h00=0x000e, h01=0x0050, text=» ADR A4,A6«, t00=0x001d, t01=0x0032}
0x2d7e…2d90 Head {h00=0x000e, h01=0x0050, text=» RB RETURN«, t00=0x001d, t01=0x0044}
0x2d90…2d9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0056}
0x2d9a…2db2 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x001d, t01=0x0060}
0x2db2…2dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0078}
0x2dbc…2dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0082}
0x2dc6…2dd8 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x008c}
0x2dd8…2dea Head {h00=0x000e, h01=0x0050, text=»* NVLTAB *«, t00=0x001d, t01=0x009e}
0x2dea…2dfc Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x00b0}
0x2dfc…2e06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c2}
0x2e06…2e10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00cc}
0x2e10…2e48 Head {h00=0x0034, h01=0x0050, text=»* NVLTAB HOLDS THE TTAB ADDRESSES OF THE TASKS«, t00=0x001d, t01=0x00d6}
0x2e48…2e82 Head {h00=0x0036, h01=0x0050, text=»* THAT WILL RECEIVE NEW VOLUME LOADED WHEN A NEW«, t00=0x001d, t01=0x010e}
0x2e82…2ea6 Head {h00=0x0020, h01=0x0050, text=»* VOLUME HAS BEEN MOUNTED.«, t00=0x001d, t01=0x0148}
0x2ea6…2eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x016c}
0x2eb0…2ed8 Head {h00=0x0024, h01=0x0050, text=»* BIT NO IN DWTNVL «, t00=0x001d, t01=0x0176}
0x2ed8…2eec Head {h00=0x0010, h01=0x0050, text=»NVLTAB EQU *«, t00=0x001e, t01=0x000e}
0x2eec…2f02 Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=1 «, t00=0x001e, t01=0x0022}
0x2f02…2f2a Head {h00=0x0024, h01=0x0050, text=» DATA TTABFM FMTASK TTAB 15«, t00=0x001e, t01=0x0038}
0x2f2a…2f34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0060}
0x2f34…2f50 Head {h00=0x0018, h01=0x0050, text=» IFF DSKPAG+SWPBLK=0«, t00=0x001e, t01=0x006a}
0x2f50…2f78 Head {h00=0x0024, h01=0x0050, text=» DATA TTABLD LDTASK TTAB 14«, t00=0x001e, t01=0x0086}
0x2f78…2f84 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00ae}
0x2f84…2f94 Head {h00=0x000c, h01=0x0050, text=»* =1 «, t00=0x001e, t01=0x00ba}
0x2f94…2faa Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=1 «, t00=0x001e, t01=0x00ca}
0x2faa…2fbe Head {h00=0x0010, h01=0x0050, text=»NVLEND EQU *«, t00=0x001e, t01=0x00e0}
0x2fbe…2fc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00f4}
0x2fc8…2fea Head {h00=0x001e, h01=0x0050, text=»NVLBIT DATA 0 NVL BIT MASK«, t00=0x001e, t01=0x00fe}
0x2fea…2ff6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0120}
0x2ff6…3000 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x012c}
0x3000…3018 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x001e, t01=0x0136}
0x3018…3022 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x014e}
0x3022…302c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0158}
0x302c…3042 Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=0 «, t00=0x001e, t01=0x0162}
0x3042…305e Head {h00=0x0018, h01=0x0050, text=» IFF DSKPAG+SWPBLK=0«, t00=0x001e, t01=0x0178}
0x305e…307e (31, 2, 314) Head {h00=0x001c, h01=0x0050, text=» DATA TTABLD LDTASK TTAB«, t00=0x001f, t01=0x0004}
0x307e…3088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0024}
0x3088…309c Head {h00=0x0010, h01=0x0050, text=»NVLEND EQU *«, t00=0x001f, t01=0x002e}
0x309c…30a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0042}
0x30a6…30c8 Head {h00=0x001e, h01=0x0050, text=»NVLBIT DATA 3 NVL BIT MASK«, t00=0x001f, t01=0x004c}
0x30c8…30d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x006e}
0x30d4…30de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x007a}
0x30de…30f4 Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=0 «, t00=0x001f, t01=0x0084}
0x30f4…3110 Head {h00=0x0018, h01=0x0050, text=» IFT DSKPAG+SWPBLK=0«, t00=0x001f, t01=0x009a}
0x3110…311a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00b6}
0x311a…312e Head {h00=0x0010, h01=0x0050, text=»NVLEND EQU *«, t00=0x001f, t01=0x00c0}
0x312e…3138 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00d4}
0x3138…315a Head {h00=0x001e, h01=0x0050, text=»NVLBIT DATA 1 NVL BIT MASK«, t00=0x001f, t01=0x00de}
0x315a…3166 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0100}
0x3166…3170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x010c}
0x3170…317a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0116}
0x317a…3184 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0120}
0x3184…3190 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001f, t01=0x012a}
0x3190…3194 Head {h00=0x4004, h01=0x0000}
0x3194…3198 00 1f 01 36 ┆ 6┆
0x3198…31a0 (32, 1, 8) 20 04 00 00 00 20 00 04 ┆ ┆
0x31a0…31f0 (33, 0, 400) 5c 4c 44 52 2a 5c 41 34 2c 41 31 5c 47 45 54 20 57 4f 52 44 00 70 01 8a 00 14 00 50 5c 53 54 52 5c 41 34 2c 41 32 5c 53 54 4f 52 45 00 71 00 1c 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 32 20 00 71 00 34 00 0e 00 50 5c 41 44 4b 5c 41 32 2c 32 20 ┆ LDR* A4,A1 GET WORD p P STR A4,A2 STORE q P ADK A1,2 q 4 P ADK A2,2 ┆
0x31f0…3240 00 71 00 46 00 18 00 50 5c 53 55 4b 5c 41 33 2c 32 5c 44 45 43 20 4c 45 4e 47 54 48 00 71 00 58 00 12 00 50 5c 52 42 28 4e 4e 29 5c 4d 4f 56 4e 58 54 00 71 00 74 00 14 00 50 5c 4c 44 52 5c 41 33 2c 41 39 5c 53 41 56 45 20 00 71 00 8a 00 26 ┆ q F P SUK A3,2 DEC LENGTH q X P RB(NN) MOVNXT q t P LDR A3,A9 SAVE q &┆
0x3240…3290 00 50 5c 4c 44 52 5c 41 31 31 2c 41 32 5c 47 45 54 20 53 54 41 52 54 20 4f 46 20 46 52 45 45 20 41 52 45 41 00 71 00 a2 00 28 00 50 5c 4c 44 5c 41 39 2c 53 43 54 45 46 41 2b 32 5c 47 45 54 20 45 4e 44 20 4f 46 20 46 52 45 45 20 41 52 45 41 ┆ P LDR A11,A2 GET START OF FREE AREA q ( P LD A9,SCTEFA+2 GET END OF FREE AREA┆
0x3290…32e0 00 71 00 cc 00 10 00 50 5c 43 41 4c 4c 5c 43 4d 50 41 44 52 00 71 00 f8 00 12 00 50 5c 52 46 28 4e 47 29 5c 53 59 41 32 30 37 00 71 01 0c 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4c 4d 50 33 20 00 71 01 22 00 10 00 50 5c 43 41 4c 4c 5c 45 52 ┆ q P CALL CMPADR q P RF(NG) SYA207 q P LDKL A1,LMP3 q " P CALL ER┆
0x32e0…3330 52 4f 52 20 00 71 01 38 00 10 00 50 53 59 41 32 30 37 5c 45 51 55 5c 2a 00 71 01 4c 00 22 00 50 5c 4c 44 52 5c 41 39 2c 41 33 5c 47 45 54 20 50 3a 4d 54 41 42 20 41 44 44 52 45 53 53 20 00 71 01 60 00 2c 00 50 5c 53 55 4b 5c 41 33 2c 31 30 ┆ROR q 8 PSYA207 EQU * q L " P LDR A9,A3 GET P:MTAB ADDRESS q ` , P SUK A3,10┆
0x3330…3380 (34, 0, 398) 5c 52 45 53 45 52 56 45 20 35 20 57 4f 52 44 53 20 46 4f 52 20 44 45 42 55 47 47 45 52 20 00 71 01 86 00 08 00 50 5c 58 49 46 00 72 00 26 00 12 00 50 5c 49 46 54 20 4d 4d 55 50 41 47 3d 31 20 00 72 00 32 00 10 00 50 5c 43 41 4c 4c 5c 58 4d ┆ RESERVE 5 WORDS FOR DEBUGGER q P XIF r & P IFT MMUPAG=1 r 2 P CALL XM┆
0x3380…33d0 4f 56 45 20 00 72 00 48 00 26 00 50 2a 20 52 45 4d 4f 56 45 20 44 44 49 56 20 45 4e 54 52 49 45 53 20 49 4e 20 4d 4d 2d 54 41 42 4c 45 20 00 72 00 5c 00 04 00 50 00 72 00 86 00 22 00 50 5c 4c 44 52 5c 41 33 2c 41 39 5c 47 45 54 20 50 3a 4d ┆OVE r H & P* REMOVE DDIV ENTRIES IN MM-TABLE r P r " P LDR A3,A9 GET P:M┆
0x33d0…3420 54 41 42 20 41 44 44 52 45 53 53 20 00 72 00 8e 00 2c 00 50 5c 53 55 4b 5c 41 33 2c 31 30 5c 52 45 53 45 52 56 45 20 35 20 57 4f 52 44 53 20 46 4f 52 20 44 45 42 55 47 47 45 52 20 00 72 00 b4 00 2c 00 50 5c 4c 44 52 5c 41 31 2c 41 33 5c 47 ┆TAB ADDRESS r , P SUK A3,10 RESERVE 5 WORDS FOR DEBUGGER r , P LDR A1,A3 G┆
0x3420…3470 45 54 20 50 3a 4d 54 41 42 20 41 44 44 52 45 53 53 2d 35 57 4f 52 44 53 5c 3d 33 20 00 72 00 e4 00 24 00 50 5c 53 52 4c 5c 41 31 2c 31 31 5c 41 44 4a 55 53 54 20 46 4f 52 20 41 44 44 52 45 53 53 49 4e 47 00 72 01 14 00 10 00 50 5c 41 4e 4b ┆ET P:MTAB ADDRESS-5WORDS =3 r $ P SRL A1,11 ADJUST FOR ADDRESSING r P ANK┆
0x3470…34be 5c 41 31 2c 2f 31 45 20 00 72 01 3c 00 26 00 50 5c 4c 44 4b 4c 5c 41 32 2c 4d 4d 54 41 42 2d 32 5c 47 45 54 20 54 41 42 4c 45 20 41 44 44 52 45 53 53 00 72 01 50 00 18 00 50 5c 41 44 52 5c 41 32 2c 41 31 33 5c 52 45 4c 4f 43 41 54 45 ┆ A1,/1E r < & P LDKL A2,MMTAB-2 GET TABLE ADDRESS r P P ADR A2,A13 RELOCATE┆
0x34be…350e (35, 0, 400) 00 72 01 7a 00 2c 00 50 5c 41 44 52 5c 41 31 2c 41 32 5c 50 3a 4d 54 41 42 2d 35 57 4f 52 44 53 20 53 54 41 52 54 20 45 4e 54 52 59 5c 3d 33 20 00 73 00 08 00 12 00 50 5c 4c 44 4b 4c 5c 41 34 2c 2f 46 43 30 30 00 73 00 38 00 1a 00 50 53 59 ┆ r z , P ADR A1,A2 P:MTAB-5WORDS START ENTRY =3 s P LDKL A4,/FC00 s 8 PSY┆
0x350e…355e 41 32 30 36 5c 43 57 52 5c 41 31 2c 41 32 5c 41 4c 4c 3f 20 00 73 00 4e 00 16 00 50 5c 52 46 28 45 29 5c 53 59 41 32 30 37 5c 59 45 53 21 00 73 00 6c 00 2c 00 50 5c 53 54 52 5c 41 34 2c 41 31 5c 52 45 50 4c 41 43 45 20 45 4e 54 52 59 20 57 ┆A206 CWR A1,A2 ALL? s N P RF(E) SYA207 YES! s l , P STR A4,A1 REPLACE ENTRY W┆
0x355e…35ae 49 54 48 20 50 41 47 45 20 45 52 52 4f 52 00 73 00 86 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 32 20 00 73 00 b6 00 0e 00 50 5c 52 42 5c 53 59 41 32 30 36 00 73 00 c8 00 10 00 50 53 59 41 32 30 37 5c 45 51 55 5c 2a 00 73 00 da 00 06 00 50 2a 20 ┆ITH PAGE ERROR s P SUK A1,2 s P RB SYA206 s PSYA207 EQU * s P* ┆
0x35ae…35fe 00 73 00 ee 00 1e 00 50 2a 5c 43 48 41 4e 47 45 20 54 41 42 4c 45 20 2d 20 41 44 44 52 45 53 53 45 53 00 73 00 f8 00 06 00 50 2a 20 00 73 01 1a 00 18 00 50 5c 4c 44 5c 41 34 2c 4d 4d 46 52 4f 4d 2b 53 54 4b 43 4f 4d 00 73 01 24 00 16 00 50 ┆ s P* CHANGE TABLE - ADDRESSES s P* s P LD A4,MMFROM+STKCOM s $ P┆
0x35fe…364e 5c 4c 44 5c 41 35 2c 4d 4d 54 4f 2b 53 54 4b 43 4f 4d 00 73 01 40 00 16 00 50 5c 53 54 5c 41 34 2c 4d 4d 54 4f 2b 53 54 4b 43 4f 4d 00 73 01 5a 00 18 00 50 5c 53 54 5c 41 35 2c 4d 4d 46 52 4f 4d 2b 53 54 4b 43 4f 4d 00 73 01 74 00 08 00 50 ┆ LD A5,MMTO+STKCOM s @ P ST A4,MMTO+STKCOM s Z P ST A5,MMFROM+STKCOM s t P┆
0x364e…369e (36, 0, 400) 5c 58 49 46 00 73 01 90 00 20 00 50 5c 41 4e 4b 4c 5c 41 33 2c 2f 46 46 46 45 5c 45 56 45 4e 20 41 44 44 52 45 53 53 20 00 74 00 0c 00 2e 00 50 5c 53 54 5c 41 33 2c 4c 53 54 41 44 52 2b 53 54 4b 43 4f 4d 5c 53 41 56 45 20 45 4e 44 20 4f 46 ┆ XIF s P ANKL A3,/FFFE EVEN ADDRESS t . P ST A3,LSTADR+STKCOM SAVE END OF┆
0x369e…36ee 20 46 52 45 45 20 41 52 45 41 00 74 00 30 00 04 00 50 00 74 00 62 00 04 00 50 00 74 00 6a 00 08 00 50 5c 5c 5c 5c 00 74 00 72 00 2e 00 50 2a 20 52 45 53 45 52 56 45 20 53 50 41 43 45 20 46 4f 52 20 52 45 41 4c 20 54 3a 41 2d 20 41 4e 44 20 ┆ FREE AREA t 0 P t b P t j P t r . P* RESERVE SPACE FOR REAL T:A- AND ┆
0x36ee…373e 55 3a 42 54 41 42 20 2a 00 74 00 7e 00 04 00 50 00 74 00 b0 00 04 00 50 00 74 00 b8 00 12 00 50 5c 49 46 54 5c 4d 4d 55 50 41 47 3d 31 20 00 74 00 c0 00 28 00 50 5c 4c 44 4b 4c 5c 41 33 2c 4d 4d 54 41 42 5c 47 45 54 20 43 55 52 52 45 4e 54 ┆U:BTAB * t ~ P t P t P IFT MMUPAG=1 t ( P LDKL A3,MMTAB GET CURRENT┆
0x373e…378e 20 4d 4d 2d 54 41 42 4c 45 20 00 74 00 d6 00 10 00 50 5c 41 44 52 5c 41 33 2c 41 31 33 20 00 74 01 02 00 2c 00 50 2a 20 46 49 4e 44 20 4c 41 53 54 20 55 53 45 44 20 45 4e 54 52 59 20 49 4e 20 52 45 41 4c 20 4d 4d 55 54 41 42 20 2a 20 00 74 ┆ MM-TABLE t P ADR A3,A13 t , P* FIND LAST USED ENTRY IN REAL MMUTAB * t┆
0x378e…37de 01 16 00 04 00 50 00 74 01 46 00 10 00 50 5c 43 41 4c 4c 5c 4d 4d 45 4e 54 20 00 74 01 4e 00 16 00 50 5c 53 54 5c 41 39 2c 54 54 41 42 2b 53 54 4b 43 4f 4d 00 74 01 62 00 2c 00 50 5c 53 54 5c 41 31 2c 46 59 53 50 41 47 2b 53 54 4b 43 4f 4d ┆ P t F P CALL MMENT t N P ST A9,TTAB+STKCOM t b , P ST A1,FYSPAG+STKCOM┆