DISK LOG
FILE INFORMATION
FILENAME(S): DISK LOG
FILE TYPE(S): PRG
FILE SIZE: 13.2K
FIRST SEEN: 2025-12-01 01:48:20
APPEARS ON: 1 disk(s)
FILE HASH
0dae1267bcebe513c87597855ca78bd7d67d6a7c8ea586f8d721740cdbfb5fc6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C AAD TPUGOC86 | DISK LOG | PRG | hedning, Mattias H00r | 19 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 00 00 58 24 B2 22 58 58 22 3A 81 49 |......X$."XX":.I|
00000010: B2 2E A4 33 3A 58 24 B2 58 24 AA 58 24 3A 82 00 |...3:X$.X$.X$:..|
00000020: 39 08 01 00 58 24 B2 58 24 AA 22 58 58 58 58 58 |9...X$.X$."XXXXX|
00000030: 58 58 22 3A 89 31 35 30 32 00 5F 08 03 00 AC AC |XX":.1502._.....|
00000040: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000050: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC 00 |................|
00000060: 83 08 04 00 AC 20 20 20 54 48 45 20 44 49 53 4B |..... THE DISK|
00000070: 20 43 41 54 41 BC 47 45 52 20 56 33 2E 31 20 20 | CATA.GER V3.1 |
00000080: 20 20 AC 00 A7 08 05 00 AC 20 20 42 59 20 B8 44 | ....... BY .D|
00000090: 20 4C 41 59 42 45 52 47 45 52 AB AB 53 45 50 20 | LAYBERGER..SEP |
000000A0: 31 39 38 35 20 20 AC 00 C9 08 06 00 AC 20 20 4F |1985 ....... O|
000000B0: 4B 41 59 20 A4 20 55 53 45 20 42 55 54 20 A8 20 |KAY . USE BUT . |
000000C0: A4 20 53 45 4C 4C 20 20 AC 00 EF 08 07 00 AC AC |. SELL ........|
000000D0: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
000000E0: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC 00 |................|
000000F0: 10 09 0A 00 99 22 93 22 43 59 24 53 32 24 42 4C |....."."CY$S2$BL|
00000100: 24 52 24 53 31 24 3A 97 35 33 32 38 31 2C 31 31 |$R$S1$:.53281,11|
00000110: 00 49 09 0B 00 8D 36 30 3A 59 B2 32 34 3A 58 B2 |.I....60:Y.24:X.|
00000120: 2E 3A 8D 32 30 3A 99 42 4C 24 53 31 24 43 59 24 |.:.20:.BL$S1$CY$|
00000130: 53 33 24 3B 3A 97 32 30 32 33 2C 31 36 30 3A 97 |S3$;:.2023,160:.|
00000140: 35 36 32 39 35 2C 33 3A 8E 00 76 09 14 00 99 C8 |56295,3:..v.....|
00000150: 28 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |("..............|
00000160: 11 11 11 11 11 11 11 11 11 11 11 11 22 2C 59 29 |............",Y)|
00000170: A3 58 29 3B 3A 8E 00 B1 09 1E 00 8D 34 37 3A 59 |.X);:.......47:Y|
00000180: B2 32 34 3A 58 B2 34 37 3A 8D 32 30 3A 99 52 24 |.24:X.47:.20:.R$|
00000190: 43 59 24 22 20 20 50 52 45 53 53 20 27 20 5E 20 |CY$" PRESS ' ^ |
000001A0: 27 20 54 4F 20 52 45 54 55 52 4E 20 20 20 20 22 |' TO RETURN "|
000001B0: 3B 00 DD 09 1F 00 59 B2 32 34 3A 58 B2 32 30 AB |;.....Y.24:X.20.|
000001C0: C3 28 50 24 29 AD 32 3A 8D 32 30 3A 99 57 24 50 |.(P$).2:.20:.W$P|
000001D0: 24 3B 3A 81 49 B2 31 A4 32 30 30 3A 82 00 F4 09 |$;:.I.1.200:....|
000001E0: 20 00 8B 41 B3 B1 31 A7 41 B2 31 3A 99 52 24 3B | ..A..1.A.1:.R$;|
000001F0: 3A 89 33 34 00 04 0A 21 00 8B 41 A7 41 B2 2E 3A |:.34...!..A.A..:|
00000200: 99 4F 24 3B 00 1C 0A 22 00 49 24 B2 22 22 3A A1 |.O$;...".I$."":.|
00000210: 49 24 3A 8B 49 24 B2 22 22 A7 33 31 00 22 0A 24 |I$:.I$."".31.".$|
00000220: 00 8E 00 3C 0A 2D 00 59 B2 32 34 3A 58 B2 2E 3A |...<.-.Y.24:X..:|
00000230: 8D 32 30 3A 99 42 4C 24 53 33 24 3B 00 5D 0A 2E |.20:.BL$S3$;.]..|
00000240: 00 59 B2 32 34 3A 58 B2 32 30 AB C3 28 50 24 29 |.Y.24:X.20..(P$)|
00000250: AD 32 3A 8D 32 30 3A 99 50 24 3B 3A 8E 00 7C 0A |.2:.20:.P$;:..|.|
00000260: 2F 00 59 B2 32 34 3A 58 B2 34 30 3A 8D 32 30 3A |/.Y.24:X.40:.20:|
00000270: 99 43 59 24 53 33 24 57 24 3B 3A 8E 00 8E 0A 30 |.CY$S3$W$;:....0|
00000280: 00 8D 36 30 3A 8D 34 35 3A 8D 34 37 3A 8E 00 AC |..60:.45:.47:...|
00000290: 0A 31 00 4E B2 4E AB 31 3A 50 24 B2 50 37 24 3A |.1.N.N.1:P$.P7$:|
000002A0: 8D 34 38 3A 5A B2 B8 28 2E 29 3A 8E 00 E6 0A 32 |.48:Z..(.):....2|
000002B0: 00 59 B2 32 32 3A 58 B2 31 31 AB C3 28 50 24 29 |.Y.22:X.11..(P$)|
000002C0: AD 32 20 3A 8D 32 30 3A 99 52 24 57 24 22 49 4E |.2 :.20:.R$W$"IN|
000002D0: 53 45 52 54 20 22 50 24 22 20 44 49 53 4B 45 54 |SERT "P$" DISKET|
000002E0: 54 45 22 3B 3A 8E 00 2C 0B 3C 00 59 B2 33 3A 58 |TE";:..,.<.Y.3:X|
000002F0: B2 2E 3A 8D 32 30 3A 81 49 B2 33 A4 32 33 3A 99 |..:.20:.I.3.23:.|
00000300: 22 1D 12 9B 20 20 20 20 20 20 20 20 20 20 20 20 |"... |
00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000320: 20 20 20 20 20 20 20 20 20 20 92 22 00 34 0B 3D | .".4.=|
00000330: 00 82 3A 8E 00 69 0B 4B 00 97 38 30 38 2C 32 32 |..:..i.K..808,22|
00000340: 35 3A 41 31 B2 C2 28 35 35 29 3A 41 32 B2 C2 28 |5:A1..(55):A2..(|
00000350: 35 36 29 3A 97 35 35 2C C2 28 35 31 29 3A 97 35 |56):.55,.(51):.5|
00000360: 36 2C C2 28 35 32 29 3A 8E 00 94 0B 4D 00 41 B2 |6,.(52):....M.A.|
00000370: B8 28 2E 29 3A 97 35 35 2C 41 31 3A 97 35 36 2C |.(.):.55,A1:.56,|
00000380: 41 32 3A 97 38 30 38 2C 32 33 37 3A 8B 41 B2 B1 |A2:.808,237:.A..|
00000390: 37 37 A7 8E 00 BD 0B 50 00 59 B2 31 30 3A 58 B2 |77.....P.Y.10:X.|
000003A0: 31 31 3A 8D 32 30 3A 99 22 9E 12 50 52 4F 47 52 |11:.20:."..PROGR|
000003B0: 41 4D 20 4D 41 59 20 50 41 55 53 45 22 00 F1 0B |AM MAY PAUSE"...|
000003C0: 51 00 59 B2 31 31 3A 58 B2 39 3A 8D 32 30 3A 99 |Q.Y.11:X.9:.20:.|
000003D0: 22 9E 12 46 4F 52 20 47 41 52 42 41 47 45 20 43 |"..FOR GARBAGE C|
000003E0: 4F 4C 4C 45 43 54 49 4F 4E 22 3A 5A B2 B8 28 2E |OLLECTION":Z..(.|
000003F0: 29 00 1B 0C 52 00 59 B2 31 30 3A 58 B2 31 31 3A |)...R.Y.10:X.11:|
00000400: 8D 32 30 3A 99 22 12 9B 20 20 20 20 20 20 20 20 |.20:.".. |
00000410: 20 20 20 20 20 20 20 20 20 20 22 00 4A 0C 54 00 | ".J.T.|
00000420: 59 B2 31 31 3A 58 B2 39 3A 8D 32 30 3A 99 22 12 |Y.11:X.9:.20:.".|
00000430: 9B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000440: 20 20 20 20 20 20 20 22 3A 8E 00 60 0C 5A 00 8F | ":..`.Z..|
00000450: 20 2A 2A 20 45 52 52 20 48 41 4E 44 4C 49 4E 47 | ** ERR HANDLING|
00000460: 00 75 0C 5B 00 84 31 35 2C 45 52 2C 45 52 24 2C |.u.[..15,ER,ER$,|
00000470: 54 2C 53 3A 8E 00 AC 0C 5C 00 8D 36 30 3A 59 B2 |T,S:....\..60:Y.|
00000480: 32 32 3A 58 B2 39 3A 8D 32 30 3A 97 35 33 32 38 |22:X.9:.20:.5328|
00000490: 31 2C 32 3A 99 45 52 3B 45 52 24 3B 54 3B 53 3A |1,2:.ER;ER$;T;S:|
000004A0: 50 24 B2 53 36 24 3A 8D 33 30 3A 8E 00 C5 0C 5D |P$.S6$:.30:....]|
000004B0: 00 50 24 B2 50 31 24 3A 8D 34 38 3A 98 31 35 2C |.P$.P1$:.48:.15,|
000004C0: 22 49 22 3A 8E 00 D2 0C 5E 00 8D 39 32 3A A0 31 |"I":....^..92:.1|
000004D0: 3A 8E 00 EA 0C 64 00 8F 20 2A 2A 20 46 49 4C 45 |:....d.. ** FILE|
000004E0: 20 53 45 4C 45 43 54 49 4F 4E 00 29 0D 66 00 8D | SELECTION.).f..|
000004F0: 34 35 3A 59 B2 32 34 3A 58 B2 34 37 3A 8D 32 30 |45:Y.24:X.47:.20|
00000500: 3A 99 52 24 43 59 24 22 50 52 45 53 53 20 27 52 |:.R$CY$"PRESS 'R|
00000510: 45 54 55 52 4E 27 20 54 4F 20 43 4F 4E 54 49 4E |ETURN' TO CONTIN|
00000520: 55 45 22 3B 3A 8B 55 A7 8E 00 57 0D 68 00 58 B2 |UE";:.U...W.h.X.|
00000530: 32 31 AB C3 28 50 24 29 3A 8D 32 30 3A 99 57 24 |21..(P$):.20:.W$|
00000540: 50 24 3B 3A 49 B2 2E 3A 4A 24 B2 22 22 3A 59 B2 |P$;:I..:J$."":Y.|
00000550: 32 34 3A 58 B2 32 31 00 5F 0D 6C 00 8D 37 35 00 |24:X.21._.l..75.|
00000560: 94 0D 6E 00 41 24 B2 4A 24 AA C9 28 41 24 2C 4A |..n.A$.J$..(A$,J|
00000570: AB 49 29 3A 8D 32 30 3A 99 52 24 41 24 3B 3A 8D |.I):.20:.R$A$;:.|
00000580: 32 30 3A 99 52 24 4A 24 3B 3A 8B 49 B3 4A A7 99 |20:.R$J$;:.I.J..|
00000590: 22 A6 22 3B 00 B8 0D 70 00 92 31 39 38 2C 31 3A |".";...p..198,1:|
000005A0: A1 49 24 3A 97 31 39 38 2C 2E 3A 8B 49 24 B2 C7 |.I$:.198,.:.I$..|
000005B0: 28 31 33 29 A7 31 33 36 00 F8 0D 72 00 8B 49 24 |(13).136...r..I$|
000005C0: B2 C7 28 31 39 29 B0 49 24 B2 C7 28 33 34 29 B0 |..(19).I$..(34).|
000005D0: 49 24 B2 22 03 22 B0 49 24 B2 C7 28 31 33 31 29 |I$.".".I$..(131)|
000005E0: B0 49 24 B2 C7 28 31 34 37 29 B0 49 24 B2 C7 28 |.I$..(147).I$..(|
000005F0: 31 34 31 29 A7 31 31 30 00 25 0E 74 00 8B 49 B3 |141).110.%.t..I.|
00000600: B2 31 A7 8B 49 24 B2 C7 28 32 30 29 B0 49 24 B2 |.1..I$..(20).I$.|
00000610: C7 28 31 35 37 29 A7 49 B2 2E 3A 4A 24 B2 22 22 |.(157).I..:J$.""|
00000620: 3A 89 31 31 30 00 4D 0E 76 00 8B 49 24 B2 C7 28 |:.110.M.v..I$..(|
00000630: 32 39 29 AF 49 B3 4A A7 49 B2 49 AA 31 3A 4A 24 |29).I.J.I.I.1:J$|
00000640: B2 C8 28 41 24 2C 49 29 3A 89 31 31 30 00 60 0E |..(A$,I):.110.`.|
00000650: 78 00 8B 49 24 B2 C7 28 31 34 38 29 A7 31 31 30 |x..I$..(148).110|
00000660: 00 94 0E 7A 00 8B 49 24 B2 C7 28 32 30 29 B0 49 |...z..I$..(20).I|
00000670: 24 B2 C7 28 31 35 37 29 A7 4A 24 B2 C8 28 4A 24 |$..(157).J$..(J$|
00000680: 2C C3 28 4A 24 29 AB 31 29 3A 49 B2 49 AB 31 3A |,.(J$).1):I.I.1:|
00000690: 89 31 31 30 00 BB 0E 7C 00 8B 49 24 B2 C7 28 31 |.110...|..I$..(1|
000006A0: 37 29 A7 99 22 91 22 3A 4A 24 B2 C8 28 4A 24 2C |7)..".":J$..(J$,|
000006B0: C3 28 4A 24 29 29 3A 89 31 31 30 00 E3 0E 7E 00 |.(J$)):.110...~.|
000006C0: 8B 49 24 B2 C7 28 31 34 35 29 A7 99 22 91 22 3A |.I$..(145)..".":|
000006D0: 4A 24 B2 C8 28 4A 24 2C C3 28 4A 24 29 29 3A 89 |J$..(J$,.(J$)):.|
000006E0: 31 31 30 00 F6 0E 80 00 8B 4B A7 8B 49 24 B2 22 |110......K..I$."|
000006F0: 2A 22 A7 31 33 32 00 14 0F 82 00 8B 53 4C B3 B1 |*".132......SL..|
00000700: 31 A7 8B 49 24 B2 22 2A 22 A7 4A B2 49 AA 31 3A |1..I$."*".J.I.1:|
00000710: 89 31 33 34 00 2C 0F 84 00 8B 49 B2 4A A7 8B 49 |.134.,....I.J..I|
00000720: 24 B3 B1 C7 28 31 33 29 A7 31 31 30 00 44 0F 86 |$...(13).110.D..|
00000730: 00 4A 24 B2 4A 24 AA 49 24 3A 49 B2 49 AA 31 3A |.J$.J$.I$:I.I.1:|
00000740: 89 31 31 30 00 4E 0F 88 00 8D 37 37 3A 8E 00 63 |.110.N....77:..c|
00000750: 0F E1 00 8F 20 2A 2A 20 46 49 4C 45 20 46 4F 52 |.... ** FILE FOR|
00000760: 4D 41 54 00 73 0F E2 00 8B 49 24 B2 22 4E 22 A7 |MAT.s....I$."N".|
00000770: 50 B2 2E 00 95 0F E3 00 8B 50 B2 2E A7 50 30 24 |P........P...P0$|
00000780: B2 22 53 4F 52 54 45 44 20 42 59 20 46 49 4C 45 |."SORTED BY FILE|
00000790: 4E 41 4D 45 22 00 A6 0F E4 00 8B 49 24 B2 22 54 |NAME"......I$."T|
000007A0: 22 A7 50 B2 31 36 00 C9 0F E5 00 8B 50 B2 31 36 |".P.16......P.16|
000007B0: A7 50 30 24 B2 22 53 4F 52 54 45 44 20 42 59 20 |.P0$."SORTED BY |
000007C0: 46 49 4C 45 54 59 50 45 22 00 DA 0F E6 00 8B 49 |FILETYPE"......I|
000007D0: 24 B2 22 44 22 A7 50 B2 31 39 00 FD 0F E7 00 8B |$."D".P.19......|
000007E0: 50 B2 31 39 A7 50 30 24 B2 22 53 4F 52 54 45 44 |P.19.P0$."SORTED|
000007F0: 20 42 59 20 44 49 53 4B 4E 41 4D 45 22 00 0E 10 | BY DISKNAME"...|
00000800: E8 00 8B 49 24 B2 22 49 22 A7 50 B2 33 32 00 31 |...I$."I".P.32.1|
00000810: 10 E9 00 8B 50 B2 33 32 A7 50 30 24 B2 22 53 4F |....P.32.P0$."SO|
00000820: 52 54 45 44 20 42 59 20 44 49 53 4B 20 49 44 20 |RTED BY DISK ID |
00000830: 22 00 42 10 EA 00 8B 49 24 B2 22 53 22 A7 50 B2 |".B....I$."S".P.|
00000840: 33 35 00 65 10 EB 00 8B 50 B2 33 35 A7 50 30 24 |35.e....P.35.P0$|
00000850: B2 22 53 4F 52 54 45 44 20 42 59 20 50 52 47 20 |."SORTED BY PRG |
00000860: 53 49 5A 45 22 00 7E 10 EC 00 8B 50 B2 34 30 A7 |SIZE".~....P.40.|
00000870: 50 30 24 B2 22 55 4E 53 4F 52 54 45 44 22 00 84 |P0$."UNSORTED"..|
00000880: 10 ED 00 8E 00 9C 10 13 01 8F 20 2A 2A 20 4C 49 |.......... ** LI|
00000890: 42 20 46 49 4C 45 20 45 4D 50 54 59 00 CC 10 14 |B FILE EMPTY....|
000008A0: 01 50 24 B2 22 20 22 3A 8D 34 35 3A 59 B2 32 32 |.P$." ":.45:Y.22|
000008B0: 3A 58 B2 38 3A 8D 32 30 3A 99 57 24 50 33 24 3A |:X.8:.20:.W$P3$:|
000008C0: 50 24 B2 53 36 24 3A 8D 33 30 3A 8E 00 E4 10 F4 |P$.S6$:.30:.....|
000008D0: 01 8F 20 2A 2A 20 53 41 56 45 2F 4C 4F 41 44 20 |.. ** SAVE/LOAD |
000008E0: 4D 45 4E 55 00 1E 11 F6 01 8D 36 30 3A 53 4C B2 |MENU......60:SL.|
000008F0: 2E 3A 4A 24 B2 22 4C 4F 41 44 22 3A 8B 49 24 B2 |.:J$."LOAD":.I$.|
00000900: 22 85 22 A7 53 4C B2 31 3A 4A 24 B2 22 53 41 56 |".".SL.1:J$."SAV|
00000910: 45 22 3A 8B 4E B3 31 A7 8D 32 37 36 3A 8E 00 63 |E":.N.1..276:..c|
00000920: 11 F8 01 50 24 B2 22 20 20 20 20 20 20 20 20 20 |...P$." |
00000930: 20 20 22 AA 4A 24 AA 22 20 46 49 4C 45 20 43 48 | ".J$." FILE CH|
00000940: 4F 49 43 45 53 20 20 20 20 20 20 20 20 20 20 20 |OICES |
00000950: 20 22 3A 8D 35 38 30 3A 59 B2 35 3A 58 B2 32 3A | ":.580:Y.5:X.2:|
00000960: 49 B2 31 00 84 11 FA 01 8D 32 30 3A 99 57 24 52 |I.1......20:.W$R|
00000970: 24 C7 28 36 34 AA 49 29 22 20 22 57 24 46 4C 24 |$.(64.I)" "W$FL$|
00000980: 28 49 29 3B 00 B8 11 FC 01 99 A3 32 31 29 C7 28 |(I);.......21).(|
00000990: 36 34 AA 49 AA 36 29 22 20 22 46 4C 24 28 49 AA |64.I.6)" "FL$(I.|
000009A0: 36 29 3A 59 B2 59 AA 33 3A 49 B2 49 AA 31 3A 8B |6):Y.Y.3:I.I.1:.|
000009B0: 49 B3 B2 36 A7 35 30 36 00 D1 11 FE 01 50 24 B2 |I..6.506.....P$.|
000009C0: 53 37 24 3A 8D 33 30 3A 8B 49 24 B2 22 5E 22 A7 |S7$:.30:.I$."^".|
000009D0: 8E 00 E8 11 00 02 8B 49 24 B3 22 41 22 B0 49 24 |.......I$."A".I$|
000009E0: B1 22 4C 22 A7 35 31 30 00 01 12 02 02 46 24 B2 |."L".510.....F$.|
000009F0: 22 5F 22 AA 46 4C 24 28 C6 28 49 24 29 AB 36 34 |"_".FL$(.(I$).64|
00000A00: 29 00 44 12 04 02 8B 49 24 B2 22 4C 22 A7 46 24 |).D....I$."L".F$|
00000A10: B2 22 22 3A 50 24 B2 22 44 45 53 49 52 45 44 20 |."":P$."DESIRED |
00000A20: 46 49 4C 45 4E 41 4D 45 3A 22 3A 4A B2 31 35 3A |FILENAME:":J.15:|
00000A30: 41 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |A$." |
00000A40: 20 20 20 22 00 5F 12 06 02 8B 49 24 B2 22 4C 22 | "._....I$."L"|
00000A50: A7 8D 31 30 32 3A 46 24 B2 22 5F 22 AA 4A 24 00 |..102:F$."_".J$.|
00000A60: 78 12 08 02 8B 49 24 B2 C7 28 31 33 29 A7 8B C3 |x....I$..(13)...|
00000A70: 28 46 24 29 B3 32 A7 8E 00 9B 12 0A 02 59 B2 32 |(F$).2.......Y.2|
00000A80: 3A 58 B2 2E 3A 8D 32 30 3A 99 42 4C 24 53 31 24 |:X..:.20:.BL$S1$|
00000A90: 3A 50 24 B2 50 31 24 3A 8D 34 38 00 A9 12 0C 02 |:P$.P1$:.48.....|
00000AA0: 8B 53 4C B2 31 A7 35 35 38 00 BD 12 0E 02 8F 20 |.SL.1.558...... |
00000AB0: 2A 2A 20 4C 4F 41 44 20 46 49 4C 45 53 00 E5 12 |** LOAD FILES...|
00000AC0: 10 02 4A B2 2E 3A 50 24 B2 53 38 24 3A 8D 35 30 |..J..:P$.S8$:.50|
00000AD0: 3A 50 24 B2 53 36 24 3A 8D 33 30 3A 8B 49 24 B2 |:P$.S6$:.30:.I$.|
00000AE0: 22 5E 22 A7 8E 00 0E 13 12 02 8D 39 33 3A 9F 31 |"^"........93:.1|
00000AF0: 2C 38 2C 2E 2C 22 30 3A 22 AA 46 24 AA 22 2C 53 |,8,.,"0:".F$.",S|
00000B00: 2C 52 22 3A 8D 39 31 3A 8B 45 52 A7 39 34 00 39 |,R":.91:.ER.94.9|
00000B10: 13 14 02 8B 4E B1 31 A7 8D 37 35 3A 81 49 B2 2E |....N.1..75:.I..|
00000B20: A4 4E 3A 54 24 28 49 29 B2 22 22 3A 82 3A 8D 37 |.N:T$(I)."":.:.7|
00000B30: 37 3A 4E B2 2E 3A 44 B2 2E 00 5A 13 16 02 84 31 |7:N..:D...Z....1|
00000B40: 2C 4E 3A 84 31 2C 44 3A 84 31 2C 50 3A 8D 32 32 |,N:.1,D:.1,P:.22|
00000B50: 36 3A 8B 4E B1 4D A7 4E B2 4D 00 94 13 18 02 49 |6:.N.M.N.M.....I|
00000B60: 24 B2 22 22 3A 59 B2 35 3A 58 B2 35 3A 8D 32 30 |$."":Y.5:X.5:.20|
00000B70: 3A 99 57 24 52 24 22 4C 4F 41 44 49 4E 47 22 4E |:.W$R$"LOADING"N|
00000B80: 22 9D 20 50 52 4F 47 52 41 4D 53 22 3A 59 B2 37 |". PROGRAMS":Y.7|
00000B90: 3A 4E B2 31 00 B7 13 1A 02 97 38 35 30 2C 37 36 |:N.1......850,76|
00000BA0: 3A 97 38 35 31 2C 38 38 3A 97 38 35 32 2C 33 3A |:.851,88:.852,3:|
00000BB0: 97 39 35 32 2C 33 39 00 CB 13 1C 02 8B 4E B1 4D |.952,39......N.M|
00000BC0: A7 4E B2 4E AB 31 3A 89 35 35 30 00 FA 13 1E 02 |.N.N.1:.550.....|
00000BD0: 9E 44 4C 3A 54 24 28 4E 29 B2 C8 28 58 24 2C 33 |.DL:T$(N)..(X$,3|
00000BE0: 38 29 3A 8D 32 30 3A 99 57 24 4E A3 31 30 29 C8 |8):.20:.W$N.10).|
00000BF0: 28 54 24 28 4E 29 2C 31 38 29 00 13 14 20 02 A1 |(T$(N),18)... ..|
00000C00: 49 24 3A 8B 49 24 B2 22 5E 22 A7 8D 37 37 3A 89 |I$:.I$."^"..77:.|
00000C10: 35 35 30 00 2B 14 22 02 99 A3 35 30 29 CA 28 54 |550.+."...50).(T|
00000C20: 24 28 4E 29 2C 32 30 2C 32 30 29 00 40 14 24 02 |$(N),20,20).@.$.|
00000C30: 8B 53 54 B2 2E A7 4E B2 4E AA 31 3A 89 35 34 30 |.ST...N.N.1:.540|
00000C40: 00 4F 14 26 02 8D 39 31 3A 8B 45 52 A7 39 34 00 |.O.&..91:.ER.94.|
00000C50: 68 14 28 02 A0 31 3A 50 24 B2 50 37 24 3A 8D 34 |h.(..1:P$.P7$:.4|
00000C60: 38 3A 5A B2 B8 28 2E 29 00 9A 14 2A 02 50 24 B2 |8:Z..(.)...*.P$.|
00000C70: 52 24 AA 57 24 AA C4 28 5A 29 AA 22 20 42 59 54 |R$.W$..(Z)." BYT|
00000C80: 45 53 20 46 52 45 45 22 3A 8D 34 35 3A 81 49 B2 |ES FREE":.45:.I.|
00000C90: 31 A4 31 30 30 30 3A 82 3A 8E 00 AE 14 2C 02 8F |1.1000:.:....,..|
00000CA0: 20 2A 2A 20 53 41 56 45 20 46 49 4C 45 53 00 D2 | ** SAVE FILES..|
00000CB0: 14 2E 02 50 24 B2 53 39 24 3A 8D 35 30 3A 50 24 |...P$.S9$:.50:P$|
00000CC0: B2 53 36 24 3A 8D 33 30 3A 8B 49 24 B2 22 5E 22 |.S6$:.30:.I$."^"|
00000CD0: A7 8E 00 07 15 30 02 8D 39 33 3A 9F 31 2C 38 2C |.....0..93:.1,8,|
00000CE0: 31 2C 22 30 3A 22 AA 46 24 AA 22 2C 53 2C 57 22 |1,"0:".F$.",S,W"|
00000CF0: 3A 8D 39 31 3A 8B 45 52 B2 36 33 A7 50 24 B2 53 |:.91:.ER.63.P$.S|
00000D00: 35 24 3A 89 35 37 36 00 12 15 32 02 8B 45 52 A7 |5$:.576...2..ER.|
00000D10: 39 34 00 3D 15 34 02 59 B2 35 3A 58 B2 35 3A 8D |94.=.4.Y.5:X.5:.|
00000D20: 32 30 3A 99 57 24 52 24 22 53 41 56 49 4E 47 22 |20:.W$R$"SAVING"|
00000D30: 4E 22 9D 20 50 52 4F 47 52 41 4D 53 22 00 60 15 |N". PROGRAMS".`.|
00000D40: 36 02 98 31 2C 4E 3A 98 31 2C 44 3A 98 31 2C 50 |6..1,N:.1,D:.1,P|
00000D50: 3A 81 49 B2 31 A4 4E 3A 98 31 2C 54 24 28 49 29 |:.I.1.N:.1,T$(I)|
00000D60: 00 7F 15 38 02 59 B2 37 3A 8D 32 30 3A 99 49 3B |...8.Y.7:.20:.I;|
00000D70: A3 31 30 29 C8 28 54 24 28 49 29 2C 31 38 29 00 |.10).(T$(I),18).|
00000D80: 9A 15 3A 02 99 A3 31 30 29 22 11 22 CA 28 54 24 |..:...10)".".(T$|
00000D90: 28 49 29 2C 32 30 2C 32 30 29 00 AB 15 3C 02 82 |(I),20,20)...<..|
00000DA0: 3A 8D 39 31 3A 8B 45 52 A7 39 34 00 B4 15 3E 02 |:.91:.ER.94...>.|
00000DB0: A0 31 3A 8E 00 E8 15 40 02 A0 31 3A 8D 34 38 3A |.1:....@..1:.48:|
00000DC0: A1 49 24 3A 8B 49 24 B2 22 59 22 A7 50 24 B2 50 |.I$:.I$."Y".P$.P|
00000DD0: 31 24 3A 8D 34 35 3A 98 31 35 2C 22 53 30 3A 22 |1$:.45:.15,"S0:"|
00000DE0: AA 46 24 3A 89 35 36 30 00 F9 15 42 02 8B 49 24 |.F$:.560...B..I$|
00000DF0: B3 B1 22 4E 22 A7 35 37 36 00 1E 16 44 02 59 B2 |.."N".576...D.Y.|
00000E00: 32 3A 58 B2 2E 3A 8D 32 30 3A 99 42 4C 24 53 31 |2:X..:.20:.BL$S1|
00000E10: 24 3A 8D 32 30 3A 99 57 24 50 24 3B 3A 8E 00 36 |$:.20:.W$P$;:..6|
00000E20: 16 58 02 8F 20 2A 2A 20 52 45 41 44 20 44 49 52 |.X.. ** READ DIR|
00000E30: 45 43 54 4F 52 59 00 6E 16 5A 02 55 B2 2E 3A 8D |ECTORY.n.Z.U..:.|
00000E40: 31 30 3A 59 B2 36 3A 58 B2 35 3A 8D 32 30 3A 99 |10:Y.6:X.5:.20:.|
00000E50: 52 24 57 24 22 50 52 4F 47 52 41 4D 53 20 53 4F |R$W$"PROGRAMS SO|
00000E60: 20 46 41 52 3A 22 4E 3A 50 24 B2 53 36 24 00 95 | FAR:"N:P$.S6$..|
00000E70: 16 5C 02 8B 4E B1 4D AB 31 30 30 A7 99 A3 58 AA |.\..N.M.100...X.|
00000E80: 34 30 29 22 91 9E 12 22 4D 22 9D 20 4D 41 58 49 |40)"..."M". MAXI|
00000E90: 4D 55 4E 21 22 00 BD 16 5E 02 59 B2 38 3A 8D 32 |MUN!"...^.Y.8:.2|
00000EA0: 30 3A 99 52 24 57 24 22 55 4E 49 51 55 45 20 49 |0:.R$W$"UNIQUE I|
00000EB0: 44 27 53 20 53 4F 20 46 41 52 3A 22 44 00 E1 16 |D'S SO FAR:"D...|
00000EC0: 60 02 59 B2 31 30 3A 8D 32 30 3A 99 52 24 22 9E |`.Y.10:.20:.R$".|
00000ED0: 22 5A 22 9D 20 42 59 54 45 53 20 46 52 45 45 05 |"Z". BYTES FREE.|
00000EE0: 22 00 ED 16 66 02 8B 4E B2 B1 4D A7 8E 00 11 17 |"...f..N..M.....|
00000EF0: 68 02 50 24 B2 53 38 24 3A 8D 35 30 3A 50 24 B2 |h.P$.S8$:.50:P$.|
00000F00: 53 36 24 3A 8D 33 30 3A 8B 49 24 B2 22 5E 22 A7 |S6$:.30:.I$."^".|
00000F10: 8E 00 3B 17 6A 02 8D 39 33 3A 97 38 35 30 2C 33 |..;.j..93:.850,3|
00000F20: 32 3A 97 38 35 31 2C 32 32 38 3A 97 38 35 32 2C |2:.851,228:.852,|
00000F30: 32 35 35 3A 97 39 35 32 2C 32 39 00 56 17 6C 02 |255:.952,29.V.l.|
00000F40: 9F 31 2C 38 2C 2E 2C 22 24 30 22 3A 8D 39 31 3A |.1,8,.,"$0":.91:|
00000F50: 8B 45 52 A7 39 34 00 7C 17 6E 02 9E 44 4C 3A 44 |.ER.94.|.n..DL:D|
00000F60: 54 24 B2 CA 28 58 24 2C 37 2C 31 36 29 3A 49 44 |T$..(X$,7,16):ID|
00000F70: 24 B2 CA 28 58 24 2C 32 35 2C 32 29 00 B2 17 70 |$..(X$,25,2)...p|
00000F80: 02 50 24 B2 22 1F 12 20 20 20 20 20 20 20 20 20 |.P$.".. |
00000F90: 05 22 AA 44 54 24 AA 22 20 20 20 05 22 AA 49 44 |.".DT$." .".ID|
00000FA0: 24 AA 22 1F 20 20 20 20 20 20 20 05 22 3A 8D 35 |$.". .":.5|
00000FB0: 38 30 00 C5 17 72 02 8F 20 2A 2A 20 49 44 24 20 |80...r.. ** ID$ |
00000FC0: 43 48 45 43 4B 00 EB 17 74 02 81 49 B2 2E A4 4E |CHECK...t..I...N|
00000FD0: 3A 8B 49 44 24 B3 B1 CA 28 54 24 28 49 29 2C 33 |:.ID$...(T$(I),3|
00000FE0: 33 2C 32 29 A7 82 3A 89 36 34 30 00 FC 17 76 02 |3,2)..:.640...v.|
00000FF0: 49 B2 4E 3A 82 3A 97 31 39 38 2C 2E 00 30 18 78 |I.N:.:.198,..0.x|
00001000: 02 50 24 B2 22 12 9E 44 49 53 4B 20 49 44 20 4E |.P$."..DISK ID N|
00001010: 4F 54 20 55 4E 49 51 55 45 20 2D 20 43 4F 4E 54 |OT UNIQUE - CONT|
00001020: 49 4E 55 45 20 28 59 2F 4E 29 3F 22 3A 8D 34 35 |INUE (Y/N)?":.45|
00001030: 00 61 18 7A 02 92 31 39 38 2C 31 3A A1 49 24 3A |.a.z..198,1:.I$:|
00001040: 50 24 B2 50 31 24 3A 8D 34 35 3A 8B 49 24 B2 22 |P$.P1$:.45:.I$."|
00001050: 59 22 A7 44 B2 44 AB 31 3A 55 B2 31 3A 89 36 34 |Y".D.D.1:U.1:.64|
00001060: 30 00 6D 18 7C 02 A0 31 3A 89 36 30 32 00 83 18 |0.m.|..1:.602...|
00001070: 7E 02 8F 20 2A 2A 20 53 59 53 20 44 49 52 20 52 |~.. ** SYS DIR R|
00001080: 45 41 44 00 B3 18 80 02 44 B2 44 AA 31 3A 4E 46 |EAD.....D.D.1:NF|
00001090: B2 AB 31 3A 97 38 35 30 2C 37 36 3A 97 38 35 31 |..1:.850,76:.851|
000010A0: 2C 31 30 30 3A 97 38 35 32 2C 33 3A 97 39 35 32 |,100:.852,3:.952|
000010B0: 2C 32 34 00 ED 18 82 02 9E 44 4C 3A 8D 37 35 3A |,24......DL:.75:|
000010C0: 42 24 B2 C8 28 58 24 2C 31 29 3A 43 24 B2 CA 28 |B$..(X$,1):C$..(|
000010D0: 58 24 2C 32 2C 31 29 3A 53 24 B2 C4 28 C6 28 43 |X$,2,1):S$..(.(C|
000010E0: 24 29 AC 32 35 36 AA C6 28 42 24 29 29 00 03 19 |$).256..(B$))...|
000010F0: 84 02 53 24 B2 C9 28 22 20 20 20 20 22 AA 53 24 |..S$..(" ".S$|
00001100: 2C 34 29 00 25 19 86 02 59 B2 35 3A 58 B2 39 3A |,4).%...Y.5:X.9:|
00001110: 8D 32 30 3A 99 57 24 52 24 CA 28 58 24 2C 33 2C |.20:.W$R$.(X$,3,|
00001120: 31 39 29 53 24 00 55 19 8A 02 4E 46 B2 4E 46 AA |19)S$.U...NF.NF.|
00001130: 31 3A 56 24 28 4E 46 29 B2 CA 28 58 24 2C 33 2C |1:V$(NF)..(X$,3,|
00001140: 31 36 29 AA CA 28 58 24 2C 32 30 2C 32 29 AA 22 |16)..(X$,20,2)."|
00001150: 20 22 AA 53 24 00 67 19 90 02 8D 37 37 3A 8B 53 | ".S$.g....77:.S|
00001160: 54 B2 2E A7 36 34 32 00 76 19 92 02 8D 39 31 3A |T...642.v....91:|
00001170: 8B 45 52 A7 39 34 00 A6 19 94 02 8B 4E 46 B1 2E |.ER.94......NF..|
00001180: A7 56 24 28 4E 46 29 B2 22 22 3A 4E 46 B2 4E 46 |.V$(NF)."":NF.NF|
00001190: AB 31 3A 4E B2 4E AA 31 3A 8B 49 24 B2 22 5E 22 |.1:N.N.1:.I$."^"|
000011A0: A7 4E B2 4E AB 31 00 AD 19 96 02 A0 31 00 C3 19 |.N.N.1......1...|
000011B0: 98 02 8F 20 2A 2A 20 43 55 52 53 4F 52 20 49 4E |... ** CURSOR IN|
000011C0: 50 55 54 00 D4 19 9A 02 8D 36 30 3A 99 50 34 24 |PUT......60:.P4$|
000011D0: 50 35 24 3B 00 F2 19 9B 02 8D 37 35 3A 53 B2 31 |P5$;......75:S.1|
000011E0: 31 34 35 3A 42 B2 2E 3A 81 4B B2 2E A4 4E 46 A9 |145:B..:.K...NF.|
000011F0: 33 38 00 0F 1A 9C 02 59 B2 34 3A 58 B2 32 3A 81 |38.....Y.4:X.2:.|
00001200: 4A B2 2E A4 33 37 3A 8D 32 30 3A 99 57 24 3B 00 |J...37:.20:.W$;.|
00001210: 30 1A 9E 02 53 4C B2 31 32 3A 8B C8 28 56 24 28 |0...SL.12:..(V$(|
00001220: 4B AA 4A 29 2C 31 29 B2 52 24 A7 53 4C B2 31 33 |K.J),1).R$.SL.13|
00001230: 00 4F 1A A0 02 8B 4A B3 31 39 A7 8D 37 33 34 3A |.O....J.19..734:|
00001240: 59 B2 59 AA 31 3A 8B 59 B2 32 33 A7 59 B2 34 00 |Y.Y.1:.Y.23.Y.4.|
00001250: 6D 1A A2 02 8B 4A B1 31 38 A7 58 B2 32 31 3A 8D |m....J.18.X.21:.|
00001260: 32 30 3A 8D 37 33 34 3A 59 B2 59 AA 31 00 80 1A |20:.734:Y.Y.1...|
00001270: A4 02 99 3A 8B 4A AA 4B B2 4E 46 A7 4A B2 33 37 |...:.J.K.NF.J.37|
00001280: 00 9D 1A A6 02 82 3A 58 B2 32 3A 8B 4A 24 B2 22 |......:X.2:.J$."|
00001290: 41 22 A7 4A 24 B2 22 22 3A 89 37 31 36 00 BB 1A |A".J$."":.716...|
000012A0: A8 02 97 53 AA 42 2C 36 32 3A 97 31 39 38 2C 2E |...S.B,62:.198,.|
000012B0: 3A 92 31 39 38 2C 31 3A A1 49 24 00 F7 1A AA 02 |:.198,1:.I$.....|
000012C0: 8B 49 24 B2 22 91 22 A7 42 B2 42 AB 34 30 3A 97 |.I$.".".B.B.40:.|
000012D0: 53 AA 42 AA 34 30 2C 31 36 30 3A 8B 42 B2 AB 34 |S.B.40,160:.B..4|
000012E0: 30 A7 97 53 AA 42 2C 31 36 30 3A 42 B2 31 38 AC |0..S.B,160:B.18.|
000012F0: 34 30 3A 89 36 38 38 00 31 1B AC 02 8B 49 24 B2 |40:.688.1....I$.|
00001300: 22 11 22 A7 42 B2 42 AA 34 30 3A 97 53 AA 42 AB |".".B.B.40:.S.B.|
00001310: 34 30 2C 31 36 30 3A 8B 42 B2 31 39 AC 34 30 A7 |40,160:.B.19.40.|
00001320: 97 53 AA 42 2C 31 36 30 3A 42 B2 2E 3A 89 36 38 |.S.B,160:B..:.68|
00001330: 38 00 4E 1B AE 02 97 53 AA 42 AB 34 30 2C 31 36 |8.N....S.B.40,16|
00001340: 30 3A 8B 49 24 B3 B1 22 1D 22 A7 36 39 32 00 73 |0:.I$..".".692.s|
00001350: 1B B0 02 8B 53 B2 31 31 36 34 A7 97 53 AA 42 2C |....S.1164..S.B,|
00001360: 31 36 30 3A 53 B2 53 AB 31 39 3A 58 B2 32 3A 89 |160:S.S.19:X.2:.|
00001370: 36 39 32 00 94 1B B2 02 8B 53 B2 31 31 34 35 A7 |692......S.1145.|
00001380: 97 53 AA 42 2C 31 36 30 3A 53 B2 53 AA 31 39 3A |.S.B,160:S.S.19:|
00001390: 58 B2 32 31 00 AC 1B B4 02 8B 49 24 B2 22 45 22 |X.21......I$."E"|
000013A0: A7 4B B2 4E 46 3A 82 3A 89 37 31 36 00 D1 1B B5 |.K.NF:.:.716....|
000013B0: 02 8B 49 24 B2 22 41 22 A7 4B B2 2E 3A 8D 37 35 |..I$."A".K..:.75|
000013C0: 30 3A 4A 24 B2 22 41 22 3A 8D 37 37 3A 89 36 36 |0:J$."A":.77:.66|
000013D0: 37 00 E1 1B B6 02 8B 49 24 B2 22 5E 22 A7 37 34 |7......I$."^".74|
000013E0: 32 00 07 1C B8 02 8B 49 24 B2 22 4E 22 A7 8D 36 |2......I$."N"..6|
000013F0: 30 3A 42 B2 2E 3A 53 B2 31 31 34 35 3A 82 3A 8D |0:B..:S.1145:.:.|
00001400: 37 37 3A 89 36 36 37 00 33 1C BA 02 8B 49 24 B2 |77:.667.3....I$.|
00001410: 22 50 22 A7 8B 4B B1 2E A7 4B B2 4B AB 33 38 3A |"P"..K...K.K.38:|
00001420: 42 B2 2E 3A 53 B2 31 31 34 35 3A 8D 36 30 3A 89 |B..:S.1145:.60:.|
00001430: 36 36 38 00 44 1C BC 02 8B 49 24 B3 B1 22 20 22 |668.D....I$.." "|
00001440: A7 36 38 30 00 76 1C BE 02 42 42 B2 4B 3A 97 31 |.680.v...BB.K:.1|
00001450: 39 38 2C 2E 3A 59 B2 42 AD 34 30 AA 34 3A 8D 32 |98,.:Y.B.40.4:.2|
00001460: 30 3A 8B 53 B2 31 31 36 34 A7 42 42 B2 4B AA 31 |0:.S.1164.BB.K.1|
00001470: 39 3A 58 B2 32 31 00 98 1C C0 02 8B C2 28 53 AA |9:X.21.......(S.|
00001480: 42 29 B2 36 32 A7 8B C2 28 53 AA 32 AA 42 29 B3 |B).62...(S.2.B).|
00001490: 31 32 38 A7 99 52 24 3B 00 B6 1C C2 02 8B C8 28 |128..R$;.......(|
000014A0: 56 24 28 42 AD 34 30 AA 42 42 29 2C 31 29 B2 52 |V$(B.40.BB),1).R|
000014B0: 24 A7 8D 37 33 36 00 E3 1C C4 02 8B C2 28 53 AA |$..736.......(S.|
000014C0: 32 AA 42 29 B3 31 32 38 A7 56 24 28 42 AD 34 30 |2.B).128.V$(B.40|
000014D0: AA 42 42 29 B2 52 24 AA 56 24 28 42 AD 34 30 AA |.BB).R$.V$(B.40.|
000014E0: 42 42 29 00 0C 1D C6 02 8D 32 30 3A 53 4C B2 31 |BB)......20:SL.1|
000014F0: 32 3A 8B C8 28 56 24 28 42 AD 34 30 AA 42 42 29 |2:..(V$(B.40.BB)|
00001500: 2C 31 29 B2 52 24 A7 53 4C B2 31 33 00 1C 1D CA |,1).R$.SL.13....|
00001510: 02 8D 37 33 32 3A 99 3A 89 36 38 30 00 48 1D CC |..732:.:.680.H..|
00001520: 02 50 24 B2 50 32 24 3A 8D 34 35 3A 8D 34 37 3A |.P$.P2$:.45:.47:|
00001530: A1 49 24 3A 8B 49 24 B2 22 59 22 A7 8D 36 30 3A |.I$:.I$."Y"..60:|
00001540: 8D 37 37 3A 89 37 32 32 00 59 1D CE 02 8B 49 24 |.77:.722.Y....I$|
00001550: B3 B1 22 4E 22 A7 37 31 36 00 66 1D D0 02 8D 37 |.."N".716.f....7|
00001560: 37 3A 89 36 36 36 00 85 1D D2 02 8D 37 35 3A 50 |7:.666......75:P|
00001570: 24 B2 50 31 24 3A 8D 34 38 3A 4A B2 2E 3A 81 49 |$.P1$:.48:J..:.I|
00001580: B2 2E A4 4E 46 00 9A 1D D4 02 8B 4E B2 4D AA 31 |...NF......N.M.1|
00001590: A7 49 B2 4E 46 3A 89 37 32 38 00 BC 1D D6 02 8B |.I.NF:.728......|
000015A0: C8 28 56 24 28 49 29 2C 31 29 B2 52 24 A7 4A B2 |.(V$(I),1).R$.J.|
000015B0: 31 3A 8D 37 33 38 3A 4E B2 4E AA 31 00 DB 1D D8 |1:.738:N.N.1....|
000015C0: 02 82 3A 8D 37 37 3A 8D 37 34 30 3A 8B 4A B2 2E |..:.77:.740:.J..|
000015D0: A7 8B 55 B2 2E A7 44 B2 44 AB 31 00 ED 1D DA 02 |..U...D.D.1.....|
000015E0: 8D 34 39 3A 50 B2 34 30 3A 89 36 30 32 00 2E 1E |.49:P.40:.602...|
000015F0: DC 02 99 57 24 C8 28 56 24 28 42 AD 34 30 AA 42 |...W$.(V$(B.40.B|
00001600: 42 29 2C 53 4C 29 CA 28 56 24 28 42 AD 34 30 AA |B),SL).(V$(B.40.|
00001610: 42 42 29 2C 53 4C AA 35 2C 31 29 C9 28 56 24 28 |BB),SL.5,1).(V$(|
00001620: 42 AD 34 30 AA 42 42 29 2C 33 29 3B 3A 8E 00 63 |B.40.BB),3);:..c|
00001630: 1E DE 02 99 57 24 C8 28 56 24 28 4B AA 4A 29 2C |....W$.(V$(K.J),|
00001640: 53 4C 29 CA 28 56 24 28 4B AA 4A 29 2C 53 4C AA |SL).(V$(K.J),SL.|
00001650: 35 2C 31 29 C9 28 56 24 28 4B AA 4A 29 2C 33 29 |5,1).(V$(K.J),3)|
00001660: 3B 3A 8E 00 89 1E E0 02 56 24 28 42 AD 34 30 AA |;:......V$(B.40.|
00001670: 42 42 29 B2 CA 28 56 24 28 42 AD 34 30 AA 42 42 |BB)..(V$(B.40.BB|
00001680: 29 2C 32 2C 32 33 29 3A 8E 00 BC 1E E2 02 54 24 |),2,23):......T$|
00001690: 28 4E 29 B2 CA 28 56 24 28 49 29 2C 32 2C 31 39 |(N)..(V$(I),2,19|
000016A0: 29 AA C8 28 44 54 24 2C 31 33 29 AA 49 44 24 AA |)..(DT$,13).ID$.|
000016B0: C9 28 56 24 28 49 29 2C 34 29 3A 8E 00 DD 1E E4 |.(V$(I),4):.....|
000016C0: 02 8D 37 35 3A 81 49 B2 2E A4 4E 46 3A 56 24 28 |..75:.I...NF:V$(|
000016D0: 49 29 B2 22 22 3A 82 3A 8D 37 37 3A 8E 00 FE 1E |I)."":.:.77:....|
000016E0: E6 02 4B B2 4E 46 3A 82 3A 50 24 B2 50 31 24 3A |..K.NF:.:P$.P1$:|
000016F0: 8D 34 38 3A 8B 55 B2 2E A7 44 B2 44 AB 31 00 1B |.48:.U...D.D.1..|
00001700: 1F E8 02 8D 37 37 3A 8D 34 39 3A 8D 37 34 30 3A |....77:.49:.740:|
00001710: 8B 49 24 B2 22 41 22 A7 36 30 32 00 21 1F EA 02 |.I$."A".602.!...|
00001720: 8E 00 40 1F EE 02 81 49 B2 2E A4 4E 46 3A 8B C8 |..@....I...NF:..|
00001730: 28 56 24 28 49 29 2C 31 29 B2 52 24 A7 37 35 34 |(V$(I),1).R$.754|
00001740: 00 53 1F F0 02 56 24 28 49 29 B2 52 24 AA 56 24 |.S...V$(I).R$.V$|
00001750: 28 49 29 00 5B 1F F2 02 82 3A 8E 00 69 1F 20 03 |(I).[....:..i. .|
00001760: 8F 20 2A 2A 20 53 4F 52 54 00 7D 1F 22 03 8D 36 |. ** SORT.}."..6|
00001770: 30 3A 8B 4E B3 31 A7 8D 32 37 36 3A 8E 00 BF 1F |0:.N.1..276:....|
00001780: 24 03 59 B2 31 38 3A 58 B2 31 36 3A 8D 32 30 3A |$.Y.18:X.16:.20:|
00001790: 99 57 24 22 53 4F 52 54 20 42 59 3A 22 3B 3A 59 |.W$"SORT BY:";:Y|
000017A0: B2 32 30 3A 58 B2 31 34 3A 8D 32 30 3A 99 22 12 |.20:X.14:.20:.".|
000017B0: 4E 92 41 4D 45 1D 1D 1D 1D 12 54 92 59 50 45 00 |N.AME.....T.YPE.|
000017C0: FA 1F 26 03 59 B2 32 32 3A 58 B2 31 31 3A 8D 32 |..&.Y.22:X.11:.2|
000017D0: 30 3A 99 22 12 44 92 49 53 4B 1D 1D 1D 1D 12 49 |0:.".D.ISK.....I|
000017E0: 92 44 1D 1D 1D 12 53 92 49 5A 45 22 3A 8D 33 30 |.D....S.IZE":.30|
000017F0: 3A 8B 49 24 B2 22 5E 22 A7 8E 00 2F 20 28 03 8B |:.I$."^".../ (..|
00001800: 49 24 B3 B1 22 4E 22 A7 8B 49 24 B3 B1 22 54 22 |I$.."N"..I$.."T"|
00001810: A7 8B 49 24 B3 B1 22 44 22 A7 8B 49 24 B3 B1 22 |..I$.."D"..I$.."|
00001820: 49 22 A7 8B 49 24 B3 B1 22 53 22 A7 38 30 36 00 |I"..I$.."S".806.|
00001830: 3D 20 2A 03 8B 50 B2 34 30 A7 50 B2 2E 00 67 20 |= *..P.40.P...g |
00001840: 2C 03 8D 32 32 36 3A 20 50 24 B2 22 05 53 4F 52 |,..226: P$.".SOR|
00001850: 54 49 4E 47 22 AA C4 28 4E 29 AA 22 20 46 49 4C |TING"..(N)." FIL|
00001860: 45 53 22 3A 8D 34 38 00 A6 20 2E 03 8B 4E B1 34 |ES":.48.. ...N.4|
00001870: 30 30 A7 50 24 B2 22 9E 53 4F 52 54 49 4E 47 22 |00.P$.".SORTING"|
00001880: AA C4 28 4E 29 AA 22 20 46 49 4C 45 53 20 4D 41 |..(N)." FILES MA|
00001890: 59 20 54 41 4B 45 20 33 20 4D 49 4E 55 54 45 53 |Y TAKE 3 MINUTES|
000018A0: 2B 22 3A 8D 34 36 00 C7 20 30 03 50 B2 50 AA 31 |+":.46.. 0.P.P.1|
000018B0: 3A 8B 50 B2 31 A7 9E 4D 4C 2C 54 24 2C 31 2C 4E |:.P.1..ML,T$,1,N|
000018C0: 2C 31 2C 31 36 2C 41 00 EB 20 32 03 8B 50 B2 31 |,1,16,A.. 2..P.1|
000018D0: 37 A7 9E 4D 4C 2C 54 24 2C 31 2C 4E 2C 31 37 2C |7..ML,T$,1,N,17,|
000018E0: 31 38 2C 41 2C 31 2C 31 36 2C 41 00 17 21 34 03 |18,A,1,16,A..!4.|
000018F0: 8B 50 B2 32 30 A7 9E 4D 4C 2C 54 24 2C 31 2C 4E |.P.20..ML,T$,1,N|
00001900: 2C 32 30 2C 33 32 2C 41 2C 33 33 2C 33 35 2C 41 |,20,32,A,33,35,A|
00001910: 2C 31 2C 31 36 2C 41 00 43 21 36 03 8B 50 B2 33 |,1,16,A.C!6..P.3|
00001920: 33 A7 9E 4D 4C 2C 54 24 2C 31 2C 4E 2C 33 33 2C |3..ML,T$,1,N,33,|
00001930: 33 34 2C 41 2C 32 30 2C 33 32 2C 41 2C 31 2C 31 |34,A,20,32,A,1,1|
00001940: 36 2C 41 00 67 21 38 03 8B 50 B2 33 36 A7 9E 4D |6,A.g!8..P.36..M|
00001950: 4C 2C 54 24 2C 31 2C 4E 2C 33 36 2C 33 38 2C 44 |L,T$,1,N,36,38,D|
00001960: 2C 31 2C 31 36 2C 41 00 73 21 3A 03 50 B2 50 AB |,1,16,A.s!:.P.P.|
00001970: 31 3A 8E 00 8A 21 84 03 8F 20 2A 2A 20 53 45 41 |1:...!... ** SEA|
00001980: 52 43 48 2F 43 48 41 4E 47 45 00 BE 21 86 03 8D |RCH/CHANGE..!...|
00001990: 36 30 3A 50 24 B2 22 41 44 44 20 4F 52 20 53 45 |60:P$."ADD OR SE|
000019A0: 41 52 43 48 20 42 59 20 4E 41 4D 45 2F 44 49 53 |ARCH BY NAME/DIS|
000019B0: 50 4C 41 59 20 28 41 2F 4E 2F 44 29 3F 22 00 D0 |PLAY (A/N/D)?"..|
000019C0: 21 88 03 8D 33 30 3A 8B 49 24 B2 22 5E 22 A7 8E |!...30:.I$."^"..|
000019D0: 00 E4 21 8A 03 8B 49 24 B2 22 41 22 A7 8B 4E B2 |..!...I$."A"..N.|
000019E0: B1 4D A7 8E 00 0C 22 8C 03 8B 49 24 B2 22 41 22 |.M...."...I$."A"|
000019F0: A7 4B B2 AB 31 3A 8D 39 37 34 3A 8D 39 32 38 3A |.K..1:.974:.928:|
00001A00: 4E B2 4E AA 31 3A 8D 39 38 30 3A 8E 00 1C 22 8E |N.N.1:.980:...".|
00001A10: 03 8B 4E B3 31 A7 8D 32 37 36 3A 8E 00 30 22 90 |..N.1..276:..0".|
00001A20: 03 8B 49 24 B2 22 44 22 A7 8D 31 31 31 34 3A 8E |..I$."D"..1114:.|
00001A30: 00 41 22 92 03 8B 49 24 B3 B1 22 4E 22 A7 39 30 |.A"...I$.."N".90|
00001A40: 34 00 86 22 94 03 50 24 B2 22 50 52 4F 47 52 41 |4.."..P$."PROGRA|
00001A50: 4D 20 4E 41 4D 45 3F 22 3A 4A B2 31 35 3A 41 24 |M NAME?":J.15:A$|
00001A60: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00001A70: 20 22 3A 4A 24 B2 22 22 3A 8D 31 30 32 3A 8B 4A | ":J$."":.102:.J|
00001A80: 24 B2 22 22 A7 8E 00 99 22 96 03 43 B2 31 3A 50 |$.""...."..C.1:P|
00001A90: 24 B2 50 31 24 3A 8D 34 38 00 B7 22 98 03 8B C9 |$.P1$:.48.."....|
00001AA0: 28 4A 24 2C 31 29 B2 22 2A 22 A7 4A 24 B2 C8 28 |(J$,1)."*".J$..(|
00001AB0: 4A 24 2C 4A AB 31 29 00 D6 22 9A 03 4A B2 C3 28 |J$,J.1).."..J..(|
00001AC0: 4A 24 29 3A 8B 4A 24 B2 C8 28 54 24 28 43 29 2C |J$):.J$..(T$(C),|
00001AD0: 4A 29 A7 39 32 38 00 05 23 9C 03 43 B2 43 AA 31 |J).928..#..C.C.1|
00001AE0: 3A 8B 43 B2 4E AA 31 A7 8D 36 30 3A 50 24 B2 22 |:.C.N.1..60:P$."|
00001AF0: 46 49 4C 45 20 4E 4F 54 20 46 4F 55 4E 44 22 3A |FILE NOT FOUND":|
00001B00: 8D 33 30 3A 8E 00 0E 23 9E 03 89 39 32 30 00 23 |.30:...#...920.#|
00001B10: 23 A0 03 8D 31 30 3A 59 B2 31 35 3A 58 B2 31 3A |#...10:Y.15:X.1:|
00001B20: 8D 32 30 00 55 23 A2 03 99 52 24 57 24 22 46 49 |.20.U#...R$W$"FI|
00001B30: 4C 45 4E 41 4D 45 20 20 20 20 20 20 20 20 54 59 |LENAME TY|
00001B40: 20 44 49 53 4B 4E 41 4D 45 20 20 20 20 20 49 44 | DISKNAME ID|
00001B50: 20 42 4B 53 22 00 96 23 A4 03 99 22 20 22 54 24 | BKS"..#..." "T$|
00001B60: 28 43 29 3A 59 B2 32 32 3A 58 B2 35 3A 8D 32 30 |(C):Y.22:X.5:.20|
00001B70: 3A 99 22 92 43 12 48 41 4E 47 45 1D 1D 1D 92 44 |:.".C.HANGE....D|
00001B80: 12 45 4C 45 54 45 1D 1D 1D 4F 52 1D 1D 1D 92 4F |.ELETE...OR....O|
00001B90: 12 4B 41 59 3F 22 00 D2 23 A6 03 97 31 39 38 2C |.KAY?"..#...198,|
00001BA0: 2E 3A 50 24 B2 57 24 AA 53 37 24 3A 8D 34 35 3A |.:P$.W$.S7$:.45:|
00001BB0: 92 31 39 38 2C 31 3A A1 49 24 3A 8B 49 24 B2 22 |.198,1:.I$:.I$."|
00001BC0: 44 22 A7 50 24 B2 50 31 24 3A 8D 34 38 3A 89 39 |D".P$.P1$:.48:.9|
00001BD0: 36 34 00 E9 23 A8 03 8B 49 24 B3 B1 22 43 22 A7 |64..#...I$.."C".|
00001BE0: 4B B2 2E 3A 55 B2 4B 3A 8E 00 26 24 AA 03 59 B2 |K..:U.K:..&$..Y.|
00001BF0: 31 33 3A 58 B2 31 30 3A 8D 32 30 3A 99 52 24 22 |13:X.10:.20:.R$"|
00001C00: 98 43 48 41 4E 47 45 1D 1D 1D 92 05 46 52 4F 4D |.CHANGE.....FROM|
00001C10: 1D 1D 1D 12 54 4F 22 3A 49 B2 2E 3A 4A B2 33 38 |....TO":I..:J.38|
00001C20: 3A 4A 24 B2 22 22 00 52 24 AC 03 41 24 B2 54 24 |:J$."".R$..A$.T$|
00001C30: 28 43 29 3A 8B 4B A7 41 24 B2 22 20 4E 4F 20 52 |(C):.K.A$." NO R|
00001C40: 45 43 4F 52 44 22 AA CA 28 53 33 24 2C 32 2C 32 |ECORD"..(S3$,2,2|
00001C50: 38 29 00 64 24 AE 03 50 24 B2 22 22 3A 8D 34 35 |8).d$..P$."":.45|
00001C60: 3A 8D 34 37 00 94 24 B0 03 59 B2 32 32 3A 58 B2 |:.47..$..Y.22:X.|
00001C70: 31 3A 8D 32 30 3A 99 52 24 22 9B 22 53 33 24 22 |1:.20:.R$"."S3$"|
00001C80: 9D 97 20 22 57 24 3B 3A 8B 55 A7 8D 31 30 32 3A |.. "W$;:.U..102:|
00001C90: 99 57 24 3B 00 B2 24 B2 03 59 B2 31 37 3A 58 B2 |.W$;..$..Y.17:X.|
00001CA0: 31 3A 8D 31 30 38 3A 4A 24 B2 41 24 3A 49 24 B2 |1:.108:J$.A$:I$.|
00001CB0: 22 22 00 C9 24 B4 03 50 24 B2 50 32 24 3A 8D 34 |""..$..P$.P2$:.4|
00001CC0: 37 3A 8D 34 35 3A A1 49 24 00 D9 24 B6 03 8B 49 |7:.45:.I$..$...I|
00001CD0: 24 B2 22 4E 22 A7 39 33 38 00 EA 24 B8 03 8B 49 |$."N".938..$...I|
00001CE0: 24 B3 B1 22 59 22 A7 39 34 38 00 23 25 BA 03 8D |$.."Y".948.#%...|
00001CF0: 31 30 3A 50 24 B2 50 31 24 3A 8D 34 35 3A 41 24 |10:P$.P1$:.45:A$|
00001D00: B2 CA 28 54 24 28 43 29 2C 33 33 2C 32 29 3A 49 |..(T$(C),33,2):I|
00001D10: 24 B2 CA 28 4A 24 2C 33 33 2C 32 29 3A 8B 4B A7 |$..(J$,33,2):.K.|
00001D20: 39 37 36 00 4B 25 BC 03 81 49 B2 31 A4 4E 3A 8B |976.K%...I.1.N:.|
00001D30: 49 24 B2 CA 28 54 24 28 49 29 2C 33 33 2C 32 29 |I$..(T$(I),33,2)|
00001D40: A7 49 B2 4E 3A 82 3A 89 39 36 30 00 57 25 BE 03 |.I.N:.:.960.W%..|
00001D50: 82 3A 44 B2 44 AA 31 00 8A 25 C0 03 54 24 28 43 |.:D.D.1..%..T$(C|
00001D60: 29 B2 4A 24 3A 81 49 B2 2E A4 4E 3A 8B 41 24 B2 |).J$:.I...N:.A$.|
00001D70: CA 28 54 24 28 49 29 2C 33 33 2C 32 29 A7 49 B2 |.(T$(I),33,2).I.|
00001D80: 4E 3A 82 3A 50 B2 34 30 3A 8E 00 9D 25 C2 03 82 |N:.:P.40:...%...|
00001D90: 3A 44 B2 44 AB 31 3A 50 B2 34 30 3A 8E 00 A8 25 |:D.D.1:P.40:...%|
00001DA0: C4 03 8B 4B A7 39 38 32 00 C1 25 C6 03 8D 37 35 |...K.982..%...75|
00001DB0: 3A 49 24 B2 CA 28 54 24 28 43 29 2C 33 33 2C 32 |:I$..(T$(C),33,2|
00001DC0: 29 00 E6 25 C8 03 54 24 28 43 29 B2 54 24 28 4E |)..%..T$(C).T$(N|
00001DD0: 29 3A 54 24 28 4E 29 B2 22 22 3A 4E B2 4E AB 31 |):T$(N)."":N.N.1|
00001DE0: 3A 43 B2 43 AB 31 00 0D 26 CA 03 81 49 B2 31 A4 |:C.C.1..&...I.1.|
00001DF0: 4E 3A 8B 49 24 B2 CA 28 54 24 28 49 29 2C 33 33 |N:.I$..(T$(I),33|
00001E00: 2C 32 29 A7 44 B2 44 AA 31 3A 49 B2 4E 00 28 26 |,2).D.D.1:I.N.(&|
00001E10: CC 03 82 3A 44 B2 44 AB 31 3A 8D 36 30 3A 8D 37 |...:D.D.1:.60:.7|
00001E20: 37 3A 8D 38 31 30 3A 8E 00 69 26 CE 03 44 B2 44 |7:.810:..i&..D.D|
00001E30: AA 31 3A 43 B2 4E AA 31 3A 54 24 28 43 29 B2 22 |.1:C.N.1:T$(C)."|
00001E40: 2A 2A 50 52 45 53 53 20 27 43 27 20 54 4F 20 43 |**PRESS 'C' TO C|
00001E50: 52 45 41 54 45 20 41 20 4E 45 57 20 45 4E 54 52 |REATE A NEW ENTR|
00001E60: 59 2A 2A 2A 2A 2A 22 3A 8E 00 99 26 D0 03 54 24 |Y*****":...&..T$|
00001E70: 28 43 29 B2 4A 24 3A 81 49 B2 2E A4 4E 3A 8B 49 |(C).J$:.I...N:.I|
00001E80: 24 B2 CA 28 54 24 28 49 29 2C 33 33 2C 32 29 A7 |$..(T$(I),33,2).|
00001E90: 44 B2 44 AB 31 3A 49 B2 4E 00 A6 26 D2 03 82 3A |D.D.1:I.N..&...:|
00001EA0: 50 B2 34 30 3A 8E 00 AF 26 D4 03 8B 4B A7 8E 00 |P.40:...&...K...|
00001EB0: C1 26 D6 03 4E B2 4E AB 31 3A 44 B2 44 AB 31 3A |.&..N.N.1:D.D.1:|
00001EC0: 8E 00 DB 26 D8 03 59 B2 32 34 3A 58 B2 2E 3A 8D |...&..Y.24:X..:.|
00001ED0: 32 30 3A 99 50 34 24 50 35 24 3B 00 F8 26 DA 03 |20:.P4$P5$;..&..|
00001EE0: 53 B2 31 31 34 34 3A 42 B2 2E 3A 97 53 2C 31 39 |S.1144:B..:.S,19|
00001EF0: 30 3A 97 31 39 38 2C 2E 00 20 27 DC 03 A1 49 24 |0:.198,.. '...I$|
00001F00: 3A 8B 49 24 B2 22 11 22 A7 8B 42 AA 34 30 B2 37 |:.I$."."..B.40.7|
00001F10: 36 30 A7 97 53 AA 42 2C 33 32 3A 42 B2 AB 34 30 |60..S.B,32:B..40|
00001F20: 00 47 27 DE 03 8B 49 24 B2 22 11 22 A7 42 B2 42 |.G'...I$.".".B.B|
00001F30: AA 34 30 3A 97 53 AA 42 2C 31 39 30 3A 97 53 AA |.40:.S.B,190:.S.|
00001F40: 42 AB 34 30 2C 33 32 00 6B 27 E0 03 8B 49 24 B2 |B.40,32.k'...I$.|
00001F50: 22 91 22 A7 8B 42 AB 34 30 B2 AB 34 30 A7 97 53 |"."..B.40..40..S|
00001F60: AA 42 2C 33 32 3A 42 B2 37 36 30 00 8F 27 E2 03 |.B,32:B.760..'..|
00001F70: 8B 49 24 B2 22 91 22 A7 97 53 AA 42 2C 33 32 3A |.I$."."..S.B,32:|
00001F80: 42 B2 42 AB 34 30 3A 97 53 AA 42 2C 31 39 30 00 |B.B.40:.S.B,190.|
00001F90: B9 27 E4 03 8B 49 24 B2 22 4E 22 B0 49 24 B2 22 |.'...I$."N".I$."|
00001FA0: 50 22 B0 49 24 B2 22 45 22 B0 49 24 B2 22 41 22 |P".I$."E".I$."A"|
00001FB0: B0 49 24 B2 22 5E 22 A7 8E 00 CA 27 E6 03 8B 49 |.I$."^"....'...I|
00001FC0: 24 B3 B1 22 20 22 A7 39 38 38 00 E1 27 E8 03 8B |$.." ".988..'...|
00001FD0: 4E B3 31 39 A7 43 B2 42 AD 34 30 3A 89 31 30 30 |N.19.C.B.40:.100|
00001FE0: 34 00 01 28 EA 03 43 B2 4A AB 31 38 AA 42 AD 34 |4..(..C.J.18.B.4|
00001FF0: 30 3A 8B 43 B3 2E A7 43 B2 4E AB B6 28 43 29 AA |0:.C...C.N..(C).|
00002000: 31 00 18 28 EC 03 8B 43 A7 8B 43 B3 B2 4E A7 55 |1..(...C..C..N.U|
00002010: B2 AB 31 3A 8D 39 32 38 00 2D 28 EE 03 4A B2 43 |..1:.928.-(..J.C|
00002020: AB 31 3A 8B 4E B3 31 39 A7 4A B2 AB 31 00 37 28 |.1:.N.19.J..1.7(|
00002030: F0 03 8D 31 30 3A 8E 00 55 28 4C 04 8F 20 2A 2A |...10:..U(L.. **|
00002040: 20 50 52 49 4E 54 2F 53 43 52 45 45 4E 2F 50 52 | PRINT/SCREEN/PR|
00002050: 49 4E 54 45 52 00 69 28 4E 04 8D 36 30 3A 8B 4E |INTER.i(N..60:.N|
00002060: B3 31 A7 8D 32 37 36 3A 8E 00 98 28 50 04 50 24 |.1..276:...(P.P$|
00002070: B2 22 50 52 49 4E 54 20 54 4F 20 50 52 49 4E 54 |."PRINT TO PRINT|
00002080: 45 52 20 4F 52 20 53 43 52 45 45 4E 20 28 50 2F |ER OR SCREEN (P/|
00002090: 53 29 3F 22 3A 8D 34 36 00 AA 28 52 04 8D 33 30 |S)?":.46..(R..30|
000020A0: 3A 8B 49 24 B2 22 5E 22 A7 8E 00 CD 28 54 04 8B |:.I$."^"....(T..|
000020B0: 49 24 B2 22 41 22 A7 55 B2 31 3A 89 31 31 34 38 |I$."A".U.1:.1148|
000020C0: 3A 8F 20 2A 2A 4E 4F 4E 20 4D 45 4E 55 00 DE 28 |:. **NON MENU..(|
000020D0: 56 04 8B 49 24 B2 22 50 22 A7 31 31 34 38 00 F0 |V..I$."P".1148..|
000020E0: 28 58 04 8B 49 24 B3 B1 22 53 22 A7 31 31 30 36 |(X..I$.."S".1106|
000020F0: 00 0E 29 5A 04 4A B2 AB 31 3A 8F 20 2A 2A 20 50 |..)Z.J..1:. ** P|
00002100: 52 49 4E 54 20 54 4F 20 53 43 52 45 45 4E 00 29 |RINT TO SCREEN.)|
00002110: 29 5C 04 8D 36 30 3A 59 B2 32 3A 58 B2 2E 3A 8D |)\..60:Y.2:X..:.|
00002120: 32 30 3A 99 52 24 57 24 3B 00 5F 29 5E 04 99 22 |20:.R$W$;._)^.."|
00002130: 20 46 49 4C 45 20 4E 41 4D 45 20 20 20 20 20 20 | FILE NAME |
00002140: 20 54 59 20 44 49 53 4B 4E 41 4D 45 20 20 20 20 | TY DISKNAME |
00002150: 20 49 44 20 42 4B 53 20 22 3A 89 31 31 32 34 00 | ID BKS ":.1124.|
00002160: 7C 29 60 04 50 24 B2 50 36 24 3A 8D 34 35 3A 8D ||)`.P$.P6$:.45:.|
00002170: 33 30 3A 8B 49 24 B2 22 5E 22 A7 8E 00 9E 29 62 |30:.I$."^"....)b|
00002180: 04 8B 49 24 B2 22 43 22 A7 50 24 B2 22 20 22 3A |..I$."C".P$." ":|
00002190: 8D 34 35 3A 8D 39 38 34 3A 89 31 31 31 36 00 AE |.45:.984:.1116..|
000021A0: 29 64 04 8D 36 30 3A 59 B2 34 3A 8D 32 30 00 C7 |)d..60:Y.4:.20..|
000021B0: 29 66 04 8B 49 24 B3 B1 22 50 22 A7 4A B2 4A AA |)f..I$.."P".J.J.|
000021C0: 31 3A 89 31 31 33 30 00 EB 29 68 04 4A B2 4A AB |1:.1130..)h.J.J.|
000021D0: 33 37 3A 8B 4A B3 2E A7 4A B2 4E AB B6 28 4A 29 |37:.J...J.N..(J)|
000021E0: AA 31 3A 8B 4A B3 2E A7 4A B2 2E 00 F8 29 6A 04 |.1:.J...J....)j.|
000021F0: 8B 4A B1 4E A7 4A B2 2E 00 06 2A 6C 04 8B 4A B2 |.J.N.J....*l..J.|
00002200: 2E A7 31 31 34 30 00 26 2A 6E 04 99 57 24 22 20 |..1140.&*n..W$" |
00002210: 22 54 24 28 4A 29 3A 8B 4E B3 32 30 A7 8B 4A B2 |"T$(J):.N.20..J.|
00002220: 4E A7 31 31 32 30 00 41 2A 70 04 8B C2 28 32 31 |N.1120.A*p...(21|
00002230: 34 29 B3 32 32 A7 4A B2 4A AA 31 3A 89 31 31 33 |4).22.J.J.1:.113|
00002240: 30 00 4B 2A 72 04 89 31 31 32 30 00 84 2A 74 04 |0.K*r..1120..*t.|
00002250: 99 57 24 52 24 22 1D 1D 1D 22 AA C4 28 4E 29 AA |.W$R$"..."..(N).|
00002260: 22 20 50 52 4F 47 52 41 4D 53 3A 20 20 20 20 20 |" PROGRAMS: |
00002270: 20 22 AA C4 28 44 29 AA 22 20 20 44 49 53 4B 20 | "..(D)." DISK |
00002280: 49 44 53 22 00 C3 2A 76 04 8B 44 B3 32 A7 99 57 |IDS"..*v..D.2..W|
00002290: 24 52 24 22 91 1D 1D 1D 22 AA C4 28 4E 29 AA 22 |$R$"...."..(N)."|
000022A0: 20 50 52 4F 47 52 41 4D 53 3A 20 20 20 20 20 20 | PROGRAMS: |
000022B0: 22 AA C4 28 44 29 AA 22 20 20 44 49 53 4B 20 49 |"..(D)." DISK I|
000022C0: 44 20 22 00 CD 2A 78 04 89 31 31 33 36 00 E7 2A |D "..*x..1136..*|
000022D0: 7A 04 8F 20 2A 2A 20 50 52 49 4E 54 20 54 4F 20 |z.. ** PRINT TO |
000022E0: 50 52 49 4E 54 45 52 00 2B 2B 7C 04 59 B2 32 32 |PRINTER.++|.Y.22|
000022F0: 3A 58 B2 34 3A 8D 32 30 3A 99 52 24 57 24 22 50 |:X.4:.20:.R$W$"P|
00002300: 52 45 50 41 52 45 20 50 52 49 4E 54 45 52 20 26 |REPARE PRINTER &|
00002310: 20 50 4F 53 49 54 49 4F 4E 20 50 41 50 45 52 22 | POSITION PAPER"|
00002320: 3A 50 24 B2 53 36 24 3A 8D 34 35 00 46 2B 7E 04 |:P$.S6$:.45.F+~.|
00002330: 43 24 B2 C7 28 32 37 29 3A 8D 33 30 3A 8B 49 24 |C$..(27):.30:.I$|
00002340: B2 22 5E 22 A7 8E 00 7F 2B 80 04 8D 36 30 3A 50 |."^"....+...60:P|
00002350: 24 B2 22 57 48 41 54 27 53 20 59 4F 55 52 20 4E |$."WHAT'S YOUR N|
00002360: 41 4D 45 3F 22 3A 4A B2 31 30 3A 41 24 B2 22 20 |AME?":J.10:A$." |
00002370: 20 20 20 20 20 20 20 20 20 22 3A 8D 31 30 32 00 | ":.102.|
00002380: 99 2B 82 04 8B 55 B3 B1 31 A7 8B 50 B2 31 39 B0 |.+...U..1..P.19.|
00002390: 50 B2 33 32 A7 31 31 36 30 00 D5 2B 84 04 50 24 |P.32.1160..+..P$|
000023A0: B2 22 52 45 47 55 4C 41 52 20 4F 52 20 43 4F 4E |."REGULAR OR CON|
000023B0: 44 45 4E 53 45 44 20 54 59 50 45 20 28 52 2F 43 |DENSED TYPE (R/C|
000023C0: 29 3F 22 3A 8D 34 38 3A 8D 33 30 3A 8B 49 24 B2 |)?":.48:.30:.I$.|
000023D0: 22 5E 22 A7 8E 00 EF 2B 86 04 8B 49 24 B3 B1 22 |"^"....+...I$.."|
000023E0: 52 22 AF 49 24 B3 B1 22 43 22 A7 31 31 35 36 00 |R".I$.."C".1156.|
000023F0: 18 2C 88 04 A0 34 3A 9F 34 2C 34 2C 34 3A 98 34 |.,...4:.4,4,4:.4|
00002400: 2C 43 24 22 40 22 3B 3A 8B 4A 24 B2 22 22 A7 4A |,C$"@";:.J$."".J|
00002410: 24 B2 22 43 20 36 34 22 00 3E 2C 8A 04 50 24 B2 |$."C 64".>,..P$.|
00002420: 53 34 24 3A 8D 34 38 3A 59 B2 34 3A 58 B2 35 3A |S4$:.48:Y.4:X.5:|
00002430: 8D 32 30 3A 20 98 34 2C 43 24 22 45 22 3B 00 79 |.20: .4,C$"E";.y|
00002440: 2C 8C 04 98 34 2C 43 24 22 4E 22 C7 28 36 29 3A |,...4,C$"N".(6):|
00002450: 98 34 2C C7 28 31 34 29 A3 28 33 32 AB C3 28 4A |.4,.(14).(32..(J|
00002460: 24 29 29 AD 32 29 4A 24 22 27 53 20 44 49 53 4B |$)).2)J$"'S DISK|
00002470: 20 43 41 54 41 4C 4F 47 22 00 A3 2C 8E 04 98 34 | CATALOG"..,...4|
00002480: 2C C7 28 31 34 29 A3 32 33 AB 28 C3 28 46 24 29 |,.(14).23.(.(F$)|
00002490: AA C3 28 50 30 24 29 29 AD 32 29 46 24 22 20 22 |..(P0$)).2)F$" "|
000024A0: 50 30 24 00 DC 2C 90 04 98 34 2C A3 32 38 29 4E |P0$..,...4,.28)N|
000024B0: 22 50 52 4F 47 52 41 4D 53 20 22 44 22 44 49 53 |"PROGRAMS "D"DIS|
000024C0: 4B 20 49 44 53 22 3A 8B 55 B3 B1 31 A7 8B 50 B2 |K IDS":.U..1..P.|
000024D0: 31 39 B0 50 B2 33 32 A7 31 31 38 32 00 ED 2C 92 |19.P.32.1182..,.|
000024E0: 04 8B 49 24 B2 22 43 22 A7 31 32 30 34 00 08 2D |..I$."C".1204..-|
000024F0: 94 04 98 34 3A 98 34 2C 50 38 24 22 20 20 22 50 |...4:.4,P8$" "P|
00002500: 38 24 3B 43 24 22 46 22 00 2E 2D 96 04 58 B2 B5 |8$;C$"F"..-..X..|
00002510: 28 4E AD 32 29 3A 8B C3 28 C4 28 4E AD 32 29 29 |(N.2):..(.(N.2))|
00002520: B1 C3 28 C4 28 4E 29 29 A7 58 B2 58 AA 31 00 4E |..(.(N)).X.X.1.N|
00002530: 2D 98 04 81 49 B2 31 A4 58 3A 98 34 2C 54 24 28 |-...I.1.X:.4,T$(|
00002540: 49 29 3B 22 20 20 22 54 24 28 49 AA 58 29 00 68 |I);" "T$(I.X).h|
00002550: 2D 9A 04 8D 31 32 32 30 3A 82 3A 98 34 2C C7 28 |-...1220:.:.4,.(|
00002560: 31 33 29 3A A0 34 3A 8E 00 7F 2D 9C 04 8F 20 2A |13):.4:...-... *|
00002570: 2A 20 50 52 49 4E 54 20 42 59 20 44 49 53 4B 00 |* PRINT BY DISK.|
00002580: 9F 2D 9E 04 98 34 3A 98 34 2C 50 39 24 22 20 20 |.-...4:.4,P9$" |
00002590: 20 20 22 50 39 24 22 20 20 20 20 22 50 39 24 00 | "P9$" "P9$.|
000025A0: BE 2D A0 04 98 34 3A 98 34 2C CA 28 54 24 28 31 |.-...4:.4,.(T$(1|
000025B0: 29 2C 32 30 2C 31 35 29 3B 43 24 22 46 22 00 EF |),20,15);C$"F"..|
000025C0: 2D A2 04 81 49 B2 31 A4 4E 3A 98 34 2C C8 28 54 |-...I.1.N:.4,.(T|
000025D0: 24 28 49 29 2C 31 39 29 C9 28 54 24 28 49 29 2C |$(I),19).(T$(I),|
000025E0: 33 29 22 20 20 20 20 22 3B 3A 8D 31 31 39 36 00 |3)" ";:.1196.|
000025F0: 1C 2E A4 04 8B 58 B2 31 A7 98 34 2C C8 28 54 24 |.....X.1..4,.(T$|
00002600: 28 49 AA 31 29 2C 31 39 29 C9 28 54 24 28 49 AA |(I.1),19).(T$(I.|
00002610: 31 29 2C 33 29 22 20 20 20 20 22 3B 00 35 2E A6 |1),3)" ";.5..|
00002620: 04 8B 58 B2 31 A7 49 B2 49 AA 31 3A 58 B2 2E 3A |..X.1.I.I.1:X..:|
00002630: 8D 31 31 39 36 00 6D 2E A8 04 8B 58 B2 31 A7 98 |.1196.m....X.1..|
00002640: 34 2C C8 28 54 24 28 49 AA 31 29 2C 31 39 29 C9 |4,.(T$(I.1),19).|
00002650: 28 54 24 28 49 AA 31 29 2C 33 29 22 20 20 20 20 |(T$(I.1),3)" |
00002660: 22 3A 49 B2 49 AA 31 3A 8D 31 31 39 36 00 81 2E |":I.I.1:.1196...|
00002670: A9 04 A1 42 24 3A 8B 42 24 B2 22 5E 22 A7 49 B2 |...B$:.B$."^".I.|
00002680: 4E 00 9A 2E AA 04 82 3A 98 34 2C C7 28 31 33 29 |N......:.4,.(13)|
00002690: 43 24 22 40 22 3A A0 34 3A 8E 00 B4 2E AC 04 8B |C$"@":.4:.......|
000026A0: CA 28 54 24 28 49 AA 31 29 2C 33 33 2C 32 29 B2 |.(T$(I.1),33,2).|
000026B0: 22 22 A7 8E 00 DD 2E AE 04 8B CA 28 54 24 28 49 |"".........(T$(I|
000026C0: 29 2C 33 33 2C 32 29 B2 CA 28 54 24 28 49 AA 31 |),33,2)..(T$(I.1|
000026D0: 29 2C 33 33 2C 32 29 A7 58 B2 31 3A 8E 00 02 2F |),33,2).X.1:.../|
000026E0: B0 04 98 34 2C 43 24 22 45 22 3A 98 34 3A 98 34 |...4,C$"E":.4:.4|
000026F0: 2C CA 28 54 24 28 49 AA 31 29 2C 32 30 2C 31 35 |,.(T$(I.1),20,15|
00002700: 29 3B 00 15 2F B2 04 98 34 2C 43 24 22 46 22 3A |);../...4,C$"F":|
00002710: 58 B2 2E 3A 8E 00 51 2F B4 04 98 34 2C 43 24 22 |X..:..Q/...4,C$"|
00002720: 46 22 C7 28 31 35 29 3B 3A 98 34 3A 98 34 2C 50 |F".(15);:.4:.4,P|
00002730: 38 24 22 20 20 20 20 20 20 20 20 22 50 38 24 22 |8$" "P8$"|
00002740: 20 20 20 20 20 20 20 20 22 50 38 24 C7 28 31 33 | "P8$.(13|
00002750: 29 00 85 2F B6 04 58 B2 B5 28 4E AD 33 29 3A 41 |)../..X..(N.3):A|
00002760: B2 32 AC 58 3A 42 B2 58 3A 43 B2 58 3A 8B C3 28 |.2.X:B.X:C.X:..(|
00002770: C4 28 4E AD 33 29 29 B3 B2 C3 28 C4 28 4E 29 29 |.(N.3))...(.(N))|
00002780: A7 31 32 31 32 00 C8 2F B8 04 58 B2 58 AA 31 3A |.1212../..X.X.1:|
00002790: 8B C9 28 C4 28 4E AD 33 29 2C 31 29 B2 22 33 22 |..(.(N.3),1)."3"|
000027A0: B0 C9 28 C4 28 4E AD 33 29 2C 31 29 B2 22 34 22 |..(.(N.3),1)."4"|
000027B0: A7 41 B2 32 AC 58 AB 31 3A 42 B2 58 AB 31 3A 43 |.A.2.X.1:B.X.1:C|
000027C0: B2 42 3A 89 31 32 31 32 00 DC 2F BA 04 41 B2 32 |.B:.1212../..A.2|
000027D0: AC 58 3A 42 B2 58 3A 43 B2 58 AB 31 00 FB 2F BC |.X:B.X:C.X.1../.|
000027E0: 04 81 49 B2 31 A4 58 3A 98 34 2C 54 24 28 49 29 |..I.1.X:.4,T$(I)|
000027F0: 22 20 20 20 20 20 20 20 20 22 3B 00 1B 30 BE 04 |" ";..0..|
00002800: 8B 42 B2 B1 49 A7 98 34 2C 54 24 28 49 AA 58 29 |.B..I..4,T$(I.X)|
00002810: 22 20 20 20 20 20 20 20 20 22 3B 00 30 30 C0 04 |" ";.00..|
00002820: 8B 43 B2 B1 49 A7 98 34 2C 54 24 28 49 AA 41 29 |.C..I..4,T$(I.A)|
00002830: 00 4F 30 C2 04 8D 31 32 32 30 3A 82 3A 98 34 2C |.O0...1220:.:.4,|
00002840: C7 28 31 33 29 43 24 22 40 22 3A A0 34 3A 8E 00 |.(13)C$"@":.4:..|
00002850: 63 30 C4 04 A1 42 24 3A 8B 42 24 B2 22 5E 22 A7 |c0...B$:.B$."^".|
00002860: 49 B2 58 00 69 30 C6 04 8E 00 85 30 14 05 8F 20 |I.X.i0.....0... |
00002870: 2A 2A 20 4D 45 4D 4F 52 59 20 43 41 4C 43 55 4C |** MEMORY CALCUL|
00002880: 41 54 49 4F 4E 00 B7 30 16 05 8D 34 39 3A 59 B2 |ATION..0...49:Y.|
00002890: 32 32 3A 58 B2 31 34 AB C3 28 C4 28 5A 29 29 AD |22:X.14..(.(Z)).|
000028A0: 32 3A 8D 32 30 3A 99 5A 22 9D 20 42 59 54 45 53 |2:.20:.Z". BYTES|
000028B0: 20 46 52 45 45 22 3B 00 CE 30 18 05 50 24 B2 53 | FREE";..0..P$.S|
000028C0: 36 24 3A 8D 33 30 3A 4E B2 4E AA 31 3A 8E 00 EB |6$:.30:N.N.1:...|
000028D0: 30 DC 05 8F 20 2A 2A 20 49 4E 49 54 49 4C 49 5A |0... ** INITILIZ|
000028E0: 45 20 56 41 52 49 41 42 4C 45 53 00 18 31 DE 05 |E VARIABLES..1..|
000028F0: 4D 4C B2 31 32 AC 34 30 39 36 AA 32 35 36 3A 4D |ML.12.4096.256:M|
00002900: B2 B5 28 B8 28 2E 29 AD 33 38 29 AB 31 36 36 3A |..(.(.).38).166:|
00002910: 8B 4D B3 31 A7 4D B2 2E 00 43 31 E0 05 8C 3A 52 |.M.1.M...C1...:R|
00002920: 24 B2 22 12 22 3A 4F 24 B2 22 92 22 3A 42 4C 24 |$.".":O$.".":BL$|
00002930: B2 22 1F 22 3A 43 59 24 B2 22 9F 22 3A 57 24 B2 |.".":CY$.".":W$.|
00002940: 22 05 22 00 73 31 E2 05 97 35 33 32 38 30 2C 31 |".".s1...53280,1|
00002950: 32 3A 97 35 33 32 38 31 2C 31 31 3A 9E 36 35 35 |2:.53281,11:.655|
00002960: 31 31 3A 9F 31 35 2C 38 2C 31 35 3A 99 C7 28 31 |11:.15,8,15:..(1|
00002970: 34 32 29 00 B5 31 E4 05 86 56 24 28 31 35 32 29 |42)..1...V$(152)|
00002980: 2C 54 24 28 4D AA 32 29 2C 46 4C 24 28 31 32 29 |,T$(M.2),FL$(12)|
00002990: 2C 4D 24 28 38 29 3A 50 B2 34 30 3A 46 24 B2 22 |,M$(8):P.40:F$."|
000029A0: 5F 4E 4F 20 46 49 4C 45 20 4E 41 4D 45 22 3A 44 |_NO FILE NAME":D|
000029B0: 4C B2 38 33 30 00 DB 31 E6 05 81 49 B2 31 A4 38 |L.830..1...I.1.8|
000029C0: 3A 87 4D 24 28 49 29 3A 82 3A 81 49 B2 31 A4 31 |:.M$(I):.:.I.1.1|
000029D0: 32 3A 87 46 4C 24 28 49 29 3A 82 00 10 32 E8 05 |2:.FL$(I):...2..|
000029E0: 53 31 24 B2 22 12 20 20 20 20 20 20 20 20 20 20 |S1$.". |
000029F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 | ."|
00002A10: 00 46 32 EA 05 53 32 24 B2 22 9F 12 20 20 20 20 |.F2..S2$.".. |
00002A20: 20 20 20 20 54 48 45 20 44 49 53 4B 20 43 41 54 | THE DISK CAT|
00002A30: 41 4C 4F 47 45 52 20 56 33 2E 31 20 20 20 20 20 |ALOGER V3.1 |
00002A40: 20 20 20 20 92 22 00 7A 32 EC 05 53 33 24 B2 22 | .".z2..S3$."|
00002A50: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00002A60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A70: 20 20 20 20 20 20 20 20 92 22 00 A8 32 EE 05 53 | ."..2..S|
00002A80: 34 24 B2 22 12 05 50 52 45 53 53 20 26 20 48 4F |4$."..PRESS & HO|
00002A90: 4C 44 20 27 5E 27 20 54 4F 20 53 54 4F 50 20 50 |LD '^' TO STOP P|
00002AA0: 52 49 4E 54 49 4E 47 22 00 D0 32 F0 05 53 35 24 |RINTING"..2..S5$|
00002AB0: B2 22 9E 52 45 50 4C 41 43 45 20 45 58 49 53 54 |.".REPLACE EXIST|
00002AC0: 49 4E 47 20 46 49 4C 45 20 28 59 2F 4E 29 3F 05 |ING FILE (Y/N)?.|
00002AD0: 00 F2 32 F2 05 53 36 24 B2 22 50 52 45 53 53 20 |..2..S6$."PRESS |
00002AE0: 41 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |A KEY TO CONTINU|
00002AF0: 45 22 00 07 33 F4 05 53 37 24 B2 22 53 45 4C 45 |E"..3..S7$."SELE|
00002B00: 43 54 20 4F 4E 45 22 00 18 33 F6 05 53 38 24 B2 |CT ONE"..3..S8$.|
00002B10: 22 53 4F 55 52 43 45 22 00 2E 33 F8 05 53 39 24 |"SOURCE"..3..S9$|
00002B20: B2 22 44 45 53 54 49 4E 41 54 49 4F 4E 22 00 6F |."DESTINATION".o|
00002B30: 33 FA 05 53 30 24 B2 22 20 20 20 05 20 43 52 53 |3..S0$." . CRS|
00002B40: 52 3D 4D 4F 56 45 4D 45 4E 54 20 20 4E 3D 4E 45 |R=MOVEMENT N=NE|
00002B50: 58 54 20 20 50 3D 50 52 45 56 49 4F 55 53 20 20 |XT P=PREVIOUS |
00002B60: 45 3D 45 4E 44 20 20 41 3D 41 42 4F 52 54 22 00 |E=END A=ABORT".|
00002B70: 83 33 FC 05 50 31 24 B2 22 12 05 57 4F 52 4B 49 |.3..P1$."..WORKI|
00002B80: 4E 47 22 00 A2 33 FE 05 50 32 24 B2 22 05 53 45 |NG"..3..P2$.".SE|
00002B90: 4C 45 43 54 49 4F 4E 20 4F 4B 20 28 59 2F 4E 29 |LECTION OK (Y/N)|
00002BA0: 3F 22 00 C4 33 00 06 50 33 24 B2 22 05 4C 49 42 |?"..3..P3$.".LIB|
00002BB0: 52 41 52 59 20 46 49 4C 45 20 49 53 20 45 4D 50 |RARY FILE IS EMP|
00002BC0: 54 59 21 22 00 FA 33 02 06 50 34 24 B2 22 1D 1D |TY!"..3..P4$."..|
00002BD0: 1D 12 05 43 52 53 52 3D 4D 4F 56 45 4D 45 4E 54 |...CRSR=MOVEMENT|
00002BE0: 20 20 4E 3D 4E 45 58 54 20 20 50 3D 50 52 45 56 | N=NEXT P=PREV|
00002BF0: 49 4F 55 53 92 1D 1D 1D 1D 22 00 2E 34 04 06 50 |IOUS....."..4..P|
00002C00: 35 24 B2 22 1D 1D 1D 12 20 53 50 41 43 45 3D 53 |5$.".... SPACE=S|
00002C10: 45 4C 45 43 54 20 41 3D 41 4C 4C 20 45 3D 45 4E |ELECT A=ALL E=EN|
00002C20: 44 20 5E 3D 4D 45 4E 55 20 92 1D 1D 1D 22 00 5C |D ^=MENU ....".\|
00002C30: 34 06 06 50 36 24 B2 22 43 3D 43 48 41 4E 47 45 |4..P6$."C=CHANGE|
00002C40: 20 50 3D 50 52 45 56 49 4F 55 53 20 4F 54 48 45 | P=PREVIOUS OTHE|
00002C50: 52 20 4B 45 59 53 3D 4E 45 58 54 22 00 7F 34 08 |R KEYS=NEXT"..4.|
00002C60: 06 50 37 24 B2 22 05 43 41 4C 43 55 4C 41 54 49 |.P7$.".CALCULATI|
00002C70: 4E 47 20 46 52 45 45 20 4D 45 4D 4F 52 59 22 00 |NG FREE MEMORY".|
00002C80: B0 34 0A 06 50 38 24 B2 22 46 49 4C 45 4E 41 4D |.4..P8$."FILENAM|
00002C90: 45 20 20 20 20 20 20 20 20 54 59 20 44 49 53 4B |E TY DISK|
00002CA0: 4E 41 4D 45 20 20 20 20 20 49 44 20 42 4B 53 22 |NAME ID BKS"|
00002CB0: 00 D1 34 0C 06 50 39 24 B2 22 46 49 4C 45 4E 41 |..4..P9$."FILENA|
00002CC0: 4D 45 20 20 20 20 20 20 20 20 54 59 20 42 4B 53 |ME TY BKS|
00002CD0: 22 00 04 35 0E 06 8D 31 30 3A 50 24 B2 C4 28 4D |"..5...10:P$..(M|
00002CE0: 29 AA 22 20 49 54 45 4D 53 2F 43 41 54 41 47 4F |)." ITEMS/CATAGO|
00002CF0: 52 59 22 3A 59 B2 32 3A 58 B2 36 30 AB C3 28 50 |RY":Y.2:X.60..(P|
00002D00: 24 29 AD 32 00 42 35 10 06 8D 32 30 3A 99 57 24 |$).2.B5...20:.W$|
00002D10: 52 24 50 24 3A 59 B2 33 3A 58 B2 35 3A 8D 32 30 |R$P$:Y.3:X.5:.20|
00002D20: 3A 99 22 56 45 52 49 46 49 45 44 2F 43 36 34 2F |:."VERIFIED/C64/|
00002D30: 31 35 34 31 2F 46 58 38 30 2F 43 41 52 44 3F 2F |1541/FX80/CARD?/|
00002D40: 47 22 00 64 35 12 06 87 50 24 3A 59 B2 35 3A 58 |G".d5...P$:Y.5:X|
00002D50: B2 34 3A 8D 32 30 3A 99 22 9E 22 AA 52 24 50 24 |.4:.20:.".".R$P$|
00002D60: 3A 58 B2 32 00 82 35 14 06 81 59 B2 37 A4 31 33 |:X.2..5...Y.7.13|
00002D70: 3A 87 50 24 3A 8D 32 30 3A 99 57 24 52 24 50 24 |:.P$:.20:.W$R$P$|
00002D80: 3A 82 00 AA 35 16 06 81 59 B2 31 36 A4 32 31 3A |:...5...Y.16.21:|
00002D90: 87 50 24 3A 58 B2 32 30 AB C3 28 50 24 29 AD 32 |.P$:X.20..(P$).2|
00002DA0: 3A 8D 32 30 3A 99 50 24 3A 82 00 C7 35 18 06 8B |:.20:.P$:...5...|
00002DB0: C2 28 44 4C 29 B2 31 36 30 AF C2 28 4D 4C 29 B2 |.(DL).160..(ML).|
00002DC0: 33 32 A7 31 35 36 34 00 06 36 19 06 9F 31 2C 38 |32.1564..6...1,8|
00002DD0: 2C 2E 2C 22 30 3A 44 49 53 4B 20 4C 4F 47 2E 53 |,.,"0:DISK LOG.S|
00002DE0: 4F 52 54 2C 53 2C 52 22 3A 81 49 B2 34 39 34 30 |ORT,S,R":.I.4940|
00002DF0: 38 A4 34 39 39 37 33 3A 84 31 2C 41 3A 97 49 2C |8.49973:.1,A:.I,|
00002E00: 41 3A 82 3A A0 31 00 42 36 1A 06 9F 31 2C 38 2C |A:.:.1.B6...1,8,|
00002E10: 2E 2C 22 30 3A 44 49 53 4B 20 4C 4F 47 2E 44 49 |.,"0:DISK LOG.DI|
00002E20: 52 2C 53 2C 52 22 3A 81 49 B2 44 4C A4 44 4C AA |R,S,R":.I.DL.DL.|
00002E30: 31 34 38 3A 84 31 2C 41 3A 97 49 2C 41 3A 82 3A |148:.1,A:.I,A:.:|
00002E40: A0 31 00 81 36 1C 06 5A B2 B8 28 2E 29 3A 97 31 |.1..6..Z..(.):.1|
00002E50: 39 38 2C 2E 3A 50 24 B2 22 20 49 4E 53 54 52 55 |98,.:P$." INSTRU|
00002E60: 43 54 49 4F 4E 53 20 28 59 2F 4E 29 3F 20 22 3A |CTIONS (Y/N)? ":|
00002E70: 8D 33 30 3A 8B 49 24 B3 B1 22 59 22 A7 32 30 30 |.30:.I$.."Y".200|
00002E80: 30 00 BC 36 1E 06 8D 39 33 3A 9F 31 2C 38 2C 2E |0..6...93:.1,8,.|
00002E90: 2C 22 30 3A 44 49 53 4B 20 4C 4F 47 2E 49 4E 53 |,"0:DISK LOG.INS|
00002EA0: 54 2C 53 2C 52 22 3A 8D 39 31 3A 8B 45 52 A7 8D |T,S,R":.91:.ER..|
00002EB0: 39 34 3A 8D 31 30 3A 89 31 35 36 34 00 D0 36 20 |94:.10:.1564..6 |
00002EC0: 06 8D 36 30 3A 58 B2 2E 3A 59 B2 33 3A 8D 32 30 |..60:X..:Y.3:.20|
00002ED0: 00 F5 36 22 06 84 31 2C 50 24 3A 8B 50 24 B2 22 |..6"..1,P$:.P$."|
00002EE0: 45 4E 44 22 A7 50 24 B2 53 36 24 3A 8D 33 30 3A |END".P$.S6$:.30:|
00002EF0: 89 31 35 37 38 00 06 37 24 06 8B 49 24 B2 22 5E |.1578..7$..I$."^|
00002F00: 22 A7 31 35 37 38 00 1F 37 26 06 99 52 24 22 9B |".1578..7&..R$".|
00002F10: 1D 22 50 24 3A 8B 53 B2 34 A7 98 53 2C 50 24 00 |."P$:.S.4..S,P$.|
00002F20: 33 37 27 06 8B C2 28 32 31 34 29 B3 32 33 A7 31 |37'...(214).23.1|
00002F30: 35 37 30 00 58 37 28 06 50 24 B2 53 36 24 3A 8D |570.X7(.P$.S6$:.|
00002F40: 33 30 3A 8B 49 24 B2 22 50 22 A7 53 B2 34 3A A0 |30:.I$."P".S.4:.|
00002F50: 53 3A 9F 53 2C 53 2C 53 00 62 37 29 06 89 31 35 |S:.S,S,S.b7)..15|
00002F60: 36 38 00 6C 37 2A 06 A0 31 3A A0 53 00 7F 37 D0 |68.l7*..1:.S..7.|
00002F70: 07 8F 20 2A 2A 20 4D 41 49 4E 20 4D 45 4E 55 00 |.. ** MAIN MENU.|
00002F80: 98 37 D2 07 97 31 39 38 2C 2E 3A 4B B2 2E 3A 55 |.7...198,.:K..:U|
00002F90: B2 2E 3A 4A 24 B2 22 22 00 D1 37 D4 07 49 24 B2 |..:J$.""..7..I$.|
00002FA0: 22 22 3A 8D 31 30 3A 50 24 B2 22 20 9E 4D 41 49 |"":.10:P$." .MAI|
00002FB0: 4E 20 4D 45 4E 55 20 22 3A 59 B2 33 3A 58 B2 32 |N MENU ":Y.3:X.2|
00002FC0: 30 AB C3 28 50 24 29 AD 32 3A 8D 32 30 3A 99 50 |0..(P$).2:.20:.P|
00002FD0: 24 00 04 38 D6 07 59 B2 36 3A 58 B2 33 3A 81 49 |$..8..Y.6:X.3:.I|
00002FE0: B2 31 A4 38 A9 32 3A 8D 32 30 3A 99 52 24 57 24 |.1.8.2:.20:.R$W$|
00002FF0: 49 22 9D 9D 9D 46 1D 1D 22 4D 24 28 49 29 4F 24 |I"...F.."M$(I)O$|
00003000: 43 59 24 3B 00 31 38 D8 07 99 A3 32 31 29 52 24 |CY$;.18....21)R$|
00003010: 57 24 49 AA 31 22 9D 9D 9D 46 1D 1D 22 4D 24 28 |W$I.1"...F.."M$(|
00003020: 49 AA 31 29 4F 24 43 59 24 3A 59 B2 59 AA 34 3A |I.1)O$CY$:Y.Y.4:|
00003030: 82 00 63 38 DA 07 49 24 B2 22 22 3A 8D 32 32 37 |..c8..I$."":.227|
00003040: 3A 50 24 B2 CA 28 46 24 2C 32 2C 31 35 29 AA 22 |:P$..(F$,2,15)."|
00003050: 3A 22 AA C4 28 4E 29 AA 22 20 50 52 4F 47 52 41 |:"..(N)." PROGRA|
00003060: 4D 53 22 00 A1 38 DC 07 59 B2 32 31 3A 58 B2 32 |MS"..8..Y.21:X.2|
00003070: 30 AB C3 28 50 24 29 AD 32 3A 8D 32 30 3A 99 57 |0..(P$).2:.20:.W|
00003080: 24 50 24 3A 50 24 B2 50 30 24 AA 22 3A 22 AA C4 |$P$:P$.P0$.":"..|
00003090: 28 44 29 AA 22 20 55 4E 49 51 55 45 20 49 44 53 |(D)." UNIQUE IDS|
000030A0: 22 00 CA 38 DD 07 59 B2 32 32 3A 58 B2 32 30 AB |"..8..Y.22:X.20.|
000030B0: C3 28 50 24 29 AD 32 3A 8D 32 30 3A 99 50 24 3A |.(P$).2:.20:.P$:|
000030C0: 50 24 B2 53 37 24 3A 8D 33 30 00 07 39 DE 07 8B |P$.S7$:.30..9...|
000030D0: C6 28 49 24 29 B1 31 33 32 A7 91 C6 28 49 24 29 |.(I$).132...(I$)|
000030E0: AB 31 33 32 8D 35 30 32 2C 36 30 32 2C 31 31 30 |.132.502,602,110|
000030F0: 32 2C 31 33 30 32 2C 35 30 32 2C 38 30 32 2C 39 |2,1302,502,802,9|
00003100: 30 32 2C 32 30 31 38 00 11 39 E0 07 89 32 30 30 |02,2018..9...200|
00003110: 32 00 45 39 E2 07 99 52 24 22 93 11 50 52 45 53 |2.E9...R$"..PRES|
00003120: 53 20 52 45 54 55 52 4E 20 54 4F 20 52 55 4E 20 |S RETURN TO RUN |
00003130: 41 47 41 49 4E 22 3A 99 22 11 52 55 4E 91 91 91 |AGAIN":.".RUN...|
00003140: 91 91 22 3A 80 00 5B 39 88 13 8F 20 2A 2A 20 4D |..":..[9... ** M|
00003150: 45 4E 55 20 43 48 4F 49 43 45 53 00 95 39 8A 13 |ENU CHOICES..9..|
00003160: 83 20 22 53 41 56 45 20 46 49 4C 45 22 2C 22 4C |. "SAVE FILE","L|
00003170: 4F 41 44 20 46 49 4C 45 22 2C 22 41 44 44 20 44 |OAD FILE","ADD D|
00003180: 49 52 20 49 54 45 4D 53 22 2C 22 53 4F 52 54 20 |IR ITEMS","SORT |
00003190: 46 49 4C 45 22 00 D1 39 8C 13 83 20 22 50 52 49 |FILE"..9... "PRI|
000031A0: 4E 54 20 43 41 54 41 4C 4F 47 22 2C 22 53 45 41 |NT CATALOG","SEA|
000031B0: 52 43 48 2F 43 48 41 4E 47 45 22 2C 22 4D 45 4D |RCH/CHANGE","MEM|
000031C0: 4F 52 59 20 43 48 45 43 4B 22 2C 22 51 55 49 54 |ORY CHECK","QUIT|
000031D0: 22 00 EC 39 8E 13 8F 20 2A 2A 20 53 41 56 45 2F |"..9... ** SAVE/|
000031E0: 4C 4F 41 44 20 43 48 4F 49 43 45 53 00 2A 3A 90 |LOAD CHOICES.*:.|
000031F0: 13 83 20 22 41 52 43 41 44 45 20 47 41 4D 45 53 |.. "ARCADE GAMES|
00003200: 22 2C 22 41 44 56 45 4E 54 55 52 45 20 47 41 4D |","ADVENTURE GAM|
00003210: 45 53 22 2C 22 4F 54 48 45 52 20 47 41 4D 45 53 |ES","OTHER GAMES|
00003220: 22 2C 22 42 41 43 4B 55 50 22 00 6A 3A 92 13 83 |","BACKUP".j:...|
00003230: 20 22 42 55 53 49 4E 45 53 53 22 2C 22 43 4F 4D | "BUSINESS","COM|
00003240: 4D 55 4E 49 43 41 54 49 4F 4E 53 22 2C 22 45 44 |MUNICATIONS","ED|
00003250: 55 43 41 54 49 4F 4E 22 2C 22 46 41 4D 49 4C 59 |UCATION","FAMILY|
00003260: 2F 50 45 52 53 4F 4E 41 4C 22 00 A4 3A 94 13 83 |/PERSONAL"..:...|
00003270: 20 22 47 52 41 50 48 49 43 53 2F 4D 55 53 49 43 | "GRAPHICS/MUSIC|
00003280: 22 2C 22 48 4F 4D 45 20 52 45 4C 41 54 45 44 22 |","HOME RELATED"|
00003290: 2C 22 55 54 49 4C 49 54 49 45 53 22 2C 22 4F 54 |,"UTILITIES","OT|
000032A0: 48 45 52 22 00 CD 3A A0 13 83 22 2A 2A 2A 2A 20 |HER"..:..."**** |
000032B0: 55 53 45 52 20 53 55 50 50 4F 52 54 45 44 20 53 |USER SUPPORTED S|
000032C0: 4F 46 54 57 41 52 45 20 2A 2A 2A 2A 22 00 F9 3A |OFTWARE ****"..:|
000032D0: A2 13 83 22 59 4F 55 20 41 52 45 20 45 4E 43 4F |..."YOU ARE ENCO|
000032E0: 55 52 41 47 45 44 20 54 4F 20 43 4F 50 59 20 41 |URAGED TO COPY A|
000032F0: 4E 44 20 53 48 41 52 45 22 00 25 3B A4 13 83 22 |ND SHARE".%;..."|
00003300: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 57 49 54 |THIS PROGRAM WIT|
00003310: 48 20 4F 54 48 45 52 20 55 53 45 52 53 20 4F 4E |H OTHER USERS ON|
00003320: 20 54 48 45 22 00 51 3B A6 13 83 22 43 4F 4E 44 | THE".Q;..."COND|
00003330: 49 54 49 4F 4E 53 20 54 48 41 54 20 54 48 45 20 |ITIONS THAT THE |
00003340: 50 52 4F 47 52 41 4D 20 49 53 20 4E 4F 54 20 20 |PROGRAM IS NOT |
00003350: 22 00 7D 3B A8 13 83 22 44 49 53 54 52 49 42 55 |".};..."DISTRIBU|
00003360: 54 45 44 20 49 4E 20 4D 4F 44 49 46 49 45 44 20 |TED IN MODIFIED |
00003370: 46 4F 52 4D 2C 20 54 48 41 54 20 20 22 00 A9 3B |FORM, THAT "..;|
00003380: AA 13 83 22 4E 4F 20 46 45 45 20 4F 52 20 43 4F |..."NO FEE OR CO|
00003390: 4E 53 49 44 45 52 41 54 49 4F 4E 20 49 53 20 43 |NSIDERATION IS C|
000033A0: 48 41 52 47 45 44 2C 20 22 00 D5 3B AC 13 83 22 |HARGED, "..;..."|
000033B0: 41 4E 44 20 54 48 41 54 20 54 48 49 53 20 4E 4F |AND THAT THIS NO|
000033C0: 54 49 43 45 20 49 53 20 4E 4F 54 20 42 59 50 41 |TICE IS NOT BYPA|
000033D0: 53 53 45 44 22 00 01 3C AE 13 83 22 4F 52 20 52 |SSED"..<..."OR R|
000033E0: 45 4D 4F 56 45 44 2E 20 20 20 20 20 20 20 20 20 |EMOVED. |
000033F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003400: 22 00 2B 3C B0 13 83 22 20 49 46 20 59 4F 55 20 |".+<..." IF YOU |
00003410: 46 49 4E 44 20 54 48 49 53 20 50 52 4F 47 52 41 |FIND THIS PROGRA|
00003420: 4D 20 54 4F 20 42 45 20 20 20 22 00 55 3C B2 13 |M TO BE ".U<..|
00003430: 83 22 20 4F 46 20 56 41 4C 55 45 2C 20 41 20 43 |." OF VALUE, A C|
00003440: 4F 4E 54 52 49 42 55 54 49 4F 4E 20 54 4F 20 54 |ONTRIBUTION TO T|
00003450: 48 45 20 20 22 00 7F 3C B4 13 83 22 20 20 20 41 |HE "..<..." A|
00003460: 55 54 48 4F 52 20 57 49 4C 4C 20 42 45 20 41 50 |UTHOR WILL BE AP|
00003470: 50 52 45 43 49 41 54 45 44 2E 20 20 20 20 22 00 |PRECIATED. ".|
00003480: 9A 3C B6 13 83 22 46 52 45 44 49 45 20 4A 2E 20 |.<..."FREDIE J. |
00003490: 4C 41 59 42 45 52 47 45 52 22 00 B5 3C B8 13 83 |LAYBERGER"..<...|
000034A0: 22 31 34 35 32 34 20 27 4E 27 20 53 54 52 45 45 |"14524 'N' STREE|
000034B0: 54 20 20 20 22 00 D0 3C BA 13 83 22 4F 4D 41 48 |T "..<..."OMAH|
000034C0: 41 2C 20 4E 45 20 36 38 31 33 37 20 20 20 20 22 |A, NE 68137 "|
000034D0: 00 00 00 |... |
......X$."XX":.I...3:X$.X$.X$:..9...X$.X
$."XXXXXXX":.1502._.....................
..................... THE DISK CATA.GE
R V3.1 ....... BY .D LAYBERGER..SEP
1985 ..I.... OKAY . USE BUT . . SELL
........................................
....."."CY$S2$BL$R$S1$:.53281,11.I....60
:Y.24:X..:.20:.BL$S1$CY$S3$;:.2023,160:.
56295,3:..V....H("......................
....",Y).X);:.......47:Y.24:X.47:.20:.R$
CY$" PRESS ' ^ ' TO RETURN ";.....Y.
24:X.20.C(P$).2:.20:.W$P$;:.I.1.200:....
..A..1.A.1:.R$;:.34...!..A.A..:.O$;..."
.I$."":.I$:.I$."".31.".$...<.-.Y.24:X..:
.20:.BL$S3$;.]...Y.24:X.20.C(P$).2:.20:.
P$;:..|./.Y.24:X.40:.20:.CY$S3$W$;:....0
..60:.45:.47:....1.N.N.1:P$.P7$:.48:Z..(
.):....2.Y.22:X.11.C(P$).2 :.20:.R$W$"IN
SERT "P$" DISKETTE";:..,.<.Y.3:X..:.20:.
I.3.23:."...
.".4.=..:..I.K..808,225:A1.B(5
5):A2.B(56):.55,B(51):.56,B(52):....M.A.
.(.):.55,A1:.56,A2:.808,237:.A..77.....P
.Y.10:X.11:.20:."..PROGRAM MAY PAUSE"...
Q.Y.11:X.9:.20:."..FOR GARBAGE COLLECTIO
N":Z..(.)...R.Y.10:X.11:.20:."..
".J.T.Y.11:X.9:.20:."..
":..`.Z.. ** ERR HANDLING
.U.[..15,ER,ER$,T,S:....\..60:Y.22:X.9:.
20:.53281,2:.ER;ER$;T;S:P$.S6$:.30:..E.]
.P$.P1$:.48:.15,"I":..R.^..92: 1:....D..
** FILE SELECTION.).F..45:Y.24:X.47:.20
:.R$CY$"PRESS 'RETURN' TO CONTINUE";:.U.
..W.H.X.21.C(P$):.20:.W$P$;:I..:J$."":Y.
24:X.21._.L..75...N.A$.J$.I(A$,J.I):.20:
.R$A$;:.20:.R$J$;:.I.J..".";...P..198,1:
.I$:.198,.:.I$.G(13).136...R..I$.G(19).I
$.G(34).I$.".".I$.G(131).I$.G(147).I$.G(
141).110.%.T..I..1..I$.G(20).I$.G(157).I
..:J$."":.110.M.V..I$.G(29).I.J.I.I.1:J$
.H(A$,I):.110.`.X..I$.G(148).110...Z..I$
.G(20).I$.G(157).J$.H(J$,C(J$).1):I.I.1:
.110...|..I$.G(17)..".":J$.H(J$,C(J$)):.
110...~..I$.G(145)..".":J$.H(J$,C(J$)):.
110......K..I$."*".132......SL..1..I$."*
".J.I.1:.134.,....I.J..I$..G(13).110.D..
.J$.J$.I$:I.I.1:.110.N....77:..C.... **
FILE FORMAT.S....I$."N".P........P...P0$
."SORTED BY FILENAME"......I$."T".P.16.I
....P.16.P0$."SORTED BY FILETYPE".Z....I
$."D".P.19......P.19.P0$."SORTED BY DISK
NAME"......I$."I".P.32.1....P.32.P0$."SO
RTED BY DISK ID ".B....I$."S".P.35.E....
P.35.P0$."SORTED BY PRG SIZE".~....P.40.
P0$."UNSORTED"............ ** LIB FILE E
MPTY.L...P$." ":.45:Y.22:X.8:.20:.W$P3$:
P$.S6$:.30:....... ** SAVE/LOAD MENU....
..60:SL..:J$."LOAD":.I$.".".SL.1:J$."SAV
E":.N.1..276:..C...P$." ".J$."
FILE CHOICES ":.580:Y.5:X.2:
I.1......20:.W$R$G(64.I)" "W$FL$(I);....
...21)G(64.I.6)" "FL$(I.6):Y.Y.3:I.I.1:.
I..6.506.Q...P$.S7$:.30:.I$."^"........I
$."A".I$."L".510.....F$."_".FL$(F(I$).64
).D....I$."L".F$."":P$."DESIRED FILENAME
:":J.15:A$." "._....I$."L"
..102:F$."_".J$.X....I$.G(13)..C(F$).2..
.....Y.2:X..:.20:.BL$S1$:P$.P1$:.48.....
.SL.1.558...... ** LOAD FILES.....J..:P$
.S8$:.50:P$.S6$:.30:.I$."^"........93:.1
,8,.,"0:".F$.",S,R":.91:.ER.94.9....N.1.
.75:.I...N:T$(I)."":.:.77:N..:D...Z....1
,N:.1,D:.1,P:.226:.N.M.N.M.....I$."":Y.5
:X.5:.20:.W$R$"LOADING"N". PROGRAMS":Y.7
:N.1......850,76:.851,88:.852,3:.952,39.
K....N.M.N.N.1:.550......DL:T$(N).H(X$,3
8):.20:.W$N.10)H(T$(N),18)... ..I$:.I$."
^"..77:.550.+."...50)J(T$(N),20,20).@.$.
.ST...N.N.1:.540.O.&..91:.ER.94.H.(. 1:P
$.P7$:.48:Z..(.)...*.P$.R$.W$.D(Z)." BYT
ES FREE":.45:.I.1.1000:.:....,.. ** SAVE
FILES.R...P$.S9$:.50:P$.S6$:.30:.I$."^"
.....0..93:.1,8,1,"0:".F$.",S,W":.91:.ER
.63.P$.S5$:.576...2..ER.94.=.4.Y.5:X.5:.
20:.W$R$"SAVING"N". PROGRAMS".`.6..1,N:.
1,D:.1,P:.I.1.N:.1,T$(I)..8.Y.7:.20:.I;
.10)H(T$(I),18)...:...10)"."J(T$(I),20,2
0)...<..:.91:.ER.94...>. 1:....@. 1:.48:
.I$:.I$."Y".P$.P1$:.45:.15,"S0:".F$:.560
...B..I$.."N".576...D.Y.2:X..:.20:.BL$S1
$:.20:.W$P$;:..6.X.. ** READ DIRECTORY.N
.Z.U..:.10:Y.6:X.5:.20:.R$W$"PROGRAMS SO
FAR:"N:P$.S6$...\..N.M.100...X.40)"..."
M". MAXIMUN!"...^.Y.8:.20:.R$W$"UNIQUE I
D'S SO FAR:"D...`.Y.10:.20:.R$"."Z". BYT
ES FREE."...F..N..M.....H.P$.S8$:.50:P$.
S6$:.30:.I$."^"...;.J..93:.850,32:.851,2
28:.852,255:.952,29.V.L..1,8,.,"$0":.91:
.ER.94.|.N..DL:DT$.J(X$,7,16):ID$.J(X$,2
5,2)...P.P$.".. .".DT$." .".ID
$.". .":.580.E.R.. ** ID$ CHECK...
T..I...N:.ID$..J(T$(I),33,2)..:.640...V.
I.N:.:.198,..0.X.P$."..DISK ID NOT UNIQU
E - CONTINUE (Y/N)?":.45.A.Z..198,1:.I$:
P$.P1$:.45:.I$."Y".D.D.1:U.1:.640.M.|. 1
:.602...~.. ** SYS DIR READ.....D.D.1:NF
..1:.850,76:.851,100:.852,3:.952,24.....
.DL:.75:B$.H(X$,1):C$.J(X$,2,1):S$.D(F(C
$).256.F(B$)).....S$.I(" ".S$,4).%...
Y.5:X.9:.20:.W$R$J(X$,3,19)S$.U...NF.NF.
1:V$(NF).J(X$,3,16).J(X$,20,2)." ".S$.G.
...77:.ST...642.V....91:.ER.94......NF..
.V$(NF)."":NF.NF.1:N.N.1:.I$."^".N.N.1..
... 1.C.... ** CURSOR INPUT.T....60:.P4$
P5$;......75:S.1145:B..:.K...NF.38.....Y
.4:X.2:.J...37:.20:.W$;.0...SL.12:.H(V$(
K.J),1).R$.SL.13.O. ..J.19..734:Y.Y.1:.Y
.23.Y.4.M....J.18.X.21:.20:.734:Y.Y.1...
...:.J.K.NF.J.37......:X.2:.J$."A".J$.""
:.716......S.B,62:.198,.:.198,1:.I$.....
.I$.".".B.B.40:.S.B.40,160:.B..40..S.B,1
60:B.18.40:.688.1....I$.".".B.B.40:.S.B.
40,160:.B.19.40..S.B,160:B..:.688.N....S
.B.40,160:.I$..".".692.S....S.1164..S.B,
160:S.S.19:X.2:.692......S.1145..S.B,160
:S.S.19:X.21......I$."E".K.NF:.:.716.Q..
..I$."A".K..:.750:J$."A":.77:.667......I
$."^".742......I$."N"..60:B..:S.1145:.:.
77:.667.3....I$."P"..K...K.K.38:B..:S.11
45:.60:.668.D....I$.." ".680.V...BB.K:.1
98,.:Y.B.40.4:.20:.S.1164.BB.K.19:X.21..
....B(S.B).62..B(S.2.B).128..R$;...B..H(
V$(B.40.BB),1).R$..736...D..B(S.2.B).128
.V$(B.40.BB).R$.V$(B.40.BB)...F..20:SL.1
2:.H(V$(B.40.BB),1).R$.SL.13...J..732:.:
.680.H.L.P$.P2$:.45:.47:.I$:.I$."Y"..60:
.77:.722.Y.N..I$.."N".716.F.P..77:.666..
.R..75:P$.P1$:.48:J..:.I...NF...T..N.M.1
.I.NF:.728...V..H(V$(I),1).R$.J.1:.738:N
.N.1...X..:.77:.740:.J....U...D.D.1...Z.
.49:P.40:.602......W$H(V$(B.40.BB),SL)J(
V$(B.40.BB),SL.5,1)I(V$(B.40.BB),3);:..C
....W$H(V$(K.J),SL)J(V$(K.J),SL.5,1)I(V$
(K.J),3);:......V$(B.40.BB).J(V$(B.40.BB
),2,23):......T$(N).J(V$(I),2,19).H(DT$,
13).ID$.I(V$(I),4):.......75:.I...NF:V$(
I)."":.:.77:......K.NF:.:P$.P1$:.48:.U..
.D.D.1......77:.49:.740:.I$."A".602.!...
..@....I...NF:.H(V$(I),1).R$.754.S...V$(
I).R$.V$(I).[....:..I. .. ** SORT.}."..6
0:.N.1..276:....$.Y.18:X.16:.20:.W$"SORT
BY:";:Y.20:X.14:.20:.".N.AME.....T.YPE.
..&.Y.22:X.11:.20:.".D.ISK.....I.D....S.
IZE":.30:.I$."^".../ (..I$.."N"..I$.."T"
..I$.."D"..I$.."I"..I$.."S".806.= *..P.4
0.P...G ,..226: P$.".SORTING".D(N)." FIL
ES":.48.. ...N.400.P$.".SORTING".D(N)."
FILES MAY TAKE 3 MINUTES+":.46.G 0.P.P.1
:.P.1..ML,T$,1,N,1,16,A.. 2..P.17..ML,T$
,1,N,17,18,A,1,16,A..!4..P.20..ML,T$,1,N
,20,32,A,33,35,A,1,16,A.C!6..P.33..ML,T$
,1,N,33,34,A,20,32,A,1,16,A.G!8..P.36..M
L,T$,1,N,36,38,D,1,16,A.S!:.P.P.1:...!..
. ** SEARCH/CHANGE..!...60:P$."ADD OR SE
ARCH BY NAME/DISPLAY (A/N/D)?".P!...30:.
I$."^"....!...I$."A"..N..M...."...I$."A"
.K..1:.974:.928:N.N.1:.980:..."...N.1..2
76:..0"...I$."D"..1114:..A"...I$.."N".90
4.."..P$."PROGRAM NAME?":J.15:A$."
":J$."":.102:.J$.""...."..C.1:P
$.P1$:.48.."...I(J$,1)."*".J$.H(J$,J.1).
V"..J.C(J$):.J$.H(T$(C),J).928..#..C.C.1
:.C.N.1..60:P$."FILE NOT FOUND":.30:...#
...920.## ..10:Y.15:X.1:.20.U#...R$W$"FI
LENAME TY DISKNAME ID BKS"..#
..." "T$(C):Y.22:X.5:.20:.".C.HANGE....D
.ELETE...OR....O.KAY?".R#...198,.:P$.W$.
S7$:.45:.198,1:.I$:.I$."D".P$.P1$:.48:.9
64..#...I$.."C".K..:U.K:..&$..Y.13:X.10:
.20:.R$".CHANGE.....FROM....TO":I..:J.38
:J$."".R$..A$.T$(C):.K.A$." NO RECORD".J
(S3$,2,28).D$..P$."":.45:.47..$..Y.22:X.
1:.20:.R$"."S3$".. "W$;:.U..102:.W$;..$.
.Y.17:X.1:.108:J$.A$:I$."".I$..P$.P2$:.4
7:.45:.I$.Y$...I$."N".938..$...I$.."Y".9
48.#%...10:P$.P1$:.45:A$.J(T$(C),33,2):I
$.J(J$,33,2):.K.976.K%...I.1.N:.I$.J(T$(
I),33,2).I.N:.:.960.W%...:D.D.1..%..T$(C
).J$:.I...N:.A$.J(T$(I),33,2).I.N:.:P.40
:...%B..:D.D.1:P.40:...%D..K.982.A%F..75
:I$.J(T$(C),33,2)..%H.T$(C).T$(N):T$(N).
"":N.N.1:C.C.1..&J..I.1.N:.I$.J(T$(I),33
,2).D.D.1:I.N.(&L..:D.D.1:.60:.77:.810:.
.I&N.D.D.1:C.N.1:T$(C)."**PRESS 'C' TO C
REATE A NEW ENTRY*****":...&P.T$(C).J$:.
I...N:.I$.J(T$(I),33,2).D.D.1:I.N..&R..:
P.40:...&T..K...A&V.N.N.1:D.D.1:...&X.Y.
24:X..:.20:.P4$P5$;..&Z.S.1144:B..:.S,19
0:.198,.. '...I$:.I$."."..B.40.760..S.B,
32:B..40.G'...I$.".".B.B.40:.S.B,190:.S.
B.40,32.K'...I$."."..B.40..40..S.B,32:B.
760..'...I$."."..S.B,32:B.B.40:.S.B,190.
.'...I$."N".I$."P".I$."E".I$."A".I$."^".
..J'...I$.." ".988..'...N.19.C.B.40:.100
4..(..C.J.18.B.40:.C...C.N..(C).1..(...C
..C..N.U..1:.928.-(..J.C.1:.N.19.J..1.7(
...10:..U(L.. ** PRINT/SCREEN/PRINTER.I(
N..60:.N.1..276:...(P.P$."PRINT TO PRINT
ER OR SCREEN (P/S)?":.46..(R..30:.I$."^"
...M(T..I$."A".U.1:.1148:. **NON MENU..(
V..I$."P".1148..(X..I$.."S".1106..)Z.J..
1:. ** PRINT TO SCREEN.))\..60:Y.2:X..:.
20:.R$W$;._)^.." FILE NAME TY DISK
NAME ID BKS ":.1124.|)`.P$.P6$:.45:.
30:.I$."^"....)B..I$."C".P$." ":.45:.984
:.1116..)D..60:Y.4:.20.G)F..I$.."P".J.J.
1:.1130..)H.J.J.37:.J...J.N..(J).1:.J...
J....)J..J.N.J....*L..J...1140.&*N..W$"
"T$(J):.N.20..J.N.1120.A*P..B(214).22.J.
J.1:.1130.K*R..1120..*T..W$R$"...".D(N).
" PROGRAMS: ".D(D)." DISK IDS".C*V
..D.2..W$R$"....".D(N)." PROGRAMS:
".D(D)." DISK ID ".M*X..1136..*Z.. ** P
RINT TO PRINTER.++|.Y.22:X.4:.20:.R$W$"P
REPARE PRINTER & POSITION PAPER":P$.S6$:
.45.F+~.C$.G(27):.30:.I$."^"...+...60:P
$."WHAT'S YOUR NAME?":J.10:A$."
":.102..+...U..1..P.19.P.32.1160.U+..P$
."REGULAR OR CONDENSED TYPE (R/C)?":.48:
.30:.I$."^"....+...I$.."R".I$.."C".1156.
.,.. 4:.4,4,4:.4,C$"@";:.J$."".J$."C 64"
.>,..P$.S4$:.48:Y.4:X.5:.20: .4,C$"E";.Y
,...4,C$"N"G(6):.4,G(14).(32.C(J$)).2)J$
"'S DISK CATALOG"..,...4,G(14).23.(C(F$)
.C(P0$)).2)F$" "P0$..,...4,.28)N"PROGRAM
S "D"DISK IDS":.U..1..P.19.P.32.1182..,.
..I$."C".1204..-...4:.4,P8$" "P8$;C$"F"
..-..X..(N.2):.C(D(N.2)).C(D(N)).X.X.1.N
-...I.1.X:.4,T$(I);" "T$(I.X).H-...1220
:.:.4,G(13): 4:..-... ** PRINT BY DISK.
.-...4:.4,P9$" "P9$" "P9$..- ..4:.
4,J(T$(1),20,15);C$"F"..-...I.1.N:.4,H(T
$(I),19)I(T$(I),3)" ";:.1196......X.1
..4,H(T$(I.1),19)I(T$(I.1),3)" ";.5..
..X.1.I.I.1:X..:.1196.M....X.1..4,H(T$(I
.1),19)I(T$(I.1),3)" ":I.I.1:.1196...
...B$:.B$."^".I.N......:.4,G(13)C$"@": 4
:.......J(T$(I.1),33,2).""........J(T$(I
),33,2).J(T$(I.1),33,2).X.1:.../...4,C$"
E":.4:.4,J(T$(I.1),20,15);../...4,C$"F":
X..:..Q/...4,C$"F"G(15);:.4:.4,P8$"
"P8$" "P8$G(13)../..X..(N.3):A
.2.X:B.X:C.X:.C(D(N.3))..C(D(N)).1212.H/
..X.X.1:.I(D(N.3),1)."3".I(D(N.3),1)."4"
.A.2.X.1:B.X.1:C.B:.1212../..A.2.X:B.X:C
.X.1../...I.1.X:.4,T$(I)" ";..0..
.B..I..4,T$(I.X)" ";.00...C..I..4
,T$(I.A).O0B..1220:.:.4,G(13)C$"@": 4:..
C0D..B$:.B$."^".I.X.I0F....0... ** MEMOR
Y CALCULATION..0...49:Y.22:X.14.C(D(Z)).
2:.20:.Z". BYTES FREE";.N0..P$.S6$:.30:N
.N.1:...0... ** INITILIZE VARIABLES..1..
ML.12.4096.256:M..(.(.).38).166:.M.1.M..
.C1...:R$.".":O$.".":BL$.".":CY$.".":W$.
".".S1...53280,12:.53281,11:.65511:.15,8
,15:.G(142)..1...V$(152),T$(M.2),FL$(12)
,M$(8):P.40:F$."_NO FILE NAME":DL.830..1
...I.1.8:.M$(I):.:.I.1.12:.FL$(I):...2..
S1$.".
.".F2..S2$.".. THE DISK CAT
ALOGER V3.1 .".Z2..S3$.".
."..2..S
4$."..PRESS & HOLD '^' TO STOP PRINTING"
.P2..S5$.".REPLACE EXISTING FILE (Y/N)?.
..2..S6$."PRESS A KEY TO CONTINUE"..3..S
7$."SELECT ONE"..3..S8$."SOURCE"..3..S9$
."DESTINATION".O3..S0$." . CRSR=MOVEME
NT N=NEXT P=PREVIOUS E=END A=ABORT".
.3..P1$."..WORKING"..3..P2$.".SELECTION
OK (Y/N)?".D3..P3$.".LIBRARY FILE IS EMP
TY!"..3..P4$.".....CRSR=MOVEMENT N=NEXT
P=PREVIOUS....."..4..P5$.".... SPACE=S
ELECT A=ALL E=END ^=MENU ....".\4..P6$."
C=CHANGE P=PREVIOUS OTHER KEYS=NEXT".4.
.P7$.".CALCULATING FREE MEMORY"..4..P8$.
"FILENAME TY DISKNAME ID BKS"
.Q4..P9$."FILENAME TY BKS"..5...1
0:P$.D(M)." ITEMS/CATAGORY":Y.2:X.60.C(P
$).2.B5...20:.W$R$P$:Y.3:X.5:.20:."VERIF
IED/C64/1541/FX80/CARD?/G".D5...P$:Y.5:X
.4:.20:.".".R$P$:X.2..5...Y.7.13:.P$:.20
:.W$R$P$:...5...Y.16.21:.P$:X.20.C(P$).2
:.20:.P$:..G5...B(DL).160.B(ML).32.1564.
.6...1,8,.,"0:DISK LOG.SORT,S,R":.I.4940
8.49973:.1,A:.I,A:.: 1.B6...1,8,.,"0:DIS
K LOG.DIR,S,R":.I.DL.DL.148:.1,A:.I,A:.:
1..6..Z..(.):.198,.:P$." INSTRUCTIONS (
Y/N)? ":.30:.I$.."Y".2000..6...93:.1,8,.
,"0:DISK LOG.INST,S,R":.91:.ER..94:.10:.
1564.P6 ..60:X..:Y.3:.20..6"..1,P$:.P$."
END".P$.S6$:.30:.1578..7$..I$."^".1578..
7&..R$".."P$:.S.4..S,P$.37'..B(214).23.1
570.X7(.P$.S6$:.30:.I$."P".S.4: S:.S,S,S
.B7)..1568.L7*. 1: S.7P.. ** MAIN MENU.
.7R..198,.:K..:U..:J$."".Q7T.I$."":.10:P
$." .MAIN MENU ":Y.3:X.20.C(P$).2:.20:.P
$..8V.Y.6:X.3:.I.1.8.2:.20:.R$W$I"...F..
"M$(I)O$CY$;.18X...21)R$W$I.1"...F.."M$(
I.1)O$CY$:Y.Y.4:..C8Z.I$."":.227:P$.J(F$
,2,15).":".D(N)." PROGRAMS"..8..Y.21:X.2
0.C(P$).2:.20:.W$P$:P$.P0$.":".D(D)." UN
IQUE IDS".J8..Y.22:X.20.C(P$).2:.20:.P$:
P$.S7$:.30..9...F(I$).132..F(I$).132.502
,602,1102,1302,502,802,902,2018..9...200
2.E9...R$"..PRESS RETURN TO RUN AGAIN":.
".RUN.....":..[9... ** MENU CHOICES..9..
. "SAVE FILE","LOAD FILE","ADD DIR ITEMS
","SORT FILE".Q9... "PRINT CATALOG","SEA
RCH/CHANGE","MEMORY CHECK","QUIT"..9...
** SAVE/LOAD CHOICES.*:... "ARCADE GAMES
","ADVENTURE GAMES","OTHER GAMES","BACKU
P".J:... "BUSINESS","COMMUNICATIONS","ED
UCATION","FAMILY/PERSONAL"..:... "GRAPHI
CS/MUSIC","HOME RELATED","UTILITIES","OT
HER".M: .."**** USER SUPPORTED SOFTWARE
****"..:..."YOU ARE ENCOURAGED TO COPY A
ND SHARE".%;..."THIS PROGRAM WITH OTHER
USERS ON THE".Q;..."CONDITIONS THAT THE
PROGRAM IS NOT ".};..."DISTRIBUTED IN M
ODIFIED FORM, THAT "..;..."NO FEE OR CO
NSIDERATION IS CHARGED, ".U;..."AND THAT
THIS NOTICE IS NOT BYPASSED"..<..."OR R
EMOVED. ".+<..."
IF YOU FIND THIS PROGRAM TO BE ".U<..
." OF VALUE, A CONTRIBUTION TO THE ".<
..." AUTHOR WILL BE APPRECIATED. ".
.<..."FREDIE J. LAYBERGER"..<..."14524 '
N' STREET ".P<..."OMAHA, NE 68137 "
...
> CLICK IMAGE PREVIEW FOR FULL MODAL