|
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: 17392 (0x43f0)
Notes: pts_type(SC)
Names: »TIOFM.SC«
└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
└─⟦this⟧ »TOSSWORK/TIOFM.SC«
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
└─⟦this⟧ »TOSSWORK/TIOFM.SC«
IDENT TIOFM REL 11.0 81-05-13 870105041100 * * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * * TIOFM = TOSS FILE MANAGEMENT LKM PROCESSOR * * * * * ************************************************** * * * TOSS FILE MANAGEMENT LKM PROCESSOR HANDLES * PREPARATIONS FOR DISC I/O, AND ACTIVATION OF * THE FILE MANAGEMENT TASK (FMTASK) FOR FILE * ADMINISTRATION FUNCTIONS. * * EJECT TIOFM * * *********** * ENTRIES * *********** * * ENTRY TIOFM TOSS FILE MANAGEMENT LKM PROCESSOR ENTRY DET:FM FILE MANAGEMENT DETACH ENTRY FCHECK CHECK ACCESS PAR. AND RETURN FWT ADDRESS ENTRY FCHEC2 FCHECK 2ND ENTRY EJECT TIOFM * * ************* * EXTERNALS * ************* * * EXTRN FMTASK FMTASK ACTIVATION ADDRESS EXTRN TTABFM FMTASK TTAB EXTRN QUEDEV QUEUE REQUEST IN DEVICE QUEUE EXTRN QUEFIL QUEUE FILE REQUEST IN DEVICE QUEUE EXTRN TIO:FM FM ENTRY IN TIO EXTRN ACTDIS ACTIVATE TASK AND DISPATCH EXTRN FNDDWD FIND DWT ADDRESS EXTRN QTJOB QUEUE TASK FOR DISPATCHING EXTRN GETBLK GET MONITOR BLOCK EXTRN TIOERR ERROR: QUEUE TASK AND DISPATCH EXTRN SCTFWT FWT CHAIN START ADDRESS EXTRN SCTNOF NUMBER OF FILES EXTRN FWTVTC VTOC SECTOR NO (FIRST EXTENT) EXTRN FWTPAR FILE ACCESS PARAMETERS EXTRN FWTTAB TTAB FOR TASK WITH ATTACH EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT EXTRN FWTQUE QUEUE ANCHOR FOR FILE I/O REQUESTS EXTRN EWTEXL EXTENT LENGTH EXTRN EWTEXB EXTENT BASE EXTRN EWTVOL VOLUME FILE CODE EXTRN ECBRL ECB REQUESTED LENGTH EXTRN ECBCW1 ECB CONTROL WORD 1 EXTRN ECBCW2 ECB CONTROL WORD 2 EXTRN DWTST DWT STATUS WORD EJECT TIOFM * * **************************************** * * CONDITIONAL ASSEMBLY * **************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * * * THE ATTACH/DETACH FILE FUNCTION * IS OBTAINED BY SETTING ATTDET EQU 1. * ATTDET EQU 1 X:A EQU ATTDET * * * THE MULTIPLE EXTENT I/O FUNCTION * IS OBTAINED BY SETTING MULEXT EQU 1. * MULEXT EQU 1 X:B EQU MULEXT * EJECT TIOFM * * ********* * TIOFM * ********* * * * THIS IS THE TOSS FILE MANAGEMENT LKM PROCESSOR. * * IT IS ENTERED FROM THE LKM HANDLER * WITH THE FOLLOWING PARAMETERS: * * A4 = 0 * A5 = TTAB ADDRESS * A7 = ORDER CODE * A8 = ECB ADDRESS * * WHEN FILE ADMINISTRATION IS REQUESTED, * TIOFM WILL ACTIVATE THE FMTASK. * * WHEN I/O FUNCTION IS REQUESTED, TIOFM * WILL PREPARE FOR DISC I/O. THE I/O WILL * THEN RUN THE NORMAL WAY VIA TIO-DRIVER-TENDIO. * * EJECT TIOFM * * TIOFM EQU * FILE MANAGEMENT LKM PROCESSOR ENTRY * * CHECK ORDER CODE * LDR A2,A7 ORDER CODE ANK A2,/FF SKIP OPTION XRK A2,/80 WAIT BIT SUK A2,/01 RF(Z) FM:IO BASIC READ SUK A2,/03-/01 RF(Z) FMACT3 READ FILE PARAMETERS SUK A2,/05-/03 RF(Z) FM:IO BASIC WRITE SUK A2,/11-/05 RF(Z) FM:IO PHYSICAL READ SUK A2,/15-/11 RF(Z) FM:IO PHYSICAL WRITE SUK A2,/21-/15 RF(Z) FMACT2 OPEN/CREATE/EXTEND SUK A2,/22-/21 RF(Z) FMACT1 CLOSE/DELETE * IFT ATTDET=1 SUK A2,/3B-/22 RF(Z) ATTACH ATTACH SUK A2,/3C-/3B XIF * RF(NZ) FM:RQE REQUEST ERROR IF NOT DETACH * EJECT TIOFM * IFT ATTDET=1 * ********** * DETACH * ********** * * DETACH FILE * DETACH EQU * CF A15,FCHECK FIND FWT AND CHECK ACCESS PARAMETERS RF(NZ) T:DISP ERROR, RETURN CF A15,DET:FM DETACH FILE LDR A10,A10 CHECK IF FILE WAS ATTACHED RF(NZ) T:DISP YES, GO TO DISPATCHER XIF * * ERROR EXIT * FM:RQE EQU * FILE MANAGEMENT REQUEST ERROR EXIT LDK A3,/80 RETURN CODE * FM:ER1 EQU * ECR A3,A3 RF T:DIS2 * EJECT TIOFM * IFT ATTDET=1 * ********** * ATTACH * ********** * * ATTACH FILE * ATTACH EQU * CF A15,FCHECK FIND FWT AND CHECK ACCESS PARAMETERS RF(NZ) FM:030 NOT OK ST A5,FWTTAB,A6 SET ATTACH WORD XIF * T:DISP EQU * LDR A3,A4 RETURN CODE * T:DIS2 EQU * ABL TIOERR SET RETURN CODE, QUEUE TASK AND DISP. * EJECT TIOFM * * ********** * FMACTX * ********** * * * FILE ADMINISTRATION REQUESTED. * * ACTIVATE FMTASK WITH THE FOLLOWING PARAMETERS: * * A1 = ORDER CODE AND OPTION (RFP/OPEN/CLOSE) * = PARAMETER BLOCK ADDRESS (SPLIT I/O) * A3 = TTAB ADDRESS OF CALLING TASK * A4 = FUNCTION INDEX (0 = RFP, 2 = OPEN, 4 = CLOSE, 6 = SPLIT I/O) * FMACT1 EQU * ACTIVATE CLOSE FUNCTION ADK A4,2 FUNCTION INDEX * FMACT2 EQU * ACTIVATE OPEN FUNCTION ADK A4,2 FUNCTION INDEX * FMACT3 EQU * ACTIVATE READ FILE PARAMETERS FUNCTION ECR A1,A7 ORDER CODE AND OPTION * FMACT4 EQU * ACTIVATE SPLIT I/O FUNCTION LDKL A2,FMTASK DISPATCH ADDRESS LDR A3,A5 TTAB ADDRESS OF CALLING TASK LDKL A5,TTABFM FMTASK TTAB ADDRESS ABL ACTDIS ACTIVATE FMTASK AND DISPATCH * EJECT TIOFM * * ********** * FM I/O * ********** * * FILE MANAGEMENT I/O FUNCTIONS * FM:IO EQU * BASIC AND PHYSICAL READ/WRITE CF A15,FCHECK FIND FWT AND CHECK ACCESS PARAMETERS * IFT ATTDET=1 RF(Z) FM:050 OK * FM:030 EQU * CWK A4,/40 RB(NE) T:DISP ERROR, RETURN * * FILE ATTACHED, QUEUE REQUEST * ADKL A6,FWTQUE QUEUE ANCHOR ADDRESS LDK A4,0 NO ACT LABEL AT LKM ABL QUEFIL QUEUE REQUEST AND GO TO TDISP XIF * IFT ATTDET=0 RB(NZ) FM:RQE ERROR XIF * EJECT TIOFM * * CHECK RELATIVE SECTOR NUMBER * FM:050 EQU * IFT MMUPAG=0 IFT CPU852=1 LD A2,ECBCW2,A8 RELATIVE SECTOR NUMBER LD A1,ECBCW1,A8 XIF * IFT MMUPAG=0 IFT CPU852=0 ML 2,ECBCW1,A8 RELATIVE SECTOR NUMBER XIF * IFT MMUPAG=1 EL A2,ECBCW2,A8 RELATIVE SECTOR NUMBER EL A1,ECBCW1,A8 XIF * RF(NZ) FM:060 ADK A2,0 RF(Z) FM:ER2 RELATIVE SECTOR NUMBER = 0 * FM:060 EQU * LDR A3,A6 FWT ADDRESS ECR A6,A1 ANK A6,/FF RF(NZ) FM:ER2 ILLEGAL RELATIVE SECTOR NUMBER LDR A9,A7 SAVE ORDER CODE ADKL A3,FWTEW1 ADDRESS TO 1ST EWT STRUCTURE LDKL A14,/7FFF * EJECT TIOFM * * SEARCH THE FILE EXTENT THAT HOLDS * THE REQUESTED SECTORS * FM:070 EQU * LC A6,EWTEXL-1,A3 FILE EXTENT LENGTH LD A7,EWTEXL,A3 CWR A1,A6 CHECK EXTENT LENGTH RF(L) FM:100 EXTENT FOUND RF(G) FM:080 EXTENT NOT FOUND CWR A2,A7 RF(NG) FM:100 EXTENT FOUND * FM:080 EQU * IFT CPU852=0 DSR A6 SUBTRACT LENGTH FROM SECTOR NUMBER XIF * IFT CPU852=1 SUR A1,A6 SUBTRACT LENGTH FROM SECTOR NUMBER SUR A2,A7 RF(NN) FM:090 NOT UNDERFLOW SUK A1,1 UNDERFLOW CORRECTION ANR A2,A14 SKIP SIGN BIT XIF * FM:090 EQU * LDR* A3,A3 ADDRESS TO 2ND EWT BLOCK LDR* A3,A3 ADDRESS TO NEXT EWT STRUCTURE RB(NZ) FM:070 CHECK NEXT EXTENT * FM:ER2 EQU * FILE MANAGEMENT EXTENT ERROR EXIT LDK A3,/A0 RETURN CODE RB FM:ER1 RETURN * EJECT TIOFM * * EXTENT FOUND * FM:100 EQU * LDR* A4,A3 ADDRESS TO 2ND EWT BLOCK SUR A10,A10 LC A10,EWTEXB-1,A4 FILE EXTENT BASE LD A11,EWTEXB,A4 * IFT CPU852=0 DAR A10 COMPUTE SECTOR NUMBER DSK 0,1 XIF * IFT CPU852=1 ADR A1,A10 COMPUTE SECTOR NUMBER ADR A2,A11 RF(O) FM:140 OVERFLOW * FM:110 EQU * SUK A2,1 RF(NN) FM:115 NOT UNDERFLOW SUK A1,1 UNDERFLOW CORRECTION ANR A2,A14 SKIP SIGN BIT XIF * EJECT TIOFM * * FM:115 EQU * LDR A12,A1 SAVE SECTOR NUMBER LDR A13,A2 * IFT MMUPAG=0 LC A3,ECBRL,A8 REQUESTED LENGTH (SECTORS) ANK A3,/FF XIF * IFT MMUPAG=1 EL A3,ECBRL,A8 REQUESTED LENGTH (BYTES) SRL A3,8 SECTORS XIF * ADR A2,A3 COMPUTE LAST REQUESTED SECTOR+1 RF(O) FM:150 OVERFLOW * FM:120 EQU * ADR A6,A10 COMPUTE LAST SECTOR+1 IN EXTENT ADR A7,A11 RF(O) FM:160 OVERFLOW * FM:125 EQU * CWR A6,A1 RF(G) FM:130 ALL SECTORS WITHIN THIS EXTENT RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT CWR A7,A2 RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT * EJECT TIOFM * * PREPARE PARAMETERS FOR DISC I/O * * EXIT PARAMETERS: * * A2 = DISC INDEX (FROM FNDDWD) * A4 = 0 (INDICATES NO I/O-AND-ACTIVATION) * A5 = TTAB ADDRESS * A6 = DISC DWT ADDRESS (FROM FNDDWD) * A7 = ORDER CODE * A8 = ECB ADDRESS * FM:130 EQU * LC A2,EWTVOL,A4 FILE CODE DISC CF A15,FNDDWD FIND DISC DWT ADDRESS LDK A4,0 INDICATE NO I/O-AND-ACTIVATE LD A1,DWTST,A6 DWT STATUS ABL(NN) QUEDEV DISC BUSY, QUEUE REQUEST LDR A7,A9 RESTORE ORDER CODE * IFT MMUPAG=0 ST A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB ST A13,ECBCW2,A8 XIF * IFT MMUPAG=1 ES A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB ES A13,ECBCW2,A8 XIF * ABL TIO:FM BRANCH TO FM ENTRY IN TIO * EJECT TIOFM * * OVERFLOW CORRECTIONS FOR DOUBLE WORD ARITHMETICS * FM:140 EQU * IFT CPU852=1 ADK A1,1 ANR A2,A14 SKIP SIGN BIT RB FM:110 XIF * FM:150 EQU * ADK A1,1 ANR A2,A14 SKIP SIGN BIT RB FM:120 * FM:160 EQU * ADK A6,1 ANR A7,A14 SKIP SIGN BIT RB FM:125 * EJECT TIOFM * * REQUESTED SECTORS CONTINUE IN NEXT EXTENT. * * ACTIVATE FMTASK WITH THE FOLLOWING PARAMETERS: * * A1 = PARAMETER BLOCK ADDRESS * A3 = TTAB ADDRESS OF CALLING TASK * A4 = FUNCTION INDEX (=6) * FM:170 EQU * IFT MULEXT=1 IFT MMUPAG=0 ST A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB ST A13,ECBCW2,A8 XIF * IFT MULEXT=1 IFT MMUPAG=1 ES A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB ES A13,ECBCW2,A8 XIF * IFT MULEXT=1 SUR A7,A13 NO OF SECTORS IN FIRST I/O ANR A7,A14 SKIP SIGN BIT JUST IN CASE * * PREPARE PARAMETER BLOCKS FOR FMTASK * LDR A1,A9 ORDER CODE LDR A2,A4 2ND EWT BLOCK ECR A3,A7 NO OF BYTES IN FIRST I/O CF A15,GETBLK PARAMETER BLOCK LDR A1,A4 PARAMETER BLOCK ADDRESS LDK A4,6 FUNCTION INDEX FOR SPLIT I/O RB FMACT4 ACTIVATE FMTASK XIF * IFT MULEXT=0 RB FM:ER2 REQUEST ERROR XIF * EJECT TIOFM * * ********** * FCHECK * * FCHEC2 * ********** * * * FCHECK/FCHEC2 CONVERTS THE FILE NUMBER TO FWT * ADDRESS AND CHECKS THE ACCESS PARAMETERS. * * INPUT: A5 = TTAB ADDRESS * A7 = ORDER CODE * A8 = ECB ADDRESS (FCHECK ONLY) * A9 = ECB ADDRESS (FCHEC2 ONLY) * * OUTPUT: CR = 0 IF OK, ELSE * <> 0 IF ERROR * A4 = RETURN CODE * A6 = FWT ADDRESS (=0 IF REQUEST ERROR) * A7 = ORDER CODE (MODIFIED TO BASIC IF REQUESTED) * A9 = ECB ADDRESS * A2 IS DESTROYED * FCHECK EQU * FCHECK MAIN ENTRY LDR A9,A8 ECB ADDRESS * FCHEC2 EQU * FCHECK 2ND ENTRY IFT MMUPAG=0 LDR* A4,A9 FILE NUMBER XIF * IFT MMUPAG=1 ELR A4,A9 FILE NUMBER XIF * EJECT FMTASK * * CHECK FILE NUMBER AND FIND FWT * ADKL A15,4 ADJUST STACKPOINTER ANK A4,/FF RF(Z) FC:050 FILE NUMBER = 0 CW A4,SCTNOF RF(G) FC:050 FILE NUMBER TOO BIG LDKL A6,SCTFWT ADDRESS TO FWT CHAIN POINTER * FC:010 EQU * COMPUTE FWT ADDRESS LDR* A6,A6 NEXT FWT ADDRESS SUK A4,1 RB(P) FC:010 * * CHECK ACCESS PARAMETERS * ANKL A6,/FFFE CORRECT FWT ADDRESS JUST IN CASE LD A2,FWTVTC,A6 VTOC SECTOR NO (FIRST EXTENT) RF(Z) FC:050 FILE NOT OPENED LD A2,FWTPAR,A6 ACCESS PARAMETERS RF(N) FC:070 NEW VOLUME LOADED SLL A2,1 RF(NN) FC:020 PHYSICAL ORDERS ANK A7,/85 BASIC ORDER * FC:020 EQU * IFT ATTDET=1 LD A2,FWTTAB,A6 ATTACH WORD (TTAB ADDRESS) ABR(Z)* A15 NOT ATTACHED, RETURN CWR A2,A5 ATTACHED, CHECK IF THIS TASK RF(NE) FC:060 ATTACHED TO ANOTHER TASK XIF * IFT ATTDET=0 SUR A2,A2 SET CR = 0 XIF * ABR* A15 RETURN WITHOUT CHANGING CR * EJECT TIOFM * * ERROR RETURNS * FC:050 EQU * REQUEST ERROR EXIT LDKL A4,/7FC0 RETURN CODE = /8000 LDK A6,0 INDICATE NO FWT FOUND * FC:060 EQU * FILE ATTACHED EXIT ADK A4,/20 RETURN CODE = /40 * FC:070 EQU * NEW VOLUME LOADED EXIT ADK A4,/20 RETURN CODE = /20 ABR* A15 RETURN WITHOUT CHANGING CR * EJECT TIOFM * * ********** * DET:FM * ********** * * INPUT: A6 = FWT ADDRESS * * OUTPUT:A10 = TTAB ADDRESS OF ATTACHED TASK * A1 IS DESTROYED * DET:FM EQU * DETACH FILE IFT ATTDET=1 LD A10,FWTTAB,A6 TTAB ADDRESS OF ATTACHED TASK RF(Z) DET:30 NOT ATTACHED LD A5,FWTQUE,A6 QUEUE ANCHOR FOR FILE I/O REQUESTS RF(Z) DET:20 NO MORE TASKS IN QUEUE * * REPEAT ALL QUEUED REQUESTS FOR THIS FILE * DET:10 EQU * LDR* A1,A5 SAVE NEXT TTAB ADDRESS CF A15,QTJOB QUEUE TASK FOR DISPATCHING LDR A5,A1 RESTORE NEXT TTAB ADDRESS RB(NZ) DET:10 CM FWTQUE,A6 RESET QUEUE ANCHOR * DET:20 EQU * LDR A5,A10 RESTORE TTAB ADDRESS CM FWTTAB,A6 RESET ATTACH WORD * DET:30 EQU * RTN A15 XIF * END
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT TIOFM REL 11.0 81-05-13 870105041100«, t00=0x0000, t01=0x0004}
0x0034…003c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0040}
0x0046…0050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004a}
0x0050…008a Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0054}
0x008a…0094 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008e}
0x0094…00ce Head {h00=0x0036, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS *«, t00=0x0000, t01=0x0098}
0x00ce…00d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d2}
0x00d8…0112 Head {h00=0x0036, h01=0x0050, text=»* TIOFM = TOSS FILE MANAGEMENT LKM PROCESSOR *«, t00=0x0000, t01=0x00dc}
0x0112…011c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0116}
0x011c…0126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…0130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012a}
0x0130…013a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0134}
0x013a…0174 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x013e}
0x0174…017e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0178}
0x017e…0188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0182}
0x0188…01be Head {h00=0x0032, h01=0x0050, text=»* TOSS FILE MANAGEMENT LKM PROCESSOR HANDLES«, t00=0x0000, t01=0x018c}
0x01be…01f6 Head {h00=0x0034, h01=0x0050, text=»* PREPARATIONS FOR DISC I/O, AND ACTIVATION OF«, t00=0x0001, t01=0x0032}
0x01f6…022c Head {h00=0x0032, h01=0x0050, text=»* THE FILE MANAGEMENT TASK (FMTASK) FOR FILE«, t00=0x0001, t01=0x006a}
0x022c…0252 Head {h00=0x0022, h01=0x0050, text=»* ADMINISTRATION FUNCTIONS. «, t00=0x0001, t01=0x00a0}
0x0252…025c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c6}
0x025c…0266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d0}
0x0266…027c Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0001, t01=0x00da}
0x027c…0286 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f0}
0x0286…0290 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fa}
0x0290…02a4 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x0104}
0x02a4…02b8 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x0118}
0x02b8…02cc Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x012c}
0x02cc…02d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0140}
0x02d6…02e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x02e0…0318 Head {h00=0x0034, h01=0x0050, text=» ENTRY TIOFM TOSS FILE MANAGEMENT LKM PROCESSOR «, t00=0x0001, t01=0x0154}
0x0318…0344 Head {h00=0x0028, h01=0x0050, text=» ENTRY DET:FM FILE MANAGEMENT DETACH«, t00=0x0001, t01=0x018c}
0x0344…0382 Head {h00=0x003a, h01=0x0050, text=» ENTRY FCHECK CHECK ACCESS PAR. AND RETURN FWT ADDRESS«, t00=0x0002, t01=0x0028}
0x0382…03a8 Head {h00=0x0022, h01=0x0050, text=» ENTRY FCHEC2 FCHECK 2ND ENTRY«, t00=0x0002, t01=0x0066}
0x03a8…03be Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0002, t01=0x008c}
0x03be…03c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a2}
0x03c8…03d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ac}
0x03d2…03e8 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x00b6}
0x03e8…03fe Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x00cc}
0x03fe…0414 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x00e2}
0x0414…041e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00f8}
0x041e…0428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0102}
0x0428…0458 Head {h00=0x002c, h01=0x0050, text=» EXTRN FMTASK FMTASK ACTIVATION ADDRESS «, t00=0x0002, t01=0x010c}
0x0458…047a Head {h00=0x001e, h01=0x0050, text=» EXTRN TTABFM FMTASK TTAB «, t00=0x0002, t01=0x013c}
0x047a…04ae Head {h00=0x0030, h01=0x0050, text=» EXTRN QUEDEV QUEUE REQUEST IN DEVICE QUEUE «, t00=0x0002, t01=0x015e}
0x04ae…04e6 (3, 0, 400) Head {h00=0x0034, h01=0x0050, text=» EXTRN QUEFIL QUEUE FILE REQUEST IN DEVICE QUEUE«, t00=0x0003, t01=0x0004}
0x04e6…050c Head {h00=0x0022, h01=0x0050, text=» EXTRN TIO:FM FM ENTRY IN TIO «, t00=0x0003, t01=0x003c}
0x050c…053c Head {h00=0x002c, h01=0x0050, text=» EXTRN ACTDIS ACTIVATE TASK AND DISPATCH«, t00=0x0003, t01=0x0062}
0x053c…0562 Head {h00=0x0022, h01=0x0050, text=» EXTRN FNDDWD FIND DWT ADDRESS«, t00=0x0003, t01=0x0092}
0x0562…0592 Head {h00=0x002c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK FOR DISPATCHING «, t00=0x0003, t01=0x00b8}
0x0592…05ba Head {h00=0x0024, h01=0x0050, text=» EXTRN GETBLK GET MONITOR BLOCK «, t00=0x0003, t01=0x00e8}
0x05ba…05ee Head {h00=0x0030, h01=0x0050, text=» EXTRN TIOERR ERROR: QUEUE TASK AND DISPATCH«, t00=0x0003, t01=0x0110}
0x05ee…061c Head {h00=0x002a, h01=0x0050, text=» EXTRN SCTFWT FWT CHAIN START ADDRESS «, t00=0x0003, t01=0x0144}
0x061c…0642 Head {h00=0x0022, h01=0x0050, text=» EXTRN SCTNOF NUMBER OF FILES «, t00=0x0003, t01=0x0172}
0x0642…0676 Head {h00=0x0030, h01=0x0050, text=» EXTRN FWTVTC VTOC SECTOR NO (FIRST EXTENT) «, t00=0x0004, t01=0x0008}
0x0676…06a2 Head {h00=0x0028, h01=0x0050, text=» EXTRN FWTPAR FILE ACCESS PARAMETERS«, t00=0x0004, t01=0x003c}
0x06a2…06d2 Head {h00=0x002c, h01=0x0050, text=» EXTRN FWTTAB TTAB FOR TASK WITH ATTACH «, t00=0x0004, t01=0x0068}
0x06d2…0708 Head {h00=0x0032, h01=0x0050, text=» EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT «, t00=0x0004, t01=0x0098}
0x0708…0740 Head {h00=0x0034, h01=0x0050, text=» EXTRN FWTQUE QUEUE ANCHOR FOR FILE I/O REQUESTS«, t00=0x0004, t01=0x00ce}
0x0740…0764 Head {h00=0x0020, h01=0x0050, text=» EXTRN EWTEXL EXTENT LENGTH «, t00=0x0004, t01=0x0106}
0x0764…0786 Head {h00=0x001e, h01=0x0050, text=» EXTRN EWTEXB EXTENT BASE «, t00=0x0004, t01=0x012a}
0x0786…07ac Head {h00=0x0022, h01=0x0050, text=» EXTRN EWTVOL VOLUME FILE CODE«, t00=0x0004, t01=0x014c}
0x07ac…07d6 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0004, t01=0x0172}
0x07d6…07fe Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBCW1 ECB CONTROL WORD 1«, t00=0x0005, t01=0x000c}
0x07fe…0826 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBCW2 ECB CONTROL WORD 2«, t00=0x0005, t01=0x0034}
0x0826…084a Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTST DWT STATUS WORD«, t00=0x0005, t01=0x005c}
0x084a…0860 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0005, t01=0x0080}
0x0860…086a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0096}
0x086a…0874 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a0}
0x0874…08a4 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0005, t01=0x00aa}
0x08a4…08ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00da}
0x08ae…08cc Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0005, t01=0x00e4}
0x08cc…08d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0102}
0x08d6…0906 Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0005, t01=0x010c}
0x0906…0910 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013c}
0x0910…0942 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0005, t01=0x0146}
0x0942…0970 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0005, t01=0x0178}
0x0970…097a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0016}
0x097a…098e Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0006, t01=0x0020}
0x098e…0998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0034}
0x0998…09a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003e}
0x09a2…09dc Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0006, t01=0x0048}
0x09dc…0a0e Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0006, t01=0x0082}
0x0a0e…0a18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b4}
0x0a18…0a2c Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0006, t01=0x00be}
0x0a2c…0a36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d2}
0x0a36…0a40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00dc}
0x0a40…0a6a Head {h00=0x0026, h01=0x0050, text=»* THE ATTACH/DETACH FILE FUNCTION «, t00=0x0006, t01=0x00e6}
0x0a6a…0a98 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING ATTDET EQU 1.«, t00=0x0006, t01=0x0110}
0x0a98…0aa2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013e}
0x0aa2…0ab6 Head {h00=0x0010, h01=0x0050, text=»ATTDET EQU 1«, t00=0x0006, t01=0x0148}
0x0ab6…0acc Head {h00=0x0012, h01=0x0050, text=»X:A EQU ATTDET«, t00=0x0006, t01=0x015c}
0x0acc…0ad6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0172}
0x0ad6…0ae0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017c}
0x0ae0…0b0a Head {h00=0x0026, h01=0x0050, text=»* THE MULTIPLE EXTENT I/O FUNCTION«, t00=0x0006, t01=0x0186}
0x0b0a…0b38 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MULEXT EQU 1.«, t00=0x0007, t01=0x0020}
0x0b38…0b42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004e}
0x0b42…0b56 Head {h00=0x0010, h01=0x0050, text=»MULEXT EQU 1«, t00=0x0007, t01=0x0058}
0x0b56…0b6c Head {h00=0x0012, h01=0x0050, text=»X:B EQU MULEXT«, t00=0x0007, t01=0x006c}
0x0b6c…0b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0082}
0x0b76…0b8c Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0007, t01=0x008c}
0x0b8c…0b96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a2}
0x0b96…0ba0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ac}
0x0ba0…0bb2 Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x0007, t01=0x00b6}
0x0bb2…0bc4 Head {h00=0x000e, h01=0x0050, text=»* TIOFM * «, t00=0x0007, t01=0x00c8}
0x0bc4…0bd6 Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x0007, t01=0x00da}
0x0bd6…0be0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ec}
0x0be0…0bea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00f6}
0x0bea…0c26 Head {h00=0x0038, h01=0x0050, text=»* THIS IS THE TOSS FILE MANAGEMENT LKM PROCESSOR. «, t00=0x0007, t01=0x0100}
0x0c26…0c30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013c}
0x0c30…0c5e Head {h00=0x002a, h01=0x0050, text=»* IT IS ENTERED FROM THE LKM HANDLER«, t00=0x0007, t01=0x0146}
0x0c5e…0c88 Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:«, t00=0x0007, t01=0x0174}
0x0c88…0c92 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x000e}
0x0c92…0ca4 Head {h00=0x000e, h01=0x0050, text=»* A4 = 0«, t00=0x0008, t01=0x0018}
0x0ca4…0cc2 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0008, t01=0x002a}
0x0cc2…0cde Head {h00=0x0018, h01=0x0050, text=»* A7 = ORDER CODE «, t00=0x0008, t01=0x0048}
0x0cde…0cfa Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x0008, t01=0x0064}
0x0cfa…0d04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0080}
0x0d04…0d36 Head {h00=0x002e, h01=0x0050, text=»* WHEN FILE ADMINISTRATION IS REQUESTED,«, t00=0x0008, t01=0x008a}
0x0d36…0d62 Head {h00=0x0028, h01=0x0050, text=»* TIOFM WILL ACTIVATE THE FMTASK. «, t00=0x0008, t01=0x00bc}
0x0d62…0d6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e8}
0x0d6c…0d9e Head {h00=0x002e, h01=0x0050, text=»* WHEN I/O FUNCTION IS REQUESTED, TIOFM «, t00=0x0008, t01=0x00f2}
0x0d9e…0dd2 Head {h00=0x0030, h01=0x0050, text=»* WILL PREPARE FOR DISC I/O. THE I/O WILL «, t00=0x0008, t01=0x0124}
0x0dd2…0e0c Head {h00=0x0036, h01=0x0050, text=»* THEN RUN THE NORMAL WAY VIA TIO-DRIVER-TENDIO.«, t00=0x0008, t01=0x0158}
0x0e0c…0e16 (9, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0004}
0x0e16…0e20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000e}
0x0e20…0e36 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0009, t01=0x0018}
0x0e36…0e40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x002e}
0x0e40…0e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0038}
0x0e4a…0e82 Head {h00=0x0034, h01=0x0050, text=»TIOFM EQU * FILE MANAGEMENT LKM PROCESSOR ENTRY «, t00=0x0009, t01=0x0042}
0x0e82…0e8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007a}
0x0e8c…0ea6 Head {h00=0x0016, h01=0x0050, text=»* CHECK ORDER CODE«, t00=0x0009, t01=0x0084}
0x0ea6…0eb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x009e}
0x0eb0…0ece Head {h00=0x001a, h01=0x0050, text=» LDR A2,A7 ORDER CODE «, t00=0x0009, t01=0x00a8}
0x0ece…0eee Head {h00=0x001c, h01=0x0050, text=» ANK A2,/FF SKIP OPTION «, t00=0x0009, t01=0x00c6}
0x0eee…0f0a Head {h00=0x0018, h01=0x0050, text=» XRK A2,/80 WAIT BIT«, t00=0x0009, t01=0x00e6}
0x0f0a…0f1e Head {h00=0x0010, h01=0x0050, text=» SUK A2,/01 «, t00=0x0009, t01=0x0102}
0x0f1e…0f3e Head {h00=0x001c, h01=0x0050, text=» RF(Z) FM:IO BASIC READ «, t00=0x0009, t01=0x0116}
0x0f3e…0f56 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/03-/01 «, t00=0x0009, t01=0x0136}
0x0f56…0f80 Head {h00=0x0026, h01=0x0050, text=» RF(Z) FMACT3 READ FILE PARAMETERS«, t00=0x0009, t01=0x014e}
0x0f80…0f98 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/05-/03 «, t00=0x0009, t01=0x0178}
0x0f98…0fb8 Head {h00=0x001c, h01=0x0050, text=» RF(Z) FM:IO BASIC WRITE«, t00=0x0009, t01=0x0190}
0x0fb8…0fd0 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/11-/05 «, t00=0x000a, t01=0x0020}
0x0fd0…0ff2 Head {h00=0x001e, h01=0x0050, text=» RF(Z) FM:IO PHYSICAL READ«, t00=0x000a, t01=0x0038}
0x0ff2…100a Head {h00=0x0014, h01=0x0050, text=» SUK A2,/15-/11 «, t00=0x000a, t01=0x005a}
0x100a…102e Head {h00=0x0020, h01=0x0050, text=» RF(Z) FM:IO PHYSICAL WRITE «, t00=0x000a, t01=0x0072}
0x102e…1046 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/21-/15 «, t00=0x000a, t01=0x0096}
0x1046…106e Head {h00=0x0024, h01=0x0050, text=» RF(Z) FMACT2 OPEN/CREATE/EXTEND«, t00=0x000a, t01=0x00ae}
0x106e…1086 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/22-/21 «, t00=0x000a, t01=0x00d6}
0x1086…10a8 Head {h00=0x001e, h01=0x0050, text=» RF(Z) FMACT1 CLOSE/DELETE«, t00=0x000a, t01=0x00ee}
0x10a8…10b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0110}
0x10b2…10c8 Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x000a, t01=0x011a}
0x10c8…10e0 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/3B-/22 «, t00=0x000a, t01=0x0130}
0x10e0…10fc Head {h00=0x0018, h01=0x0050, text=» RF(Z) ATTACH ATTACH«, t00=0x000a, t01=0x0148}
0x10fc…1114 Head {h00=0x0014, h01=0x0050, text=» SUK A2,/3C-/3B «, t00=0x000a, t01=0x0164}
0x1114…1120 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000a, t01=0x017c}
0x1120…112a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0188}
0x112a…115c (11, 0, 400) Head {h00=0x002e, h01=0x0050, text=» RF(NZ) FM:RQE REQUEST ERROR IF NOT DETACH«, t00=0x000b, t01=0x0004}
0x115c…1166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0036}
0x1166…117c Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x000b, t01=0x0040}
0x117c…1186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0056}
0x1186…119c Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x000b, t01=0x0060}
0x119c…11a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0076}
0x11a6…11b8 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000b, t01=0x0080}
0x11b8…11ca Head {h00=0x000e, h01=0x0050, text=»* DETACH *«, t00=0x000b, t01=0x0092}
0x11ca…11dc Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000b, t01=0x00a4}
0x11dc…11e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b6}
0x11e6…11fc Head {h00=0x0012, h01=0x0050, text=»* DETACH FILE «, t00=0x000b, t01=0x00c0}
0x11fc…1206 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00d6}
0x1206…121a Head {h00=0x0010, h01=0x0050, text=»DETACH EQU *«, t00=0x000b, t01=0x00e0}
0x121a…1256 Head {h00=0x0038, h01=0x0050, text=» CF A15,FCHECK FIND FWT AND CHECK ACCESS PARAMETERS «, t00=0x000b, t01=0x00f4}
0x1256…127a Head {h00=0x0020, h01=0x0050, text=» RF(NZ) T:DISP ERROR, RETURN«, t00=0x000b, t01=0x0130}
0x127a…129c Head {h00=0x001e, h01=0x0050, text=» CF A15,DET:FM DETACH FILE«, t00=0x000b, t01=0x0154}
0x129c…12cc Head {h00=0x002c, h01=0x0050, text=» LDR A10,A10 CHECK IF FILE WAS ATTACHED «, t00=0x000b, t01=0x0176}
0x12cc…12f8 Head {h00=0x0028, h01=0x0050, text=» RF(NZ) T:DISP YES, GO TO DISPATCHER«, t00=0x000c, t01=0x0016}
0x12f8…1304 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0042}
0x1304…130e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x004e}
0x130e…1322 Head {h00=0x0010, h01=0x0050, text=»* ERROR EXIT«, t00=0x000c, t01=0x0058}
0x1322…132c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x006c}
0x132c…1364 Head {h00=0x0034, h01=0x0050, text=»FM:RQE EQU * FILE MANAGEMENT REQUEST ERROR EXIT «, t00=0x000c, t01=0x0076}
0x1364…1384 Head {h00=0x001c, h01=0x0050, text=» LDK A3,/80 RETURN CODE «, t00=0x000c, t01=0x00ae}
0x1384…138e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ce}
0x138e…13a2 Head {h00=0x0010, h01=0x0050, text=»FM:ER1 EQU *«, t00=0x000c, t01=0x00d8}
0x13a2…13b4 Head {h00=0x000e, h01=0x0050, text=» ECR A3,A3«, t00=0x000c, t01=0x00ec}
0x13b4…13c6 Head {h00=0x000e, h01=0x0050, text=» RF T:DIS2«, t00=0x000c, t01=0x00fe}
0x13c6…13d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0110}
0x13d0…13e6 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x000c, t01=0x011a}
0x13e6…13f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0130}
0x13f0…1406 Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x000c, t01=0x013a}
0x1406…1410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0150}
0x1410…1422 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000c, t01=0x015a}
0x1422…1434 Head {h00=0x000e, h01=0x0050, text=»* ATTACH *«, t00=0x000c, t01=0x016c}
0x1434…1446 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000c, t01=0x017e}
0x1446…1450 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0190}
0x1450…1466 Head {h00=0x0012, h01=0x0050, text=»* ATTACH FILE «, t00=0x000d, t01=0x000a}
0x1466…1470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0020}
0x1470…1484 Head {h00=0x0010, h01=0x0050, text=»ATTACH EQU *«, t00=0x000d, t01=0x002a}
0x1484…14c0 Head {h00=0x0038, h01=0x0050, text=» CF A15,FCHECK FIND FWT AND CHECK ACCESS PARAMETERS «, t00=0x000d, t01=0x003e}
0x14c0…14de Head {h00=0x001a, h01=0x0050, text=» RF(NZ) FM:030 NOT OK «, t00=0x000d, t01=0x007a}
0x14de…1506 Head {h00=0x0024, h01=0x0050, text=» ST A5,FWTTAB,A6 SET ATTACH WORD«, t00=0x000d, t01=0x0098}
0x1506…1512 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00c0}
0x1512…151c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00cc}
0x151c…1530 Head {h00=0x0010, h01=0x0050, text=»T:DISP EQU *«, t00=0x000d, t01=0x00d6}
0x1530…154e Head {h00=0x001a, h01=0x0050, text=» LDR A3,A4 RETURN CODE«, t00=0x000d, t01=0x00ea}
0x154e…1558 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0108}
0x1558…156c Head {h00=0x0010, h01=0x0050, text=»T:DIS2 EQU *«, t00=0x000d, t01=0x0112}
0x156c…15a6 Head {h00=0x0036, h01=0x0050, text=» ABL TIOERR SET RETURN CODE, QUEUE TASK AND DISP. «, t00=0x000d, t01=0x0126}
0x15a6…15b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0160}
0x15b0…15c6 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x000d, t01=0x016a}
0x15c6…15d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0180}
0x15d0…15da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018a}
0x15da…15ec (14, 0, 400) Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x0004}
0x15ec…15fe Head {h00=0x000e, h01=0x0050, text=»* FMACTX *«, t00=0x000e, t01=0x0016}
0x15fe…1610 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x0028}
0x1610…161a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003a}
0x161a…1624 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0044}
0x1624…164e Head {h00=0x0026, h01=0x0050, text=»* FILE ADMINISTRATION REQUESTED.«, t00=0x000e, t01=0x004e}
0x164e…1658 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0078}
0x1658…1692 Head {h00=0x0036, h01=0x0050, text=»* ACTIVATE FMTASK WITH THE FOLLOWING PARAMETERS:«, t00=0x000e, t01=0x0082}
0x1692…169c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00bc}
0x169c…16d4 Head {h00=0x0034, h01=0x0050, text=»* A1 = ORDER CODE AND OPTION (RFP/OPEN/CLOSE) «, t00=0x000e, t01=0x00c6}
0x16d4…1708 Head {h00=0x0030, h01=0x0050, text=»* = PARAMETER BLOCK ADDRESS (SPLIT I/O)«, t00=0x000e, t01=0x00fe}
0x1708…1736 Head {h00=0x002a, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x000e, t01=0x0132}
0x1736…1784 Head {h00=0x004a, h01=0x0050, text=»* A4 = FUNCTION INDEX (0 = RFP, 2 = OPEN, 4 = CLOSE, 6 = SPLIT I/O) «, t00=0x000e, t01=0x0160}
0x1784…178e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x001e}
0x178e…17ba Head {h00=0x0028, h01=0x0050, text=»FMACT1 EQU * ACTIVATE CLOSE FUNCTION«, t00=0x000f, t01=0x0028}
0x17ba…17da Head {h00=0x001c, h01=0x0050, text=» ADK A4,2 FUNCTION INDEX«, t00=0x000f, t01=0x0054}
0x17da…17e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0074}
0x17e4…1810 Head {h00=0x0028, h01=0x0050, text=»FMACT2 EQU * ACTIVATE OPEN FUNCTION «, t00=0x000f, t01=0x007e}
0x1810…1830 Head {h00=0x001c, h01=0x0050, text=» ADK A4,2 FUNCTION INDEX«, t00=0x000f, t01=0x00aa}
0x1830…183a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ca}
0x183a…1876 Head {h00=0x0038, h01=0x0050, text=»FMACT3 EQU * ACTIVATE READ FILE PARAMETERS FUNCTION «, t00=0x000f, t01=0x00d4}
0x1876…189e Head {h00=0x0024, h01=0x0050, text=» ECR A1,A7 ORDER CODE AND OPTION«, t00=0x000f, t01=0x0110}
0x189e…18a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0138}
0x18a8…18d8 Head {h00=0x002c, h01=0x0050, text=»FMACT4 EQU * ACTIVATE SPLIT I/O FUNCTION«, t00=0x000f, t01=0x0142}
0x18d8…1900 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,FMTASK DISPATCH ADDRESS«, t00=0x000f, t01=0x0172}
0x1900…1930 Head {h00=0x002c, h01=0x0050, text=» LDR A3,A5 TTAB ADDRESS OF CALLING TASK «, t00=0x0010, t01=0x000a}
0x1930…195c Head {h00=0x0028, h01=0x0050, text=» LDKL A5,TTABFM FMTASK TTAB ADDRESS «, t00=0x0010, t01=0x003a}
0x195c…198c Head {h00=0x002c, h01=0x0050, text=» ABL ACTDIS ACTIVATE FMTASK AND DISPATCH«, t00=0x0010, t01=0x0066}
0x198c…1996 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0096}
0x1996…19ac Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0010, t01=0x00a0}
0x19ac…19b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b6}
0x19b6…19c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c0}
0x19c0…19d2 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0010, t01=0x00ca}
0x19d2…19e4 Head {h00=0x000e, h01=0x0050, text=»* FM I/O *«, t00=0x0010, t01=0x00dc}
0x19e4…19f6 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0010, t01=0x00ee}
0x19f6…1a00 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0100}
0x1a00…1a28 Head {h00=0x0024, h01=0x0050, text=»* FILE MANAGEMENT I/O FUNCTIONS «, t00=0x0010, t01=0x010a}
0x1a28…1a32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0132}
0x1a32…1a64 Head {h00=0x002e, h01=0x0050, text=»FM:IO EQU * BASIC AND PHYSICAL READ/WRITE «, t00=0x0010, t01=0x013c}
0x1a64…1aa0 Head {h00=0x0038, h01=0x0050, text=» CF A15,FCHECK FIND FWT AND CHECK ACCESS PARAMETERS «, t00=0x0010, t01=0x016e}
0x1aa0…1aaa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x001a}
0x1aaa…1ac0 Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0011, t01=0x0024}
0x1ac0…1ad8 Head {h00=0x0014, h01=0x0050, text=» RF(Z) FM:050 OK«, t00=0x0011, t01=0x003a}
0x1ad8…1ae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0052}
0x1ae2…1af6 Head {h00=0x0010, h01=0x0050, text=»FM:030 EQU *«, t00=0x0011, t01=0x005c}
0x1af6…1b0a Head {h00=0x0010, h01=0x0050, text=» CWK A4,/40 «, t00=0x0011, t01=0x0070}
0x1b0a…1b2e Head {h00=0x0020, h01=0x0050, text=» RB(NE) T:DISP ERROR, RETURN«, t00=0x0011, t01=0x0084}
0x1b2e…1b38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00a8}
0x1b38…1b5e Head {h00=0x0022, h01=0x0050, text=»* FILE ATTACHED, QUEUE REQUEST«, t00=0x0011, t01=0x00b2}
0x1b5e…1b68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d8}
0x1b68…1b94 Head {h00=0x0028, h01=0x0050, text=» ADKL A6,FWTQUE QUEUE ANCHOR ADDRESS«, t00=0x0011, t01=0x00e2}
0x1b94…1bba Head {h00=0x0022, h01=0x0050, text=» LDK A4,0 NO ACT LABEL AT LKM «, t00=0x0011, t01=0x010e}
0x1bba…1bec Head {h00=0x002e, h01=0x0050, text=» ABL QUEFIL QUEUE REQUEST AND GO TO TDISP «, t00=0x0011, t01=0x0134}
0x1bec…1bf8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0166}
0x1bf8…1c02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0172}
0x1c02…1c18 Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=0 «, t00=0x0011, t01=0x017c}
0x1c18…1c34 (18, 0, 400) Head {h00=0x0018, h01=0x0050, text=» RB(NZ) FM:RQE ERROR«, t00=0x0012, t01=0x0004}
0x1c34…1c40 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0020}
0x1c40…1c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x002c}
0x1c4a…1c60 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0012, t01=0x0036}
0x1c60…1c6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x004c}
0x1c6a…1c90 Head {h00=0x0022, h01=0x0050, text=»* CHECK RELATIVE SECTOR NUMBER«, t00=0x0012, t01=0x0056}
0x1c90…1c9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x007c}
0x1c9a…1cae Head {h00=0x0010, h01=0x0050, text=»FM:050 EQU *«, t00=0x0012, t01=0x0086}
0x1cae…1cc4 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0012, t01=0x009a}
0x1cc4…1cda Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0012, t01=0x00b0}
0x1cda…1d0a Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBCW2,A8 RELATIVE SECTOR NUMBER «, t00=0x0012, t01=0x00c6}
0x1d0a…1d22 Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBCW1,A8«, t00=0x0012, t01=0x00f6}
0x1d22…1d2e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x010e}
0x1d2e…1d38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x011a}
0x1d38…1d4e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0012, t01=0x0124}
0x1d4e…1d64 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0012, t01=0x013a}
0x1d64…1d92 Head {h00=0x002a, h01=0x0050, text=» ML 2,ECBCW1,A8 RELATIVE SECTOR NUMBER«, t00=0x0012, t01=0x0150}
0x1d92…1d9e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x017e}
0x1d9e…1da8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x018a}
0x1da8…1dbe (19, 0, 400) Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0013, t01=0x0004}
0x1dbe…1dee Head {h00=0x002c, h01=0x0050, text=» EL A2,ECBCW2,A8 RELATIVE SECTOR NUMBER «, t00=0x0013, t01=0x001a}
0x1dee…1e06 Head {h00=0x0014, h01=0x0050, text=» EL A1,ECBCW1,A8«, t00=0x0013, t01=0x004a}
0x1e06…1e12 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0062}
0x1e12…1e1c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x006e}
0x1e1c…1e32 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) FM:060«, t00=0x0013, t01=0x0078}
0x1e32…1e44 Head {h00=0x000e, h01=0x0050, text=» ADK A2,0 «, t00=0x0013, t01=0x008e}
0x1e44…1e74 Head {h00=0x002c, h01=0x0050, text=» RF(Z) FM:ER2 RELATIVE SECTOR NUMBER = 0«, t00=0x0013, t01=0x00a0}
0x1e74…1e7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00d0}
0x1e7e…1e92 Head {h00=0x0010, h01=0x0050, text=»FM:060 EQU *«, t00=0x0013, t01=0x00da}
0x1e92…1eb0 Head {h00=0x001a, h01=0x0050, text=» LDR A3,A6 FWT ADDRESS«, t00=0x0013, t01=0x00ee}
0x1eb0…1ec2 Head {h00=0x000e, h01=0x0050, text=» ECR A6,A1«, t00=0x0013, t01=0x010c}
0x1ec2…1ed6 Head {h00=0x0010, h01=0x0050, text=» ANK A6,/FF «, t00=0x0013, t01=0x011e}
0x1ed6…1f0c Head {h00=0x0032, h01=0x0050, text=» RF(NZ) FM:ER2 ILLEGAL RELATIVE SECTOR NUMBER «, t00=0x0013, t01=0x0132}
0x1f0c…1f2e Head {h00=0x001e, h01=0x0050, text=» LDR A9,A7 SAVE ORDER CODE«, t00=0x0013, t01=0x0168}
0x1f2e…1f64 Head {h00=0x0032, h01=0x0050, text=» ADKL A3,FWTEW1 ADDRESS TO 1ST EWT STRUCTURE«, t00=0x0013, t01=0x018a}
0x1f64…1f7c Head {h00=0x0014, h01=0x0050, text=» LDKL A14,/7FFF «, t00=0x0014, t01=0x0030}
0x1f7c…1f86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0048}
0x1f86…1f9c Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0014, t01=0x0052}
0x1f9c…1fa6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0068}
0x1fa6…1fd2 Head {h00=0x0028, h01=0x0050, text=»* SEARCH THE FILE EXTENT THAT HOLDS «, t00=0x0014, t01=0x0072}
0x1fd2…1ff2 Head {h00=0x001c, h01=0x0050, text=»* THE REQUESTED SECTORS «, t00=0x0014, t01=0x009e}
0x1ff2…1ffc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00be}
0x1ffc…2010 Head {h00=0x0010, h01=0x0050, text=»FM:070 EQU *«, t00=0x0014, t01=0x00c8}
0x2010…203e Head {h00=0x002a, h01=0x0050, text=» LC A6,EWTEXL-1,A3 FILE EXTENT LENGTH «, t00=0x0014, t01=0x00dc}
0x203e…2056 Head {h00=0x0014, h01=0x0050, text=» LD A7,EWTEXL,A3«, t00=0x0014, t01=0x010a}
0x2056…207c Head {h00=0x0022, h01=0x0050, text=» CWR A1,A6 CHECK EXTENT LENGTH«, t00=0x0014, t01=0x0122}
0x207c…209e Head {h00=0x001e, h01=0x0050, text=» RF(L) FM:100 EXTENT FOUND«, t00=0x0014, t01=0x0148}
0x209e…20c4 Head {h00=0x0022, h01=0x0050, text=» RF(G) FM:080 EXTENT NOT FOUND«, t00=0x0014, t01=0x016a}
0x20c4…20d6 Head {h00=0x000e, h01=0x0050, text=» CWR A2,A7«, t00=0x0014, t01=0x0190}
0x20d6…20fa Head {h00=0x0020, h01=0x0050, text=» RF(NG) FM:100 EXTENT FOUND «, t00=0x0015, t01=0x0012}
0x20fa…2104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0036}
0x2104…2118 Head {h00=0x0010, h01=0x0050, text=»FM:080 EQU *«, t00=0x0015, t01=0x0040}
0x2118…212e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0015, t01=0x0054}
0x212e…2160 Head {h00=0x002e, h01=0x0050, text=» DSR A6 SUBTRACT LENGTH FROM SECTOR NUMBER«, t00=0x0015, t01=0x006a}
0x2160…216c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x009c}
0x216c…2176 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a8}
0x2176…218c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0015, t01=0x00b2}
0x218c…21c2 Head {h00=0x0032, h01=0x0050, text=» SUR A1,A6 SUBTRACT LENGTH FROM SECTOR NUMBER «, t00=0x0015, t01=0x00c8}
0x21c2…21d4 Head {h00=0x000e, h01=0x0050, text=» SUR A2,A7«, t00=0x0015, t01=0x00fe}
0x21d4…21f8 Head {h00=0x0020, h01=0x0050, text=» RF(NN) FM:090 NOT UNDERFLOW«, t00=0x0015, t01=0x0110}
0x21f8…221e Head {h00=0x0022, h01=0x0050, text=» SUK A1,1 UNDERFLOW CORRECTION«, t00=0x0015, t01=0x0134}
0x221e…2240 Head {h00=0x001e, h01=0x0050, text=» ANR A2,A14 SKIP SIGN BIT «, t00=0x0015, t01=0x015a}
0x2240…224c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x017c}
0x224c…2256 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0188}
0x2256…226a (22, 0, 400) Head {h00=0x0010, h01=0x0050, text=»FM:090 EQU *«, t00=0x0016, t01=0x0004}
0x226a…2296 Head {h00=0x0028, h01=0x0050, text=» LDR* A3,A3 ADDRESS TO 2ND EWT BLOCK«, t00=0x0016, t01=0x0018}
0x2296…22c8 Head {h00=0x002e, h01=0x0050, text=» LDR* A3,A3 ADDRESS TO NEXT EWT STRUCTURE «, t00=0x0016, t01=0x0044}
0x22c8…22f0 Head {h00=0x0024, h01=0x0050, text=» RB(NZ) FM:070 CHECK NEXT EXTENT«, t00=0x0016, t01=0x0076}
0x22f0…22fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x009e}
0x22fa…2330 Head {h00=0x0032, h01=0x0050, text=»FM:ER2 EQU * FILE MANAGEMENT EXTENT ERROR EXIT«, t00=0x0016, t01=0x00a8}
0x2330…2350 Head {h00=0x001c, h01=0x0050, text=» LDK A3,/A0 RETURN CODE «, t00=0x0016, t01=0x00de}
0x2350…236a Head {h00=0x0016, h01=0x0050, text=» RB FM:ER1 RETURN «, t00=0x0016, t01=0x00fe}
0x236a…2374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0118}
0x2374…238a Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0016, t01=0x0122}
0x238a…2394 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0138}
0x2394…23aa Head {h00=0x0012, h01=0x0050, text=»* EXTENT FOUND«, t00=0x0016, t01=0x0142}
0x23aa…23b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0158}
0x23b4…23c8 Head {h00=0x0010, h01=0x0050, text=»FM:100 EQU *«, t00=0x0016, t01=0x0162}
0x23c8…23f4 Head {h00=0x0028, h01=0x0050, text=» LDR* A4,A3 ADDRESS TO 2ND EWT BLOCK«, t00=0x0016, t01=0x0176}
0x23f4…2408 Head {h00=0x0010, h01=0x0050, text=» SUR A10,A10«, t00=0x0017, t01=0x0012}
0x2408…2434 Head {h00=0x0028, h01=0x0050, text=» LC A10,EWTEXB-1,A4 FILE EXTENT BASE«, t00=0x0017, t01=0x0026}
0x2434…244e Head {h00=0x0016, h01=0x0050, text=» LD A11,EWTEXB,A4 «, t00=0x0017, t01=0x0052}
0x244e…2458 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x006c}
0x2458…246e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0017, t01=0x0076}
0x246e…2494 Head {h00=0x0022, h01=0x0050, text=» DAR A10 COMPUTE SECTOR NUMBER«, t00=0x0017, t01=0x008c}
0x2494…24a4 Head {h00=0x000c, h01=0x0050, text=» DSK 0,1«, t00=0x0017, t01=0x00b2}
0x24a4…24b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00c2}
0x24b0…24ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ce}
0x24ba…24d0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0017, t01=0x00d8}
0x24d0…24fa Head {h00=0x0026, h01=0x0050, text=» ADR A1,A10 COMPUTE SECTOR NUMBER «, t00=0x0017, t01=0x00ee}
0x24fa…250e Head {h00=0x0010, h01=0x0050, text=» ADR A2,A11 «, t00=0x0017, t01=0x0118}
0x250e…252c Head {h00=0x001a, h01=0x0050, text=» RF(O) FM:140 OVERFLOW«, t00=0x0017, t01=0x012c}
0x252c…2536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x014a}
0x2536…254a Head {h00=0x0010, h01=0x0050, text=»FM:110 EQU *«, t00=0x0017, t01=0x0154}
0x254a…255c Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0017, t01=0x0168}
0x255c…2580 Head {h00=0x0020, h01=0x0050, text=» RF(NN) FM:115 NOT UNDERFLOW«, t00=0x0017, t01=0x017a}
0x2580…25a6 Head {h00=0x0022, h01=0x0050, text=» SUK A1,1 UNDERFLOW CORRECTION«, t00=0x0018, t01=0x000e}
0x25a6…25c8 Head {h00=0x001e, h01=0x0050, text=» ANR A2,A14 SKIP SIGN BIT «, t00=0x0018, t01=0x0034}
0x25c8…25d4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0056}
0x25d4…25de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0062}
0x25de…25f4 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0018, t01=0x006c}
0x25f4…25fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0082}
0x25fe…2608 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x008c}
0x2608…261c Head {h00=0x0010, h01=0x0050, text=»FM:115 EQU *«, t00=0x0018, t01=0x0096}
0x261c…2642 Head {h00=0x0022, h01=0x0050, text=» LDR A12,A1 SAVE SECTOR NUMBER«, t00=0x0018, t01=0x00aa}
0x2642…2656 Head {h00=0x0010, h01=0x0050, text=» LDR A13,A2 «, t00=0x0018, t01=0x00d0}
0x2656…2660 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e4}
0x2660…2676 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0018, t01=0x00ee}
0x2676…26a8 Head {h00=0x002e, h01=0x0050, text=» LC A3,ECBRL,A8 REQUESTED LENGTH (SECTORS)«, t00=0x0018, t01=0x0104}
0x26a8…26bc Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0018, t01=0x0136}
0x26bc…26c8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x014a}
0x26c8…26d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0156}
0x26d2…26e8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0018, t01=0x0160}
0x26e8…2718 Head {h00=0x002c, h01=0x0050, text=» EL A3,ECBRL,A8 REQUESTED LENGTH (BYTES)«, t00=0x0018, t01=0x0176}
0x2718…2732 Head {h00=0x0016, h01=0x0050, text=» SRL A3,8 SECTORS «, t00=0x0019, t01=0x0016}
0x2732…273e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0030}
0x273e…2748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x003c}
0x2748…277a Head {h00=0x002e, h01=0x0050, text=» ADR A2,A3 COMPUTE LAST REQUESTED SECTOR+1«, t00=0x0019, t01=0x0046}
0x277a…2798 Head {h00=0x001a, h01=0x0050, text=» RF(O) FM:150 OVERFLOW«, t00=0x0019, t01=0x0078}
0x2798…27a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0096}
0x27a2…27b6 Head {h00=0x0010, h01=0x0050, text=»FM:120 EQU *«, t00=0x0019, t01=0x00a0}
0x27b6…27ea Head {h00=0x0030, h01=0x0050, text=» ADR A6,A10 COMPUTE LAST SECTOR+1 IN EXTENT «, t00=0x0019, t01=0x00b4}
0x27ea…27fe Head {h00=0x0010, h01=0x0050, text=» ADR A7,A11 «, t00=0x0019, t01=0x00e8}
0x27fe…281c Head {h00=0x001a, h01=0x0050, text=» RF(O) FM:160 OVERFLOW«, t00=0x0019, t01=0x00fc}
0x281c…2826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x011a}
0x2826…283a Head {h00=0x0010, h01=0x0050, text=»FM:125 EQU *«, t00=0x0019, t01=0x0124}
0x283a…284c Head {h00=0x000e, h01=0x0050, text=» CWR A6,A1«, t00=0x0019, t01=0x0138}
0x284c…2880 Head {h00=0x0030, h01=0x0050, text=» RF(G) FM:130 ALL SECTORS WITHIN THIS EXTENT«, t00=0x0019, t01=0x014a}
0x2880…28b8 Head {h00=0x0034, h01=0x0050, text=» RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT«, t00=0x0019, t01=0x017e}
0x28b8…28ca Head {h00=0x000e, h01=0x0050, text=» CWR A7,A2«, t00=0x001a, t01=0x0026}
0x28ca…2902 Head {h00=0x0034, h01=0x0050, text=» RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT«, t00=0x001a, t01=0x0038}
0x2902…290c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0070}
0x290c…2922 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x001a, t01=0x007a}
0x2922…292c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0090}
0x292c…2956 Head {h00=0x0026, h01=0x0050, text=»* PREPARE PARAMETERS FOR DISC I/O «, t00=0x001a, t01=0x009a}
0x2956…2960 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00c4}
0x2960…297a Head {h00=0x0016, h01=0x0050, text=»* EXIT PARAMETERS:«, t00=0x001a, t01=0x00ce}
0x297a…2984 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00e8}
0x2984…29ac Head {h00=0x0024, h01=0x0050, text=»* A2 = DISC INDEX (FROM FNDDWD) «, t00=0x001a, t01=0x00f2}
0x29ac…29de Head {h00=0x002e, h01=0x0050, text=»* A4 = 0 (INDICATES NO I/O-AND-ACTIVATION)«, t00=0x001a, t01=0x011a}
0x29de…29fa Head {h00=0x0018, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x001a, t01=0x014c}
0x29fa…2a28 Head {h00=0x002a, h01=0x0050, text=»* A6 = DISC DWT ADDRESS (FROM FNDDWD) «, t00=0x001a, t01=0x0168}
0x2a28…2a42 Head {h00=0x0016, h01=0x0050, text=»* A7 = ORDER CODE «, t00=0x001b, t01=0x0008}
0x2a42…2a5c Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x001b, t01=0x0022}
0x2a5c…2a66 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x003c}
0x2a66…2a7a Head {h00=0x0010, h01=0x0050, text=»FM:130 EQU *«, t00=0x001b, t01=0x0046}
0x2a7a…2aa2 Head {h00=0x0024, h01=0x0050, text=» LC A2,EWTVOL,A4 FILE CODE DISC «, t00=0x001b, t01=0x005a}
0x2aa2…2ace Head {h00=0x0028, h01=0x0050, text=» CF A15,FNDDWD FIND DISC DWT ADDRESS«, t00=0x001b, t01=0x0082}
0x2ace…2afc Head {h00=0x002a, h01=0x0050, text=» LDK A4,0 INDICATE NO I/O-AND-ACTIVATE«, t00=0x001b, t01=0x00ae}
0x2afc…2b1e Head {h00=0x001e, h01=0x0050, text=» LD A1,DWTST,A6 DWT STATUS«, t00=0x001b, t01=0x00dc}
0x2b1e…2b4e Head {h00=0x002c, h01=0x0050, text=» ABL(NN) QUEDEV DISC BUSY, QUEUE REQUEST«, t00=0x001b, t01=0x00fe}
0x2b4e…2b74 Head {h00=0x0022, h01=0x0050, text=» LDR A7,A9 RESTORE ORDER CODE «, t00=0x001b, t01=0x012e}
0x2b74…2b7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0154}
0x2b7e…2b94 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001b, t01=0x015e}
0x2b94…2bc6 Head {h00=0x002e, h01=0x0050, text=» ST A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB«, t00=0x001b, t01=0x0174}
0x2bc6…2be0 Head {h00=0x0016, h01=0x0050, text=» ST A13,ECBCW2,A8 «, t00=0x001c, t01=0x0016}
0x2be0…2bec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0030}
0x2bec…2bf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x003c}
0x2bf6…2c0c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001c, t01=0x0046}
0x2c0c…2c3e Head {h00=0x002e, h01=0x0050, text=» ES A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB«, t00=0x001c, t01=0x005c}
0x2c3e…2c58 Head {h00=0x0016, h01=0x0050, text=» ES A13,ECBCW2,A8 «, t00=0x001c, t01=0x008e}
0x2c58…2c64 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00a8}
0x2c64…2c6e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00b4}
0x2c6e…2c9c Head {h00=0x002a, h01=0x0050, text=» ABL TIO:FM BRANCH TO FM ENTRY IN TIO «, t00=0x001c, t01=0x00be}
0x2c9c…2ca6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00ec}
0x2ca6…2cbc Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x001c, t01=0x00f6}
0x2cbc…2cc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x010c}
0x2cc6…2d00 Head {h00=0x0036, h01=0x0050, text=»* OVERFLOW CORRECTIONS FOR DOUBLE WORD ARITHMETICS«, t00=0x001c, t01=0x0116}
0x2d00…2d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0150}
0x2d0a…2d1e Head {h00=0x0010, h01=0x0050, text=»FM:140 EQU *«, t00=0x001c, t01=0x015a}
0x2d1e…2d34 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001c, t01=0x016e}
0x2d34…2d46 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x001c, t01=0x0184}
0x2d46…2d68 Head {h00=0x001e, h01=0x0050, text=» ANR A2,A14 SKIP SIGN BIT «, t00=0x001d, t01=0x0008}
0x2d68…2d7a Head {h00=0x000e, h01=0x0050, text=» RB FM:110«, t00=0x001d, t01=0x002a}
0x2d7a…2d86 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x003c}
0x2d86…2d90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0048}
0x2d90…2da4 Head {h00=0x0010, h01=0x0050, text=»FM:150 EQU *«, t00=0x001d, t01=0x0052}
0x2da4…2db6 Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x001d, t01=0x0066}
0x2db6…2dd8 Head {h00=0x001e, h01=0x0050, text=» ANR A2,A14 SKIP SIGN BIT «, t00=0x001d, t01=0x0078}
0x2dd8…2dea Head {h00=0x000e, h01=0x0050, text=» RB FM:120«, t00=0x001d, t01=0x009a}
0x2dea…2df4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ac}
0x2df4…2e08 Head {h00=0x0010, h01=0x0050, text=»FM:160 EQU *«, t00=0x001d, t01=0x00b6}
0x2e08…2e1a Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x001d, t01=0x00ca}
0x2e1a…2e3c Head {h00=0x001e, h01=0x0050, text=» ANR A7,A14 SKIP SIGN BIT «, t00=0x001d, t01=0x00dc}
0x2e3c…2e4e Head {h00=0x000e, h01=0x0050, text=» RB FM:125«, t00=0x001d, t01=0x00fe}
0x2e4e…2e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0110}
0x2e58…2e6e Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x001d, t01=0x011a}
0x2e6e…2e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0130}
0x2e78…2eac Head {h00=0x0030, h01=0x0050, text=»* REQUESTED SECTORS CONTINUE IN NEXT EXTENT.«, t00=0x001d, t01=0x013a}
0x2eac…2eb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x016e}
0x2eb6…2eee Head {h00=0x0034, h01=0x0050, text=»* ACTIVATE FMTASK WITH THE FOLLOWING PARAMETERS:«, t00=0x001d, t01=0x0178}
0x2eee…2ef8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0020}
0x2ef8…2f1e Head {h00=0x0022, h01=0x0050, text=»* A1 = PARAMETER BLOCK ADDRESS«, t00=0x001e, t01=0x002a}
0x2f1e…2f4a Head {h00=0x0028, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x001e, t01=0x0050}
0x2f4a…2f6c Head {h00=0x001e, h01=0x0050, text=»* A4 = FUNCTION INDEX (=6)«, t00=0x001e, t01=0x007c}
0x2f6c…2f76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009e}
0x2f76…2f8a Head {h00=0x0010, h01=0x0050, text=»FM:170 EQU *«, t00=0x001e, t01=0x00a8}
0x2f8a…2fa0 Head {h00=0x0012, h01=0x0050, text=» IFT MULEXT=1 «, t00=0x001e, t01=0x00bc}
0x2fa0…2fb6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001e, t01=0x00d2}
0x2fb6…2fe8 Head {h00=0x002e, h01=0x0050, text=» ST A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB«, t00=0x001e, t01=0x00e8}
0x2fe8…3002 Head {h00=0x0016, h01=0x0050, text=» ST A13,ECBCW2,A8 «, t00=0x001e, t01=0x011a}
0x3002…300e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0134}
0x300e…3018 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0140}
0x3018…302e Head {h00=0x0012, h01=0x0050, text=» IFT MULEXT=1 «, t00=0x001e, t01=0x014a}
0x302e…3044 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x0160}
0x3044…3076 Head {h00=0x002e, h01=0x0050, text=» ES A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB«, t00=0x001e, t01=0x0176}
0x3076…3090 Head {h00=0x0016, h01=0x0050, text=» ES A13,ECBCW2,A8 «, t00=0x001f, t01=0x0018}
0x3090…309c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0032}
0x309c…30a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x003e}
0x30a6…30bc Head {h00=0x0012, h01=0x0050, text=» IFT MULEXT=1 «, t00=0x001f, t01=0x0048}
0x30bc…30ea Head {h00=0x002a, h01=0x0050, text=» SUR A7,A13 NO OF SECTORS IN FIRST I/O«, t00=0x001f, t01=0x005e}
0x30ea…3118 Head {h00=0x002a, h01=0x0050, text=» ANR A7,A14 SKIP SIGN BIT JUST IN CASE«, t00=0x001f, t01=0x008c}
0x3118…3122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ba}
0x3122…3150 Head {h00=0x002a, h01=0x0050, text=»* PREPARE PARAMETER BLOCKS FOR FMTASK «, t00=0x001f, t01=0x00c4}
0x3150…315a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00f2}
0x315a…3178 Head {h00=0x001a, h01=0x0050, text=» LDR A1,A9 ORDER CODE «, t00=0x001f, t01=0x00fc}
0x3178…3198 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 2ND EWT BLOCK«, t00=0x001f, t01=0x011a}
0x3198…31c4 Head {h00=0x0028, h01=0x0050, text=» ECR A3,A7 NO OF BYTES IN FIRST I/O «, t00=0x001f, t01=0x013a}
0x31c4…31ea Head {h00=0x0022, h01=0x0050, text=» CF A15,GETBLK PARAMETER BLOCK«, t00=0x001f, t01=0x0166}
0x31ea…3214 Head {h00=0x0026, h01=0x0050, text=» LDR A1,A4 PARAMETER BLOCK ADDRESS«, t00=0x001f, t01=0x018c}
0x3214…3242 Head {h00=0x002a, h01=0x0050, text=» LDK A4,6 FUNCTION INDEX FOR SPLIT I/O«, t00=0x0020, t01=0x0026}
0x3242…3264 Head {h00=0x001e, h01=0x0050, text=» RB FMACT4 ACTIVATE FMTASK«, t00=0x0020, t01=0x0054}
0x3264…3270 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0076}
0x3270…327a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0082}
0x327a…3290 Head {h00=0x0012, h01=0x0050, text=» IFT MULEXT=0 «, t00=0x0020, t01=0x008c}
0x3290…32b0 Head {h00=0x001c, h01=0x0050, text=» RB FM:ER2 REQUEST ERROR«, t00=0x0020, t01=0x00a2}
0x32b0…32bc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x00c2}
0x32bc…32c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ce}
0x32c6…32dc Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0020, t01=0x00d8}
0x32dc…32e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ee}
0x32e6…32f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00f8}
0x32f0…3302 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0020, t01=0x0102}
0x3302…3314 Head {h00=0x000e, h01=0x0050, text=»* FCHECK *«, t00=0x0020, t01=0x0114}
0x3314…3326 Head {h00=0x000e, h01=0x0050, text=»* FCHEC2 *«, t00=0x0020, t01=0x0126}
0x3326…3338 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0020, t01=0x0138}
0x3338…3342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x014a}
0x3342…334c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0154}
0x334c…3386 Head {h00=0x0036, h01=0x0050, text=»* FCHECK/FCHEC2 CONVERTS THE FILE NUMBER TO FWT «, t00=0x0020, t01=0x015e}
0x3386…33bc Head {h00=0x0032, h01=0x0050, text=»* ADDRESS AND CHECKS THE ACCESS PARAMETERS. «, t00=0x0021, t01=0x0008}
0x33bc…33c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x003e}
0x33c6…33ec Head {h00=0x0022, h01=0x0050, text=»* INPUT: A5 = TTAB ADDRESS «, t00=0x0021, t01=0x0048}
0x33ec…3410 Head {h00=0x0020, h01=0x0050, text=»* A7 = ORDER CODE «, t00=0x0021, t01=0x006e}
0x3410…343c Head {h00=0x0028, h01=0x0050, text=»* A8 = ECB ADDRESS (FCHECK ONLY) «, t00=0x0021, t01=0x0092}
0x343c…3468 Head {h00=0x0028, h01=0x0050, text=»* A9 = ECB ADDRESS (FCHEC2 ONLY) «, t00=0x0021, t01=0x00be}
0x3468…3472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ea}
0x3472…3498 Head {h00=0x0022, h01=0x0050, text=»* OUTPUT: CR = 0 IF OK, ELSE«, t00=0x0021, t01=0x00f4}
0x3498…34bc Head {h00=0x0020, h01=0x0050, text=»* <> 0 IF ERROR «, t00=0x0021, t01=0x011a}
0x34bc…34e0 Head {h00=0x0020, h01=0x0050, text=»* A4 = RETURN CODE«, t00=0x0021, t01=0x013e}
0x34e0…351a Head {h00=0x0036, h01=0x0050, text=»* A6 = FWT ADDRESS (=0 IF REQUEST ERROR)«, t00=0x0021, t01=0x0162}
0x351a…3558 Head {h00=0x003a, h01=0x0050, text=»* A7 = ORDER CODE (MODIFIED TO BASIC IF REQUESTED) «, t00=0x0022, t01=0x000c}
0x3558…3576 Head {h00=0x001a, h01=0x0050, text=»* A9 = ECB ADDRESS «, t00=0x0022, t01=0x004a}
0x3576…3592 Head {h00=0x0018, h01=0x0050, text=»* A2 IS DESTROYED«, t00=0x0022, t01=0x0068}
0x3592…359c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0084}
0x359c…35c2 Head {h00=0x0022, h01=0x0050, text=»FCHECK EQU * FCHECK MAIN ENTRY«, t00=0x0022, t01=0x008e}
0x35c2…35e0 Head {h00=0x001a, h01=0x0050, text=» LDR A9,A8 ECB ADDRESS«, t00=0x0022, t01=0x00b4}
0x35e0…35ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00d2}
0x35ea…3610 Head {h00=0x0022, h01=0x0050, text=»FCHEC2 EQU * FCHECK 2ND ENTRY «, t00=0x0022, t01=0x00dc}
0x3610…3626 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0022, t01=0x0102}
0x3626…3646 Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A9 FILE NUMBER «, t00=0x0022, t01=0x0118}
0x3646…3652 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0138}
0x3652…365c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0144}
0x365c…3672 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0022, t01=0x014e}
0x3672…3690 Head {h00=0x001a, h01=0x0050, text=» ELR A4,A9 FILE NUMBER«, t00=0x0022, t01=0x0164}
0x3690…369c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0182}
0x369c…36a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x018e}
0x36a6…36be Head {h00=0x0014, h01=0x0050, text=» EJECT FMTASK «, t00=0x0023, t01=0x0008}
0x36be…36c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0020}
0x36c8…36f0 Head {h00=0x0024, h01=0x0050, text=»* CHECK FILE NUMBER AND FIND FWT«, t00=0x0023, t01=0x002a}
0x36f0…36fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0052}
0x36fa…3722 Head {h00=0x0024, h01=0x0050, text=» ADKL A15,4 ADJUST STACKPOINTER «, t00=0x0023, t01=0x005c}
0x3722…3736 Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0023, t01=0x0084}
0x3736…375c Head {h00=0x0022, h01=0x0050, text=» RF(Z) FC:050 FILE NUMBER = 0 «, t00=0x0023, t01=0x0098}
0x375c…3772 Head {h00=0x0012, h01=0x0050, text=» CW A4,SCTNOF «, t00=0x0023, t01=0x00be}
0x3772…379c Head {h00=0x0026, h01=0x0050, text=» RF(G) FC:050 FILE NUMBER TOO BIG «, t00=0x0023, t01=0x00d4}
0x379c…37d0 Head {h00=0x0030, h01=0x0050, text=» LDKL A6,SCTFWT ADDRESS TO FWT CHAIN POINTER«, t00=0x0023, t01=0x00fe}
0x37d0…37da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0132}
0x37da…3802 Head {h00=0x0024, h01=0x0050, text=»FC:010 EQU * COMPUTE FWT ADDRESS«, t00=0x0023, t01=0x013c}
0x3802…3826 Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A6 NEXT FWT ADDRESS«, t00=0x0023, t01=0x0164}
0x3826…3838 Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0023, t01=0x0188}
0x3838…384e Head {h00=0x0012, h01=0x0050, text=» RB(P) FC:010 «, t00=0x0024, t01=0x000a}
0x384e…3858 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0020}
0x3858…387a Head {h00=0x001e, h01=0x0050, text=»* CHECK ACCESS PARAMETERS «, t00=0x0024, t01=0x002a}
0x387a…3884 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x004c}
0x3884…38bc Head {h00=0x0034, h01=0x0050, text=» ANKL A6,/FFFE CORRECT FWT ADDRESS JUST IN CASE «, t00=0x0024, t01=0x0056}
0x38bc…38f2 Head {h00=0x0032, h01=0x0050, text=» LD A2,FWTVTC,A6 VTOC SECTOR NO (FIRST EXTENT)«, t00=0x0024, t01=0x008e}
0x38f2…3918 Head {h00=0x0022, h01=0x0050, text=» RF(Z) FC:050 FILE NOT OPENED «, t00=0x0024, t01=0x00c4}
0x3918…3942 Head {h00=0x0026, h01=0x0050, text=» LD A2,FWTPAR,A6 ACCESS PARAMETERS«, t00=0x0024, t01=0x00ea}
0x3942…396a Head {h00=0x0024, h01=0x0050, text=» RF(N) FC:070 NEW VOLUME LOADED «, t00=0x0024, t01=0x0114}
0x396a…397c Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0024, t01=0x013c}
0x397c…39a2 Head {h00=0x0022, h01=0x0050, text=» RF(NN) FC:020 PHYSICAL ORDERS«, t00=0x0024, t01=0x014e}
0x39a2…39c2 Head {h00=0x001c, h01=0x0050, text=» ANK A7,/85 BASIC ORDER «, t00=0x0024, t01=0x0174}
0x39c2…39cc (37, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0004}
0x39cc…39e0 Head {h00=0x0010, h01=0x0050, text=»FC:020 EQU *«, t00=0x0025, t01=0x000e}
0x39e0…39f6 Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0025, t01=0x0022}
0x39f6…3a2a Head {h00=0x0030, h01=0x0050, text=» LD A2,FWTTAB,A6 ATTACH WORD (TTAB ADDRESS) «, t00=0x0025, t01=0x0038}
0x3a2a…3a54 Head {h00=0x0026, h01=0x0050, text=» ABR(Z)* A15 NOT ATTACHED, RETURN «, t00=0x0025, t01=0x006c}
0x3a54…3a84 Head {h00=0x002c, h01=0x0050, text=» CWR A2,A5 ATTACHED, CHECK IF THIS TASK «, t00=0x0025, t01=0x0096}
0x3a84…3ab4 Head {h00=0x002c, h01=0x0050, text=» RF(NE) FC:060 ATTACHED TO ANOTHER TASK «, t00=0x0025, t01=0x00c6}
0x3ab4…3ac0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x00f6}
0x3ac0…3aca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0102}
0x3aca…3ae0 Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=0 «, t00=0x0025, t01=0x010c}
0x3ae0…3afe Head {h00=0x001a, h01=0x0050, text=» SUR A2,A2 SET CR = 0 «, t00=0x0025, t01=0x0122}
0x3afe…3b0a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0140}
0x3b0a…3b14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x014c}
0x3b14…3b40 Head {h00=0x0028, h01=0x0050, text=» ABR* A15 RETURN WITHOUT CHANGING CR«, t00=0x0025, t01=0x0156}
0x3b40…3b4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0182}
0x3b4a…3b60 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0025, t01=0x018c}
0x3b60…3b6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0012}
0x3b6a…3b82 Head {h00=0x0014, h01=0x0050, text=»* ERROR RETURNS «, t00=0x0026, t01=0x001c}
0x3b82…3b8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0034}
0x3b8c…3bb4 Head {h00=0x0024, h01=0x0050, text=»FC:050 EQU * REQUEST ERROR EXIT «, t00=0x0026, t01=0x003e}
0x3bb4…3bde Head {h00=0x0026, h01=0x0050, text=» LDKL A4,/7FC0 RETURN CODE = /8000«, t00=0x0026, t01=0x0066}
0x3bde…3c06 Head {h00=0x0024, h01=0x0050, text=» LDK A6,0 INDICATE NO FWT FOUND «, t00=0x0026, t01=0x0090}
0x3c06…3c10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00b8}
0x3c10…3c38 Head {h00=0x0024, h01=0x0050, text=»FC:060 EQU * FILE ATTACHED EXIT «, t00=0x0026, t01=0x00c2}
0x3c38…3c5e Head {h00=0x0022, h01=0x0050, text=» ADK A4,/20 RETURN CODE = /40 «, t00=0x0026, t01=0x00ea}
0x3c5e…3c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0110}
0x3c68…3c94 Head {h00=0x0028, h01=0x0050, text=»FC:070 EQU * NEW VOLUME LOADED EXIT «, t00=0x0026, t01=0x011a}
0x3c94…3cba Head {h00=0x0022, h01=0x0050, text=» ADK A4,/20 RETURN CODE = /20 «, t00=0x0026, t01=0x0146}
0x3cba…3ce6 Head {h00=0x0028, h01=0x0050, text=» ABR* A15 RETURN WITHOUT CHANGING CR«, t00=0x0026, t01=0x016c}
0x3ce6…3cf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0008}
0x3cf0…3d06 Head {h00=0x0012, h01=0x0050, text=» EJECT TIOFM«, t00=0x0027, t01=0x0012}
0x3d06…3d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0028}
0x3d10…3d1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0032}
0x3d1a…3d2c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0027, t01=0x003c}
0x3d2c…3d3e Head {h00=0x000e, h01=0x0050, text=»* DET:FM *«, t00=0x0027, t01=0x004e}
0x3d3e…3d50 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0027, t01=0x0060}
0x3d50…3d5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0072}
0x3d5a…3d7e Head {h00=0x0020, h01=0x0050, text=»* INPUT: A6 = FWT ADDRESS«, t00=0x0027, t01=0x007c}
0x3d7e…3d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a0}
0x3d88…3dbe Head {h00=0x0032, h01=0x0050, text=»* OUTPUT:A10 = TTAB ADDRESS OF ATTACHED TASK«, t00=0x0027, t01=0x00aa}
0x3dbe…3de2 Head {h00=0x0020, h01=0x0050, text=»* A1 IS DESTROYED «, t00=0x0027, t01=0x00e0}
0x3de2…3dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0104}
0x3dec…3e0c Head {h00=0x001c, h01=0x0050, text=»DET:FM EQU * DETACH FILE«, t00=0x0027, t01=0x010e}
0x3e0c…3e22 Head {h00=0x0012, h01=0x0050, text=» IFT ATTDET=1 «, t00=0x0027, t01=0x012e}
0x3e22…3e5a Head {h00=0x0034, h01=0x0050, text=» LD A10,FWTTAB,A6 TTAB ADDRESS OF ATTACHED TASK «, t00=0x0027, t01=0x0144}
0x3e5a…3e7c Head {h00=0x001e, h01=0x0050, text=» RF(Z) DET:30 NOT ATTACHED«, t00=0x0027, t01=0x017c}
0x3e7c…3eb8 Head {h00=0x0038, h01=0x0050, text=» LD A5,FWTQUE,A6 QUEUE ANCHOR FOR FILE I/O REQUESTS «, t00=0x0028, t01=0x000e}
0x3eb8…3ee4 Head {h00=0x0028, h01=0x0050, text=» RF(Z) DET:20 NO MORE TASKS IN QUEUE«, t00=0x0028, t01=0x004a}
0x3ee4…3eee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0076}
0x3eee…3f20 Head {h00=0x002e, h01=0x0050, text=»* REPEAT ALL QUEUED REQUESTS FOR THIS FILE«, t00=0x0028, t01=0x0080}
0x3f20…3f2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00b2}
0x3f2a…3f3e Head {h00=0x0010, h01=0x0050, text=»DET:10 EQU *«, t00=0x0028, t01=0x00bc}
0x3f3e…3f68 Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A5 SAVE NEXT TTAB ADDRESS«, t00=0x0028, t01=0x00d0}
0x3f68…3f98 Head {h00=0x002c, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK FOR DISPATCHING«, t00=0x0028, t01=0x00fa}
0x3f98…3fc4 Head {h00=0x0028, h01=0x0050, text=» LDR A5,A1 RESTORE NEXT TTAB ADDRESS«, t00=0x0028, t01=0x012a}
0x3fc4…3fda Head {h00=0x0012, h01=0x0050, text=» RB(NZ) DET:10«, t00=0x0028, t01=0x0156}
0x3fda…4002 Head {h00=0x0024, h01=0x0050, text=» CM FWTQUE,A6 RESET QUEUE ANCHOR«, t00=0x0028, t01=0x016c}
0x4002…400c (41, 2, 198) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0004}
0x400c…4020 Head {h00=0x0010, h01=0x0050, text=»DET:20 EQU *«, t00=0x0029, t01=0x000e}
0x4020…4048 Head {h00=0x0024, h01=0x0050, text=» LDR A5,A10 RESTORE TTAB ADDRESS«, t00=0x0029, t01=0x0022}
0x4048…4070 Head {h00=0x0024, h01=0x0050, text=» CM FWTTAB,A6 RESET ATTACH WORD «, t00=0x0029, t01=0x004a}
0x4070…407a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0072}
0x407a…408e Head {h00=0x0010, h01=0x0050, text=»DET:30 EQU *«, t00=0x0029, t01=0x007c}
0x408e…409e Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x0029, t01=0x0090}
0x409e…40aa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x00a0}
0x40aa…40b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00ac}
0x40b4…40c0 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0029, t01=0x00b6}
0x40c0…40c4 Head {h00=0x4004, h01=0x0000}
0x40c4…40c8 00 29 00 c2 ┆ ) ┆
0x40c8…40d0 (42, 1, 8) 20 04 00 00 00 2a 00 04 ┆ * ┆
0x40d0…4120 (43, 0, 400) 00 12 00 50 5c 49 46 54 5c 43 50 55 38 35 32 3d 30 20 00 2b 00 04 00 24 00 50 5c 4d 4c 5c 32 2c 56 54 43 3a 45 4c 2c 41 39 5c 50 52 45 53 45 4e 54 20 4d 4f 53 54 20 46 49 54 00 2b 00 1a 00 1c 00 50 5c 44 53 52 2a 5c 41 31 33 5c 45 58 54 45 ┆ P IFT CPU852=0 + $ P ML 2,VTC:EL,A9 PRESENT MOST FIT + P DSR* A13 EXTE┆
0x4120…4170 4e 54 20 4c 45 4e 47 54 48 20 00 2b 00 42 00 08 00 50 5c 58 49 46 00 2b 00 62 00 06 00 50 2a 20 00 2b 00 6e 00 38 00 50 5c 52 46 28 4e 4c 29 5c 43 45 46 31 36 30 5c 4e 4f 54 20 47 52 45 41 54 45 52 20 54 48 41 4e 20 4c 41 53 54 20 46 4f 55 ┆NT LENGTH + B P XIF + b P* + n 8 P RF(NL) CEF160 NOT GREATER THAN LAST FOU┆
0x4170…41c0 4e 44 20 4d 4f 53 54 20 46 49 54 20 00 2b 00 78 00 0e 00 50 5c 52 46 5c 43 45 46 31 35 30 00 2b 00 b4 00 06 00 50 2a 20 00 2b 00 c6 00 12 00 50 5c 45 4a 45 43 54 5c 5c 46 4d 43 44 45 46 00 2b 00 d0 00 06 00 50 2a 20 00 2b 00 e6 00 06 00 50 ┆ND MOST FIT + x P RF CEF150 + P* + P EJECT FMCDEF + P* + P┆
0x41c0…4210 2a 20 00 2b 00 f0 00 10 00 50 43 45 46 31 32 30 5c 45 51 55 5c 2a 00 2b 00 fa 00 26 00 50 5c 4c 44 4b 4c 5c 41 31 32 2c 2d 31 5c 49 4e 44 49 43 41 54 45 20 45 51 55 41 4c 20 46 4f 55 4e 44 20 00 2b 01 0e 00 0e 00 50 5c 52 46 5c 43 45 46 31 ┆* + PCEF120 EQU * + & P LDKL A12,-1 INDICATE EQUAL FOUND + P RF CEF1┆
0x4210…4260 35 30 00 2b 01 38 00 10 00 50 43 45 46 31 33 30 5c 45 51 55 5c 2a 00 2b 01 4a 00 10 00 50 5c 4c 44 52 5c 41 31 32 2c 41 31 32 00 2b 01 5e 00 2a 00 50 5c 52 46 28 5a 29 5c 43 45 46 31 34 30 5c 31 53 54 20 47 52 45 41 54 45 52 20 45 58 54 45 ┆50 + 8 PCEF130 EQU * + J P LDR A12,A12 + ^ * P RF(Z) CEF140 1ST GREATER EXTE┆
0x4260…42b0 (44, 0, 400) 4e 54 20 46 4f 55 4e 44 00 2b 01 72 00 06 00 50 2a 20 00 2c 00 10 00 12 00 50 5c 49 46 54 5c 43 50 55 38 35 32 3d 31 20 00 2c 00 1a 00 30 00 50 5c 4c 44 4b 4c 5c 41 31 2c 56 54 43 3a 45 4c 5c 41 44 44 52 45 53 53 20 54 4f 20 50 52 45 53 45 ┆NT FOUND + r P* , P IFT CPU852=1 , 0 P LDKL A1,VTC:EL ADDRESS TO PRESE┆
0x42b0…4300 4e 54 20 4d 4f 53 54 20 46 49 54 20 00 2c 00 30 00 0e 00 50 5c 41 44 52 5c 41 31 2c 41 39 00 2c 00 64 00 10 00 50 5c 4c 44 52 5c 41 32 2c 41 31 33 20 00 2c 00 76 00 12 00 50 5c 43 46 5c 41 31 34 2c 43 4d 50 44 57 44 00 2c 00 8a 00 08 00 50 ┆NT MOST FIT , 0 P ADR A1,A9 , d P LDR A2,A13 , v P CF A14,CMPDWD , P┆
0x4300…4350 5c 58 49 46 00 2c 00 a0 00 06 00 50 2a 20 00 2c 00 ac 00 12 00 50 5c 49 46 54 5c 43 50 55 38 35 32 3d 30 20 00 2c 00 b6 00 24 00 50 5c 4d 4c 5c 32 2c 56 54 43 3a 45 4c 2c 41 39 5c 50 52 45 53 45 4e 54 20 4d 4f 53 54 20 46 49 54 00 2c 00 cc ┆ XIF , P* , P IFT CPU852=0 , $ P ML 2,VTC:EL,A9 PRESENT MOST FIT , ┆
0x4350…43a0 00 1c 00 50 5c 44 53 52 2a 5c 41 31 33 5c 45 58 54 45 4e 54 20 4c 45 4e 47 54 48 20 00 2c 00 f4 00 08 00 50 5c 58 49 46 00 2c 01 14 00 06 00 50 2a 20 00 2c 01 20 00 20 00 50 5c 52 46 28 4e 47 29 5c 43 45 46 31 36 30 5c 4e 4f 54 20 4d 4f 53 ┆ P DSR* A13 EXTENT LENGTH , P XIF , P* , P RF(NG) CEF160 NOT MOS┆
0x43a0…43f0 54 20 46 49 54 20 00 2c 01 2a 00 10 00 50 43 45 46 31 34 30 5c 45 51 55 5c 2a 00 2c 01 4e 00 26 00 50 5c 4c 44 4b 4c 5c 41 31 32 2c 31 5c 49 4e 44 49 43 41 54 45 20 47 52 45 41 54 45 52 20 46 4f 55 4e 44 00 2c 01 62 00 10 00 50 43 45 46 31 ┆T FIT , * PCEF140 EQU * , N & P LDKL A12,1 INDICATE GREATER FOUND , b PCEF1┆