|
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: 12760 (0x31d8)
Notes: pts_type(SC)
Names: »DSKSUB.SC«
└─⟦4358b8014⟧ Bits:30009669 Philips computer tape "600124"
└─⟦this⟧ »MON10/DSKSUB.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »M:DECE/DSKSUB.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »MON10/DSKSUB.SC«
IDENT DSKSUB REL 10.0 80-03-14 870105041000 * **************************************** * * 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 ENTRY NVLDMT DM TASK NVL TABLE 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 X:B * 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 ANK A1,/FF CHECK IF NVL 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. * NVLTAB EQU * IFT FILMAN=1 DATA TTABFM FMTASK TTAB * IFF DSKPAG+SWPBLK=0 DATA TTABLD LDTASK TTAB XIF * NVLDMT EQU * IFT FILMAN=1 IFT DATMAN=1 DATA 0 TTAB #D DATA 0 TTAB #E DATA 0 TTAB #F DATA 0 TTAB #G XIF * 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, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT DSKSUB REL 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0078 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0000, t01=0x004c}
0x0078…0082 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007c}
0x0082…00b2 Head {h00=0x002c, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS *«, t00=0x0000, t01=0x0086}
0x00b2…00bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b6}
0x00bc…00ec Head {h00=0x002c, h01=0x0050, text=»* DSKSUB = DISC SUBROUTINES *«, t00=0x0000, t01=0x00c0}
0x00ec…00f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f0}
0x00f6…0100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fa}
0x0100…010a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0104}
0x010a…0114 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…0144 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0000, t01=0x0118}
0x0144…014e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0148}
0x014e…0158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0152}
0x0158…0184 Head {h00=0x0028, h01=0x0050, text=»* DSKSUB HOLDS THE FOLLOWING DISC «, t00=0x0000, t01=0x015c}
0x0184…01b0 Head {h00=0x0028, h01=0x0050, text=»* AND FILE MANAGEMENT SUBROUTINES:«, t00=0x0000, t01=0x0188}
0x01b0…01ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0024}
0x01ba…01f2 Head {h00=0x0034, h01=0x0050, text=»* - VOLCLR = CLEAR VOLUME NAME(S) IN DISC DWT «, t00=0x0001, t01=0x002e}
0x01f2…0232 Head {h00=0x003c, h01=0x0050, text=»* - VOLNAM = MOVE VOLUME NAME FROM DWT TO USER BUFFER «, t00=0x0001, t01=0x0066}
0x0232…026c Head {h00=0x0036, h01=0x0050, text=»* - VOLADR = COMPUTE VOLUME NAME ADDRESS IN DWT «, t00=0x0001, t01=0x00a6}
0x026c…02ae Head {h00=0x003e, h01=0x0050, text=»* - NVLCHK = CHECK IF NEW VOLUME LOADED FOR CALLING TASK«, t00=0x0001, t01=0x00e0}
0x02ae…02ee Head {h00=0x003c, h01=0x0050, text=»* - VOLGET = MOVE VOLUME NAME FROM DISC BUFFER TO DWT «, t00=0x0001, t01=0x0122}
0x02ee…0320 Head {h00=0x002e, h01=0x0050, text=»* - NEWVOL = SET NEW VOLUME LOADED BITS «, t00=0x0001, t01=0x0162}
0x0320…035a (2, 0, 400) Head {h00=0x0036, h01=0x0050, text=»* - INXDWT = COMPUTE DWT ADDRESS + DOUBLE INDEX «, t00=0x0002, t01=0x0004}
0x035a…0396 Head {h00=0x0038, h01=0x0050, text=»* - NVLTAB = TTAB ADDRESSES FOR TASKS TO HAVE NVL «, t00=0x0002, t01=0x003e}
0x0396…03a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007a}
0x03a0…03aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0084}
0x03aa…03c0 Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x0002, t01=0x008e}
0x03c0…03ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a4}
0x03ca…03d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ae}
0x03d4…03e8 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00b8}
0x03e8…03fc Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x00cc}
0x03fc…0410 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x00e0}
0x0410…041a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00f4}
0x041a…0424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fe}
0x0424…0454 Head {h00=0x002c, h01=0x0050, text=» ENTRY VOLCLR CLEAR VOLUME NAMES IN DWT «, t00=0x0002, t01=0x0108}
0x0454…0492 Head {h00=0x003a, h01=0x0050, text=» ENTRY VOLNAM MOVE VOLUME NAME FROM DWT TO USER BUFFER«, t00=0x0002, t01=0x0138}
0x0492…04ca Head {h00=0x0034, h01=0x0050, text=» ENTRY VOLADR COMPUTE VOLUME NAME ADDRESS IN DWT«, t00=0x0002, t01=0x0176}
0x04ca…04fc Head {h00=0x002e, h01=0x0050, text=» ENTRY NVLCHK CHECK FOR NEW VOLUME LOADED «, t00=0x0003, t01=0x001e}
0x04fc…053a Head {h00=0x003a, h01=0x0050, text=» ENTRY VOLGET MOVE VOLUME NAME FROM DISC BUFFER TO DWT«, t00=0x0003, t01=0x0050}
0x053a…056a Head {h00=0x002c, h01=0x0050, text=» ENTRY NEWVOL SET NEW VOLUME LOADED BITS«, t00=0x0003, t01=0x008e}
0x056a…05a2 Head {h00=0x0034, h01=0x0050, text=» ENTRY INXDWT COMPUTE DWT ADDRESS + DOUBLE INDEX«, t00=0x0003, t01=0x00be}
0x05a2…05dc Head {h00=0x0036, h01=0x0050, text=» ENTRY NVLTAB TTAB ADDRESSES FOR TASKS TO HAVE NVL«, t00=0x0003, t01=0x00f6}
0x05dc…0604 Head {h00=0x0024, h01=0x0050, text=» ENTRY NVLDMT DM TASK NVL TABLE «, t00=0x0003, t01=0x0130}
0x0604…0628 Head {h00=0x0020, h01=0x0050, text=» ENTRY NVLEND END OF NVLTAB «, t00=0x0003, t01=0x0158}
0x0628…064a Head {h00=0x001e, h01=0x0050, text=» ENTRY NVLBIT NVL BIT MASK«, t00=0x0003, t01=0x017c}
0x064a…0660 Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x0004, t01=0x000e}
0x0660…066a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0024}
0x066a…0674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002e}
0x0674…068a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0038}
0x068a…06a0 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x004e}
0x06a0…06b6 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0064}
0x06b6…06c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x007a}
0x06c0…06ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0084}
0x06ca…0702 Head {h00=0x0034, h01=0x0050, text=» EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS «, t00=0x0004, t01=0x008e}
0x0702…0724 Head {h00=0x001e, h01=0x0050, text=» EXTRN TTABLD LDTASK TTAB «, t00=0x0004, t01=0x00c6}
0x0724…0746 Head {h00=0x001e, h01=0x0050, text=» EXTRN TTABFM FMTASK TTAB «, t00=0x0004, t01=0x00e8}
0x0746…0774 Head {h00=0x002a, h01=0x0050, text=» EXTRN SCTFWT FWT CHAIN START ADDRESS «, t00=0x0004, t01=0x010a}
0x0774…07a4 Head {h00=0x002c, h01=0x0050, text=» EXTRN DWTORD SAVE AREA INDEX AND ORDER «, t00=0x0004, t01=0x0138}
0x07a4…07c8 Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTOR INDEX AND ORDER«, t00=0x0004, t01=0x0168}
0x07c8…07ea Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS«, t00=0x0004, t01=0x018c}
0x07ea…0810 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB ADDRESS«, t00=0x0005, t01=0x001e}
0x0810…0832 Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTVOL VOLUME NAME «, t00=0x0005, t01=0x0044}
0x0832…085e Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTNVL NEW VOLUME LOADED FLAG«, t00=0x0005, t01=0x0066}
0x085e…0884 Head {h00=0x0022, h01=0x0050, text=» EXTRN EWTVOL VOLUME FILE CODE«, t00=0x0005, t01=0x0092}
0x0884…08ba Head {h00=0x0032, h01=0x0050, text=» EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT «, t00=0x0005, t01=0x00b8}
0x08ba…08e2 Head {h00=0x0024, h01=0x0050, text=» EXTRN FWTPAR ACCESS PARAMETERS «, t00=0x0005, t01=0x00ee}
0x08e2…0902 Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:MT MMU TABLE «, t00=0x0005, t01=0x0116}
0x0902…092a Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0005, t01=0x0136}
0x092a…0954 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0005, t01=0x015e}
0x0954…097e Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0188}
0x097e…0994 Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x0006, t01=0x0022}
0x0994…099e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0038}
0x099e…09a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0042}
0x09a8…09d8 Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0006, t01=0x004c}
0x09d8…09e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007c}
0x09e2…0a00 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0006, t01=0x0086}
0x0a00…0a0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a4}
0x0a0a…0a3a Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0006, t01=0x00ae}
0x0a3a…0a44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00de}
0x0a44…0a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e8}
0x0a4e…0a80 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0006, t01=0x00f2}
0x0a80…0aae Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0006, t01=0x0124}
0x0aae…0ab8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0152}
0x0ab8…0acc Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0006, t01=0x015c}
0x0acc…0ad6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0170}
0x0ad6…0ae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017a}
0x0ae0…0b1a Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0006, t01=0x0184}
0x0b1a…0b4c Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x002e}
0x0b4c…0b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0060}
0x0b56…0b6a Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0007, t01=0x006a}
0x0b6a…0b74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007e}
0x0b74…0b7e Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0007, t01=0x0088}
0x0b7e…0bb0 Head {h00=0x002e, h01=0x002a, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x0007, t01=0x0092}
0x0bb0…0bde Head {h00=0x002a, h01=0x0026, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x0007, t01=0x00c4}
0x0bde…0be8 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0007, t01=0x00f2}
0x0be8…0bfc Head {h00=0x0010, h01=0x0050, text=»DSKPAG EQU 1«, t00=0x0007, t01=0x00fc}
0x0bfc…0c06 Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0007, t01=0x0110}
0x0c06…0c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x011a}
0x0c10…0c4a Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK «, t00=0x0007, t01=0x0124}
0x0c4a…0c80 Head {h00=0x0032, h01=0x0050, text=»* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. «, t00=0x0007, t01=0x015e}
0x0c80…0c8a (8, 0, 398) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0004}
0x0c8a…0c9e Head {h00=0x0010, h01=0x0050, text=»SWPBLK EQU 0«, t00=0x0008, t01=0x000e}
0x0c9e…0ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0022}
0x0ca8…0cc0 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0008, t01=0x002c}
0x0cc0…0cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0044}
0x0cca…0cd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x004e}
0x0cd4…0d0a Head {h00=0x0032, h01=0x0050, text=»* A PROGRAM VERSION SUPPORTING FILE MANAGEMENT«, t00=0x0008, t01=0x0058}
0x0d0a…0d38 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING FILMAN EQU 1.«, t00=0x0008, t01=0x008e}
0x0d38…0d42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00bc}
0x0d42…0d54 Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0008, t01=0x00c6}
0x0d54…0d68 Head {h00=0x0010, h01=0x0050, text=»FILMAN EQU 1«, t00=0x0008, t01=0x00d8}
0x0d68…0d72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ec}
0x0d72…0d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f6}
0x0d7c…0db2 Head {h00=0x0032, h01=0x0050, text=»* A PROGRAM VERSION SUPPORTING DATA MANAGEMENT«, t00=0x0008, t01=0x0100}
0x0db2…0de0 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING DATMAN EQU 1.«, t00=0x0008, t01=0x0136}
0x0de0…0dea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0164}
0x0dea…0dfc Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0008, t01=0x016e}
0x0dfc…0e12 Head {h00=0x0012, h01=0x0050, text=»DATMAN EQU X:B«, t00=0x0008, t01=0x0180}
0x0e12…0e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0008}
0x0e1c…0e34 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0009, t01=0x0012}
0x0e34…0e3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x002a}
0x0e3e…0e48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0034}
0x0e48…0e5a Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x003e}
0x0e5a…0e6c Head {h00=0x000e, h01=0x0050, text=»* VOLCLR *«, t00=0x0009, t01=0x0050}
0x0e6c…0e7e Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x0062}
0x0e7e…0e88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0074}
0x0e88…0e92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007e}
0x0e92…0ecc Head {h00=0x0036, h01=0x0050, text=»* VOLCLR WILL CLEAR THE REQUESTED VOLUME NAME(S)«, t00=0x0009, t01=0x0088}
0x0ecc…0ef2 Head {h00=0x0022, h01=0x0050, text=»* IN THE REQUESTED DISC DWT.«, t00=0x0009, t01=0x00c2}
0x0ef2…0efc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e8}
0x0efc…0f2e Head {h00=0x002e, h01=0x0050, text=»* INPUT: A1 = NUMBER OF BYTES TO CLEAR «, t00=0x0009, t01=0x00f2}
0x0f2e…0f52 Head {h00=0x0020, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0009, t01=0x0124}
0x0f52…0f5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0148}
0x0f5c…0f84 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A1, A2 ARE DESTROYED«, t00=0x0009, t01=0x0152}
0x0f84…0f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x017a}
0x0f8e…0fa2 Head {h00=0x0010, h01=0x0050, text=»VOLCLR EQU *«, t00=0x0009, t01=0x0184}
0x0fa2…0fb4 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x000a, t01=0x0008}
0x0fb4…0fde Head {h00=0x0026, h01=0x0050, text=» CF A15,VOLADR VOLUME NAME ADDRESS«, t00=0x000a, t01=0x001a}
0x0fde…0fe8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0044}
0x0fe8…0ffc Head {h00=0x0010, h01=0x0050, text=»VCLR10 EQU *«, t00=0x000a, t01=0x004e}
0x0ffc…101a Head {h00=0x001a, h01=0x0050, text=» CMR A1 CLEAR ONE WORD«, t00=0x000a, t01=0x0062}
0x101a…103e Head {h00=0x0020, h01=0x0050, text=» ADK A1,2 INCREMENT POINTER «, t00=0x000a, t01=0x0080}
0x103e…1066 Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 DECREMENT LOOP COUNTER«, t00=0x000a, t01=0x00a4}
0x1066…107c Head {h00=0x0012, h01=0x0050, text=» RB(P) VCLR10 «, t00=0x000a, t01=0x00cc}
0x107c…108e Head {h00=0x000e, h01=0x0050, text=» RF RETURN«, t00=0x000a, t01=0x00e2}
0x108e…1098 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f4}
0x1098…10ae Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x000a, t01=0x00fe}
0x10ae…10b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0114}
0x10b8…10c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011e}
0x10c2…10d4 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000a, t01=0x0128}
0x10d4…10e6 Head {h00=0x000e, h01=0x0050, text=»* VOLNAM *«, t00=0x000a, t01=0x013a}
0x10e6…10f8 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000a, t01=0x014c}
0x10f8…1102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x015e}
0x1102…110c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0168}
0x110c…114a Head {h00=0x003a, h01=0x0050, text=»* VOLNAM WILL MOVE THE VOLUME NAME OF SELECTED DISC «, t00=0x000a, t01=0x0172}
0x114a…1182 Head {h00=0x0034, h01=0x0050, text=»* TO THE USER BUFFER IF REQUESTED LENGTH = 6. «, t00=0x000b, t01=0x0020}
0x1182…118c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0058}
0x118c…11b0 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x000b, t01=0x0062}
0x11b0…11d4 Head {h00=0x0020, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x000b, t01=0x0086}
0x11d4…11de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00aa}
0x11de…1206 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A1-A4 ARE DESTROYED «, t00=0x000b, t01=0x00b4}
0x1206…1210 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00dc}
0x1210…1224 Head {h00=0x0010, h01=0x0050, text=»VOLNAM EQU *«, t00=0x000b, t01=0x00e6}
0x1224…124c Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBRL,A8 REQUESTED LENGTH«, t00=0x000b, t01=0x00fa}
0x124c…125e Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x000b, t01=0x0122}
0x125e…128a Head {h00=0x0028, h01=0x0050, text=» RF(NE) RETURN NO VOLUME NAME WANTED«, t00=0x000b, t01=0x0134}
0x128a…12b8 Head {h00=0x002a, h01=0x0050, text=» CF A15,VOLADR GET DWT VOLUME ADDRESS «, t00=0x000b, t01=0x0160}
0x12b8…12e4 Head {h00=0x0028, h01=0x0050, text=» ST A4,ECBEL,A8 SET EFFECTIVE LENGTH«, t00=0x000b, t01=0x018e}
0x12e4…12ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x002a}
0x12ee…1304 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000c, t01=0x0034}
0x1304…1330 Head {h00=0x0028, h01=0x0050, text=» LD A2,ECBBA,A8 USER BUFFER ADDRESS «, t00=0x000c, t01=0x004a}
0x1330…133a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0076}
0x133a…1352 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x000c, t01=0x0080}
0x1352…135c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0098}
0x135c…1366 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00a2}
0x1366…137a Head {h00=0x0010, h01=0x0050, text=»VNAM10 EQU *«, t00=0x000c, t01=0x00ac}
0x137a…139c Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A1 MOVE ONE WORD «, t00=0x000c, t01=0x00c0}
0x139c…13ae Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x000c, t01=0x00e2}
0x13ae…13da Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT BUFFER POINTERS «, t00=0x000c, t01=0x00f4}
0x13da…13ec Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x000c, t01=0x0120}
0x13ec…1414 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 DECREMENT LOOP COUNTER«, t00=0x000c, t01=0x0132}
0x1414…142a Head {h00=0x0012, h01=0x0050, text=» RB(P) VNAM10 «, t00=0x000c, t01=0x015a}
0x142a…143c Head {h00=0x000e, h01=0x0050, text=» RF RETURN«, t00=0x000c, t01=0x0170}
0x143c…1448 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0182}
0x1448…1452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x018e}
0x1452…1468 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000d, t01=0x0008}
0x1468…149e Head {h00=0x0032, h01=0x0050, text=» LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK «, t00=0x000d, t01=0x001e}
0x149e…14c2 Head {h00=0x0020, h01=0x0050, text=» TS -30,A15 SAVE RUNNING MMU«, t00=0x000d, t01=0x0054}
0x14c2…14e6 Head {h00=0x0020, h01=0x0050, text=» TL TTB:MT,A2 LOAD USER MMU «, t00=0x000d, t01=0x0078}
0x14e6…1510 Head {h00=0x0026, h01=0x0050, text=» LD A2,DWTUEC,A6 USER ECB ADDRESS «, t00=0x000d, t01=0x009c}
0x1510…153c Head {h00=0x0028, h01=0x0050, text=» EL A2,ECBBA,A2 USER BUFFER ADDRESS «, t00=0x000d, t01=0x00c6}
0x153c…155e Head {h00=0x001e, h01=0x0050, text=» MVSU A4 MOVE VOLUME NAME «, t00=0x000d, t01=0x00f2}
0x155e…1586 Head {h00=0x0024, h01=0x0050, text=» TL -30,A15 RESTORE RUNNING MMU «, t00=0x000d, t01=0x0114}
0x1586…1596 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x000d, t01=0x013c}
0x1596…15a2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x014c}
0x15a2…15ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0158}
0x15ac…15c2 Head {h00=0x0012, h01=0x0050, text=» EJECT DSKSUB«, t00=0x000d, t01=0x0162}
0x15c2…15cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0178}
0x15cc…15d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0182}
0x15d6…15e8 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000d, t01=0x018c}
0x15e8…15fa Head {h00=0x000e, h01=0x0050, text=»* VOLADR *«, t00=0x000e, t01=0x000e}
0x15fa…160c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x0020}
0x160c…1616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0032}
0x1616…1620 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003c}
0x1620…1644 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x000e, t01=0x0046}
0x1644…164e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006a}
0x164e…167a Head {h00=0x0028, h01=0x0050, text=»* OUTPUT: A1 = VOLUME NAME ADDRESS«, t00=0x000e, t01=0x0074}
0x167a…168e Head {h00=0x0010, h01=0x0050, text=»* A4 = 6 «, t00=0x000e, t01=0x00a0}
0x168e…1698 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00b4}
0x1698…16ac Head {h00=0x0010, h01=0x0050, text=»VOLADR EQU *«, t00=0x000e, t01=0x00be}
0x16ac…16ca Head {h00=0x001a, h01=0x0050, text=» LC A4,DWTOR,A6 INDEX «, t00=0x000e, t01=0x00d2}
0x16ca…16d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f0}
0x16d4…16e8 Head {h00=0x0010, h01=0x0050, text=»VOLA05 EQU *«, t00=0x000e, t01=0x00fa}
0x16e8…1702 Head {h00=0x0016, h01=0x0050, text=» LDKL A1,DWTVOL-6 «, t00=0x000e, t01=0x010e}
0x1702…1714 Head {h00=0x000e, h01=0x0050, text=» ADR A1,A6«, t00=0x000e, t01=0x0128}
0x1714…1726 Head {h00=0x000e, h01=0x0050, text=» ANK A4,/3«, t00=0x000e, t01=0x013a}
0x1726…1730 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014c}
0x1730…1744 Head {h00=0x0010, h01=0x0050, text=»VOLA10 EQU *«, t00=0x000e, t01=0x0156}
0x1744…1764 Head {h00=0x001c, h01=0x0050, text=» ADK A1,6 UPDATE ADDRESS«, t00=0x000e, t01=0x016a}
0x1764…1776 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x000e, t01=0x018a}
0x1776…178c Head {h00=0x0012, h01=0x0050, text=» RB(NN) VOLA10«, t00=0x000f, t01=0x000c}
0x178c…179e Head {h00=0x000e, h01=0x0050, text=» LDK A4,6 «, t00=0x000f, t01=0x0022}
0x179e…17b0 Head {h00=0x000e, h01=0x0050, text=» RF RETURN«, t00=0x000f, t01=0x0034}
0x17b0…17ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0046}
0x17ba…17d2 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x000f, t01=0x0050}
0x17d2…17dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0068}
0x17dc…17e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0072}
0x17e6…17f8 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x007c}
0x17f8…180a Head {h00=0x000e, h01=0x0050, text=»* NVLCHK *«, t00=0x000f, t01=0x008e}
0x180a…181c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x00a0}
0x181c…1826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b2}
0x1826…1830 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00bc}
0x1830…186c Head {h00=0x0038, h01=0x0050, text=»* NVLCHK IS CALLED AT ACTIVATION FROM DISC DRIVER «, t00=0x000f, t01=0x00c6}
0x186c…18a8 Head {h00=0x0038, h01=0x0050, text=»* TO CHECK IF THE RETURN CODE "NEW VOLUME LOADED" «, t00=0x000f, t01=0x0102}
0x18a8…18e4 Head {h00=0x0038, h01=0x0050, text=»* IS TO BE RETURNED TO THE CALLING TASK (RC=/20). «, t00=0x000f, t01=0x013e}
0x18e4…18ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x017a}
0x18ee…1912 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x000f, t01=0x0184}
0x1912…191c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0018}
0x191c…1956 Head {h00=0x0036, h01=0x0050, text=»* OUTPUT: A1 = RETURN CODE (/20 IF NVL, ELSE 0) «, t00=0x0010, t01=0x0022}
0x1956…198a Head {h00=0x0030, h01=0x0050, text=»* A2 = DWT ADDRESS + DOUBLE INDEX «, t00=0x0010, t01=0x005c}
0x198a…19b2 Head {h00=0x0024, h01=0x0050, text=»* A3, A4 ARE DESTROYED«, t00=0x0010, t01=0x0090}
0x19b2…19bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b8}
0x19bc…19d0 Head {h00=0x0010, h01=0x0050, text=»NVLCHK EQU *«, t00=0x0010, t01=0x00c2}
0x19d0…19f8 Head {h00=0x0024, h01=0x0050, text=» LD A2,DWTOR,A6 INDEX AND ORDER «, t00=0x0010, t01=0x00d6}
0x19f8…1a2c Head {h00=0x0030, h01=0x0050, text=» ST A2,DWTORD,A6 SAVE FOR RECOVERY PURPOSES «, t00=0x0010, t01=0x00fe}
0x1a2c…1a4a Head {h00=0x001a, h01=0x0050, text=» SRL A2,7 DOUBLE INDEX«, t00=0x0010, t01=0x0132}
0x1a4a…1a5c Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0010, t01=0x0150}
0x1a5c…1a7e Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTNVL,A2 NVL FLAG «, t00=0x0010, t01=0x0162}
0x1a7e…1ab4 Head {h00=0x0032, h01=0x0050, text=» ANKL A1,/7FFF RESET BIT 0 (FIRST REQUEST BIT)«, t00=0x0010, t01=0x0184}
0x1ab4…1acc Head {h00=0x0014, h01=0x0050, text=» ST A1,DWTNVL,A2«, t00=0x0011, t01=0x002a}
0x1acc…1aec Head {h00=0x001c, h01=0x0050, text=» ANK A1,/FF CHECK IF NVL«, t00=0x0011, t01=0x0042}
0x1aec…1b12 Head {h00=0x0022, h01=0x0050, text=» RF(Z) RETURN RETURN IF NO NVL«, t00=0x0011, t01=0x0062}
0x1b12…1b38 Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTTAB,A6 TTAB ADDRESS «, t00=0x0011, t01=0x0088}
0x1b38…1b4a Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0011, t01=0x00ae}
0x1b4a…1b70 Head {h00=0x0022, h01=0x0050, text=» LDKL A3,NVLTAB NVLTAB ADDRESS«, t00=0x0011, t01=0x00c0}
0x1b70…1b7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00e6}
0x1b7a…1b92 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0011, t01=0x00f0}
0x1b92…1b9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0108}
0x1b9c…1ba6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0112}
0x1ba6…1bba Head {h00=0x0010, h01=0x0050, text=»NVL:10 EQU *«, t00=0x0011, t01=0x011c}
0x1bba…1bee Head {h00=0x0030, h01=0x0050, text=» CWK A3,NVLEND CHECK IF END OF TABLE REACHED«, t00=0x0011, t01=0x0130}
0x1bee…1c12 Head {h00=0x0020, h01=0x0050, text=» RF(E) NVL:20 END OF NVLTAB «, t00=0x0011, t01=0x0164}
0x1c12…1c38 Head {h00=0x0022, h01=0x0050, text=» CWR* A4,A3 CHECK TTAB ADDRESS«, t00=0x0011, t01=0x0188}
0x1c38…1c60 Head {h00=0x0024, h01=0x0050, text=» RF(E) NVL:20 NVL FOR THIS TASK «, t00=0x0012, t01=0x001e}
0x1c60…1c84 Head {h00=0x0020, h01=0x0050, text=» SLL A1,1 SHIFT NVL BIT MASK«, t00=0x0012, t01=0x0046}
0x1c84…1cb2 Head {h00=0x002a, h01=0x0050, text=» ADK A3,2 POINT TO NEXT TTAB IN NVLTAB«, t00=0x0012, t01=0x006a}
0x1cb2…1cc4 Head {h00=0x000e, h01=0x0050, text=» RB NVL:10«, t00=0x0012, t01=0x0098}
0x1cc4…1cce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00aa}
0x1cce…1ce2 Head {h00=0x0010, h01=0x0050, text=»NVL:20 EQU *«, t00=0x0012, t01=0x00b4}
0x1ce2…1d16 Head {h00=0x0030, h01=0x0050, text=» AN A1,DWTNVL,A2 CHECK IF NVL FOR THIS TASK «, t00=0x0012, t01=0x00c8}
0x1d16…1d40 Head {h00=0x0026, h01=0x0050, text=» RF(Z) RETURN NO NVL FOR THIS TASK«, t00=0x0012, t01=0x00fc}
0x1d40…1d68 Head {h00=0x0024, h01=0x0050, text=» XRS A1,DWTNVL,A2 RESET NVL BIT «, t00=0x0012, t01=0x0126}
0x1d68…1d88 Head {h00=0x001c, h01=0x0050, text=» LDK A1,/20 RETURN CODE «, t00=0x0012, t01=0x014e}
0x1d88…1d92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x016e}
0x1d92…1daa Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0012, t01=0x0178}
0x1daa…1db4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0190}
0x1db4…1dbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000a}
0x1dbe…1de6 Head {h00=0x0024, h01=0x0050, text=»RETURN EQU * COMMON RETURN LABEL«, t00=0x0013, t01=0x0014}
0x1de6…1dfc Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0013, t01=0x003c}
0x1dfc…1e32 Head {h00=0x0032, h01=0x0050, text=» ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS «, t00=0x0013, t01=0x0052}
0x1e32…1e3e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0088}
0x1e3e…1e48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0094}
0x1e48…1e5e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0013, t01=0x009e}
0x1e5e…1e6e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0013, t01=0x00b4}
0x1e6e…1e7a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x00c4}
0x1e7a…1e84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d0}
0x1e84…1e9c Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0013, t01=0x00da}
0x1e9c…1ea6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00f2}
0x1ea6…1eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00fc}
0x1eb0…1ec2 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0013, t01=0x0106}
0x1ec2…1ed4 Head {h00=0x000e, h01=0x0050, text=»* VOLGET *«, t00=0x0013, t01=0x0118}
0x1ed4…1ee6 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0013, t01=0x012a}
0x1ee6…1ef0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x013c}
0x1ef0…1efa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0146}
0x1efa…1f34 Head {h00=0x0036, h01=0x0050, text=»* VOLGET WILL READ VOLUME NAME FROM DISC BUFFER «, t00=0x0013, t01=0x0150}
0x1f34…1f78 Head {h00=0x0040, h01=0x0050, text=»* TO DISC DWT AND CHECK IF THERE IS A NEW VOLUME MOUNTED. «, t00=0x0013, t01=0x018a}
0x1f78…1f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x003e}
0x1f82…1fae Head {h00=0x0028, h01=0x0050, text=»* INPUT: A2 = DISC BUFFER ADDRESS«, t00=0x0014, t01=0x0048}
0x1fae…1fe4 Head {h00=0x0032, h01=0x0050, text=»* A3 = FILE CODE (FOR DRIVE WITH INDEX = 0)«, t00=0x0014, t01=0x0074}
0x1fe4…2018 Head {h00=0x0030, h01=0x0050, text=»* BIT 0 SET MEANS TEST STATUS ORDER «, t00=0x0014, t01=0x00aa}
0x2018…203c Head {h00=0x0020, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0014, t01=0x00de}
0x203c…2046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0102}
0x2046…207a Head {h00=0x0030, h01=0x0050, text=»* OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX «, t00=0x0014, t01=0x010c}
0x207a…20a8 Head {h00=0x002a, h01=0x0050, text=»* A1-A3, A7-A8 ARE DESTROYED«, t00=0x0014, t01=0x0140}
0x20a8…20b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x016e}
0x20b2…20bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0178}
0x20bc…20d0 Head {h00=0x0010, h01=0x0050, text=»VOLGET EQU *«, t00=0x0014, t01=0x0182}
0x20d0…20fe Head {h00=0x002a, h01=0x0050, text=» CF A15,VOLADR DWT VOLUME NAME ADDRESS«, t00=0x0015, t01=0x0008}
0x20fe…211e Head {h00=0x001c, h01=0x0050, text=» LDK A7,0 RESET NVL FLAG«, t00=0x0015, t01=0x0036}
0x211e…2128 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0056}
0x2128…213c Head {h00=0x0010, h01=0x0050, text=»VGET10 EQU *«, t00=0x0015, t01=0x0060}
0x213c…216c Head {h00=0x002c, h01=0x0050, text=» LDR* A8,A2 ONE WORD OF NEW VOLUME NAME «, t00=0x0015, t01=0x0074}
0x216c…219c Head {h00=0x002c, h01=0x0050, text=» CWR* A8,A1 COMPARE WITH OLD VOLUME NAME«, t00=0x0015, t01=0x00a4}
0x219c…21b2 Head {h00=0x0012, h01=0x0050, text=» RF(E) VGET20 «, t00=0x0015, t01=0x00d4}
0x21b2…21d0 Head {h00=0x001a, h01=0x0050, text=» LDK A7,1 SET NVL FLAG«, t00=0x0015, t01=0x00ea}
0x21d0…21f8 Head {h00=0x0024, h01=0x0050, text=» STR A8,A1 STORE NEW VOLUME NAME«, t00=0x0015, t01=0x0108}
0x21f8…2202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0130}
0x2202…221a Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0015, t01=0x013a}
0x221a…2224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0152}
0x2224…222e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x015c}
0x222e…2242 Head {h00=0x0010, h01=0x0050, text=»VGET20 EQU *«, t00=0x0015, t01=0x0166}
0x2242…226e Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT BUFFER POINTERS «, t00=0x0015, t01=0x017a}
0x226e…2280 Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x0016, t01=0x0016}
0x2280…22a8 Head {h00=0x0024, h01=0x0050, text=» SUK A4,2 DECREMENT LOOP COUNTER«, t00=0x0016, t01=0x0028}
0x22a8…22be Head {h00=0x0012, h01=0x0050, text=» RB(P) VGET10 «, t00=0x0016, t01=0x0050}
0x22be…22d4 Head {h00=0x0012, h01=0x0050, text=» CF A15,INXDWT«, t00=0x0016, t01=0x0066}
0x22d4…22f4 Head {h00=0x001c, h01=0x0050, text=» ADK A7,0 CHECK NVL FLAG«, t00=0x0016, t01=0x007c}
0x22f4…231a Head {h00=0x0022, h01=0x0050, text=» RB(Z) RETURN RETURN IF NO NVL«, t00=0x0016, t01=0x009c}
0x231a…234c Head {h00=0x002e, h01=0x0050, text=» SLA A3,1 CHECK IF TEST STATUS OR RECOVERY«, t00=0x0016, t01=0x00c2}
0x234c…2376 Head {h00=0x0026, h01=0x0050, text=» RB(O) RETURN TEST STATUS, NO NVL «, t00=0x0016, t01=0x00f4}
0x2376…23a2 Head {h00=0x0028, h01=0x0050, text=» SRA A3,1 FILE CODE WITHOUT SIGN BIT«, t00=0x0016, t01=0x011e}
0x23a2…23c4 Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTNVL,A4 NVL FLAGS«, t00=0x0016, t01=0x014a}
0x23c4…23fa Head {h00=0x0032, h01=0x0050, text=» RB(N) RETURN NO REQUESTS SO FAR ON THIS DISC «, t00=0x0016, t01=0x016c}
0x23fa…240c Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x0017, t01=0x0012}
0x240c…2434 Head {h00=0x0024, h01=0x0050, text=» RB(N) RETURN FIXED DISC, NO NVL«, t00=0x0017, t01=0x0024}
0x2434…243e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x004c}
0x243e…2456 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0017, t01=0x0056}
0x2456…2460 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x006e}
0x2460…246a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0078}
0x246a…247c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0017, t01=0x0082}
0x247c…248e Head {h00=0x000e, h01=0x0050, text=»* NEWVOL *«, t00=0x0017, t01=0x0094}
0x248e…24a0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0017, t01=0x00a6}
0x24a0…24aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b8}
0x24aa…24b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00c2}
0x24b4…24f6 Head {h00=0x003e, h01=0x0050, text=»* NEWVOL IS ENTERED FROM THE ROUTINE VOLGET WHEN IT HAS «, t00=0x0017, t01=0x00cc}
0x24f6…252e Head {h00=0x0034, h01=0x0050, text=»* DETECTED THAT A NEW VOLUME HAS BEEN MOUNTED.«, t00=0x0017, t01=0x010e}
0x252e…2568 Head {h00=0x0036, h01=0x0050, text=»* THE NEW VOLUME LOADED FLAG IS THEN SET BY THIS«, t00=0x0017, t01=0x0146}
0x2568…25a2 Head {h00=0x0036, h01=0x0050, text=»* ROUTINE FOR THE CONCERNED FILE CODE AND FILES «, t00=0x0017, t01=0x0180}
0x25a2…25de Head {h00=0x0038, h01=0x0050, text=»* OPENED ON THAT VOLUME. TASKS REPRESENTED IN THE «, t00=0x0018, t01=0x002a}
0x25de…2616 Head {h00=0x0034, h01=0x0050, text=»* TABLE NVLTAB WILL GET RETURN CODE /20 AT THE«, t00=0x0018, t01=0x0066}
0x2616…2642 Head {h00=0x0028, h01=0x0050, text=»* NEXT REQUEST ON THAT FILE CODE. «, t00=0x0018, t01=0x009e}
0x2642…264c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ca}
0x264c…2684 Head {h00=0x0034, h01=0x0050, text=»* INPUT: A3 = FILE CODE (DISC ONE FOR DRIVER)«, t00=0x0018, t01=0x00d4}
0x2684…26b0 Head {h00=0x0028, h01=0x0050, text=»* A4 = DWT ADDRESS + DOUBLE INDEX«, t00=0x0018, t01=0x010c}
0x26b0…26d4 Head {h00=0x0020, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0018, t01=0x0138}
0x26d4…26de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x015c}
0x26de…2708 Head {h00=0x0026, h01=0x0050, text=»* OUTPUT: A3 = ACTUAL FILE CODE «, t00=0x0018, t01=0x0166}
0x2708…2728 Head {h00=0x001c, h01=0x0050, text=»* A1-A2 ARE DESTROYED«, t00=0x0018, t01=0x0190}
0x2728…2732 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0020}
0x2732…2746 Head {h00=0x0010, h01=0x0050, text=»NEWVOL EQU *«, t00=0x0019, t01=0x002a}
0x2746…2768 Head {h00=0x001e, h01=0x0050, text=» LD A2,NVLBIT NVL BIT MASK«, t00=0x0019, t01=0x003e}
0x2768…279c Head {h00=0x0030, h01=0x0050, text=» ST A2,DWTNVL,A4 INDICATE NEW VOLUME LOADED «, t00=0x0019, t01=0x0060}
0x279c…27ba Head {h00=0x001a, h01=0x0050, text=» LC A2,DWTOR,A6 INDEX «, t00=0x0019, t01=0x0094}
0x27ba…27cc Head {h00=0x000e, h01=0x0050, text=» ANK A2,/3«, t00=0x0019, t01=0x00b2}
0x27cc…27f0 Head {h00=0x0020, h01=0x0050, text=» ADR A3,A2 ACTUAL FILE CODE «, t00=0x0019, t01=0x00c4}
0x27f0…27fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00e8}
0x27fa…2812 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x0019, t01=0x00f2}
0x2812…281c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x010a}
0x281c…2826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0114}
0x2826…283c Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=0 «, t00=0x0019, t01=0x011e}
0x283c…284e Head {h00=0x000e, h01=0x0050, text=» RB RETURN«, t00=0x0019, t01=0x0134}
0x284e…285a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0146}
0x285a…2864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0152}
0x2864…287a Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=1 «, t00=0x0019, t01=0x015c}
0x287a…28a8 Head {h00=0x002a, h01=0x0050, text=» LDKL A1,SCTFWT ADDRESS TO FWT POINTER«, t00=0x0019, t01=0x0172}
0x28a8…28b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0010}
0x28b2…28f4 Head {h00=0x003e, h01=0x0050, text=»* SET NEW VOLUME LOADED FOR ALL FILES ON CONCERNED VOLUME «, t00=0x001a, t01=0x001a}
0x28f4…28fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x005c}
0x28fe…2912 Head {h00=0x0010, h01=0x0050, text=»NEW:10 EQU *«, t00=0x001a, t01=0x0066}
0x2912…2936 Head {h00=0x0020, h01=0x0050, text=» LDR* A2,A1 NEXT FWT ADDRESS«, t00=0x001a, t01=0x007a}
0x2936…295a Head {h00=0x0020, h01=0x0050, text=» RB(Z) RETURN NO MORE FWT:S «, t00=0x001a, t01=0x009e}
0x295a…297e Head {h00=0x0020, h01=0x0050, text=» LDR A1,A2 SAVE FWT ADDRESS «, t00=0x001a, t01=0x00c2}
0x297e…29b4 Head {h00=0x0032, h01=0x0050, text=» ADKL A2,FWTEW1 ADDRESS TO FIRST EWT STRUCTURE«, t00=0x001a, t01=0x00e6}
0x29b4…29be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x011c}
0x29be…29d2 Head {h00=0x0010, h01=0x0050, text=»NEW:20 EQU *«, t00=0x001a, t01=0x0126}
0x29d2…29fe Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A2 ADDRESS TO 2ND EWT BLOCK«, t00=0x001a, t01=0x013a}
0x29fe…2a26 Head {h00=0x0024, h01=0x0050, text=» CC A3,EWTVOL,A2 CHECK FILE CODE«, t00=0x001a, t01=0x0166}
0x2a26…2a3c Head {h00=0x0012, h01=0x0050, text=» RF(NE) NEW:30«, t00=0x001a, t01=0x018e}
0x2a3c…2a5a Head {h00=0x001a, h01=0x0050, text=» LDKL A2,/8000 NVL BIT«, t00=0x001b, t01=0x0014}
0x2a5a…2a8e Head {h00=0x0030, h01=0x0050, text=» ORS A2,FWTPAR,A1 INDICATE NEW VOLUME LOADED«, t00=0x001b, t01=0x0032}
0x2a8e…2aa0 Head {h00=0x000e, h01=0x0050, text=» RB NEW:10«, t00=0x001b, t01=0x0066}
0x2aa0…2aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0078}
0x2aaa…2abe Head {h00=0x0010, h01=0x0050, text=»NEW:30 EQU *«, t00=0x001b, t01=0x0082}
0x2abe…2af0 Head {h00=0x002e, h01=0x0050, text=» LDR* A2,A2 ADDRESS TO NEXT EWT STRUCTURE «, t00=0x001b, t01=0x0096}
0x2af0…2b20 Head {h00=0x002c, h01=0x0050, text=» RB(Z) NEW:10 END OF THIS EWT STRUCTURE «, t00=0x001b, t01=0x00c8}
0x2b20…2b4c Head {h00=0x0028, h01=0x0050, text=» RB NEW:20 CONTINUE WITH NEXT EXTENT«, t00=0x001b, t01=0x00f8}
0x2b4c…2b58 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0124}
0x2b58…2b62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0130}
0x2b62…2b7a Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x001b, t01=0x013a}
0x2b7a…2b84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0152}
0x2b84…2b8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x015c}
0x2b8e…2ba0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001b, t01=0x0166}
0x2ba0…2bb2 Head {h00=0x000e, h01=0x0050, text=»* INXDWT *«, t00=0x001b, t01=0x0178}
0x2bb2…2bc4 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001b, t01=0x018a}
0x2bc4…2bce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x000c}
0x2bce…2bd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0016}
0x2bd8…2c24 Head {h00=0x0048, h01=0x0050, text=»* INXDWT WILL COMPUTE THE DWT ADDRESS ADDED TO THE DOUBLED INDEX. «, t00=0x001c, t01=0x0020}
0x2c24…2c2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x006c}
0x2c2e…2c52 Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = DWT ADDRESS«, t00=0x001c, t01=0x0076}
0x2c52…2c5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x009a}
0x2c5c…2c90 Head {h00=0x0030, h01=0x0050, text=»* OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX «, t00=0x001c, t01=0x00a4}
0x2c90…2cbe Head {h00=0x002a, h01=0x0050, text=»* NO REGISTERS ARE DESTROYED«, t00=0x001c, t01=0x00d8}
0x2cbe…2cc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0106}
0x2cc8…2cdc Head {h00=0x0010, h01=0x0050, text=»INXDWT EQU *«, t00=0x001c, t01=0x0110}
0x2cdc…2cfa Head {h00=0x001a, h01=0x0050, text=» LC A4,DWTOR,A6 INDEX «, t00=0x001c, t01=0x0124}
0x2cfa…2d0c Head {h00=0x000e, h01=0x0050, text=» ANK A4,/3«, t00=0x001c, t01=0x0142}
0x2d0c…2d2c Head {h00=0x001c, h01=0x0050, text=» ADR A4,A4 DOUBLE INDEX «, t00=0x001c, t01=0x0154}
0x2d2c…2d3e Head {h00=0x000e, h01=0x0050, text=» ADR A4,A6«, t00=0x001c, t01=0x0174}
0x2d3e…2d50 Head {h00=0x000e, h01=0x0050, text=» RB RETURN«, t00=0x001c, t01=0x0186}
0x2d50…2d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0008}
0x2d5a…2d72 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x001d, t01=0x0012}
0x2d72…2d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x002a}
0x2d7c…2d86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0034}
0x2d86…2d98 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x003e}
0x2d98…2daa Head {h00=0x000e, h01=0x0050, text=»* NVLTAB *«, t00=0x001d, t01=0x0050}
0x2daa…2dbc Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001d, t01=0x0062}
0x2dbc…2dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0074}
0x2dc6…2dd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x007e}
0x2dd0…2e08 Head {h00=0x0034, h01=0x0050, text=»* NVLTAB HOLDS THE TTAB ADDRESSES OF THE TASKS«, t00=0x001d, t01=0x0088}
0x2e08…2e42 Head {h00=0x0036, h01=0x0050, text=»* THAT WILL RECEIVE NEW VOLUME LOADED WHEN A NEW«, t00=0x001d, t01=0x00c0}
0x2e42…2e66 Head {h00=0x0020, h01=0x0050, text=»* VOLUME HAS BEEN MOUNTED.«, t00=0x001d, t01=0x00fa}
0x2e66…2e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x011e}
0x2e70…2e84 Head {h00=0x0010, h01=0x0050, text=»NVLTAB EQU *«, t00=0x001d, t01=0x0128}
0x2e84…2e9a Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=1 «, t00=0x001d, t01=0x013c}
0x2e9a…2eba Head {h00=0x001c, h01=0x0050, text=» DATA TTABFM FMTASK TTAB«, t00=0x001d, t01=0x0152}
0x2eba…2ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0172}
0x2ec4…2ee0 Head {h00=0x0018, h01=0x0050, text=» IFF DSKPAG+SWPBLK=0«, t00=0x001d, t01=0x017c}
0x2ee0…2f00 Head {h00=0x001c, h01=0x0050, text=» DATA TTABLD LDTASK TTAB«, t00=0x001e, t01=0x0008}
0x2f00…2f0c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0028}
0x2f0c…2f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0034}
0x2f16…2f2a Head {h00=0x0010, h01=0x0050, text=»NVLDMT EQU *«, t00=0x001e, t01=0x003e}
0x2f2a…2f40 Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=1 «, t00=0x001e, t01=0x0052}
0x2f40…2f56 Head {h00=0x0012, h01=0x0050, text=» IFT DATMAN=1 «, t00=0x001e, t01=0x0068}
0x2f56…2f6e Head {h00=0x0014, h01=0x0050, text=» DATA 0 TTAB #D «, t00=0x001e, t01=0x007e}
0x2f6e…2f86 Head {h00=0x0014, h01=0x0050, text=» DATA 0 TTAB #E «, t00=0x001e, t01=0x0096}
0x2f86…2f9e Head {h00=0x0014, h01=0x0050, text=» DATA 0 TTAB #F «, t00=0x001e, t01=0x00ae}
0x2f9e…2fb6 Head {h00=0x0014, h01=0x0050, text=» DATA 0 TTAB #G «, t00=0x001e, t01=0x00c6}
0x2fb6…2fc2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00de}
0x2fc2…2fcc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00ea}
0x2fcc…2fe2 Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=1 «, t00=0x001e, t01=0x00f4}
0x2fe2…2ff6 Head {h00=0x0010, h01=0x0050, text=»NVLEND EQU *«, t00=0x001e, t01=0x010a}
0x2ff6…3000 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x011e}
0x3000…3022 Head {h00=0x001e, h01=0x0050, text=»NVLBIT DATA 0 NVL BIT MASK«, t00=0x001e, t01=0x0128}
0x3022…302e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x014a}
0x302e…3038 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0156}
0x3038…3050 Head {h00=0x0014, h01=0x0050, text=» EJECT DSKSUB «, t00=0x001e, t01=0x0160}
0x3050…305a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0178}
0x305a…3064 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0182}
0x3064…307a Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=0 «, t00=0x001e, t01=0x018c}
0x307a…3096 Head {h00=0x0018, h01=0x0050, text=» IFF DSKPAG+SWPBLK=0«, t00=0x001f, t01=0x0012}
0x3096…30b6 Head {h00=0x001c, h01=0x0050, text=» DATA TTABLD LDTASK TTAB«, t00=0x001f, t01=0x002e}
0x30b6…30c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x004e}
0x30c0…30d4 Head {h00=0x0010, h01=0x0050, text=»NVLEND EQU *«, t00=0x001f, t01=0x0058}
0x30d4…30de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x006c}
0x30de…3100 Head {h00=0x001e, h01=0x0050, text=»NVLBIT DATA 3 NVL BIT MASK«, t00=0x001f, t01=0x0076}
0x3100…310c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0098}
0x310c…3116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00a4}
0x3116…312c Head {h00=0x0012, h01=0x0050, text=» IFT FILMAN=0 «, t00=0x001f, t01=0x00ae}
0x312c…3148 Head {h00=0x0018, h01=0x0050, text=» IFT DSKPAG+SWPBLK=0«, t00=0x001f, t01=0x00c4}
0x3148…3152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e0}
0x3152…3166 Head {h00=0x0010, h01=0x0050, text=»NVLEND EQU *«, t00=0x001f, t01=0x00ea}
0x3166…3170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fe}
0x3170…3192 Head {h00=0x001e, h01=0x0050, text=»NVLBIT DATA 1 NVL BIT MASK«, t00=0x001f, t01=0x0108}
0x3192…319e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x012a}
0x319e…31a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0136}
0x31a8…31b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0140}
0x31b2…31bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x014a}
0x31bc…31c8 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x001f, t01=0x0154}
0x31c8…31cc Head {h00=0x4004, h01=0x0000}
0x31cc…31d0 00 1f 01 60 ┆ `┆
0x31d0…31d8 (32, 1, 8) 20 04 00 00 00 20 00 04 ┆ ┆