00000000: 20 36 32 20 0D 02 C4 45 46 49 4E 45 20 4E 45 57 | 62 ...EFINE NEW|
00000010: 20 46 49 4C 45 20 53 54 52 55 43 54 55 52 45 0D | FILE STRUCTURE.|
00000020: 22 D7 4F 52 4B 20 57 49 54 48 20 45 58 49 53 54 |".ORK WITH EXIST|
00000030: 49 4E 47 20 46 49 4C 45 53 0D 22 4E 4F 20 52 4F |ING FILES."NO RO|
00000040: 4F 4D 20 46 4F 52 20 41 4E 4F 54 48 45 52 20 46 |OM FOR ANOTHER F|
00000050: 49 4C 45 0D 22 C6 49 4C 45 20 4E 41 4D 45 20 3F |ILE.".ILE NAME ?|
00000060: 0D 22 C6 49 4C 45 0D 22 41 4C 52 45 41 44 59 20 |.".ILE."ALREADY |
00000070: 45 58 49 53 54 53 0D 22 C4 45 46 49 4E 49 4E 47 |EXISTS.".EFINING|
00000080: 20 53 54 52 55 CF 54 55 52 45 20 4F 46 20 46 49 | STRU.TURE OF FI|
00000090: 4C 45 0D 22 23 0D 22 C6 49 45 4C 44 0D 22 D4 59 |LE."#.".IELD.".Y|
000000A0: 50 45 0D 22 CC 45 4E 47 54 48 0D 22 C9 4E 54 0D |PE.".ENGTH.".NT.|
000000B0: 22 C4 45 43 0D 22 41 4C 50 48 41 0D 22 4E 55 4D |".EC."ALPHA."NUM|
000000C0: 45 52 49 43 0D 22 54 49 4D 45 0D 22 44 41 54 45 |ERIC."TIME."DATE|
000000D0: 0D 22 C9 4E 44 45 58 20 46 49 45 4C 44 20 23 20 |.".NDEX FIELD # |
000000E0: 3F 0D 22 C9 4E 44 45 58 0D 22 D2 45 43 4F 52 44 |?.".NDEX.".ECORD|
000000F0: 53 0D 22 C4 45 4C 45 54 45 44 0D 22 C1 56 41 49 |S.".ELETED.".VAI|
00000100: 4C 41 42 4C 45 0D 22 54 4F 20 52 45 43 4F 52 44 |LABLE."TO RECORD|
00000110: 20 46 49 4C 45 20 53 54 52 55 43 54 55 52 45 3A | FILE STRUCTURE:|
00000120: 0D 22 45 4D 50 54 59 20 44 49 53 4B 0D 22 C6 49 |."EMPTY DISK.".I|
00000130: 4C 45 20 23 20 3F 0D 22 C4 49 53 50 4C 41 59 20 |LE # ?.".ISPLAY |
00000140: 53 54 52 55 43 54 55 52 45 0D 22 C3 52 45 41 54 |STRUCTURE.".REAT|
00000150: 45 20 4E 45 57 20 52 45 43 4F 52 44 53 0D 22 C1 |E NEW RECORDS.".|
00000160: 43 43 45 53 53 20 45 58 49 53 54 49 4E 47 20 52 |CCESS EXISTING R|
00000170: 45 43 4F 52 44 53 0D 22 C3 4F 50 59 20 54 4F 20 |ECORDS.".OPY TO |
00000180: 41 4E 4F 54 48 45 52 20 44 49 53 4B 0D 22 CF 50 |ANOTHER DISK.".P|
00000190: 54 49 4D 49 5A 45 20 41 43 43 45 53 53 0D 22 C3 |TIMIZE ACCESS.".|
000001A0: 4C 45 41 52 20 54 48 45 20 45 4E 54 49 52 45 20 |LEAR THE ENTIRE |
000001B0: 43 4F 4E 54 45 4E 54 0D 22 C4 45 4C 45 54 45 20 |CONTENT.".ELETE |
000001C0: 54 48 45 20 57 48 4F 4C 45 20 46 49 4C 45 0D 22 |THE WHOLE FILE."|
000001D0: 4E 4F 20 52 4F 4F 4D 20 46 4F 52 20 41 44 44 49 |NO ROOM FOR ADDI|
000001E0: 54 49 4F 4E 41 4C 20 52 45 43 4F 52 44 53 0D 22 |TIONAL RECORDS."|
000001F0: 43 52 45 41 54 45 0D 22 49 47 4E 4F 52 45 0D 22 |CREATE."IGNORE."|
00000200: D2 45 43 4F 52 44 20 23 0D 22 50 52 45 56 49 4F |.ECORD #."PREVIO|
00000210: 55 53 20 53 4F 52 54 45 44 20 53 45 51 55 45 4E |US SORTED SEQUEN|
00000220: 43 45 20 44 45 4C 45 54 45 44 0D 22 4E 4F 20 56 |CE DELETED."NO V|
00000230: 41 4C 49 44 20 52 45 43 4F 52 44 0D 22 41 43 43 |ALID RECORD."ACC|
00000240: 45 53 53 20 42 59 0D 22 4E 4F 54 20 46 4F 55 4E |ESS BY."NOT FOUN|
00000250: 44 0D 22 44 45 4C 45 54 45 44 0D 22 4E 45 58 54 |D."DELETED."NEXT|
00000260: 0D 22 41 4E 4F 54 48 45 52 0D 22 55 50 44 41 54 |."ANOTHER."UPDAT|
00000270: 45 0D 22 44 45 4C 45 54 45 0D 22 45 4E 44 20 4F |E."DELETE."END O|
00000280: 46 20 46 49 4C 45 0D 22 44 45 4C 45 54 49 4E 47 |F FILE."DELETING|
00000290: 20 52 45 43 4F 52 44 2E 2E 2E 0D 22 C6 49 45 4C | RECORD....".IEL|
000002A0: 44 20 23 20 3F 0D 22 55 50 44 41 54 49 4E 47 20 |D # ?."UPDATING |
000002B0: 52 45 43 4F 52 44 2E 2E 2E 0D 22 41 4E 59 20 49 |RECORD...."ANY I|
000002C0: 4E 54 45 52 52 55 50 54 49 4F 4E 20 4D 41 59 20 |NTERRUPTION MAY |
000002D0: 43 4F 52 52 55 50 54 20 44 41 54 41 0D 22 4F 4E |CORRUPT DATA."ON|
000002E0: 4C 59 20 53 54 52 55 43 54 55 52 45 20 54 4F 20 |LY STRUCTURE TO |
000002F0: 52 45 4D 41 49 4E 0D 22 44 41 54 41 20 26 20 53 |REMAIN."DATA & S|
00000300: 54 52 55 43 54 55 52 45 20 54 4F 20 42 45 20 53 |TRUCTURE TO BE S|
00000310: 43 52 41 54 43 48 45 44 0D 22 54 4F 20 53 54 41 |CRATCHED."TO STA|
00000320: 52 54 20 45 58 45 43 55 54 49 4F 4E 3A 0D 22 44 |RT EXECUTION:."D|
00000330: 45 53 54 49 4E 41 54 49 4F 4E 20 44 49 53 4B 20 |ESTINATION DISK |
00000340: 49 4E 20 44 52 49 56 45 0D 22 4E 4F 20 44 41 54 |IN DRIVE."NO DAT|
00000350: 41 20 54 4F 20 4F 50 54 49 4D 49 5A 45 0D 22 4F |A TO OPTIMIZE."O|
00000360: 50 54 49 4D 49 5A 49 4E 47 20 41 43 43 45 53 53 |PTIMIZING ACCESS|
00000370: 2E 2E 2E 0D 22 53 43 52 41 54 43 48 49 4E 47 20 |...."SCRATCHING |
00000380: 44 41 54 41 2E 2E 2E 0D 22 53 43 52 41 54 43 48 |DATA...."SCRATCH|
00000390: 49 4E 47 20 44 41 54 41 20 26 20 53 54 52 55 43 |ING DATA & STRUC|
000003A0: 54 55 52 45 2E 2E 2E 0D 22 4E 4F 20 52 4F 4F 4D |TURE...."NO ROOM|
000003B0: 20 4F 4E 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 | ON DESTINATION |
000003C0: 44 49 53 4B 0D 22 46 49 4C 45 20 42 45 49 4E 47 |DISK."FILE BEING|
000003D0: 20 43 4F 50 49 45 44 2E 2E 2E 0D 22 46 49 4C 45 | COPIED...."FILE|
000003E0: 20 45 58 49 53 54 53 20 4F 4E 20 44 45 53 54 49 | EXISTS ON DESTI|
000003F0: 4E 41 54 49 4F 4E 20 44 49 53 4B 0D 22 42 45 49 |NATION DISK."BEI|
00000400: 4E 47 20 50 52 4F 43 45 53 53 45 44 3A 0D 22 4E |NG PROCESSED:."N|
00000410: 4F 20 44 41 54 41 20 54 4F 20 53 43 52 41 54 43 |O DATA TO SCRATC|
00000420: 48 0D |H. |
62 ..DEFINE NEW FILE STRUCTURE."WORK WI
TH EXISTING FILES."NO ROOM FOR ANOTHER F
ILE."FILE NAME ?."FILE."ALREADY EXISTS."
DEFINING STRUOTURE OF FILE."#."FIELD."TY
PE."LENGTH."INT."DEC."ALPHA."NUMERIC."TI
ME."DATE."INDEX FIELD # ?."INDEX."RECORD
S."DELETED."AVAILABLE."TO RECORD FILE ST
RUCTURE:."EMPTY DISK."FILE # ?."DISPLAY
STRUCTURE."CREATE NEW RECORDS."ACCESS EX
ISTING RECORDS."COPY TO ANOTHER DISK."OP
TIMIZE ACCESS."CLEAR THE ENTIRE CONTENT.
"DELETE THE WHOLE FILE."NO ROOM FOR ADDI
TIONAL RECORDS."CREATE."IGNORE."RECORD #
."PREVIOUS SORTED SEQUENCE DELETED."NO V
ALID RECORD."ACCESS BY."NOT FOUND."DELET
ED."NEXT."ANOTHER."UPDATE."DELETE."END O
F FILE."DELETING RECORD...."FIELD # ?."U
PDATING RECORD...."ANY INTERRUPTION MAY
CORRUPT DATA."ONLY STRUCTURE TO REMAIN."
DATA & STRUCTURE TO BE SCRATCHED."TO STA
RT EXECUTION:."DESTINATION DISK IN DRIVE
."NO DATA TO OPTIMIZE."OPTIMIZING ACCESS
...."SCRATCHING DATA...."SCRATCHING DATA
& STRUCTURE...."NO ROOM ON DESTINATION
DISK."FILE BEING COPIED...."FILE EXISTS
ON DESTINATION DISK."BEING PROCESSED:."N
O DATA TO SCRATCH.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL