LIST LOADER
FILE INFORMATION
FILENAME(S): LIST LOADER
FILE TYPE(S): PRG
FILE SIZE: 9.4K
FIRST SEEN: 2025-11-02 16:42:18
APPEARS ON: 1 disk(s)
FILE HASH
1ac4879a8117d1f18d240fbfeb25fc3e2771d94c1a6e5ba3c96f8578d9c7abbc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BBC TO HEADBAN | LIST LOADER | PRG | Treasure Chest - ralf | 12 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 9E 32 30 37 33 00 00 00 20 52 |.......2073... R|
00000010: 08 4C 45 B7 20 52 08 4C 99 A4 20 52 08 AD FF 02 |.LE. R.L.. R....|
00000020: C9 64 F0 17 A9 3F 85 BB A9 08 85 BC A9 06 85 B7 |.d...?..........|
00000030: A9 00 85 B9 A2 00 A0 A0 20 D5 FF 68 68 4C 48 A0 |........ ..hhLH.|
00000040: 52 54 4C 2D 36 34 20 52 08 20 71 AF 20 5F 08 60 |RTL-64 R. q. _.`|
00000050: A2 01 60 A9 03 05 00 85 00 A9 FE 25 01 85 01 60 |..`........%...`|
00000060: 48 A9 03 05 00 85 00 A5 01 09 01 85 01 68 60 20 |H............h` |
00000070: 5F 08 20 47 A3 20 52 08 60 40 00 02 87 00 87 00 |_. G. R.`@......|
00000080: A0 00 00 00 B7 2D 00 01 00 54 5B 08 56 4C 2D 54 |.....-...T[.VL-T|
00000090: 45 4D 50 31 00 86 44 44 24 28 31 30 29 3A 41 00 |EMP1..DD$(10):A.|
000000A0: 06 57 88 90 20 40 00 00 80 50 88 90 20 41 00 00 |.W.. @...P.. A..|
000000B0: 89 C3 50 8A 03 34 2E 37 D2 02 8A 08 31 32 2F 30 |..P..4.7....12/0|
000000C0: 32 2F 38 34 D2 09 88 90 50 20 00 00 80 50 88 90 |2/84....P ...P..|
000000D0: 50 21 00 00 80 50 00 99 22 93 1E 22 3A 88 90 40 |P!...P.."..":..@|
000000E0: 00 00 00 B8 0E 89 20 2E 4F 10 00 93 22 4C 2D 53 |...... .O..."L-S|
000000F0: 4F 52 54 22 2C 38 2C 31 3A 8D 03 3C B8 0E 89 A9 |ORT",8,1:..<....|
00000100: 2E 4F 12 00 93 22 44 49 52 20 40 38 32 38 22 2C |.O..."DIR @828",|
00000110: 38 2C 31 3A 89 85 B8 13 D2 10 89 87 B8 13 D2 17 |8,1:............|
00000120: 89 88 B8 13 D2 1E 80 B8 13 D2 25 00 99 22 1E 22 |..........%.."."|
00000130: 00 86 44 24 28 31 30 38 30 29 3A 41 00 04 90 2C |..D$(1080):A...,|
00000140: 81 2B 4F 09 4A D4 80 4A D4 66 4C 4A D9 BD 4A D4 |.+O.J..J.fLJ..J.|
00000150: 80 4A D5 80 00 99 22 93 1D 1D 1D 1D 1E 44 49 53 |.J...."......DIS|
00000160: 4B 20 46 49 4C 45 20 50 52 4F 47 52 41 4D 3A 20 |K FILE PROGRAM: |
00000170: 20 22 56 45 24 00 99 22 11 20 20 20 20 31 20 2D | "VE$..". 1 -|
00000180: 20 41 44 44 20 46 49 4C 45 53 22 00 99 22 11 20 | ADD FILES"..". |
00000190: 20 20 20 32 20 2D 20 50 52 49 4E 54 20 41 20 46 | 2 - PRINT A F|
000001A0: 49 4C 45 22 00 99 22 11 20 20 20 20 33 20 2D 20 |ILE"..". 3 - |
000001B0: 53 4F 52 54 20 54 48 45 20 46 49 4C 45 22 00 99 |SORT THE FILE"..|
000001C0: 22 11 20 20 20 20 34 20 2D 20 53 45 41 52 43 48 |". 4 - SEARCH|
000001D0: 20 46 4F 52 20 46 49 4C 45 20 4E 41 4D 45 22 00 | FOR FILE NAME".|
000001E0: 99 22 11 20 20 20 20 35 20 2D 20 53 45 41 52 43 |.". 5 - SEARC|
000001F0: 48 20 46 4F 52 20 44 49 53 4B 20 4E 55 4D 42 45 |H FOR DISK NUMBE|
00000200: 52 22 00 99 22 11 20 20 20 20 36 20 2D 20 56 49 |R"..". 6 - VI|
00000210: 45 57 20 44 49 53 4B 20 44 49 52 45 43 54 4F 52 |EW DISK DIRECTOR|
00000220: 59 22 00 99 22 11 20 20 20 20 37 20 2D 20 53 41 |Y"..". 7 - SA|
00000230: 56 45 20 44 2D 46 49 4C 45 22 00 99 22 11 20 20 |VE D-FILE"..". |
00000240: 20 20 38 20 2D 20 4C 4F 41 44 20 44 2D 46 49 4C | 8 - LOAD D-FIL|
00000250: 45 22 00 99 22 11 20 20 20 20 39 20 2D 20 52 45 |E"..". 9 - RE|
00000260: 4D 4F 56 45 20 41 20 4E 41 4D 45 22 00 99 22 11 |MOVE A NAME"..".|
00000270: 20 20 20 20 30 20 2D 20 51 55 49 54 22 00 99 22 | 0 - QUIT".."|
00000280: 11 20 20 20 20 52 45 43 4F 52 44 53 20 49 4E 20 |. RECORDS IN |
00000290: 4D 45 4D 4F 52 59 22 4E 00 A1 41 24 3A 92 3A 8A |MEMORY"N..A$:.:.|
000002A0: 00 2B 4F 05 48 F5 68 92 3A 8A 01 30 2D 92 3A 8A |.+O.H.h.:..0-.:.|
000002B0: 01 39 2A 07 4F 05 48 F5 68 92 3A 8A 01 30 2B 4F |.9*.O.H.h.:..0+O|
000002C0: 05 4A F5 1B 92 3A B8 11 D0 41 90 41 4E 14 DB F4 |.J...:...A.AN...|
000002D0: F4 D2 EE 66 ED 7C EC D2 EC 1F E2 1F E1 15 E4 CC |...f.|..........|
000002E0: F5 1B 48 F6 AC 00 99 22 93 11 11 11 11 11 20 20 |..H...."...... |
000002F0: 51 55 49 54 21 20 20 41 52 45 20 59 4F 55 20 53 |QUIT! ARE YOU S|
00000300: 55 52 45 3F 22 00 A1 41 24 3A 92 3A 8A 00 2B 4F |URE?"..A$:.:..+O|
00000310: 05 48 F4 FB 92 3A 8A 01 59 2E 4F 03 4C 00 99 22 |.H...:..Y.O.L.."|
00000320: 93 22 3A 4A D6 C6 5E 03 00 80 3A 48 F6 AC 00 99 |.":J..^...:H....|
00000330: 22 93 12 22 5A 53 24 00 99 A3 31 30 29 22 4F 55 |".."ZS$...10)"OU|
00000340: 54 50 55 54 20 4F 4E 22 00 99 22 20 12 31 92 20 |TPUT ON".." .1. |
00000350: 20 20 53 43 52 45 45 4E 22 00 99 22 20 12 32 92 | SCREEN".." .2.|
00000360: 20 20 20 38 30 20 43 4F 4C 2E 20 50 52 49 4E 54 | 80 COL. PRINT|
00000370: 45 52 22 00 99 22 20 12 33 92 20 20 20 31 33 36 |ER".." .3. 136|
00000380: 20 43 4F 4C 2E 20 50 52 49 4E 54 45 52 20 28 43 | COL. PRINTER (C|
00000390: 4F 4E 44 45 4E 53 45 44 20 50 52 49 4E 54 29 22 |ONDENSED PRINT)"|
000003A0: 00 A1 41 24 3A 92 3A B8 11 4D 06 F4 4C F3 56 F0 |..A$:.:..M..L.V.|
000003B0: E5 48 F4 60 81 D0 4F 90 33 89 16 04 B8 01 81 01 |.H.`..O.3.......|
000003C0: 42 00 4F 00 99 22 93 22 3A 89 16 90 4F 81 02 03 |B.O..".":...O...|
000003D0: 81 01 D0 56 89 16 90 4F 03 89 0B 02 42 00 56 80 |...V...O....B.V.|
000003E0: D0 5D 89 15 42 00 5D 90 56 90 5D 01 8D 04 38 2A |.]..B.].V.]...8*|
000003F0: 4F 05 48 F3 F6 00 99 22 20 20 20 20 20 20 20 20 |O.H...." |
00000400: 20 22 3B 44 24 28 4A AA 4B 29 3A 47 00 5D 89 D6 | ";D$(J.K):G.]..|
00000410: 89 17 50 00 99 00 99 A3 36 29 22 12 20 46 31 3D |..P.....6)". F1=|
00000420: 4D 45 4E 55 20 20 20 46 35 3D 55 50 20 20 20 46 |MENU F5=UP F|
00000430: 37 3D 44 4F 57 4E 20 92 22 3B 00 A1 41 24 3A 92 |7=DOWN .";..A$:.|
00000440: 3A 8A 00 2B 4F 05 48 F3 C6 92 3A 92 10 2B 4F 10 |:..+O.H...:..+O.|
00000450: 90 33 89 16 04 B8 01 81 01 D0 4F 48 F3 5A 92 3A |.3........OH.Z.:|
00000460: 92 17 2B 90 4F 81 2A 06 4F 0B 90 4F 82 02 D0 4F |..+.O.*.O..O...O|
00000470: 48 F3 5A 92 3A 92 17 2B 90 4F 81 2B 06 4F 08 80 |H.Z.:..+.O.+.O..|
00000480: D0 4F 48 F3 5A 92 3A 92 1E 2E 4F 05 48 F3 C6 90 |.OH.Z.:...O.H...|
00000490: 4F 90 33 89 16 04 B8 01 81 01 2B 4F 0B 90 33 89 |O.3.......+O..3.|
000004A0: 16 04 B8 01 D0 4F 47 00 4F 4C 00 99 22 93 45 4E |.....OG.OL..".EN|
000004B0: 54 45 52 20 54 4F 44 41 59 27 53 20 44 41 54 45 |TER TODAY'S DATE|
000004C0: 20 28 4E 4F 20 43 4F 4D 4D 41 53 29 22 00 85 58 | (NO COMMAS)"..X|
000004D0: 59 24 00 99 22 93 45 4E 54 45 52 20 50 52 49 4E |Y$..".ENTER PRIN|
000004E0: 54 45 52 20 44 45 56 49 43 45 20 4E 55 4D 42 45 |TER DEVICE NUMBE|
000004F0: 52 22 00 85 44 4E 24 3A 92 6B 81 B8 14 B8 11 D0 |R"..DN$:.k......|
00000500: 72 90 72 84 2D 90 72 87 2A 07 4F 05 48 F3 2E 00 |r.r.-.r.*.O.H...|
00000510: A0 33 00 9F 33 2C 44 4E 00 98 33 3A B8 1A 4F 37 |.3..3,DN..3:..O7|
00000520: 00 99 22 11 11 11 50 52 49 4E 54 45 52 20 4E 4F |.."...PRINTER NO|
00000530: 54 20 4F 4E 2D 4C 49 4E 45 2C 20 48 49 54 20 41 |T ON-LINE, HIT A|
00000540: 20 4B 45 59 2E 22 00 92 31 39 38 2C 31 3A 89 C6 | KEY."..198,1:..|
00000550: 80 50 48 F6 AC 00 99 22 93 50 52 49 4E 54 49 4E |.PH....".PRINTIN|
00000560: 47 2C 20 48 4F 4C 44 20 44 4F 57 4E 20 46 31 20 |G, HOLD DOWN F1 |
00000570: 54 4F 20 41 42 4F 52 54 2E 22 3A 8A 05 20 20 20 |TO ABORT.":.. |
00000580: 20 20 D2 79 81 D0 41 89 3C D0 80 8A 01 31 D2 87 | .y..A.<....1..|
00000590: 4A F1 CB 4A F1 20 90 33 89 B4 2D 4F 05 48 EE A2 |J..J. .3..-O.H..|
000005A0: 89 B5 D0 41 89 F0 D0 80 8A 01 32 D2 87 4A F1 CB |...A......2..J..|
000005B0: 4A F1 20 90 33 89 F0 2D 4F 05 48 EE A2 8D 01 69 |J. .3..-O.H....i|
000005C0: D0 41 8D 01 A4 D0 80 8A 01 33 D2 87 4A F1 CB 4A |.A.......3..J..J|
000005D0: F1 20 90 33 8D 01 A4 2D 4F 05 48 EE A2 8D 02 1D |. .3...-O.H.....|
000005E0: D0 41 8D 02 58 D0 80 8A 01 34 D2 87 4A F1 CB 4A |.A..X....4..J..J|
000005F0: F1 20 90 33 8D 02 58 2D 4F 05 48 EE A2 8D 02 D1 |. .3..X-O.H.....|
00000600: D0 41 8D 03 0C D0 80 8A 01 35 D2 87 4A F1 CB 4A |.A.......5..J..J|
00000610: F1 20 90 33 8D 03 0C 2D 4F 05 48 EE A2 8D 03 85 |. .3...-O.H.....|
00000620: D0 41 8D 03 C0 D0 80 8A 01 36 D2 87 4A F1 CB 4A |.A.......6..J..J|
00000630: F1 20 48 EE A2 00 98 33 2C 22 20 20 20 20 20 20 |. H....3," |
00000640: 20 20 20 50 41 47 45 20 22 50 4E 24 22 20 20 20 | PAGE "PN$" |
00000650: 20 20 20 20 20 20 22 5A 53 24 22 20 20 20 20 20 | "ZS$" |
00000660: 20 20 20 20 22 58 59 24 00 98 33 2C 22 20 22 3A | "XY$..3," ":|
00000670: 90 41 D0 56 90 80 42 00 56 00 98 33 2C 42 24 3B |.A.V..B.V..3,B$;|
00000680: 44 24 28 4A 29 3B 42 24 3B 44 24 28 4A AA 36 30 |D$(J);B$;D$(J.60|
00000690: 29 3B 42 24 3B 44 24 28 4A AA 31 32 30 29 3A 89 |);B$;D$(J.120):.|
000006A0: C5 B8 0E 84 2B 4F 0C 00 98 33 00 A0 33 3A 48 F6 |....+O...3..3:H.|
000006B0: AC 90 8E 80 2B 18 D0 8E 89 C7 90 8E 50 00 99 22 |....+.......P.."|
000006C0: 13 50 52 49 4E 54 49 4E 47 11 11 11 22 3A 47 00 |.PRINTING...":G.|
000006D0: 56 81 D0 95 84 42 00 95 00 98 33 3A 47 00 95 4C |V....B....3:G..L|
000006E0: 00 99 22 12 4E 45 58 54 20 50 41 47 45 3A 20 20 |..".NEXT PAGE: |
000006F0: 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F |PRESS ANY KEY TO|
00000700: 20 43 4F 4E 54 49 4E 55 45 92 22 00 A1 41 24 3A | CONTINUE."..A$:|
00000710: 92 3A 8A 00 2B 4F 05 48 F0 F5 4C 00 99 22 93 45 |.:..+O.H..L..".E|
00000720: 4E 54 45 52 20 54 4F 44 41 59 27 53 20 44 41 54 |NTER TODAY'S DAT|
00000730: 45 20 28 4E 4F 20 43 4F 4D 4D 41 53 29 22 00 85 |E (NO COMMAS)"..|
00000740: 58 59 24 00 99 22 93 45 4E 54 45 52 20 50 52 49 |XY$..".ENTER PRI|
00000750: 4E 54 45 52 20 44 45 56 49 43 45 20 4E 55 4D 42 |NTER DEVICE NUMB|
00000760: 45 52 22 00 85 44 4E 24 3A 92 6B 81 B8 14 B8 11 |ER"..DN$:.k.....|
00000770: D0 72 90 72 84 2D 90 72 87 2A 07 4F 05 48 F0 BD |.r.r.-.r.*.O.H..|
00000780: 00 85 22 93 11 11 11 11 43 48 52 24 28 58 58 29 |..".....CHR$(XX)|
00000790: 20 46 4F 52 20 43 4F 4E 44 45 4E 53 45 44 20 4D | FOR CONDENSED M|
000007A0: 4F 44 45 20 20 20 31 35 9D 9D 9D 9D 22 3B 44 43 |ODE 15....";DC|
000007B0: 24 3A 92 9C B8 11 B8 13 D2 9C 00 A0 33 00 9F 33 |$:..........3..3|
000007C0: 2C 44 4E 00 98 33 3A B8 1A 4F 37 00 99 22 11 11 |,DN..3:..O7.."..|
000007D0: 11 50 52 49 4E 54 45 52 20 4E 4F 54 20 4F 4E 2D |.PRINTER NOT ON-|
000007E0: 4C 49 4E 45 2C 20 48 49 54 20 41 20 4B 45 59 2E |LINE, HIT A KEY.|
000007F0: 22 00 92 31 39 38 2C 31 3A 89 C6 80 50 48 F6 AC |"..198,1:...PH..|
00000800: 00 99 22 93 50 52 49 4E 54 49 4E 47 2C 20 48 4F |..".PRINTING, HO|
00000810: 4C 44 20 44 4F 57 4E 20 46 31 20 54 4F 20 41 42 |LD DOWN F1 TO AB|
00000820: 4F 52 54 2E 22 3A 8A 02 20 20 D2 79 81 D0 41 89 |ORT.":.. .y..A.|
00000830: 3C D0 80 8A 01 31 D2 87 4A EF 7F 4A F1 20 90 33 |<....1..J..J. .3|
00000840: 8D 01 68 2D 4F 05 48 EE A2 8D 01 69 D0 41 8D 01 |..h-O.H....i.A..|
00000850: A4 D0 80 8A 01 32 D2 87 4A EF 7F 4A F1 20 90 33 |.....2..J..J. .3|
00000860: 8D 02 D1 2D 4F 05 48 EE A2 8D 02 D1 D0 41 8D 03 |...-O.H......A..|
00000870: 0C D0 80 8A 01 33 D2 87 4A EF 7F 4A F1 20 48 EE |.....3..J..J. H.|
00000880: A2 00 98 33 2C 22 20 20 20 20 20 20 20 20 20 50 |...3," P|
00000890: 41 47 45 20 22 50 4E 24 22 20 20 20 20 20 20 20 |AGE "PN$" |
000008A0: 20 20 22 5A 53 24 22 20 20 20 20 20 20 20 20 20 | "ZS$" |
000008B0: 22 58 59 24 00 98 33 2C 22 20 22 3A 90 41 D0 56 |"XY$..3," ":.A.V|
000008C0: 90 80 42 00 56 00 98 33 2C 44 43 24 3B 44 24 28 |..B.V..3,DC$;D$(|
000008D0: 4A 29 3B 42 24 3B 44 24 28 4A AA 36 30 29 3B 42 |J);B$;D$(J.60);B|
000008E0: 24 3B 44 24 28 4A AA 31 32 30 29 3B 42 24 3B 44 |$;D$(J.120);B$;D|
000008F0: 24 28 4A AA 31 38 30 29 3B 00 98 33 2C 42 24 3B |$(J.180);..3,B$;|
00000900: 44 24 28 4A AA 32 34 30 29 3B 42 24 3B 44 24 28 |D$(J.240);B$;D$(|
00000910: 4A AA 33 30 30 29 3B C7 28 31 38 29 3A 89 C5 B8 |J.300);.(18):...|
00000920: 0E 84 2B 4F 0C 00 98 33 00 A0 33 3A 48 F6 AC 90 |..+O...3..3:H...|
00000930: 8E 80 2B 18 D0 8E 89 C7 90 8E 50 00 99 22 13 50 |..+.......P..".P|
00000940: 52 49 4E 54 49 4E 47 11 11 11 22 3A 47 00 56 81 |RINTING...":G.V.|
00000950: D0 95 84 42 00 95 00 98 33 3A 47 00 95 4C 00 98 |...B....3:G..L..|
00000960: 33 00 A0 33 00 99 22 11 12 45 4E 44 20 4F 46 20 |3..3.."..END OF |
00000970: 4C 49 53 54 2E 20 20 50 52 45 53 53 20 41 4E 59 |LIST. PRESS ANY|
00000980: 20 4B 45 59 22 3A 8A 00 D2 3A 00 A1 41 24 3A 92 | KEY":...:..A$:.|
00000990: 3A 8A 00 2B 4F 05 48 EE 7B 4C 00 99 22 93 11 11 |:..+O.H.{L.."...|
000009A0: 11 11 11 20 20 53 4F 52 54 20 41 20 46 49 4C 45 |... SORT A FILE|
000009B0: 22 00 99 00 99 22 11 20 20 12 53 4F 52 54 49 4E |"....". .SORTIN|
000009C0: 47 2E 2E 2E 2E 2E 2E 92 22 3A 80 D0 A3 80 D0 AA |G.......":......|
000009D0: 88 90 40 00 00 00 51 2C 4E 2C 44 24 28 31 29 3A |..@...Q,N,D$(1):|
000009E0: 81 D0 4F 90 33 42 00 4F 90 4F A2 04 92 B1 2B 4F |..O.3B.O.O....+O|
000009F0: 0E 90 4F 81 02 D0 A3 4A ED AD 48 ED F9 47 00 4F |..O....J..H..G.O|
00000A00: 90 A3 80 2B 4F 03 4C 90 33 90 A3 02 D0 AA 00 99 |...+O.L.3.......|
00000A10: 22 11 11 20 22 4E 32 22 46 49 4C 45 53 20 52 45 |".. "N2"FILES RE|
00000A20: 4D 4F 56 45 44 22 3A 90 A3 D0 33 00 99 22 11 20 |MOVED":...3..". |
00000A30: 20 12 20 50 52 45 53 53 20 41 4E 59 20 4B 45 59 | . PRESS ANY KEY|
00000A40: 20 92 22 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 | ."..A$:.:..+O.H|
00000A50: ED BD 4C 81 D0 4F 8D 04 38 42 00 4F 90 4F A2 04 |..L..O..8B.O.O..|
00000A60: 92 B1 2B 4F 1D 90 4F 8A 15 20 20 20 20 20 20 20 |..+O..O.. |
00000A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E2 04 | ..|
00000A80: 47 00 4F 4C 00 99 22 93 11 11 11 11 11 20 20 53 |G.OL.."...... S|
00000A90: 45 41 52 43 48 20 46 4F 52 20 46 49 4C 45 20 4E |EARCH FOR FILE N|
00000AA0: 41 4D 45 22 00 99 22 45 4E 54 45 52 20 4E 41 4D |AME".."ENTER NAM|
00000AB0: 45 20 54 4F 20 53 45 41 52 43 48 20 46 4F 52 22 |E TO SEARCH FOR"|
00000AC0: 3A 8A 00 D2 B8 00 85 53 4E 24 3A 92 B8 B8 0F D0 |:......SN$:.....|
00000AD0: BF 81 D0 4F 90 33 42 00 4F 90 4F A2 04 90 BF B8 |...O.3B.O.O.....|
00000AE0: 14 92 B8 2B 4F 09 00 99 44 24 28 49 29 3A 8D 02 |...+O...D$(I):..|
00000AF0: 8D B8 0E 81 2B 4F 05 48 ED 13 47 00 4F 00 99 22 |....+O.H..G.O.."|
00000B00: 11 12 45 4E 44 20 4F 46 20 4C 49 53 54 2E 20 20 |..END OF LIST. |
00000B10: 50 52 45 53 53 20 41 4E 59 20 4B 45 59 22 00 A1 |PRESS ANY KEY"..|
00000B20: 41 24 3A 92 3A 8A 00 2B 4F 05 48 EC E2 4C 00 99 |A$:.:..+O.H..L..|
00000B30: 22 93 11 11 11 11 11 20 20 53 45 41 52 43 48 20 |"...... SEARCH |
00000B40: 46 4F 52 20 44 49 53 4B 20 4E 55 4D 42 45 52 22 |FOR DISK NUMBER"|
00000B50: 00 99 22 45 4E 54 45 52 20 34 20 43 48 52 2E 20 |.."ENTER 4 CHR. |
00000B60: 49 44 20 54 4F 20 53 45 41 52 43 48 20 46 4F 52 |ID TO SEARCH FOR|
00000B70: 22 3A 8A 00 D2 B8 00 85 53 4E 24 3A 92 B8 B8 0F |":......SN$:....|
00000B80: D0 BF 81 D0 4F 90 33 42 00 4F 90 4F A2 04 89 12 |....O.3B.O.O....|
00000B90: 90 BF B8 16 92 B8 2B 4F 09 00 99 44 24 28 49 29 |......+O...D$(I)|
00000BA0: 3A 8D 02 8D B8 0E 81 2B 4F 05 48 EC 60 47 00 4F |:......+O.H.`G.O|
00000BB0: 00 99 22 11 12 45 4E 44 20 4F 46 20 4C 49 53 54 |.."..END OF LIST|
00000BC0: 2E 20 20 50 52 45 53 53 20 41 4E 59 20 4B 45 59 |. PRESS ANY KEY|
00000BD0: 22 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 EC 2F |"..A$:.:..+O.H./|
00000BE0: 4C 89 08 D0 C6 8A 01 30 D2 CD 90 D4 89 08 2B 4F |L......0......+O|
00000BF0: 05 48 EB D4 00 99 22 93 57 48 41 54 20 44 45 56 |.H....".WHAT DEV|
00000C00: 49 43 45 20 28 38 20 4F 52 20 39 29 22 3B 00 85 |ICE (8 OR 9)";..|
00000C10: 44 24 3A 92 DB 81 B8 14 B8 11 D0 C6 90 C6 89 08 |D$:.............|
00000C20: 2D 90 C6 89 09 2A 07 4F 05 48 EC 0C 92 E2 8A 02 |-....*.O.H......|
00000C30: 30 3A 2B 4F 05 48 EB 86 00 99 22 93 57 48 41 54 |0:+O.H....".WHAT|
00000C40: 20 44 52 49 56 45 20 28 30 20 4F 52 20 31 2C 20 | DRIVE (0 OR 1, |
00000C50: 2A 20 46 4F 52 20 42 4F 54 48 29 22 3B 00 85 44 |* FOR BOTH)";..D|
00000C60: 44 24 3A 92 CD 81 B8 14 B8 11 D0 E9 90 E9 80 2D |D$:............-|
00000C70: 90 E9 81 2A 07 4F 05 48 EB D4 8D 03 47 92 CD B8 |...*.O.H....G...|
00000C80: 12 50 8D 03 4E 90 C6 50 00 99 22 93 49 53 20 54 |.P..N..P..".IS T|
00000C90: 48 45 20 43 4F 52 52 45 43 54 20 44 49 53 4B 20 |HE CORRECT DISK |
00000CA0: 49 4E 20 54 48 45 20 44 52 49 56 45 3F 22 00 A1 |IN THE DRIVE?"..|
00000CB0: 41 24 3A 92 3A 8A 01 59 2E 4F 05 48 EB 52 00 9F |A$:.:..Y.O.H.R..|
00000CC0: 31 35 2C 44 2C 31 35 2C 22 49 22 AA 44 44 24 00 |15,D,15,"I".DD$.|
00000CD0: 84 31 35 2C 45 2C 45 24 2C 46 2C 47 00 A0 31 35 |.15,E,E$,F,G..15|
00000CE0: 3A 90 F0 80 2E 4F 24 00 99 22 20 20 20 20 20 20 |:....O$.." |
00000CF0: 20 20 22 45 22 20 22 45 24 22 20 22 46 22 20 22 | "E" "E$" "F" "|
00000D00: 47 00 A0 31 35 3A 48 EA F2 8D 03 3C 51 3A 00 99 |G..15:H....<Q:..|
00000D10: A3 38 29 22 11 12 50 52 45 53 53 20 41 4E 59 20 |.8)"..PRESS ANY |
00000D20: 4B 45 59 20 57 48 45 4E 20 52 45 41 44 59 22 00 |KEY WHEN READY".|
00000D30: A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 EA D1 4C 00 |.A$:.:..+O.H..L.|
00000D40: 99 22 93 11 11 11 1E 20 20 20 20 20 20 20 20 20 |."..... |
00000D50: 20 41 44 44 20 46 52 4F 4D 20 44 49 53 4B 22 00 | ADD FROM DISK".|
00000D60: 99 22 11 46 49 4C 45 53 22 4E 3B 3A 96 01 0C 8A |.".FILES"N;:....|
00000D70: 01 41 2E 4F 18 00 99 22 2D 20 4C 41 53 54 20 49 |.A.O..."- LAST I|
00000D80: 44 20 55 53 45 44 20 22 49 34 24 00 99 00 99 22 |D USED "I4$...."|
00000D90: 11 50 4C 41 43 45 20 44 49 53 4B 20 54 4F 20 42 |.PLACE DISK TO B|
00000DA0: 45 20 52 45 41 44 20 49 4E 54 4F 20 44 52 49 56 |E READ INTO DRIV|
00000DB0: 45 20 38 20 41 4E 44 22 00 99 22 11 49 4E 50 55 |E 8 AND"..".INPU|
00000DC0: 54 20 41 20 46 4F 55 52 20 43 48 41 52 41 43 54 |T A FOUR CHARACT|
00000DD0: 45 52 20 49 44 20 12 28 41 3D 41 42 4F 52 54 29 |ER ID .(A=ABORT)|
00000DE0: 92 22 00 99 22 11 20 20 20 20 2D 2D 2D 2D 22 3A |."..". ----":|
00000DF0: 8A 00 D6 01 0C 00 85 22 20 20 22 3B 49 34 24 3A |......." ";I4$:|
00000E00: 96 01 0C 8A 01 41 2B 4F 03 4C 96 01 0C 8A 00 2B |.....A+O.L.....+|
00000E10: 4F 05 48 EA C1 96 01 0C B8 0F 84 2E 4F 05 48 EA |O.H.........O.H.|
00000E20: C1 00 99 22 11 20 51 55 45 52 59 3F 20 28 59 2F |...". QUERY? (Y/|
00000E30: 4E 29 20 20 22 3B 00 A1 51 55 24 3A 96 01 13 8A |N) ";..QU$:....|
00000E40: 00 2B 4F 05 48 E9 CA 96 01 13 8A 01 59 2E 96 01 |.+O.H.......Y...|
00000E50: 13 8A 01 4E 2E 06 4F 05 48 E9 CA 96 01 0C B8 0F |...N..O.H.......|
00000E60: 84 2E 4F 05 48 EA C1 96 01 13 8A 01 59 2B 4F 1C |..O.H.......Y+O.|
00000E70: 00 99 22 12 28 59 2F 4E 2F 45 2F 46 31 3D 41 42 |..".(Y/N/E/F1=AB|
00000E80: 4F 52 54 29 92 22 3A 48 E9 5D 96 01 13 8A 01 4E |ORT).":H.].....N|
00000E90: 2B 4F 12 00 99 22 12 28 46 31 3D 41 42 4F 52 54 |+O...".(F1=ABORT|
00000EA0: 29 92 22 00 9F 31 35 2C 38 2C 31 35 2C 22 49 30 |)."..15,8,15,"I0|
00000EB0: 22 00 84 31 35 2C 45 2C 45 24 2C 46 2C 47 00 A0 |"..15,E,E$,F,G..|
00000EC0: 31 35 3A 90 F0 80 2E 4F 21 00 99 22 11 20 20 20 |15:....O!..". |
00000ED0: 22 45 22 20 12 22 45 24 22 92 20 22 46 22 20 22 |"E" ."E$". "F" "|
00000EE0: 47 22 20 22 3A 48 E7 23 00 9F 37 2C 38 2C 2E 2C |G" ":H.#..7,8,.,|
00000EF0: 22 24 30 22 3A 48 E6 EC 00 A1 23 37 2C 41 24 2C |"$0":H....#7,A$,|
00000F00: 42 24 00 A1 23 37 2C 41 24 2C 42 24 00 A1 23 37 |B$..#7,A$,B$..#7|
00000F10: 2C 41 24 2C 42 24 3A 80 D4 01 1A 8A 00 D6 01 21 |,A$,B$:........!|
00000F20: 8A 00 D6 01 28 80 D4 01 2F 94 01 2F D0 8E 92 3A |....(.../../...:|
00000F30: 8A 00 2E 4F 09 92 3A B8 12 D4 01 1A 92 79 8A 00 |...O..:......y..|
00000F40: 2E 4F 11 94 01 1A 92 79 B8 12 8D 01 00 03 01 D4 |.O.....y........|
00000F50: 01 1A 94 01 1A B8 10 82 89 FF B8 16 D6 01 21 00 |..............!.|
00000F60: 99 22 20 20 20 22 3B 3A 96 01 21 B8 11 89 0A 2D |." ";:..!....-|
00000F70: 4F 1C 96 01 21 8A 07 20 20 20 20 20 20 20 01 D6 |O...!.. ..|
00000F80: 01 21 00 99 46 53 24 3B 3A 48 E8 3D 96 01 21 B8 |.!..FS$;:H.=..!.|
00000F90: 11 89 63 2A 4F 1A 96 01 21 8A 05 20 20 20 20 20 |..c*O...!.. |
00000FA0: 01 D6 01 21 00 99 46 53 24 3B 3A 48 E8 3D 96 01 |...!..FS$;:H.=..|
00000FB0: 21 8A 06 20 20 20 20 20 20 01 D6 01 21 00 99 46 |!.. ...!..F|
00000FC0: 53 24 3B 3A 8A 00 D2 79 00 A1 23 37 2C 42 24 3A |S$;:...y..#7,B$:|
00000FD0: B8 1A 89 40 06 4F 05 48 E7 36 92 79 89 22 B8 13 |...@.O.H.6.y."..|
00000FE0: 2E 4F 05 48 E8 3D 00 A1 23 37 2C 42 24 3A 92 79 |.O.H.=..#7,B$:.y|
00000FF0: 89 22 B8 13 2E 4F 11 4A D5 CD 96 01 28 92 79 01 |."...O.J....(.y.|
00001000: D6 01 28 48 E8 1A 8A 13 2E 2E 2E 2E 2E 2E 2E 2E |..(H............|
00001010: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E D6 01 36 96 01 |.............6..|
00001020: 28 81 B8 14 8A 01 20 2B 4F 14 96 01 28 96 01 28 |(..... +O...(..(|
00001030: B8 0F 81 02 B8 15 D6 01 28 48 E7 E2 96 01 28 81 |........(H....(.|
00001040: B8 15 8A 01 20 2B 4F 14 96 01 28 96 01 28 B8 0F |.... +O...(..(..|
00001050: 81 02 B8 14 D6 01 28 48 E7 C4 96 01 28 B8 0F D0 |......(H....(...|
00001060: 8E 89 12 90 8E 02 D4 01 2F 96 01 28 96 01 36 94 |......../..(..6.|
00001070: 01 2F B8 14 01 D6 01 28 00 99 4E 46 24 22 20 22 |./.....(..NF$" "|
00001080: 3B 00 A1 23 37 2C 42 24 3A 92 79 89 20 B8 13 2B |;..#7,B$:.y. ..+|
00001090: 4F 05 48 E7 7F 8A 00 D6 01 3D 96 01 3D 92 79 01 |O.H......=..=.y.|
000010A0: D6 01 3D 00 A1 23 37 2C 42 24 3A 92 79 8A 00 2E |..=..#7,B$:.y...|
000010B0: 4F 05 48 E7 66 00 99 C8 28 43 24 2C 31 29 3A B8 |O.H.f...(C$,1):.|
000010C0: 1A 19 89 40 06 4F 05 48 E6 1B 00 99 22 2D 2D 2D |...@.O.H...."---|
000010D0: 20 42 4C 4F 43 4B 53 20 46 52 45 45 22 00 A0 37 | BLOCKS FREE"..7|
000010E0: 00 99 22 11 11 20 20 20 12 48 49 54 20 41 4E 59 |..".. .HIT ANY|
000010F0: 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | KEY TO CONTINUE|
00001100: 92 22 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 E6 |."..A$:.:..+O.H.|
00001110: FE 48 EA C1 00 A1 23 37 2C 41 24 2C 41 24 2C 41 |.H....#7,A$,A$,A|
00001120: 24 2C 41 24 00 A1 23 37 2C 41 24 3A 92 3A 89 22 |$,A$..#7,A$:.:."|
00001130: B8 13 2E 4F 05 48 E6 DC 00 A1 23 37 2C 41 24 3A |...O.H....#7,A$:|
00001140: 92 3A 89 22 B8 13 2B 4F 05 48 E6 A8 96 01 44 92 |.:."..+O.H....D.|
00001150: 3A 01 D6 01 44 48 E6 C8 00 A1 23 37 2C 41 24 00 |:...DH....#7,A$.|
00001160: A1 23 37 2C 41 24 2C 42 24 3A 92 3A 92 79 01 D6 |.#7,A$,B$:.:.y..|
00001170: 01 4B 00 99 3A 8A 08 20 20 20 4E 41 4D 45 3A D6 |.K..:.. NAME:.|
00001180: 01 52 00 99 50 24 AA 4E 4E 24 2C 3A 8A 05 9D 9D |.R..P$.NN$,:....|
00001190: 49 44 3A D6 01 52 00 99 50 24 AA 49 44 24 3A 8A |ID:..R..P$.ID$:.|
000011A0: 00 D6 01 52 8A 00 D6 01 44 00 99 00 99 22 20 20 |...R....D...." |
000011B0: 20 12 53 49 5A 45 20 20 20 20 4E 41 4D 45 20 20 | .SIZE NAME |
000011C0: 20 20 20 20 20 20 20 20 20 20 20 54 59 50 45 92 | TYPE.|
000011D0: 22 00 A1 23 37 2C 41 24 2C 41 24 2C 41 24 2C 41 |"..#7,A$,A$,A$,A|
000011E0: 24 3A 48 E8 FE 96 01 13 8A 01 4E 2B 4F 0B 8A 01 |$:H.......N+O...|
000011F0: 59 D6 01 59 48 E5 C2 00 A1 41 4E 24 3A 96 01 59 |Y..YH....AN$:..Y|
00001200: 8A 00 2B 4F 05 48 E6 09 96 01 59 8A 01 4E 2B 4F |..+O.H....Y..N+O|
00001210: 2F 00 99 22 91 20 20 20 20 20 20 20 20 20 20 20 |/..". |
00001220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001230: 20 20 20 20 20 20 20 20 91 22 3A 48 E8 FE 96 01 | .":H....|
00001240: 59 8A 01 59 2B 4F 0B 90 33 81 01 D0 33 48 E5 90 |Y..Y+O..3...3H..|
00001250: 96 01 59 8A 01 45 2B 4F 0B 90 33 81 01 D0 33 48 |..Y..E+O..3...3H|
00001260: E5 40 96 01 59 92 10 2B 4F 05 48 E7 23 48 E6 09 |.@..Y..+O.H.#H..|
00001270: 90 33 8D 04 37 2A 4F 23 00 99 00 99 22 12 2A 20 |.3..7*O#....".* |
00001280: 46 49 4C 45 20 46 55 4C 4C 21 20 2A 92 22 00 A0 |FILE FULL! *."..|
00001290: 37 00 A0 31 35 3A 48 F6 AC 90 33 96 01 28 89 10 |7..15:H...3..(..|
000012A0: B8 14 8A 01 2E 01 96 01 0C 01 E2 04 00 A1 41 42 |..............AB|
000012B0: 24 3A 96 01 60 92 10 2B 4F 05 48 E7 23 48 E8 FE |$:..`..+O.H.#H..|
000012C0: 00 99 22 20 20 20 12 45 44 49 54 92 22 3B 3A 96 |.." .EDIT.";:.|
000012D0: 01 28 81 B8 15 8A 01 2E 2B 4F 14 96 01 28 96 01 |.(......+O...(..|
000012E0: 28 B8 0F 81 02 B8 14 D6 01 28 48 E5 32 00 99 22 |(........(H.2.."|
000012F0: 20 20 20 20 22 4E 46 24 00 85 22 91 1D 1D 1D 1D | "NF$..".....|
00001300: 1D 1D 1D 1D 1D 22 3B 4E 4D 24 3A 96 01 67 8A 13 |.....";NM$:..g..|
00001310: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00001320: 2E 2E 2E 01 D6 01 67 96 01 67 89 10 B8 14 D6 01 |......g..g......|
00001330: 28 48 E5 90 00 99 22 93 11 11 11 11 11 11 20 20 |(H...."....... |
00001340: 20 52 45 4D 4F 56 45 20 4E 41 4D 45 53 22 00 99 | REMOVE NAMES"..|
00001350: 22 11 11 20 20 44 45 4C 45 54 45 20 12 4E 92 41 |".. DELETE .N.A|
00001360: 4D 45 20 4F 52 20 12 49 92 44 22 3A 8A 00 D2 3A |ME OR .I.D":...:|
00001370: 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 E4 95 92 |..A$:.:..+O.H...|
00001380: 3A 8A 01 4E 2B 4F 05 48 E4 68 92 3A 8A 01 49 2B |:..N+O.H.h.:..I+|
00001390: 4F 05 48 E2 FA 48 E4 95 00 99 22 93 11 11 11 11 |O.H..H....".....|
000013A0: 11 1D 1D 1D 49 4E 50 55 54 20 4E 41 4D 45 20 54 |....INPUT NAME T|
000013B0: 4F 20 52 45 4D 4F 56 45 20 4F 52 20 45 44 49 54 |O REMOVE OR EDIT|
000013C0: 22 3A 80 D4 01 6E 8A 00 D6 01 75 00 85 52 4E 24 |":...n....u..RN$|
000013D0: 3A 96 01 75 B8 0F D0 BF 81 D0 4F 90 33 42 00 4F |:..u......O.3B.O|
000013E0: 90 4F A2 04 90 BF B8 14 96 01 75 2B 4F 1D 00 99 |.O........u+O...|
000013F0: 44 24 28 49 29 22 20 12 28 59 2F 4E 2F 45 2F 46 |D$(I)" .(Y/N/E/F|
00001400: 31 29 92 22 3B 3A 48 E3 F4 48 E3 9F 00 A1 41 24 |1).";:H..H....A$|
00001410: 3A 92 3A 8A 00 2B 4F 05 48 E3 F4 92 3A 8A 01 4E |:.:..+O.H...:..N|
00001420: 2B 4F 0C 00 99 22 20 4E 22 3A 48 E3 9F 92 3A 8A |+O..." N":H...:.|
00001430: 01 59 2B 4F 16 90 4F 92 B1 E2 04 00 99 22 20 59 |.Y+O..O......" Y|
00001440: 22 3A 81 D4 01 6E 48 E3 9F 92 3A 8A 01 45 2B 4F |":...nH...:..E+O|
00001450: 05 48 E3 8E 92 3A 92 10 2B 4F 05 48 E3 9C 48 E3 |.H...:..+O.H..H.|
00001460: F4 47 00 4F 94 01 6E 81 2B 4F 08 00 99 3A 4A EE |.G.O..n.+O...:J.|
00001470: 4F 4C 90 4F A2 04 89 10 B8 14 D6 01 67 96 01 67 |OL.O........g..g|
00001480: 81 B8 15 8A 01 2E 2B 4F 14 96 01 67 96 01 67 B8 |......+O...g..g.|
00001490: 0F 81 02 B8 14 D6 01 67 48 E3 83 00 99 00 99 22 |.......gH......"|
000014A0: 11 20 3E 12 45 44 49 54 92 2D 2D 2D 2D 2D 2D 2D |. >.EDIT.-------|
000014B0: 2D 2D 2D 2D 2D 3C 22 00 99 22 20 20 22 4E 4D 24 |-----<".." "NM$|
000014C0: 00 85 22 91 22 3B 4E 4D 24 3A 96 01 67 8A 13 2E |..".";NM$:..g...|
000014D0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000014E0: 2E 2E 01 D6 01 67 90 4F A2 04 84 B8 15 D6 01 7C |.....g.O.......||
000014F0: 90 4F 96 01 67 89 11 B8 14 96 01 7C 01 E2 04 81 |.O..g......|....|
00001500: D4 01 6E 48 E3 9F 00 99 22 93 11 11 11 11 11 1D |..nH....".......|
00001510: 1D 1D 49 4E 50 55 54 20 49 44 20 4F 46 20 44 49 |..INPUT ID OF DI|
00001520: 53 4B 20 54 4F 20 52 45 4D 4F 56 45 22 3A 80 D4 |SK TO REMOVE":..|
00001530: 01 6E 8A 00 D6 01 75 00 85 52 4E 24 3A 96 01 75 |.n....u..RN$:..u|
00001540: B8 0F D0 BF 96 01 75 8A 00 2B 4F 05 48 E2 FA 81 |......u..+O.H...|
00001550: D0 4F 90 33 42 00 4F 90 4F A2 04 89 12 90 BF B8 |.O.3B.O.O.......|
00001560: 16 96 01 75 2B 4F 21 00 99 44 24 28 49 29 22 20 |...u+O!..D$(I)" |
00001570: 12 28 59 2F 4E 2F 46 31 3D 41 42 4F 52 54 29 92 |.(Y/N/F1=ABORT).|
00001580: 22 3B 3A 48 E2 77 48 E2 2D 00 A1 41 24 3A 92 3A |";:H.wH.-..A$:.:|
00001590: 8A 00 2B 4F 05 48 E2 77 92 3A 8A 01 4E 2B 4F 0C |..+O.H.w.:..N+O.|
000015A0: 00 99 22 20 4E 22 3A 48 E2 2D 92 3A 8A 01 59 2B |.." N":H.-.:..Y+|
000015B0: 4F 16 90 4F 92 B1 E2 04 00 99 22 20 59 22 3A 81 |O..O......" Y":.|
000015C0: D4 01 6E 48 E2 2D 92 3A 92 10 2B 4F 05 48 E2 2A |..nH.-.:..+O.H.*|
000015D0: 48 E2 77 47 00 4F 94 01 6E 81 2B 4F 05 4A EE 4F |H.wG.O..n.+O.J.O|
000015E0: 4C 4A DC 8A 92 3A 8A 01 41 2B 4F 05 48 F6 AC 00 |LJ...:..A+O.H...|
000015F0: 9F 31 35 2C 44 31 2C 31 35 00 98 31 35 2C 22 53 |.15,D1,15..15,"S|
00001600: 22 44 32 24 AA 5A 53 24 AA 22 2E 42 55 22 00 98 |"D2$.ZS$.".BU"..|
00001610: 31 35 2C 22 52 22 44 32 24 AA 5A 53 24 AA 22 2E |15,"R"D2$.ZS$.".|
00001620: 42 55 3D 22 44 32 24 AA 5A 53 24 00 9F 38 2C 44 |BU="D2$.ZS$..8,D|
00001630: 31 2C 38 2C 44 32 24 AA 5A 53 24 AA 22 2C 53 2C |1,8,D2$.ZS$.",S,|
00001640: 57 22 00 84 31 35 2C 45 2C 45 24 3A 90 F0 80 2A |W"..15,E,E$:...*|
00001650: 4F 2C 00 A0 38 00 A0 31 35 00 99 22 11 20 20 20 |O,..8..15..". |
00001660: 20 20 20 12 22 45 24 22 20 50 52 45 53 53 20 41 | ."E$" PRESS A|
00001670: 4E 59 20 4B 45 59 92 22 3A 48 E1 81 48 E1 71 00 |NY KEY.":H..H.q.|
00001680: A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 E1 81 4C 00 |.A$:.:..+O.H..L.|
00001690: 99 22 93 12 22 5A 5A 24 3B 00 99 22 92 20 53 41 |.".."ZZ$;..". SA|
000016A0: 56 49 4E 47 22 4E 22 46 49 4C 45 20 4E 41 4D 45 |VING"N"FILE NAME|
000016B0: 53 22 00 98 38 2C 4E 3A 81 D0 4F 90 33 42 00 4F |S"..8,N:..O.3B.O|
000016C0: 00 98 38 2C 44 24 28 49 29 00 99 22 13 11 11 22 |..8,D$(I).."..."|
000016D0: 43 45 24 44 24 28 49 29 22 20 20 20 20 20 22 49 |CE$D$(I)" "I|
000016E0: 3A 46 00 A0 38 00 A0 31 35 3A 4C 00 99 22 93 11 |:F..8..15:L.."..|
000016F0: 11 11 11 11 11 20 20 4C 4F 41 44 20 46 49 4C 45 |..... LOAD FILE|
00001700: 20 12 28 59 2F 4E 29 92 22 3A 8A 00 D2 3A 00 A1 | .(Y/N).":...:..|
00001710: 41 24 3A 92 3A 8A 00 2B 4F 05 48 E0 F7 92 3A 8A |A$:.:..+O.H...:.|
00001720: 01 59 2B 4F 05 48 E0 D7 4C 90 2C 81 2B 4F 0D 49 |.Y+O.H..L.,.+O.I|
00001730: 81 D0 2C 81 D4 01 91 4A F7 4D 4A DF D5 92 3A 8A |..,....J.MJ...:.|
00001740: 01 41 2B 4F 03 4C 00 9F 31 35 2C 44 31 2C 31 35 |.A+O.L..15,D1,15|
00001750: 3A 81 D0 2C 00 9F 38 2C 44 31 2C 38 2C 44 32 24 |:..,..8,D1,8,D2$|
00001760: AA 5A 53 24 AA 22 2C 53 2C 52 22 00 84 31 35 2C |.ZS$.",S,R"..15,|
00001770: 45 2C 45 24 2C 47 2C 48 3A 90 F0 80 2A 4F 30 00 |E,E$,G,H:...*O0.|
00001780: A0 38 00 A0 31 35 00 99 22 11 20 20 20 20 20 20 |.8..15..". |
00001790: 12 22 45 24 22 20 50 52 45 53 53 20 41 4E 59 20 |."E$" PRESS ANY |
000017A0: 4B 45 59 92 22 3A 81 D4 01 91 48 E0 50 48 E0 37 |KEY.":....H.PH.7|
000017B0: 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 E0 50 94 |..A$:.:..+O.H.P.|
000017C0: 01 91 81 2B 4F 05 48 F6 AC 00 84 38 2C 4E 00 99 |...+O.H....8,N..|
000017D0: 22 93 12 22 5A 5A 24 3B 22 92 20 4C 4F 41 44 49 |".."ZZ$;". LOADI|
000017E0: 4E 47 22 4E 22 46 49 4C 45 20 4E 41 4D 45 53 22 |NG"N"FILE NAMES"|
000017F0: 3A 81 D0 4F 90 33 42 00 4F 00 84 38 2C 44 24 28 |:..O.3B.O..8,D$(|
00001800: 49 29 00 99 22 13 11 11 22 44 24 28 49 29 22 20 |I).."..."D$(I)" |
00001810: 20 20 20 20 22 49 3A 46 00 A0 38 00 A0 31 35 3A | "I:F..8..15:|
00001820: 94 01 91 81 2B 4F 05 48 F6 AC 4C 00 99 22 93 11 |....+O.H..L.."..|
00001830: 11 11 20 20 20 49 53 20 4D 41 53 54 45 52 20 44 |.. IS MASTER D|
00001840: 41 54 41 20 44 49 53 4B 20 49 4E 20 44 52 49 56 |ATA DISK IN DRIV|
00001850: 45 22 44 31 22 9D 3F 22 00 A1 41 24 3A 92 3A 8A |E"D1".?"..A$:.:.|
00001860: 00 2B 4F 05 48 DF A8 92 3A 8A 01 59 2B 4F 05 48 |.+O.H...:..Y+O.H|
00001870: DF 82 92 3A 8A 01 41 2B 4F 03 4C 48 DF A8 00 9F |...:..A+O.LH....|
00001880: 31 35 2C 44 31 2C 31 35 00 99 22 93 22 00 9F 38 |15,D1,15.."."..8|
00001890: 2C 44 31 2C 38 2C 44 32 24 AA 22 43 41 54 45 47 |,D1,8,D2$."CATEG|
000018A0: 4F 52 49 45 53 2C 53 2C 52 22 00 84 31 35 2C 45 |ORIES,S,R"..15,E|
000018B0: 2C 45 24 2C 54 2C 53 3A 90 F0 89 3E 2B 90 F0 89 |,E$,T,S:...>+...|
000018C0: 4A 2B 07 4F 09 80 D4 01 AD 48 DE CF 00 99 22 93 |J+.O.....H....".|
000018D0: 20 20 20 20 20 20 20 12 45 58 49 53 54 49 4E 47 | .EXISTING|
000018E0: 20 43 41 54 45 47 4F 52 49 45 53 20 41 52 45 3A | CATEGORIES ARE:|
000018F0: 22 00 99 00 84 38 2C 4E 4E 3A 81 D0 4F 94 01 AD |"....8,NN:..O...|
00001900: 42 00 4F 00 84 38 2C 44 44 24 28 49 29 00 99 22 |B.O..8,DD$(I).."|
00001910: 12 22 C9 28 C4 28 49 29 2C 31 29 22 92 20 20 22 |.".(.(I),1)". "|
00001920: 44 44 24 28 49 29 3A 47 00 4F 00 A0 38 00 A0 31 |DD$(I):G.O..8..1|
00001930: 35 00 A0 38 00 A0 31 35 00 99 22 11 11 20 44 4F |5..8..15..".. DO|
00001940: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 43 52 45 | YOU WANT TO CRE|
00001950: 41 54 45 20 41 20 4E 45 57 20 43 41 54 45 47 4F |ATE A NEW CATEGO|
00001960: 52 59 3F 22 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 |RY?"..A$:.:..+O.|
00001970: 48 DE 9C 92 3A 8A 01 4E 2B 94 01 AD 80 2B 06 4F |H...:..N+....+.O|
00001980: 05 48 DE 9C 92 3A 8A 01 4E 2B 4F 05 48 DD 34 92 |.H...:..N+O.H.4.|
00001990: 3A 8A 01 59 2E 4F 05 48 DE 9C 94 01 AD 89 09 2B |:..Y.O.H.......+|
000019A0: 4F 1C 00 99 22 4E 4F 20 4D 4F 52 45 20 43 41 54 |O..."NO MORE CAT|
000019B0: 45 47 4F 52 49 45 53 22 3A 48 DD 34 00 99 00 85 |EGORIES":H.4....|
000019C0: 22 4E 41 4D 45 20 4F 46 20 4E 45 57 20 43 41 54 |"NAME OF NEW CAT|
000019D0: 45 47 4F 52 59 22 3B 44 44 24 3A 92 CD B8 0F 89 |EGORY";DD$:.....|
000019E0: 10 2A 4F 0D 00 99 22 91 91 91 22 3A 48 DE 44 94 |.*O..."...":H.D.|
000019F0: 01 AD 81 01 D4 01 AD 94 01 AD 92 CD E2 06 94 01 |................|
00001A00: AD 89 09 2B 4F 1C 00 99 22 4E 4F 20 4D 4F 52 45 |...+O..."NO MORE|
00001A10: 20 43 41 54 45 47 4F 52 49 45 53 22 3A 48 DD B1 | CATEGORIES":H..|
00001A20: 00 99 22 11 4D 4F 52 45 3F 22 00 A1 41 24 3A 92 |..".MORE?"..A$:.|
00001A30: 3A 8A 00 2B 4F 05 48 DD D6 92 3A 8A 01 59 2B 4F |:..+O.H...:..Y+O|
00001A40: 05 48 DE 66 92 3A 8A 01 4E 2E 4F 05 48 DD D6 00 |.H.f.:..N.O.H...|
00001A50: 9F 31 35 2C 44 31 2C 31 35 2C 22 53 22 AA 44 32 |.15,D1,15,"S".D2|
00001A60: 24 AA 22 42 55 43 41 54 53 22 00 98 31 35 2C 22 |$."BUCATS"..15,"|
00001A70: 52 22 AA 44 32 24 AA 22 42 55 43 41 54 53 3D 43 |R".D2$."BUCATS=C|
00001A80: 41 54 45 47 4F 52 49 45 53 22 00 A0 31 35 00 9F |ATEGORIES"..15..|
00001A90: 38 2C 44 31 2C 38 2C 44 32 24 AA 22 43 41 54 45 |8,D1,8,D2$."CATE|
00001AA0: 47 4F 52 49 45 53 2C 53 2C 57 22 00 98 38 2C 4E |GORIES,S,W"..8,N|
00001AB0: 4E 3A 81 D0 4F 94 01 AD 42 00 4F 00 98 38 2C 44 |N:..O...B.O..8,D|
00001AC0: 44 24 28 49 29 3A 47 00 4F 00 A0 38 00 99 22 93 |D$(I):G.O..8..".|
00001AD0: 20 20 20 20 20 20 20 12 45 58 49 53 54 49 4E 47 | .EXISTING|
00001AE0: 20 43 41 54 45 47 4F 52 49 45 53 20 41 52 45 3A | CATEGORIES ARE:|
00001AF0: 22 00 99 3A 81 D0 4F 94 01 AD 42 00 4F 00 99 22 |"..:..O...B.O.."|
00001B00: 12 22 C9 28 C4 28 49 29 2C 31 29 22 92 20 20 22 |.".(.(I),1)". "|
00001B10: 44 44 24 28 49 29 3A 47 00 4F 00 99 22 11 11 20 |DD$(I):G.O..".. |
00001B20: 20 20 20 20 20 57 48 49 43 48 20 43 41 54 45 47 | WHICH CATEG|
00001B30: 4F 52 59 20 44 4F 20 59 4F 55 20 57 41 4E 54 3F |ORY DO YOU WANT?|
00001B40: 22 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 DC BF |"..A$:.:..+O.H..|
00001B50: 92 3A B8 11 D4 01 B4 94 01 B4 81 2D 94 01 B4 94 |.:.........-....|
00001B60: 01 AD 2A 07 4F 05 48 DC BF 94 01 B4 A2 06 D2 48 |..*.O.H........H|
00001B70: 92 48 D6 01 83 4C 00 99 22 93 11 11 11 11 11 11 |.H...L..".......|
00001B80: 11 20 20 53 41 56 45 20 46 49 4C 45 22 3A 92 48 |. SAVE FILE":.H|
00001B90: 8A 00 2B 4F 05 48 DF D5 00 99 22 11 20 20 43 55 |..+O.H....". CU|
00001BA0: 52 52 45 4E 54 20 46 49 4C 45 20 49 53 20 22 5A |RRENT FILE IS "Z|
00001BB0: 53 24 00 99 22 11 20 20 49 53 20 54 48 49 53 20 |S$..". IS THIS |
00001BC0: 43 4F 52 52 45 43 54 3F 20 20 12 28 59 2F 4E 2F |CORRECT? .(Y/N/|
00001BD0: 41 3D 41 42 4F 52 54 29 92 22 3A 8A 00 D2 3A 00 |A=ABORT).":...:.|
00001BE0: A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 DC 26 92 3A |.A$:.:..+O.H.&.:|
00001BF0: 8A 01 59 2B 4F 03 4C 92 3A 8A 01 4E 2B 4F 06 48 |..Y+O.L.:..N+O.H|
00001C00: DF D5 4C 92 3A 8A 01 41 2B 4F 03 4C 8A 00 D6 01 |..L.:..A+O.L....|
00001C10: 0C 00 99 22 93 11 11 11 11 11 11 20 20 20 20 20 |..."....... |
00001C20: 20 20 20 20 20 20 20 41 44 44 20 46 49 4C 45 53 | ADD FILES|
00001C30: 22 3A 90 33 8D 04 37 2A 4F 34 00 99 22 11 11 20 |":.3..7*O4..".. |
00001C40: 20 20 12 2A 20 57 41 52 4E 49 4E 47 20 46 49 4C | .* WARNING FIL|
00001C50: 45 20 46 55 4C 4C 21 21 20 2A 12 22 3A 81 D0 4F |E FULL!! *.":..O|
00001C60: 8D 01 2C 42 00 4F 47 00 4F 48 F6 AC 90 33 8D 03 |..,B.OG.OH...3..|
00001C70: E8 2A 4F 3C 00 99 22 11 11 12 2A 20 57 41 52 4E |.*O<.."...* WARN|
00001C80: 49 4E 47 20 46 49 4C 45 20 41 4C 4D 4F 53 54 20 |ING FILE ALMOST |
00001C90: 46 55 4C 4C 21 21 20 2A 12 22 00 99 31 30 38 30 |FULL!! *."..1080|
00001CA0: AB 4E 22 52 45 4D 41 49 4E 49 4E 47 21 22 00 99 |.N"REMAINING!"..|
00001CB0: 22 11 11 11 20 20 20 20 20 20 20 20 20 12 49 92 |"... .I.|
00001CC0: 4E 44 49 56 49 44 55 41 4C 20 4F 52 20 12 44 92 |NDIVIDUAL OR .D.|
00001CD0: 49 53 4B 22 00 99 22 11 20 20 20 20 20 20 20 20 |ISK"..". |
00001CE0: 20 20 20 20 41 20 3D 20 41 42 4F 52 54 22 3A 8A | A = ABORT":.|
00001CF0: 00 D2 3A 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 48 |..:..A$:.:..+O.H|
00001D00: DB 12 92 3A 8A 01 44 2B 4F 05 48 EA C1 92 3A 8A |...:..D+O.H...:.|
00001D10: 01 49 2B 4F 05 48 DA DC 92 3A 8A 01 41 2B 4F 03 |.I+O.H...:..A+O.|
00001D20: 4C 48 DB 12 00 99 22 93 11 11 11 1D 1D 1D 1D 20 |LH...."........ |
00001D30: 20 20 20 20 20 41 44 44 20 49 4E 44 49 56 55 44 | ADD INDIVUD|
00001D40: 41 4C 20 46 49 4C 45 22 3A 90 33 8D 04 37 2A 4F |AL FILE":.3..7*O|
00001D50: 05 48 F6 AC 00 99 00 99 22 11 49 4E 50 55 54 20 |.H......".INPUT |
00001D60: 41 20 46 4F 55 52 20 43 48 41 52 41 43 54 45 52 |A FOUR CHARACTER|
00001D70: 20 49 44 20 12 28 41 3D 41 42 4F 52 54 29 92 22 | ID .(A=ABORT)."|
00001D80: 00 99 22 20 20 2D 2D 2D 2D 22 00 85 49 34 24 3A |.." ----"..I4$:|
00001D90: 96 01 0C 8A 01 41 2B 4F 03 4C 96 01 0C 8A 00 2B |.....A+O.L.....+|
00001DA0: 4F 05 48 DA DC 96 01 0C B8 0F 84 2E 4F 05 48 DA |O.H.........O.H.|
00001DB0: DC 00 99 22 11 45 4E 54 45 52 20 46 49 4C 45 20 |...".ENTER FILE |
00001DC0: 4E 41 4D 45 20 28 4D 41 58 20 31 36 20 43 48 52 |NAME (MAX 16 CHR|
00001DD0: 53 29 22 00 99 22 20 20 2D 2D 2D 2D 2D 2D 2D 2D |S)".." --------|
00001DE0: 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 8A 00 D6 01 BB 00 |--------":......|
00001DF0: 85 4E 24 3A 96 01 BB 8A 00 2B 4F 0C 00 99 22 91 |.N$:.....+O...".|
00001E00: 91 22 3A 48 DA 17 96 01 BB 8A 12 2E 2E 2E 2E 2E |.":H............|
00001E10: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 01 D6 01 |................|
00001E20: BB 96 01 BB 89 10 B8 14 8A 01 2E 01 96 01 0C 01 |................|
00001E30: D6 01 BB 90 33 81 01 D0 33 90 33 96 01 BB E2 04 |....3...3.3.....|
00001E40: 48 DA DC 4A D7 74 8A 0F 05 1C 9F 9C 1E 1F 9E 81 |H..J.t..........|
00001E50: 95 96 97 98 99 9A 9B D6 01 C2 00 99 22 93 22 3A |............".":|
00001E60: 81 D0 56 81 D0 4F 8D 01 90 42 00 4F 00 99 CA 28 |..V..O...B.O...(|
00001E70: 43 48 24 2C 4A 2C 31 29 3A 90 56 81 01 D0 56 90 |CH$,J,1):.V...V.|
00001E80: 56 89 0F 2A 4F 05 81 D0 56 00 99 22 13 11 11 11 |V..*O...V.."....|
00001E90: 20 20 20 44 49 53 4B 20 46 49 4C 45 20 22 56 45 | DISK FILE "VE|
00001EA0: 24 22 20 20 20 20 20 20 3A 20 4D 53 44 20 53 44 |$" : MSD SD|
00001EB0: 2D 32 20 2D 20 34 30 34 30 22 00 99 22 11 20 20 |-2 - 4040"..". |
00001EC0: 20 22 44 41 24 22 20 20 20 20 20 20 20 20 20 20 | "DA$" |
00001ED0: 20 3A 20 31 20 4F 52 20 32 20 31 35 34 31 27 53 | : 1 OR 2 1541'S|
00001EE0: 22 00 99 A3 32 32 29 22 11 3A 20 38 30 20 43 4F |"...22)".: 80 CO|
00001EF0: 4C 2E 20 50 52 49 4E 54 45 52 22 00 99 A3 32 32 |L. PRINTER"...22|
00001F00: 29 22 11 3A 20 31 33 36 20 43 4F 4C 2E 20 50 52 |)".: 136 COL. PR|
00001F10: 49 4E 54 45 52 22 00 99 22 20 20 20 44 49 52 45 |INTER".." DIRE|
00001F20: 43 54 4F 52 59 20 20 20 20 20 20 28 43 29 20 3A |CTORY (C) :|
00001F30: 20 43 4F 4D 50 55 54 45 21 20 31 31 2F 38 33 22 | COMPUTE! 11/83"|
00001F40: 00 99 22 11 20 20 20 4C 49 47 48 54 4E 49 4E 47 |..". LIGHTNING|
00001F50: 20 53 4F 52 54 20 28 43 29 20 3A 20 43 4F 4D 50 | SORT (C) : COMP|
00001F60: 55 54 45 21 20 30 39 2F 38 34 22 00 99 22 11 20 |UTE! 09/84"..". |
00001F70: 20 20 43 4F 4D 50 49 4C 45 52 20 50 41 52 54 53 | COMPILER PARTS|
00001F80: 20 28 43 29 20 3A 20 27 49 4E 53 54 41 2D 53 50 | (C) : 'INSTA-SP|
00001F90: 45 45 44 27 22 00 99 22 11 20 20 20 20 2D 2D 2D |EED'"..". ---|
00001FA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001FB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00001FC0: 99 22 20 20 20 20 20 4D 41 49 4E 20 50 52 4F 47 |." MAIN PROG|
00001FD0: 52 41 4D 20 28 43 29 20 43 4F 50 59 52 49 47 48 |RAM (C) COPYRIGH|
00001FE0: 54 20 31 39 38 34 20 22 00 99 22 20 20 20 20 20 |T 1984 ".." |
00001FF0: 42 59 20 52 4F 59 20 53 43 48 41 48 52 45 52 20 |BY ROY SCHAHRER |
00002000: 2D 20 5B 37 30 33 36 36 2C 31 37 31 37 5D 20 20 |- [70366,1717] |
00002010: 22 00 99 22 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D |".." --------|
00002020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 90 8E 80 2B 18 |---------":...+.|
00002040: D0 8E 89 C7 90 8E 50 00 99 A3 31 31 29 22 48 49 |......P...11)"HI|
00002050: 54 20 41 20 4B 45 59 20 54 4F 20 53 54 41 52 54 |T A KEY TO START|
00002060: 22 00 A1 41 24 3A 92 3A 8A 00 2B 4F 05 47 00 4F |"..A$:.:..+O.G.O|
00002070: 88 90 50 21 00 00 80 50 88 90 50 20 00 00 80 50 |..P!...P..P ...P|
00002080: 00 99 22 1E 22 3A 8D 27 10 D0 4F 4C 00 99 22 93 |..".":.'..OL..".|
00002090: 11 11 20 50 41 52 54 53 20 4F 46 20 54 48 49 53 |.. PARTS OF THIS|
000020A0: 20 50 52 4F 47 52 41 4D 20 41 52 45 20 43 4F 50 | PROGRAM ARE COP|
000020B0: 59 52 49 47 48 54 45 44 22 00 99 22 11 20 20 42 |YRIGHTED"..". B|
000020C0: 59 20 44 52 49 56 45 20 54 45 43 48 4E 4F 4C 4F |Y DRIVE TECHNOLO|
000020D0: 47 59 20 4C 54 44 2E 2C 20 20 28 43 29 20 31 39 |GY LTD., (C) 19|
000020E0: 38 33 22 00 99 22 11 11 20 20 27 54 48 41 4E 4B |83"..".. 'THANK|
000020F0: 53 20 46 4F 52 20 54 48 45 20 48 45 4C 50 20 49 |S FOR THE HELP I|
00002100: 4E 53 54 41 2D 53 50 45 45 44 2E 27 22 00 99 22 |NSTA-SPEED.'".."|
00002110: 11 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.---------------|
00002120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002130: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 99 22 54 48 49 |---------".."THI|
00002140: 53 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 |S PROGRAM IS IN |
00002150: 46 52 45 45 57 41 52 45 2E 20 49 46 20 59 4F 55 |FREEWARE. IF YOU|
00002160: 20 46 49 4E 44 22 00 99 22 49 46 20 55 53 45 46 | FIND".."IF USEF|
00002170: 55 4C 4C 20 50 4C 45 41 53 45 20 53 45 4E 44 20 |ULL PLEASE SEND |
00002180: 24 32 30 2C 20 4F 52 20 57 48 41 54 45 56 45 52 |$20, OR WHATEVER|
00002190: 22 00 99 22 11 59 4F 55 20 46 45 45 4C 20 49 54 |"..".YOU FEEL IT|
000021A0: 20 49 53 20 57 4F 52 54 48 2C 20 54 4F 3A 22 00 | IS WORTH, TO:".|
000021B0: 99 22 11 11 20 20 20 52 4F 59 20 53 43 48 41 48 |.".. ROY SCHAH|
000021C0: 52 45 52 22 00 99 22 20 20 20 38 34 32 20 57 2E |RER".." 842 W.|
000021D0: 20 43 41 4C 4C 45 20 44 45 4C 20 4E 4F 52 54 45 | CALLE DEL NORTE|
000021E0: 22 00 99 22 20 20 20 43 48 41 4E 44 4C 45 52 2C |".." CHANDLER,|
000021F0: 20 41 52 49 5A 2E 20 20 38 35 32 32 34 22 00 99 | ARIZ. 85224"..|
00002200: 22 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00002210: 20 20 20 20 20 20 20 20 20 20 54 48 41 4E 4B 20 | THANK |
00002220: 59 4F 55 2E 22 3A 81 D0 4F 8D 27 10 42 00 4F 47 |YOU.":..O.'.B.OG|
00002230: 00 4F 4C 92 79 92 25 01 B8 12 89 7F 2A 92 79 92 |.OL.y.%.....*.y.|
00002240: 25 01 B8 12 89 A0 2D 06 4F 08 89 3F B8 13 D2 79 |%.....-.O..?...y|
00002250: 92 79 92 25 01 B8 12 89 20 2D 4F 08 89 3F B8 13 |.y.%.... -O..?..|
00002260: D2 79 92 79 92 25 01 B8 12 89 E0 2A 92 79 92 25 |.y.y.%.....*.y.%|
00002270: 01 B8 12 89 FE 2D 06 4F 08 89 3F B8 13 D2 79 4C |.....-.O..?...yL|
00002280: 00 99 22 93 11 11 11 11 11 11 20 20 53 45 4C 45 |.."....... SELE|
00002290: 43 54 20 44 52 49 56 45 20 43 4F 4E 46 49 47 55 |CT DRIVE CONFIGU|
000022A0: 52 41 54 49 4F 4E 22 00 99 22 11 11 11 11 20 20 |RATION"..".... |
000022B0: 31 2E 20 4D 53 44 20 53 44 2D 32 20 4F 52 20 34 |1. MSD SD-2 OR 4|
000022C0: 30 34 30 20 44 55 41 4C 20 44 52 49 56 45 20 28 |040 DUAL DRIVE (|
000022D0: 44 56 20 38 29 22 00 99 22 11 20 20 32 2E 20 53 |DV 8)"..". 2. S|
000022E0: 49 4E 47 4C 45 20 31 35 34 31 20 44 49 53 4B 20 |INGLE 1541 DISK |
000022F0: 44 52 49 56 45 20 28 44 56 20 38 29 22 00 99 22 |DRIVE (DV 8)".."|
00002300: 11 20 20 33 2E 20 54 57 4F 20 31 35 34 31 20 44 |. 3. TWO 1541 D|
00002310: 49 53 4B 20 44 52 49 56 45 53 20 28 44 56 20 38 |ISK DRIVES (DV 8|
00002320: 20 26 20 39 29 22 00 A1 41 24 3A 92 3A 8A 00 2B | & 9)"..A$:.:..+|
00002330: 4F 05 48 D4 DA 92 3A 8A 01 31 2B 4F 12 89 08 D0 |O.H...:..1+O....|
00002340: D4 8A 02 31 3A D2 E2 8D 02 A8 81 50 4C 92 3A 8A |...1:......PL.:.|
00002350: 01 32 2B 4F 12 89 08 D0 D4 8A 02 30 3A D2 E2 8D |.2+O.......0:...|
00002360: 02 A8 82 50 4C 92 3A 8A 01 33 2B 4F 12 89 09 D0 |...PL.:..3+O....|
00002370: D4 8A 02 30 3A D2 E2 8D 02 A8 83 50 4C 48 D4 DA |...0:......PLH..|
00002380: 8A 15 FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00002390: FF FF FF FF FF FF FF D2 B1 4C 8D 02 A8 B8 0E D0 |.........L......|
000023A0: 41 90 41 81 2B 4F 0C 89 08 D0 D4 8A 02 31 3A D2 |A.A.+O.......1:.|
000023B0: E2 90 41 82 2B 4F 0C 89 08 D0 D4 8A 02 30 3A D2 |..A.+O.......0:.|
000023C0: E2 90 41 83 2B 4F 0C 89 09 D0 D4 8A 02 30 3A D2 |..A.+O.......0:.|
000023D0: E2 4C 5E 03 00 80 00 00 00 56 C5 00 00 00 00 00 |.L^......V......|
000023E0: 44 C1 00 00 00 00 00 46 B1 00 00 00 00 00 46 B5 |D......F......F.|
000023F0: 00 00 00 00 00 46 B7 00 00 00 00 00 5A 80 00 00 |.....F......Z...|
00002400: 00 00 00 41 41 00 00 00 00 00 4E 00 00 00 00 00 |...AA.....N.....|
00002410: 00 41 80 00 00 00 00 00 41 00 00 00 00 00 00 5A |.A......A......Z|
00002420: D3 00 00 00 00 00 49 00 00 00 00 00 00 4A 00 00 |......I......J..|
00002430: 00 00 00 00 4B 00 00 00 00 00 00 58 D9 00 00 00 |....K......X....|
00002440: 00 00 44 CE 00 00 00 00 00 44 4E 00 00 00 00 00 |..D......DN.....|
00002450: 42 80 00 00 00 00 00 42 00 00 00 00 00 00 50 CE |B......B......P.|
00002460: 00 00 00 00 00 58 00 00 00 00 00 00 49 49 00 00 |.....X......II..|
00002470: 00 00 00 44 C3 00 00 00 00 00 4E 31 00 00 00 00 |...D......N1....|
00002480: 00 4E 32 00 00 00 00 00 50 C9 00 00 00 00 00 53 |.N2.....P......S|
00002490: CE 00 00 00 00 00 5A 00 00 00 00 00 00 44 00 00 |......Z......D..|
000024A0: 00 00 00 00 44 C4 00 00 00 00 00 44 31 00 00 00 |....D......D1...|
000024B0: 00 00 44 80 00 00 00 00 00 44 B2 00 00 00 00 00 |..D......D......|
000024C0: 44 52 00 00 00 00 00 45 00 00 00 00 00 00 45 80 |DR.....E......E.|
000024D0: 00 00 00 00 00 46 00 00 00 00 00 00 47 00 00 00 |.....F......G...|
000024E0: 00 00 00 49 B4 00 00 00 00 00 51 D5 00 00 00 00 |...I......Q.....|
000024F0: 00 43 00 00 00 00 00 00 46 D3 00 00 00 00 00 4E |.C......F......N|
00002500: C6 00 00 00 00 00 58 58 00 00 00 00 00 50 C4 00 |......XX.....P..|
00002510: 00 00 00 00 43 80 00 00 00 00 00 4E CE 00 00 00 |....C......N....|
00002520: 00 00 49 C4 00 00 00 00 00 50 80 00 00 00 00 00 |..I......P......|
00002530: 41 CE 00 00 00 00 00 41 C2 00 00 00 00 00 4E CD |A......A......N.|
00002540: 00 00 00 00 00 41 31 00 00 00 00 00 52 CE 00 00 |.....A1.....R...|
00002550: 00 00 00 4E CF 00 00 00 00 00 5A DA 00 00 00 00 |...N......Z.....|
00002560: 00 43 C5 00 00 00 00 00 42 42 00 00 00 00 00 48 |.C......BB.....H|
00002570: 00 00 00 00 00 00 54 00 00 00 00 00 00 53 00 00 |......T......S..|
00002580: 00 00 00 00 4E 4E 00 00 00 00 00 5A 53 00 00 00 |....NN.....ZS...|
00002590: 00 00 4E 80 00 00 00 00 00 43 C8 00 00 00 00 00 |..N......C......|
000025A0: 00 00 08 00 00 00 00 00 9E 2E D7 2C FF FF 2F 0B |...........,../.|
000025B0: D3 8D E4 92 D5 ED 30 F8 |......0. |
.......2073... R.LE. R.L.. R....ID...?..
.............. U.HHLH RTL-64 R. Q. _.`
..`........%...`H............H` _. G. R.
`@...... ....-...T[.VL-TEMP1..DD$(10):A.
.W.. @...P.. A...CP..4.7R...12/02/84R...
P ...P..P!...P.."..":..@...... .O..."L-S
ORT",8,1:..<.....O..."DIR @828",8,1:....
R.....R.....R....R%.."."..D$(1080):A...,
.+O.JT.JTFLJY.JT.JU..."......DISK FILE P
ROGRAM: "VE$..". 1 - ADD FILES"..".
2 - PRINT A FILE"..". 3 - SORT THE
FILE"..". 4 - SEARCH FOR FILE NAME".
.". 5 - SEARCH FOR DISK NUMBER"..".
6 - VIEW DISK DIRECTORY"..". 7 - SA
VE D-FILE"..". 8 - LOAD D-FILE"..".
9 - REMOVE A NAME"..". 0 - QUIT".."
. RECORDS IN MEMORY"N..A$:.:..+O.H.H.
:..0-.:..9*.O.H.H.:..0+O.J...:..PA.AN...
.R.F.|.R.......L..H...."...... QUIT! A
RE YOU SURE?"..A$:.:..+O.H...:..Y.O.L.."
.":JVF^...:H....".."ZS$...10)"OUTPUT ON"
.." .1. SCREEN".." .2. 80 COL. PRINT
ER".." .3. 136 COL. PRINTER (CONDENSED
PRINT)"..A$:.:..M..L.V..H.`.PO.3.......
B.O..".":...O.....PV...O....B.V.P]..B.].
V.]...8*O.H...." ";D$(J.K):G.].V
..P.....6)". F1=MENU F5=UP F7=DOWN .
";..A$:.:..+O.H.F.:..+O..3.......POH.Z.:
..+.O.*.O..O..POH.Z.:..+.O.+.O..POH.Z.:.
..O.H.F.O.3.......+O..3.....POG.OL..".EN
TER TODAY'S DATE (NO COMMAS)"..XY$..".EN
TER PRINTER DEVICE NUMBER"..DN$:.K.....P
R.R.-.R.*.O.H... 3..3,DN..3:..O7.."...PR
INTER NOT ON-LINE, HIT A KEY."..198,1:.F
.PH....".PRINTING, HOLD DOWN F1 TO ABORT
.":.. RY.PA.<P...1R.J.KJ. .3..-O.H..
..PA..P...2R.J.KJ. .3..-O.H....IPA...P..
.3R.J.KJ. .3...-O.H.....PA..XP...4R.J.KJ
. .3..X-O.H....QPA...P...5R.J.KJ. .3...-
O.H.....PA...P...6R.J.KJ. H....3,"
PAGE "PN$" "ZS$" "XY$
..3," ":.APV..B.V..3,B$;D$(J);B$;D$(J.60
);B$;D$(J.120):.E...+O...3. 3:H.....+.P.
.G..P..".PRINTING...":G.V.P..B....3:G..L
..".NEXT PAGE: PRESS ANY KEY TO CONTINU
E."..A$:.:..+O.H..L..".ENTER TODAY'S DAT
E (NO COMMAS)"..XY$..".ENTER PRINTER DEV
ICE NUMBER"..DN$:.K.....PR.R.-.R.*.O.H..
..".....CHR$(XX) FOR CONDENSED MODE 15
....";DC$:......R.. 3..3,DN..3:..O7.."..
.PRINTER NOT ON-LINE, HIT A KEY."..198,1
:.F.PH....".PRINTING, HOLD DOWN F1 TO AB
ORT.":.. RY.PA.<P...1R.J.J. .3..H-O.H.
...IPA...P...2R.J.J. .3..Q-O.H....QPA..
.P...3R.J.J. H....3," PAGE "PN$
" "ZS$" "XY$..3," ":.APV
..B.V..3,DC$;D$(J);B$;D$(J.60);B$;D$(J.1
20);B$;D$(J.180);..3,B$;D$(J.240);B$;D$(
J.300);G(18):.E...+O...3. 3:H.....+.P..G
..P..".PRINTING...":G.V.P..B....3:G..L..
3. 3.."..END OF LIST. PRESS ANY KEY":..
R:..A$:.:..+O.H.{L.."...... SORT A FILE
"....". .SORTING.......":.P..P...@...Q,
N,D$(1):.PO.3B.O.O....+O..O..P.J..H..G.O
...+O.L.3...P...".. "N2"FILES REMOVED":.
.P3..". . PRESS ANY KEY ."..A$:.:..+O.H
..L.PO..8B.O.O....+O..O..
..G.OL.."...... SEARCH FOR FILE N
AME".."ENTER NAME TO SEARCH FOR":..R...S
N$:....P..PO.3B.O.O........+O...D$(I):..
....+O.H..G.O.."..END OF LIST. PRESS AN
Y KEY"..A$:.:..+O.H..L.."...... SEARCH
FOR DISK NUMBER".."ENTER 4 CHR. ID TO SE
ARCH FOR":..R...SN$:....P..PO.3B.O.O....
......+O...D$(I):......+O.H.`G.O.."..END
OF LIST. PRESS ANY KEY"..A$:.:..+O.H./
L..PF..0RM.T..+O.H.T..".WHAT DEVICE (8 O
R 9)";..D$:.......PF.F..-.F..*.O.H......
0:+O.H....".WHAT DRIVE (0 OR 1, * FOR BO
TH)";..DD$:.M.....P....-...*.O.H.T..G.M.
.P..N.FP..".IS THE CORRECT DISK IN THE D
RIVE?"..A$:.:..Y.O.H.R..15,D,15,"I".DD$.
.15,E,E$,F,G. 15:....O$.." "E" "E
$" "F" "G. 15:H....<Q:...8)"..PRESS ANY
KEY WHEN READY"..A$:.:..+O.H.QL..".....
ADD FROM DISK"..".FILES"N;:....
.A.O..."- LAST ID USED "I4$....".PLACE D
ISK TO BE READ INTO DRIVE 8 AND"..".INPU
T A FOUR CHARACTER ID .(A=ABORT)."..".
----":..V...." ";I4$:.....A+O.L.....+
O.H.A.......O.H.A..". QUERY? (Y/N) ";..
QU$:.....+O.H.J.....Y......N..O.H.J.....
..O.H.A.....Y+O...".(Y/N/E/F1=ABORT).":H
.].....N+O...".(F1=ABORT)."..15,8,15,"I0
"..15,E,E$,F,G. 15:....O!..". "E" ."E$
". "F" "G" ":H.#..7,8,.,"$0":H....#7,A$,
B$..#7,A$,B$..#7,A$,B$:.T....V.!..V.(.T.
/../P..:...O..:..T...Y...O.....Y.......T
............V.!.." ";:..!....-O...!..
.V.!..FS$;:H.=..!...C*O...!..
.V.!..FS$;:H.=..!.. .V.!..FS$;:..RY
..#7,B$:...@.O.H.6.Y."...O.H.=..#7,B$:.Y
."...O.JUM..(.Y.V.(H....................
...V.6..(..... +O...(..(......V.(H....(.
.... +O...(..(......V.(H.D..(..P......T.
/..(..6../...V.(..NF$" ";..#7,B$:.Y. ..+
O.H...V.=..=.Y.V.=..#7,B$:.Y...O.H.F..H
(C$,1):....@.O.H...."--- BLOCKS FREE". 7
..".. .HIT ANY KEY TO CONTINUE."..A$:.
:..+O.H..H.A..#7,A$,A$,A$,A$..#7,A$:.:."
...O.H....#7,A$:.:."..+O.H....D.:.V.DH.H
..#7,A$..#7,A$,B$:.:.Y.V.K..:.. NAME:V
.R..P$.NN$,:....ID:V.R..P$.ID$:..V.R..V.
D...." .SIZE NAME TYPE.
"..#7,A$,A$,A$,A$:H.......N+O...YV.YH.B.
.AN$:..Y..+O.H....Y..N+O/..".
.":H....Y..Y+O..
3..P3H....Y..E+O..3..P3H.@..Y..+O.H.#H..
.3..7*O#....".* FILE FULL! *.". 7. 15:H.
..3..(................AB$:..`..+O.H.#H..
.." .EDIT.";:..(......+O...(..(......V
.(H.2.." "NF$.."..........";NM$:..G..
....................V.G..G....V.(H....".
...... REMOVE NAMES"..".. DELETE .N.A
ME OR .I.D":..R:..A$:.:..+O.H...:..N+O.H
.H.:..I+O.H..H....".........INPUT NAME T
O REMOVE OR EDIT":.T.N..V.U..RN$:..U..P.
.PO.3B.O.O........U+O...D$(I)" .(Y/N/E/F
1).";:H..H....A$:.:..+O.H...:..N+O..." N
":H...:..Y+O..O......" Y":.T.NH...:..E+O
.H...:..+O.H..H..G.O..N.+O...:J.OL.O....
..V.G..G......+O...G..G......V.GH......"
. >.EDIT.------------<".." "NM$..".";NM
$:..G......................V.G.O.....V.|
.O..G......|....T.NH....".........INPUT
ID OF DISK TO REMOVE":.T.N..V.U..RN$:..U
..P...U..+O.H...PO.3B.O.O..........U+O!.
.D$(I)" .(Y/N/F1=ABORT).";:H.WH.-..A$:.:
..+O.H.W.:..N+O..." N":H.-.:..Y+O..O....
.." Y":.T.NH.-.:..+O.H.*H.WG.O..N.+O.J.O
LJ...:..A+O.H....15,D1,15..15,"S"D2$.ZS$
.".BU"..15,"R"D2$.ZS$.".BU="D2$.ZS$..8,D
1,8,D2$.ZS$.",S,W"..15,E,E$:...*O,. 8. 1
5..". ."E$" PRESS ANY KEY.":H..H.Q.
.A$:.:..+O.H..L..".."ZZ$;..". SAVING"N"F
ILE NAMES"..8,N:.PO.3B.O..8,D$(I).."..."
CE$D$(I)" "I:F. 8. 15:L.."....... L
OAD FILE .(Y/N).":..R:..A$:.:..+O.H...:.
.Y+O.H.WL.,.+O.I.P,.T..J.MJ.U.:..A+O.L..
15,D1,15:.P,..8,D1,8,D2$.ZS$.",S,R"..15,
E,E$,G,H:...*O0. 8. 15..". ."E$" PR
ESS ANY KEY.":.T..H.PH.7..A$:.:..+O.H.P.
...+O.H....8,N..".."ZZ$;". LOADING"N"FIL
E NAMES":.PO.3B.O..8,D$(I).."..."D$(I)"
"I:F. 8. 15:....+O.H..L..".... IS
MASTER DATA DISK IN DRIVE"D1".?"..A$:.:.
.+O.H...:..Y+O.H...:..A+O.LH....15,D1,15
.."."..8,D1,8,D2$."CATEGORIES,S,R"..15,E
,E$,T,S:...>+...J+.O..T..H.O..". .
EXISTING CATEGORIES ARE:"....8,NN:.PO...
B.O..8,DD$(I).."."I(D(I),1)". "DD$(I):G
.O. 8. 15. 8. 15..".. DO YOU WANT TO CRE
ATE A NEW CATEGORY?"..A$:.:..+O.H...:..N
+....+.O.H...:..N+O.H.4.:..Y.O.H.......+
O..."NO MORE CATEGORIES":H.4...."NAME OF
NEW CATEGORY";DD$:.M....*O..."...":H.D.
....T......M.......+O..."NO MORE CATEGOR
IES":H....".MORE?"..A$:.:..+O.H.V.:..Y+O
.H.F.:..N.O.H.V..15,D1,15,"S".D2$."BUCAT
S"..15,"R".D2$."BUCATS=CATEGORIES". 15..
8,D1,8,D2$."CATEGORIES,S,W"..8,NN:.PO...
B.O..8,DD$(I):G.O. 8..". .EXISTING
CATEGORIES ARE:"..:.PO...B.O.."."I(D(I)
,1)". "DD$(I):G.O..".. WHICH CATEG
ORY DO YOU WANT?"..A$:.:..+O.H...:..T...
...-......*.O.H.......RH.HV..L..".......
. SAVE FILE":.H..+O.H.U..". CURRENT FI
LE IS "ZS$..". IS THIS CORRECT? .(Y/N/
A=ABORT).":..R:..A$:.:..+O.H.&.:..Y+O.L.
:..N+O.H.UL.:..A+O.L..V....".......
ADD FILES":.3..7*O4..".. .* WAR
NING FILE FULL!! *.":.PO..,B.OG.OH...3..
.*O<.."...* WARNING FILE ALMOST FULL!! *
."..1080.N"REMAINING!".."... .I.
NDIVIDUAL OR .D.ISK"..". A =
ABORT":..R:..A$:.:..+O.H...:..D+O.H.A.:.
.I+O.HZ..:..A+O.LH...."........ ADD
INDIVUDAL FILE":.3..7*O.H......".INPUT
A FOUR CHARACTER ID .(A=ABORT).".." ---
-"..I4$:.....A+O.L.....+O.HZ........O.HZ
...".ENTER FILE NAME (MAX 16 CHRS)".."
----------------":..V....N$:.....+O...".
.":HZ.........................V.........
........V...3..P3.3.....HZ.JWT..........
.......V.B..".":.PV.PO...B.O..J(CH$,J,1)
:.V..PV.V..*O..PV..".... DISK FILE "VE
$" : MSD SD-2 - 4040"..". "DA$"
: 1 OR 2 1541'S"...22)".: 80 CO
L. PRINTER"...22)".: 136 COL. PRINTER"..
" DIRECTORY (C) : COMPUTE! 11/83"
..". LIGHTNING SORT (C) : COMPUTE! 09/
84"..". COMPILER PARTS (C) : 'INSTA-SP
EED'"..". ---------------------------
------".." MAIN PROGRAM (C) COPYRIGH
T 1984 ".." BY ROY SCHAHRER - [70366
,1717] ".." ------------------------
---------":...+.P..G..P...11)"HIT A KEY
TO START"..A$:.:..+O.G.O..P!...P..P ...P
..".":.'.POL.."... PARTS OF THIS PROGRAM
ARE COPYRIGHTED"..". BY DRIVE TECHNOLO
GY LTD., (C) 1983"..".. 'THANKS FOR TH
E HELP INSTA-SPEED.'"..".---------------
-------------------------".."THIS PROGRA
M IS IN FREEWARE. IF YOU FIND".."IF USEF
ULL PLEASE SEND $20, OR WHATEVER"..".YOU
FEEL IT IS WORTH, TO:"..".. ROY SCHAH
RER".." 842 W. CALLE DEL NORTE".." C
HANDLER, ARIZ. 85224"..".
THANK YOU.":.PO.'.B.OG.OL.Y.%.
...*.Y.%.... -.O..?..RY.Y.%.... -O..?..
RY.Y.%.....*.Y.%.....-.O..?..RYL..".....
.. SELECT DRIVE CONFIGURATION".."....
1. MSD SD-2 OR 4040 DUAL DRIVE (DV 8)"..
". 2. SINGLE 1541 DISK DRIVE (DV 8)".."
. 3. TWO 1541 DISK DRIVES (DV 8 & 9)"..
A$:.:..+O.HTZ.:..1+O...PT..1:R.....PL.:.
.2+O...PT..0:R.....PL.:..3+O...PT..0:R..
...PLHTZ.......................R.L.....P
A.A.+O...PT..1:R..A.+O...PT..0:R..A.+O..
.PT..0:R.L^......VE.....DA.....F......F.
.....F......Z......AA.....N......A......
A......ZS.....I......J......K......XY...
..DN.....DN.....B......B......PN.....X..
....II.....DC.....N1.....N2.....PI.....S
N.....Z......D......DD.....D1.....D.....
.D......DR.....E......E......F......G...
...I......QU.....C......FS.....NF.....XX
.....PD.....C......NN.....ID.....P......
AN.....AB.....NM.....A1.....RN.....NO...
..ZZ.....CE.....BB.....H......T......S..
....NN.....ZS.....N......CH.............
..W,../.S...U.0.
> CLICK IMAGE PREVIEW FOR FULL MODAL