DISK-CATALOGER
FILE INFORMATION
FILENAME(S): DISK-CATALOGER
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-12-02 02:01:42
APPEARS ON: 1 disk(s)
FILE HASH
8a26490f7b0fdaf0d417992bb511ac7ea5460707c59858cbbdf32a2de1a9cc12
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITY 2 | DISK-CATALOGER | PRG | marcus | 34 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 0A 00 9C 3A 4D B2 31 3A 86 46 24 28 |.......:M.1:.F$(|
00000010: 32 30 30 30 29 00 2B 08 14 00 97 35 33 32 38 30 |2000).+....53280|
00000020: 2C 31 3A 97 35 33 32 38 31 2C 31 00 3B 08 1E 00 |,1:.53281,1.;...|
00000030: 99 22 97 22 3A 20 89 31 33 31 30 00 4B 08 28 00 |.".": .1310.K.(.|
00000040: 99 22 97 93 22 C7 28 31 34 32 29 00 5D 08 32 00 |."..".(142).].2.|
00000050: 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 00 65 08 |.15,8,15,"I0".e.|
00000060: 3C 00 A0 31 35 00 72 08 46 00 43 24 B2 C7 28 31 |<..15.r.F.C$..(1|
00000070: 33 29 00 7F 08 50 00 50 24 B2 C7 28 33 34 29 00 |3)...P.P$..(34).|
00000080: 9A 08 5A 00 4E 24 B2 22 22 3A 46 24 28 30 29 B2 |..Z.N$."":F$(0).|
00000090: 22 22 3A 44 49 44 24 B2 22 22 00 C5 08 64 00 99 |"":DID$.""...d..|
000000A0: 22 11 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |"....... |
000000B0: 20 20 20 4C 4F 41 44 49 4E 47 20 44 49 52 45 43 | LOADING DIREC|
000000C0: 54 4F 52 59 22 00 ED 08 6E 00 99 22 11 11 11 11 |TORY"...n.."....|
000000D0: 11 20 20 20 20 20 20 20 20 20 20 20 20 2D 2D 50 |. --P|
000000E0: 4C 45 41 53 45 20 57 41 49 54 2D 2D 22 00 F5 08 |LEASE WAIT--"...|
000000F0: 78 00 4A B2 30 00 05 09 82 00 9F 38 2C 38 2C 30 |x.J.0......8,8,0|
00000100: 2C 22 24 30 22 00 0E 09 8C 00 8D 34 30 35 00 30 |,"$0"......405.0|
00000110: 09 96 00 99 22 91 91 91 91 91 20 20 20 20 20 20 |...."..... |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 46 4F 52 22 | FOR"|
00000130: 00 53 09 B4 00 99 22 11 20 20 20 20 20 20 20 20 |.S....". |
00000140: 20 20 20 12 22 3B 46 24 28 30 29 3B 22 92 22 3A | .";F$(0);".":|
00000150: 4A B2 4D 00 5C 09 BE 00 45 46 B2 30 00 65 09 C8 |J.M.\...EF.0.e..|
00000160: 00 8D 34 30 35 00 7E 09 D2 00 8B 45 46 B2 30 A7 |..405.~....EF.0.|
00000170: 4A B2 4A AA 31 3A 4D B2 4A 3A 89 32 30 30 00 88 |J.J.1:M.J:.200..|
00000180: 09 DC 00 54 B2 4A AB 31 00 8F 09 E6 00 A0 38 00 |...T.J.1......8.|
00000190: 98 09 F0 00 99 22 93 22 00 A0 09 FA 00 4A B2 31 |.....".".....J.1|
000001A0: 00 A9 09 04 01 45 46 B2 30 00 C2 09 0E 01 99 22 |.....EF.0......"|
000001B0: 93 11 44 49 52 45 43 54 4F 52 59 20 4C 4F 41 44 |..DIRECTORY LOAD|
000001C0: 45 44 00 C8 09 36 01 99 00 F9 09 68 01 99 22 13 |ED...6.....h..".|
000001D0: 11 11 11 46 49 4C 45 20 49 53 20 4E 4F 57 20 22 |...FILE IS NOW "|
000001E0: 3B 54 3B 22 20 4C 4F 4E 47 20 20 20 32 35 30 30 |;T;" LONG 2500|
000001F0: 20 41 4C 4C 4F 57 45 44 22 00 1F 0A 69 01 99 22 | ALLOWED"...i.."|
00000200: 11 11 50 55 54 20 4E 45 57 20 44 49 53 4B 20 49 |..PUT NEW DISK I|
00000210: 4E 20 44 52 49 56 45 20 23 30 20 41 4E 44 22 00 |N DRIVE #0 AND".|
00000220: 43 0A 6A 01 99 22 11 11 50 52 45 53 53 20 52 45 |C.j.."..PRESS RE|
00000230: 54 55 52 4E 20 4B 45 59 20 57 48 45 4E 20 44 4F |TURN KEY WHEN DO|
00000240: 4E 45 22 00 65 0A 6B 01 99 22 11 11 50 52 45 53 |NE".e.k.."..PRES|
00000250: 53 20 46 28 31 29 20 4B 45 59 20 54 4F 20 53 4F |S F(1) KEY TO SO|
00000260: 52 54 A0 A0 A0 00 86 0A 6C 01 99 22 11 11 50 52 |RT......l.."..PR|
00000270: 45 53 53 20 46 28 37 29 20 54 4F 20 53 45 45 20 |ESS F(7) TO SEE |
00000280: 4D 45 4E 55 A0 A0 00 99 0A 71 01 A1 58 24 3A 8B |MENU.....q..X$:.|
00000290: 58 24 B2 22 22 A7 33 36 39 00 AC 0A 72 01 8B 58 |X$."".369...r..X|
000002A0: 24 B2 C7 28 31 33 33 29 A7 36 30 30 00 C4 0A 77 |$..(133).600...w|
000002B0: 01 8B 58 24 B2 C7 28 31 33 36 29 A7 20 89 20 20 |..X$..(136). . |
000002C0: 31 33 31 30 00 02 0B 78 01 8B 58 24 B2 C7 28 31 |1310...x..X$..(1|
000002D0: 33 35 29 A7 99 22 93 11 50 4C 45 41 53 45 20 57 |35).."..PLEASE W|
000002E0: 41 49 54 22 3A 99 B8 28 58 29 3A 85 22 50 52 45 |AIT":..(X):."PRE|
000002F0: 53 53 20 52 45 54 55 52 4E 22 3B 58 24 3A 89 33 |SS RETURN";X$:.3|
00000300: 36 30 00 0A 0B 7C 01 89 34 30 00 15 0B 95 01 A1 |60...|..40......|
00000310: 23 38 2C 41 24 00 25 0B 9A 01 8B 41 24 B3 B1 4E |#8,A$.%....A$..N|
00000320: 24 A7 34 30 35 00 30 0B 9F 01 A1 23 38 2C 41 24 |$.405.0....#8,A$|
00000330: 00 40 0B A4 01 8B 41 24 B3 B1 4E 24 A7 34 34 35 |.@....A$..N$.445|
00000340: 00 4B 0B A9 01 A1 23 38 2C 41 24 00 5B 0B AE 01 |.K....#8,A$.[...|
00000350: 8B 41 24 B3 B1 4E 24 A7 34 34 35 00 66 0B B3 01 |.A$..N$.445.f...|
00000360: A1 23 38 2C 41 24 00 78 0B B8 01 8B 41 24 B2 4E |.#8,A$.x....A$.N|
00000370: 24 A7 45 46 B2 31 3A 8E 00 88 0B BD 01 8B 41 24 |$.EF.1:.......A$|
00000380: B3 B1 50 24 A7 34 31 35 00 93 0B C2 01 A1 23 38 |..P$.415......#8|
00000390: 2C 41 24 00 A2 0B C7 01 8B 41 24 B2 50 24 A7 34 |,A$......A$.P$.4|
000003A0: 37 30 00 B5 0B CC 01 46 24 28 4A 29 B2 46 24 28 |70.....F$(J).F$(|
000003B0: 4A 29 AA 41 24 00 BE 0B D1 01 89 34 35 30 00 CF |J).A$......450..|
000003C0: 0B D6 01 8B 4A B2 30 A7 20 A1 23 38 2C 41 24 00 |....J.0. .#8,A$.|
000003D0: F1 0B DB 01 8B 28 41 24 B3 B1 22 20 22 29 AF 28 |.....(A$.." ").(|
000003E0: 4A B2 30 29 A7 44 49 44 24 B2 44 49 44 24 AA 41 |J.0).DID$.DID$.A|
000003F0: 24 00 01 0C E0 01 8B 41 24 B2 22 20 22 A7 34 37 |$......A$." ".47|
00000400: 30 00 0C 0C E5 01 A1 23 38 2C 41 24 00 3E 0C EA |0......#8,A$.>..|
00000410: 01 8B 28 41 24 B3 B1 4E 24 29 AF 28 4A B2 30 29 |..(A$..N$).(J.0)|
00000420: AF 28 41 24 B3 B1 22 20 22 29 A7 44 49 44 24 B2 |.(A$.." ").DID$.|
00000430: 44 49 44 24 AA 41 24 20 20 3A 89 34 38 35 00 5E |DID$.A$ :.485.^|
00000440: 0C EF 01 46 24 28 4A 29 B2 46 24 28 4A 29 AA 22 |...F$(J).F$(J)."|
00000450: 20 3C 22 AA 44 49 44 24 AA 22 3E 22 3A 8E 00 75 | <".DID$.">":..u|
00000460: 0C F4 01 8F 20 50 52 49 4E 54 53 20 54 4F 20 53 |.... PRINTS TO S|
00000470: 43 52 45 45 4E 00 8B 0C FE 01 43 B2 30 3A 81 20 |CREEN.....C.0:. |
00000480: 4A B2 31 A4 54 3A 43 B2 43 AA 31 00 A0 0C 08 02 |J.1.T:C.C.1.....|
00000490: 99 22 12 22 3B 4A 3B 22 92 22 3B 46 24 28 4A 29 |.".";J;".";F$(J)|
000004A0: 00 E5 0C 0D 02 8B 43 B2 32 30 A7 85 22 50 52 45 |......C.20.."PRE|
000004B0: 53 53 20 52 45 54 55 52 4E 20 54 4F 20 43 4F 4E |SS RETURN TO CON|
000004C0: 54 22 3B 58 24 3A 43 B2 30 3A 99 22 91 20 20 20 |T";X$:C.0:.". |
000004D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004E0: 20 20 20 91 22 00 EC 0C 12 02 82 4A 00 0B 0D 1C | ."......J....|
000004F0: 02 85 22 50 52 45 53 53 20 52 45 54 55 52 4E 20 |.."PRESS RETURN |
00000500: 54 4F 20 43 4F 4E 54 22 3B 58 24 00 15 0D 26 02 |TO CONT";X$...&.|
00000510: 89 31 33 31 30 00 4A 0D 58 02 54 B2 54 AA 31 3A |.1310.J.X.T.T.1:|
00000520: 8F 20 41 44 44 53 20 31 20 54 4F 20 4C 49 53 54 |. ADDS 1 TO LIST|
00000530: 20 46 4F 52 20 53 4F 52 54 20 54 4F 47 45 54 20 | FOR SORT TOGET |
00000540: 4C 41 53 54 20 49 4E 50 55 54 00 53 0D 62 02 99 |LAST INPUT.S.b..|
00000550: 22 93 22 00 5B 0D 6C 02 50 B2 30 00 63 0D 76 02 |".".[.l.P.0.c.v.|
00000560: 4C B2 54 00 70 0D 80 02 4C B2 B5 28 4C AD 32 29 |L.T.p...L..(L.2)|
00000570: 00 7D 0D 8A 02 8B 4C B2 30 89 38 35 30 00 87 0D |.}....L.0.850...|
00000580: 94 02 50 B2 50 AA 31 00 97 0D 9E 02 99 22 93 50 |..P.P.1......".P|
00000590: 41 53 53 3D 22 3B 50 00 A5 0D A8 02 81 54 53 B2 |ASS=";P......TS.|
000005A0: 30 A4 4C AB 31 00 AE 0D B2 02 49 B2 54 53 00 B9 |0.L.1.....I.TS..|
000005B0: 0D BC 02 4B B2 54 53 AA 4C 00 C2 0D C6 02 53 57 |...K.TS.L.....SW|
000005C0: B2 30 00 D8 0D D0 02 8B 46 24 28 49 29 B3 B2 46 |.0......F$(I)..F|
000005D0: 24 28 4B 29 89 37 38 30 00 E1 0D DA 02 53 57 B2 |$(K).780.....SW.|
000005E0: 31 00 EE 0D E4 02 42 24 B2 46 24 28 49 29 00 FE |1.....B$.F$(I)..|
000005F0: 0D EE 02 46 24 28 49 29 B2 46 24 28 4B 29 00 0B |...F$(I).F$(K)..|
00000600: 0E F8 02 46 24 28 4B 29 B2 42 24 00 13 0E 0C 03 |...F$(K).B$.....|
00000610: 49 B2 4B 00 1D 0E 16 03 4B B2 4B AA 4C 00 32 0E |I.K.....K.K.L.2.|
00000620: 20 03 99 22 2E 22 3B 3A 20 20 8B 4B B3 54 89 37 | ..".";: .K.T.7|
00000630: 32 30 00 40 0E 2A 03 8B 53 57 B2 30 89 38 33 30 |20.@.*..SW.0.830|
00000640: 00 49 0E 34 03 89 36 39 30 00 51 0E 3E 03 82 54 |.I.4..690.Q.>..T|
00000650: 53 00 5A 0E 48 03 89 36 34 30 00 74 0E 52 03 99 |S.Z.H..640.t.R..|
00000660: 22 93 11 11 53 4F 52 54 20 44 4F 4E 45 22 3A 54 |"...SORT DONE":T|
00000670: B2 54 AB 31 00 9A 0E 5C 03 99 22 50 52 45 53 53 |.T.1...\.."PRESS|
00000680: 20 52 45 54 55 52 4E 20 20 54 4F 20 43 4F 4E 54 | RETURN TO CONT|
00000690: 20 20 20 20 20 20 20 20 20 22 00 B5 0E 66 03 99 | "...f..|
000006A0: 22 50 52 45 53 53 20 46 31 54 4F 20 53 45 45 20 |"PRESS F1TO SEE |
000006B0: 4D 45 4E 55 22 00 C8 0E 70 03 A1 58 24 3A 8B 58 |MENU"...p..X$:.X|
000006C0: 24 B2 22 22 A7 38 39 30 00 DD 0E 7A 03 8B 58 24 |$."".890...z..X$|
000006D0: B2 C7 28 31 33 33 29 A7 89 31 33 31 30 00 E6 0E |..(133)..1310...|
000006E0: 84 03 89 33 31 30 00 08 0F E8 03 99 22 93 50 52 |...310......".PR|
000006F0: 49 4E 54 4F 55 54 20 49 4E 20 50 52 4F 47 52 45 |INTOUT IN PROGRE|
00000700: 53 53 22 3A 9F 34 2C 34 00 4B 0F F2 03 4A B2 31 |SS":.4,4.K...J.1|
00000710: 3A 50 41 44 24 B2 22 22 3A 98 34 3A 98 34 3A 43 |:PAD$."":.4:.4:C|
00000720: B2 30 3A 8F 20 50 52 49 4E 54 4F 55 54 20 50 41 |.0:. PRINTOUT PA|
00000730: 44 24 20 41 44 44 53 20 53 50 41 43 45 53 20 41 |D$ ADDS SPACES A|
00000740: 4C 4C 20 46 49 4C 45 53 3D 34 30 00 8F 0F FC 03 |LL FILES=40.....|
00000750: 81 49 B2 31 A4 28 34 30 AB 28 C3 28 46 24 28 4A |.I.1.(40.(.(F$(J|
00000760: 29 29 29 29 3A 50 41 44 24 B2 50 41 44 24 AA 22 |)))):PAD$.PAD$."|
00000770: 20 22 3A 82 3A 43 B2 43 AA 31 3A 8F 20 43 20 43 | ":.:C.C.1:. C C|
00000780: 4F 55 4E 54 53 23 20 4F 46 20 4C 49 4E 45 53 00 |OUNTS# OF LINES.|
00000790: C8 0F 06 04 4A 41 24 B2 C4 28 4A 29 3A 4A 42 24 |....JA$..(J):JB$|
000007A0: B2 C4 28 4A AA 31 29 3A 98 34 2C 22 28 22 3B C9 |..(J.1):.4,"(";.|
000007B0: 28 4A 41 24 2C 33 29 3B 22 29 20 22 3B 46 24 28 |(JA$,3);") ";F$(|
000007C0: 4A 29 AA 50 41 44 24 3B 00 DD 0F 10 04 8B 46 24 |J).PAD$;......F$|
000007D0: 28 4A AA 31 29 B2 22 22 A7 31 30 36 30 00 FE 0F |(J.1)."".1060...|
000007E0: 1A 04 98 34 2C 22 28 22 3B C9 28 4A 42 24 2C 33 |...4,"(";.(JB$,3|
000007F0: 29 3B 22 29 20 22 3B 46 24 28 4A AA 31 29 00 0E |);") ";F$(J.1)..|
00000800: 10 24 04 8B 4A B1 54 AB 32 A7 31 30 39 30 00 2A |.$..J.T.2.1090.*|
00000810: 10 2E 04 8B 43 B1 B2 36 30 A7 81 58 B2 31 A4 36 |....C..60..X.1.6|
00000820: 3A 98 34 3A 82 58 3A 43 B2 30 00 42 10 38 04 4A |:.4:.X:C.0.B.8.J|
00000830: B2 4A AA 32 3A 50 41 44 24 B2 22 22 3A 89 31 30 |.J.2:PAD$."":.10|
00000840: 32 30 00 72 10 42 04 98 34 3A A0 34 3A 85 22 50 |20.r.B..4:.4:."P|
00000850: 52 49 4E 54 4F 55 54 20 43 4F 4D 50 4C 45 54 45 |RINTOUT COMPLETE|
00000860: 20 48 49 54 20 52 45 54 22 3B 58 24 3A 89 31 33 | HIT RET";X$:.13|
00000870: 31 30 00 7D 10 14 05 8F 20 4D 45 4E 55 00 BE 10 |10.}.... MENU...|
00000880: 1E 05 99 22 93 11 11 11 11 11 11 50 52 45 53 53 |...".......PRESS|
00000890: 20 52 45 54 55 52 4E 20 54 4F 20 41 44 44 20 4E | RETURN TO ADD N|
000008A0: 45 57 20 44 49 53 4B 20 4F 52 20 54 4F 20 53 45 |EW DISK OR TO SE|
000008B0: 45 20 20 20 20 20 20 4D 45 4E 55 20 32 22 00 E6 |E MENU 2"..|
000008C0: 10 23 05 99 22 50 52 45 53 53 20 46 28 31 29 20 |.#.."PRESS F(1) |
000008D0: 54 4F 20 53 45 45 20 46 49 4C 45 20 4F 4E 20 53 |TO SEE FILE ON S|
000008E0: 43 52 45 45 4E 22 00 10 11 28 05 99 22 50 52 45 |CREEN"...(.."PRE|
000008F0: 53 53 20 46 28 33 29 20 54 4F 20 53 45 4E 44 20 |SS F(3) TO SEND |
00000900: 46 49 4C 45 20 54 4F 20 50 52 49 4E 54 45 52 22 |FILE TO PRINTER"|
00000910: 00 37 11 2D 05 99 22 50 52 45 53 53 20 46 28 35 |.7.-.."PRESS F(5|
00000920: 29 20 54 4F 20 53 41 56 45 20 46 49 4C 45 20 4F |) TO SAVE FILE O|
00000930: 4E 20 44 49 53 4B 22 00 60 11 32 05 99 22 50 52 |N DISK".`.2.."PR|
00000940: 45 53 53 20 46 28 37 29 20 54 4F 20 52 45 41 44 |ESS F(7) TO READ|
00000950: 20 46 49 4C 45 20 46 52 4F 4D 20 44 49 53 4B 22 | FILE FROM DISK"|
00000960: 00 79 11 37 05 99 22 50 52 45 53 53 20 46 28 38 |.y.7.."PRESS F(8|
00000970: 29 20 54 4F 20 45 58 49 54 00 8D 11 3C 05 A1 58 |) TO EXIT...<..X|
00000980: 24 3A 8B 58 24 B2 22 22 A7 31 33 34 30 00 A2 11 |$:.X$."".1340...|
00000990: 41 05 8B 58 24 B2 C7 28 31 33 33 29 A7 89 20 35 |A..X$..(133).. 5|
000009A0: 31 30 00 B8 11 46 05 8B 58 24 B2 C7 28 31 33 34 |10...F..X$..(134|
000009B0: 29 A7 89 20 31 30 30 30 00 CE 11 4B 05 8B 58 24 |).. 1000...K..X$|
000009C0: B2 C7 28 31 33 35 29 A7 89 20 31 34 31 30 00 E4 |..(135).. 1410..|
000009D0: 11 50 05 8B 58 24 B2 C7 28 31 33 36 29 A7 89 20 |.P..X$..(136).. |
000009E0: 31 35 30 30 00 0C 12 55 05 8B 58 24 B2 C7 28 31 |1500...U..X$..(1|
000009F0: 34 30 29 A7 99 22 93 22 3A 9F 31 35 2C 38 2C 31 |40)..".":.15,8,1|
00000A00: 35 2C 22 49 30 22 3A A0 31 35 3A 80 00 1C 12 5A |5,"I0":.15:....Z|
00000A10: 05 99 22 93 22 3A 20 20 89 33 36 30 00 4C 12 82 |..".": .360.L..|
00000A20: 05 99 22 93 11 53 41 56 49 4E 47 20 43 41 54 41 |.."..SAVING CATA|
00000A30: 4C 4F 47 22 3A 9F 35 2C 38 2C 35 2C 22 40 30 3A |LOG":.5,8,5,"@0:|
00000A40: 43 41 54 41 4C 4F 47 2C 53 2C 57 22 00 55 12 8C |CATALOG,S,W".U..|
00000A50: 05 98 35 2C 54 00 62 12 96 05 81 20 4A B2 31 A4 |..5,T.b.... J.1.|
00000A60: 20 54 00 6F 12 A0 05 98 35 2C 46 24 28 4A 29 00 | T.o....5,F$(J).|
00000A70: 75 12 AA 05 82 00 80 12 B4 05 3A 98 35 3A A0 35 |u.........:.5:.5|
00000A80: 00 BA 12 D2 05 99 22 93 11 11 43 41 54 41 4C 4F |......"...CATALO|
00000A90: 47 20 53 41 56 45 44 20 22 3A 85 22 50 52 45 53 |G SAVED ":."PRES|
00000AA0: 53 20 52 45 54 55 52 4E 20 54 4F 20 43 4F 4E 54 |S RETURN TO CONT|
00000AB0: 22 3B 58 24 3A 89 31 33 31 30 00 DF 12 DC 05 99 |";X$:.1310......|
00000AC0: 22 93 11 11 11 4C 4F 41 44 49 4E 47 20 43 41 54 |"....LOADING CAT|
00000AD0: 41 4C 4F 47 20 46 52 4F 4D 20 44 49 53 4B 22 00 |ALOG FROM DISK".|
00000AE0: FA 12 E6 05 9F 35 2C 38 2C 35 2C 22 30 3A 43 41 |.....5,8,5,"0:CA|
00000AF0: 54 41 4C 4F 47 2C 53 2C 52 22 00 03 13 F0 05 84 |TALOG,S,R"......|
00000B00: 35 2C 54 00 10 13 FA 05 81 20 4A B2 31 A4 20 54 |5,T...... J.1. T|
00000B10: 00 1D 13 04 06 84 35 2C 46 24 28 4A 29 00 23 13 |......5,F$(J).#.|
00000B20: 0E 06 82 00 31 13 18 06 4D B2 54 AA 31 20 3A A0 |....1...M.T.1 :.|
00000B30: 35 00 6B 13 36 06 99 22 93 11 11 43 41 54 41 4C |5.k.6.."...CATAL|
00000B40: 4F 47 20 4C 4F 41 44 45 44 22 3A 85 22 50 52 45 |OG LOADED":."PRE|
00000B50: 53 53 20 52 45 54 55 52 4E 20 54 4F 20 43 4F 4E |SS RETURN TO CON|
00000B60: 54 22 3B 58 24 3A 89 31 33 31 30 00 00 00 00 |T";X$:.1310.... |
.......:M.1:.F$(2000).+....53280,1:.5328
1,1.;....".": .1310.K.(..".."G(142).].2.
.15,8,15,"I0".E.<. 15.R.F.C$.G(13)..P.P
$.G(34)...Z.N$."":F$(0)."":DID$."".E.D..
"....... LOADING DIRECTORY"...
N.."..... --PLEASE WAIT--"...
X.J.0......8,8,0,"$0"......405.0...."...
.. FOR".S....".
.";F$(0);".":J.M.\...EF.0.E.H..405.~.
R..EF.0.J.J.1:M.J:.200.....T.J.1..... 8.
.....".". ...J.1.....EF.0.B...."..DIRECT
ORY LOADED.H.6.....H.."....FILE IS NOW "
;T;" LONG 2500 ALLOWED"...I.."..PUT NE
W DISK IN DRIVE #0 AND".C.J.."..PRESS RE
TURN KEY WHEN DONE".E.K.."..PRESS F(1) K
EY TO SORT ...L.."..PRESS F(7) TO SEE
MENU ...Q..X$:.X$."".369...R..X$.G(133)
.600.D.W..X$.G(136). . 1310...X..X$.G(1
35).."..PLEASE WAIT":..(X):."PRESS RETUR
N";X$:.360...|..40......#8,A$.%....A$..N
$.405.0....#8,A$.@....A$..N$.445.K....#8
,A$.[....A$..N$.445.F....#8,A$.X....A$.N
$.EF.1:.......A$..P$.415...B..#8,A$...G.
.A$.P$.470...L.F$(J).F$(J).A$...Q..450.O
.V..J.0. .#8,A$......(A$.." ").(J.0).DID
$.DID$.A$......A$." ".470......#8,A$.>..
..(A$..N$).(J.0).(A$.." ").DID$.DID$.A$
:.485.^...F$(J).F$(J)." <".DID$.">":..U
.... PRINTS TO SCREEN.....C.0:. J.1.T:C.
C.1. ....".";J;".";F$(J)......C.20.."PRE
SS RETURN TO CONT";X$:C.0:.".
."......J......"PRESS RETURN
TO CONT";X$...&..1310.J.X.T.T.1:. ADDS 1
TO LIST FOR SORT TOGET LAST INPUT.S.B..
".".[.L.P.0.C.V.L.T.P...L..(L.2).}....L.
0.850.....P.P.1......".PASS=";P......TS.
0.L.1.....I.TS.....K.TS.L.B.F.SW.0.X.P..
F$(I)..F$(K).780...Z.SW.1.....B$.F$(I)..
...F$(I).F$(K).....F$(K).B$.....I.K.....
K.K.L.2. ..".";: .K.T.720.@.*..SW.0.830
.I.4..690.Q.>..TS.Z.H..640.T.R.."...SORT
DONE":T.T.1...\.."PRESS RETURN TO CONT
"...F.."PRESS F1TO SEE MENU".H.
P..X$:.X$."".890...Z..X$.G(133)..1310...
...310......".PRINTOUT IN PROGRESS":.4,4
.K...J.1:PAD$."":.4:.4:C.0:. PRINTOUT PA
D$ ADDS SPACES ALL FILES=40......I.1.(40
.(C(F$(J)))):PAD$.PAD$." ":.:C.C.1:. C C
OUNTS# OF LINES.H...JA$.D(J):JB$.D(J.1):
.4,"(";I(JA$,3);") ";F$(J).PAD$;......F$
(J.1)."".1060......4,"(";I(JB$,3);") ";F
$(J.1)...$..J.T.2.1090.*....C..60..X.1.6
:.4:.X:C.0.B.8.J.J.2:PAD$."":.1020.R.B..
4: 4:."PRINTOUT COMPLETE HIT RET";X$:.13
10.}.... MENU......".......PRESS RETURN
TO ADD NEW DISK OR TO SEE MENU 2"..
.#.."PRESS F(1) TO SEE FILE ON SCREEN"..
.(.."PRESS F(3) TO SEND FILE TO PRINTER"
.7.-.."PRESS F(5) TO SAVE FILE ON DISK".
`.2.."PRESS F(7) TO READ FILE FROM DISK"
.Y.7.."PRESS F(8) TO EXIT...<..X$:.X$.""
.1340...A..X$.G(133).. 510...F..X$.G(134
).. 1000.N.K..X$.G(135).. 1410...P..X$.G
(136).. 1500...U..X$.G(140)..".":.15,8,1
5,"I0": 15:....Z..".": .360.L...."..SAV
ING CATALOG":.5,8,5,"@0:CATALOG,S,W".U..
..5,T.B.... J.1. T.O. ..5,F$(J).U.......
..:.5: 5...R.."...CATALOG SAVED ":."PRES
S RETURN TO CONT";X$:.1310......"....LOA
DING CATALOG FROM DISK"......5,8,5,"0:CA
TALOG,S,R"......5,T...... J.1. T......5,
F$(J).#.....1...M.T.1 : 5.K.6.."...CATAL
OG LOADED":."PRESS RETURN TO CONT";X$:.1
310....
> CLICK IMAGE PREVIEW FOR FULL MODAL