DATABASE C64
FILE INFORMATION
FILENAME(S): DATABASE C64
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 19:55:10
APPEARS ON: 1 disk(s)
FILE HASH
0685623f8e65df6398ceedfeb6543b41888cf03ca0a7490003102f4650295f98
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FRA RUN 1 2 3 84 | DATABASE C64 | PRG | Curtcool, Hans Curt | 7 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 0A 00 97 35 33 32 38 31 2C 31 34 20 |.......53281,14 | 00000010: 3A 54 24 B2 22 4E 4F 20 4E 41 4D 45 22 00 63 08 |:T$."NO NAME".c.| 00000020: 14 00 99 22 93 05 46 49 4C 45 20 4E 41 4D 45 22 |..."..FILE NAME"| 00000030: 3A 85 54 24 3A 99 22 11 11 11 11 11 11 20 20 20 |:.T$:."...... | 00000040: 20 20 20 20 20 20 20 20 20 20 20 50 4C 45 41 53 | PLEAS| 00000050: 45 20 57 41 49 54 22 3A 54 24 B2 C8 28 54 24 2C |E WAIT":T$..(T$,| 00000060: 31 34 29 00 99 08 1E 00 4E B2 31 30 30 30 3A 50 |14).....N.1000:P| 00000070: B2 31 3A 58 B2 28 4E AA 31 29 AD 31 30 3A 86 53 |.1:X.(N.1).10:.S| 00000080: 24 28 4E 29 3A 52 24 B2 22 20 4C 49 4E 45 23 22 |$(N):R$." LINE#"| 00000090: 3A 8D 38 31 30 3A 89 38 30 00 A1 08 28 00 4B B2 |:.810:.80...(.K.| 000000A0: 30 00 C7 08 32 00 51 B2 30 3A 99 22 93 05 12 43 |0...2.Q.0:."...C| 000000B0: 41 54 41 4C 4F 47 3A 20 22 3B 54 24 22 11 11 22 |ATALOG: ";T$".."| 000000C0: 3A 99 22 50 41 47 45 00 02 09 3C 00 81 4A B2 4B |:."PAGE...<..J.K| 000000D0: A4 4E 3A 8B C6 28 53 24 28 4A 29 29 B2 31 38 A7 |.N:..(S$(J)).18.| 000000E0: 99 22 9D 22 B5 28 4A AD 31 30 AA 31 29 3B 53 24 |.".".(J.10.1);S$| 000000F0: 28 4A 29 3A 51 B2 51 AA 31 3A 8B 51 B1 31 30 A7 |(J):Q.Q.1:.Q.10.| 00000100: 38 30 00 09 09 46 00 82 4A 00 1A 09 50 00 8D 32 |80...F..J...P..2| 00000110: 36 30 3A 8B 41 B2 30 A7 38 30 00 4C 09 5A 00 91 |60:.A.0.80.L.Z..| 00000120: 41 89 34 30 2C 31 32 30 2C 31 39 30 2C 32 32 30 |A.40,120,190,220| 00000130: 2C 32 39 30 2C 33 36 30 2C 34 31 30 2C 36 37 30 |,290,360,410,670| 00000140: 2C 34 37 30 2C 35 32 30 2C 33 31 30 00 5F 09 64 |,470,520,310._.d| 00000150: 00 8B 4A B3 4E AA 31 A7 4B B2 4A 3A 89 35 30 00 |..J.N.1.K.J:.50.| 00000160: 67 09 6E 00 89 34 30 00 90 09 78 00 99 22 11 11 |g.n..40...x.."..| 00000170: 50 41 47 45 23 22 3A 85 41 24 3A 50 B2 C5 28 41 |PAGE#":.A$:P..(A| 00000180: 24 29 3A 8D 32 37 30 3A 8B 41 B3 B1 30 A7 39 30 |$):.270:.A..0.90| 00000190: 00 A9 09 82 00 8B 50 B3 31 B0 50 B1 58 A7 99 22 |......P.1.P.X.."| 000001A0: 91 91 91 22 3A 89 31 32 30 00 E1 09 8C 00 99 22 |...":.120......"| 000001B0: 12 93 50 41 47 45 22 50 3B 54 24 22 11 11 22 3A |..PAGE"P;T$"..":| 000001C0: 81 49 B2 30 A4 39 3A 4C B2 28 50 AB 31 29 AC 31 |.I.0.9:L.(P.1).1| 000001D0: 30 AA 49 3A 99 22 9D 22 4C 3B 53 24 28 4C 29 3A |0.I:."."L;S$(L):| 000001E0: 82 00 F3 09 96 00 8D 32 36 30 3A 8B 41 B2 30 A7 |.......260:.A.0.| 000001F0: 31 35 30 00 01 0A A0 00 8B 41 B3 B1 31 32 A7 39 |150......A..12.9| 00000200: 30 00 14 0A AA 00 50 B2 50 AA 31 3A 8B 50 B1 58 |0.....P.P.1:.P.X| 00000210: A7 50 B2 31 00 1D 0A B4 00 89 31 34 30 00 50 0A |.P.1......140.P.| 00000220: BE 00 41 24 B2 22 2D 31 22 3A 99 22 11 11 45 4E |..A$."-1":."..EN| 00000230: 54 45 52 22 52 24 3A 85 41 24 3A 4A B2 C5 28 41 |TER"R$:.A$:J..(A| 00000240: 24 29 3A 8D 32 37 30 3A 8B 41 B3 B1 30 A7 39 30 |$):.270:.A..0.90| 00000250: 00 73 0A C8 00 8B 4A B3 30 B0 4A B1 B5 28 58 29 |.s....J.0.J..(X)| 00000260: AC 31 30 AA 31 A7 99 22 91 91 91 91 91 22 3A 89 |.10.1..".....":.| 00000270: 31 39 30 00 84 0A D2 00 85 53 24 28 4A 29 3A 89 |190......S$(J):.| 00000280: 31 31 36 30 00 B8 0A DC 00 41 24 B2 22 2D 31 22 |1160.....A$."-1"| 00000290: 3A 99 22 11 11 49 4E 53 45 52 54 22 52 24 3A 85 |:."..INSERT"R$:.| 000002A0: 41 24 3A 4A B2 C5 28 41 24 29 3A 8D 32 37 30 3A |A$:J..(A$):.270:| 000002B0: 8B 41 B3 B1 30 A7 39 30 00 DB 0A E6 00 8B 4A B3 |.A..0.90......J.| 000002C0: 30 B0 4A B1 B5 28 58 29 AC 31 30 AA 31 A7 99 22 |0.J..(X).10.1.."| 000002D0: 91 91 91 91 91 22 3A 89 32 32 30 00 02 0B F0 00 |.....":.220.....| 000002E0: 99 22 45 4E 54 52 59 22 3A 85 44 24 3A 99 22 49 |."ENTRY":.D$:."I| 000002F0: 4E 53 45 52 54 49 4E 47 22 3A 8B 52 B2 4E A7 31 |NSERTING":.R.N.1| 00000300: 34 30 00 37 0B FA 00 8D 38 36 30 3A 81 49 B2 4B |40.7....860:.I.K| 00000310: 4B A4 4A AA 31 A9 AB 31 3A 53 24 28 49 29 B2 53 |K.J.1..1:S$(I).S| 00000320: 24 28 49 AB 31 29 3A 82 3A 53 24 28 4A 29 B2 44 |$(I.1):.:S$(J).D| 00000330: 24 3A 89 31 31 36 30 00 6D 0B 04 01 45 24 B2 22 |$:.1160.m...E$."| 00000340: 43 2C 50 2C 45 2C 49 2C 4E 2C 53 2C 4C 2C 48 2C |C,P,E,I,N,S,L,H,| 00000350: 4B 2C 41 2C 3F 92 20 22 3A 99 A3 39 29 22 12 11 |K,A,?. ":..9)"..| 00000360: 22 45 24 22 9D 91 91 22 3A 8D 36 33 30 00 98 0B |"E$"...":.630...| 00000370: 0E 01 41 B2 30 3A 81 49 B2 31 A4 31 33 3A 8B CA |..A.0:.I.1.13:..| 00000380: 28 45 24 2C 49 AC 32 AB 31 2C 31 29 B2 41 24 A7 |(E$,I.2.1,1).A$.| 00000390: 41 B2 49 3A 49 B2 31 33 00 A1 0B 18 01 82 49 3A |A.I:I.13......I:| 000003A0: 8E 00 B6 0B 22 01 8D 36 36 30 3A 8B 41 24 B3 B1 |...."..660:.A$..| 000003B0: 22 59 22 A7 34 30 00 D8 0B 2C 01 99 22 4E 45 57 |"Y".40...,.."NEW| 000003C0: 20 46 49 4C 45 20 4E 41 4D 45 22 3A 85 54 24 3A | FILE NAME":.T$:| 000003D0: 8D 38 31 30 3A 89 34 30 00 09 0C 36 01 99 22 93 |.810:.40...6..".| 000003E0: 12 43 92 41 54 41 4C 4F 47 11 22 3A 99 22 43 41 |.C.ATALOG.":."CA| 000003F0: 4C 4C 20 12 50 92 41 47 45 11 22 3A 99 22 12 49 |LL .P.AGE.":.".I| 00000400: 92 4E 53 45 52 54 22 52 24 00 4A 0C 40 01 99 22 |.NSERT"R$.J.@.."| 00000410: 11 12 45 92 4E 54 45 52 22 52 24 3A 99 22 11 12 |..E.NTER"R$:."..| 00000420: 4B 92 49 4C 4C 22 52 24 3A 99 22 11 12 41 92 4C |K.ILL"R$:."..A.L| 00000430: 50 48 41 42 45 54 49 5A 45 11 22 3A 99 22 12 4E |PHABETIZE.":.".N| 00000440: 92 45 57 20 46 49 4C 45 11 22 00 86 0C 4A 01 99 |.EW FILE."...J..| 00000450: 22 12 4C 92 4F 41 44 20 46 52 4F 4D 20 54 41 50 |".L.OAD FROM TAP| 00000460: 45 20 4F 52 20 44 49 53 43 22 3A 99 22 11 12 53 |E OR DISC":."..S| 00000470: 92 41 56 45 20 54 4F 20 54 41 50 45 20 4F 52 20 |.AVE TO TAPE OR | 00000480: 44 49 53 43 11 22 00 C4 0C 54 01 99 22 12 3F 92 |DISC."...T..".?.| 00000490: 20 44 45 46 49 4E 49 54 49 4F 4E 53 22 3A 99 22 | DEFINITIONS":."| 000004A0: 11 12 48 92 20 4C 49 53 54 20 54 4F 20 50 52 49 |..H. LIST TO PRI| 000004B0: 4E 54 45 52 91 22 3A 8D 32 36 30 3A 8B 41 B2 30 |NTER.":.260:.A.0| 000004C0: A7 33 31 30 00 CC 0C 5E 01 89 39 30 00 FB 0C 68 |.310...^..90...h| 000004D0: 01 99 22 93 90 53 41 56 45 20 54 4F 20 54 41 50 |.."..SAVE TO TAP| 000004E0: 45 20 4F 52 20 44 49 53 43 22 3A 8D 36 36 30 3A |E OR DISC":.660:| 000004F0: 8B 41 24 B3 B1 22 59 22 A7 34 30 00 25 0D 72 01 |.A$.."Y".40.%.r.| 00000500: 99 22 12 44 92 49 53 43 20 4F 52 20 12 54 92 41 |.".D.ISC OR .T.A| 00000510: 50 45 3F 22 3A 8D 36 33 30 3A 8B 41 24 B2 22 54 |PE?":.630:.A$."T| 00000520: 22 A7 34 30 30 00 35 0D 7C 01 8B 41 24 B3 B1 22 |".400.5.|..A$.."| 00000530: 44 22 A7 34 30 00 5B 0D 86 01 9F 32 2C 38 2C 32 |D".40.[....2,8,2| 00000540: 2C 22 40 30 3A 22 AA 54 24 AA 22 20 D8 2C 53 2C |,"@0:".T$." .,S,| 00000550: 57 22 3A 4A B2 32 3A 89 38 39 30 00 72 0D 90 01 |W":J.2:.890.r...| 00000560: 9F 31 2C 31 2C 31 2C 54 24 3A 4A B2 31 3A 89 38 |.1,1,1,T$:J.1:.8| 00000570: 39 30 00 A3 0D 9A 01 99 22 93 12 4C 4F 41 44 20 |90......"..LOAD | 00000580: 46 52 4F 4D 20 54 41 50 45 20 4F 52 20 44 49 53 |FROM TAPE OR DIS| 00000590: 43 22 3A 8D 36 36 30 3A 8B 41 24 B3 B1 22 59 22 |C":.660:.A$.."Y"| 000005A0: A7 34 30 00 CD 0D A4 01 99 22 12 44 92 49 53 43 |.40......".D.ISC| 000005B0: 20 4F 52 20 12 54 92 41 50 45 3F 22 3A 8D 36 33 | OR .T.APE?":.63| 000005C0: 30 3A 8B 41 24 B2 22 54 22 A7 34 36 30 00 DD 0D |0:.A$."T".460...| 000005D0: AE 01 8B 41 24 B3 B1 22 44 22 A7 34 30 00 03 0E |...A$.."D".40...| 000005E0: B8 01 8D 39 37 30 3A 99 22 11 46 49 4C 45 20 4E |...970:.".FILE N| 000005F0: 41 4D 45 3F 22 3A 85 4E 24 3A 8B 4E 24 B2 22 22 |AME?":.N$:.N$.""| 00000600: A7 34 30 00 28 0E C2 01 9F 32 2C 38 2C 32 2C 22 |.40.(....2,8,2,"| 00000610: 30 3A 22 AA 4E 24 AA 22 20 D8 2C 53 2C 52 22 3A |0:".N$." .,S,R":| 00000620: 4A B2 32 3A 89 39 33 30 00 3C 0E CC 01 9F 31 2C |J.2:.930.<....1,| 00000630: 31 2C 30 3A 4A B2 31 3A 89 39 33 30 00 66 0E D6 |1,0:J.1:.930.f..| 00000640: 01 99 22 11 11 4B 49 4C 4C 22 52 24 3A 85 41 24 |.."..KILL"R$:.A$| 00000650: 3A 4A B2 C5 28 41 24 29 3A 8D 32 37 30 3A 8B 41 |:J..(A$):.270:.A| 00000660: B3 B1 30 A7 39 30 00 7E 0E E0 01 8B 4A B3 30 B0 |..0.90.~....J.0.| 00000670: 4A B1 4E A7 99 22 91 91 22 3A 89 34 37 30 00 AD |J.N.."..":.470..| 00000680: 0E EA 01 81 49 B2 4A A4 4E AB 31 3A 8B 53 24 28 |....I.J.N.1:.S$(| 00000690: 49 29 B2 22 C0 22 AF 53 24 28 49 AA 31 29 B2 22 |I).".".S$(I.1)."| 000006A0: C0 22 A7 49 B2 4E AB 31 3A 89 35 31 30 00 C4 0E |.".I.N.1:.510...| 000006B0: F4 01 53 24 28 49 29 B2 53 24 28 49 AA 31 29 3A |..S$(I).S$(I.1):| 000006C0: 8D 36 35 30 00 D9 0E FE 01 82 3A 53 24 28 4E 29 |.650......:S$(N)| 000006D0: B2 22 C0 22 3A 89 31 34 30 00 0B 0F 08 02 99 22 |.".":.140......"| 000006E0: 11 11 41 4C 50 48 41 42 45 54 49 5A 45 20 20 22 |..ALPHABETIZE "| 000006F0: 3B 3A 8D 38 32 30 3A 55 B2 C5 28 41 24 29 3A 8B |;:.820:U..(A$):.| 00000700: 55 B3 30 B0 55 B1 4E A7 89 38 30 00 27 0F 12 02 |U.0.U.N..80.'...| 00000710: 8B CA 28 53 24 28 55 29 2C 31 2C 31 29 B2 22 12 |..(S$(U),1,1).".| 00000720: 22 A7 55 B2 55 AA 31 00 5E 0F 1C 02 8D 38 33 30 |".U.U.1.^....830| 00000730: 3A 4B B2 30 3A 81 49 B2 55 A4 4B 4B 3A 8B C8 28 |:K.0:.I.U.KK:..(| 00000740: 28 53 24 28 49 29 29 2C 31 29 B2 22 12 22 A7 4B |(S$(I)),1).".".K| 00000750: B2 31 3A 4E 4E B2 49 AB 31 3A 49 B2 4B 4B 00 6E |.1:NN.I.1:I.KK.n| 00000760: 0F 26 02 82 49 3A 8B 4B B2 31 A7 35 37 30 00 78 |.&..I:.K.1.570.x| 00000770: 0F 30 02 4E 4E B2 4B 4B 00 80 0F 3A 02 49 B2 30 |.0.NN.KK...:.I.0| 00000780: 00 94 0F 44 02 4A B2 55 3A 8B 49 B2 4E 4E AB 55 |...D.J.U:.I.NN.U| 00000790: A7 31 34 30 00 A4 0F 4E 02 8B 4A B2 4E 4E AB 49 |.140...N..J.NN.I| 000007A0: A7 36 32 30 00 DB 0F 58 02 8B 53 24 28 4A 29 B1 |.620...X..S$(J).| 000007B0: 53 24 28 4A AA 31 29 A7 54 50 24 B2 53 24 28 4A |S$(J.1).TP$.S$(J| 000007C0: 29 3A 53 24 28 4A 29 B2 53 24 28 4A AA 31 29 3A |):S$(J).S$(J.1):| 000007D0: 53 24 28 4A AA 31 29 B2 54 50 24 00 EA 0F 62 02 |S$(J.1).TP$...b.| 000007E0: 4A B2 4A AA 31 3A 89 35 39 30 00 0D 10 6C 02 49 |J.J.1:.590...l.I| 000007F0: B2 49 AA 31 3A 97 35 33 32 38 30 2C B5 28 BB 28 |.I.1:.53280,.(.(| 00000800: 4B 29 AC 31 35 AA 31 29 3A 89 35 38 30 00 20 10 |K).15.1):.580. .| 00000810: 76 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 36 33 30 |v..A$:.A$."".630| 00000820: 00 26 10 80 02 8E 00 37 10 8A 02 99 22 13 22 A3 |.&.....7....".".| 00000830: 33 30 29 3B 49 3A 8E 00 5A 10 94 02 99 22 11 11 |30);I:..Z...."..| 00000840: 12 41 52 45 20 59 4F 55 20 53 55 52 45 3F 20 59 |.ARE YOU SURE? Y| 00000850: 2F 4E 22 3A 8D 36 33 30 3A 8E 00 7E 10 9E 02 99 |/N":.630:..~....| 00000860: 22 93 12 48 41 52 44 20 43 4F 50 59 22 3A 8D 36 |"..HARD COPY":.6| 00000870: 36 30 3A 8B 41 24 B3 B1 22 59 22 A7 34 30 00 AC |60:.A$.."Y".40..| 00000880: 10 A8 02 99 22 45 4E 54 49 52 45 20 46 49 4C 45 |...."ENTIRE FILE| 00000890: 3F 22 3A 8D 36 33 30 3A 8B 41 24 B2 22 59 22 A7 |?":.630:.A$."Y".| 000008A0: 46 B2 30 3A 4D B2 4E 3A 89 37 31 30 00 CA 10 B2 |F.0:M.N:.710....| 000008B0: 02 8D 38 32 30 3A 46 B2 C5 28 41 24 29 3A 8B 46 |..820:F..(A$):.F| 000008C0: B3 30 B0 46 B1 4E 89 36 37 30 00 F8 10 BC 02 99 |.0.F.N.670......| 000008D0: 22 45 4E 44 49 4E 47 22 52 24 3A 85 41 24 3A 4D |"ENDING"R$:.A$:M| 000008E0: B2 C5 28 41 24 29 3A 8B 4D B3 30 B0 4D B1 4E B0 |..(A$):.M.0.M.N.| 000008F0: 4D B2 B3 46 A7 36 37 30 00 1C 11 C6 02 9F 34 2C |M..F.670......4,| 00000900: 34 3A 41 24 B2 22 22 3A 81 49 B2 31 A4 B5 28 28 |4:A$."":.I.1..((| 00000910: 34 30 AB C3 28 54 24 29 29 AD 32 29 00 52 11 D0 |40..(T$)).2).R..| 00000920: 02 41 24 B2 41 24 AA 22 20 22 3A 82 49 3A 41 24 |.A$.A$." ":.I:A$| 00000930: B2 41 24 AA 22 92 22 3A 98 34 2C C7 28 31 34 29 |.A$.".":.4,.(14)| 00000940: 41 24 AA 54 24 AA 46 24 C7 28 31 30 29 C7 28 31 |A$.T$.F$.(10).(1| 00000950: 30 29 00 76 11 DA 02 4C 4C B2 34 3A 81 49 B2 4B |0).v...LL.4:.I.K| 00000960: A4 4E 3A 8B C8 28 53 24 28 49 29 2C 31 29 B2 22 |.N:..(S$(I),1)."| 00000970: 12 22 A7 37 36 30 00 A8 11 E4 02 8B 53 24 28 49 |.".760......S$(I| 00000980: 29 B3 B1 22 C0 22 A7 98 34 2C C7 28 31 35 29 22 |).."."..4,.(15)"| 00000990: 20 20 20 20 20 22 53 24 28 49 29 C7 28 31 30 29 | "S$(I).(10)| 000009A0: 3A 4C 4C B2 4C 4C AA 32 00 B1 11 EE 02 89 37 39 |:LL.LL.2......79| 000009B0: 30 00 DD 11 F8 02 41 24 B2 22 22 3A 81 4B 4B B2 |0.....A$."":.KK.| 000009C0: 37 A4 C3 28 53 24 28 49 29 29 AC 36 3A 41 24 B2 |7..(S$(I)).6:A$.| 000009D0: 41 24 AA C7 28 32 35 35 29 3A 82 4B 4B 00 08 12 |A$..(255):.KK...| 000009E0: 02 03 98 34 2C 22 20 20 20 20 20 22 47 24 AA 41 |...4," "G$.A| 000009F0: 24 3A 98 34 2C 46 24 AA 22 20 20 20 20 20 22 AA |$:.4,F$." ".| 00000A00: 53 24 28 49 29 AA 47 24 00 30 12 0C 03 98 34 2C |S$(I).G$.0....4,| 00000A10: 46 24 AA 22 20 20 20 20 20 22 AA 47 24 AA 41 24 |F$." ".G$.A$| 00000A20: AA 46 24 C7 28 31 30 29 3A 4C 4C B2 4C 4C AA 34 |.F$.(10):LL.LL.4| 00000A30: 00 5E 12 16 03 8B 4C 4C B1 35 39 A7 81 4E 4C B2 |.^....LL.59..NL.| 00000A40: 4C 4C A4 37 32 3A 98 34 2C C7 28 31 30 29 3B 3A |LL.72:.4,.(10);:| 00000A50: 82 4E 4C 3A 98 34 2C 22 22 3A 4C 4C B2 33 00 6C |.NL:.4,"":LL.3.l| 00000A60: 12 20 03 82 49 3A A0 34 3A 89 34 30 00 86 12 2A |. ..I:.4:.40...*| 00000A70: 03 81 4A B2 30 A4 4E 3A 53 24 28 4A 29 B2 22 C0 |..J.0.N:S$(J).".| 00000A80: 22 3A 82 4A 3A 8E 00 9E 12 34 03 99 22 53 54 41 |":.J:....4.."STA| 00000A90: 52 54 49 4E 47 22 52 24 3A 85 41 24 3A 8E 00 C6 |RTING"R$:.A$:...| 00000AA0: 12 3E 03 81 49 B2 4E A4 30 A9 AB 31 3A 8B 53 24 |.>..I.N.0..1:.S$| 00000AB0: 28 49 29 B3 B1 22 C0 22 A7 4B 4B B2 49 3A 49 B2 |(I)..".".KK.I:I.| 00000AC0: 30 3A 89 38 35 30 00 CF 12 48 03 4B 4B B2 49 00 |0:.850...H.KK.I.| 00000AD0: D8 12 52 03 82 49 3A 8E 00 FE 12 5C 03 81 49 B2 |..R..I:....\..I.| 00000AE0: 4A AA 31 A4 4E 3A 8B 53 24 28 49 29 B2 22 C0 22 |J.1.N:.S$(I)."."| 00000AF0: A7 4B 4B B2 49 3A 49 B2 4E 3A 89 38 35 30 00 07 |.KK.I:I.N:.850..| 00000B00: 13 66 03 4B 4B B2 49 00 10 13 70 03 82 49 3A 8E |.f.KK.I...p..I:.| 00000B10: 00 32 13 7A 03 81 49 B2 4E A4 30 A9 AB 31 3A 4B |.2.z..I.N.0..1:K| 00000B20: B2 49 3A 8B 53 24 28 49 29 B3 B1 22 C0 22 A7 49 |.I:.S$(I)..".".I| 00000B30: B2 30 00 3F 13 84 03 82 49 3A 4B B2 4B AA 31 00 |.0.?....I:K.K.1.| 00000B40: 5A 13 8E 03 98 4A 2C 54 24 AA 22 20 D8 22 3A 98 |Z....J,T$." .":.| 00000B50: 4A 2C 4B 3A 81 49 B2 30 A4 4B 00 75 13 98 03 98 |J,K:.I.0.K.u....| 00000B60: 4A 2C 53 24 28 49 29 3A 8D 36 35 30 3A 82 3A A0 |J,S$(I):.650:.:.| 00000B70: 4A 3A 89 34 30 00 AA 13 A2 03 84 4A 2C 4E 24 3A |J:.40......J,N$:| 00000B80: 8B C9 28 4E 24 2C 32 29 B3 B1 22 20 D8 22 A7 99 |..(N$,2).." ."..| 00000B90: 4E 24 22 20 4E 4F 54 20 46 4F 55 4E 44 22 3A 8D |N$" NOT FOUND":.| 00000BA0: 36 33 30 3A A0 4A 3A 89 34 30 00 D8 13 AC 03 54 |630:.J:.40.....T| 00000BB0: 24 B2 4E 24 3A 54 24 B2 C8 28 54 24 2C C3 28 54 |$.N$:T$..(T$,.(T| 00000BC0: 24 29 AB 32 29 3A 99 22 11 12 46 4F 55 4E 44 20 |$).2):."..FOUND | 00000BD0: 22 54 24 3A 84 4A 2C 4B 00 23 14 B6 03 8B 4B B1 |"T$:.J,K.#....K.| 00000BE0: 4E A7 99 22 11 12 57 41 52 4E 49 4E 47 3A 22 3A |N.."..WARNING:":| 00000BF0: 99 22 46 49 4C 45 20 4F 52 49 47 49 4E 41 54 45 |."FILE ORIGINATE| 00000C00: 44 20 46 52 4F 4D 20 20 56 49 43 20 57 49 54 48 |D FROM VIC WITH| 00000C10: 20 4C 41 52 47 45 52 20 4D 45 4D 4F 52 59 22 3A | LARGER MEMORY":| 00000C20: 4B B2 4E 00 45 14 C0 03 81 49 B2 30 A4 4B 3A 84 |K.N.E....I.0.K:.| 00000C30: 4A 2C 53 24 28 49 29 3A 8D 36 35 30 3A 82 3A A0 |J,S$(I):.650:.:.| 00000C40: 4A 3A 89 34 30 00 73 14 CA 03 99 22 12 93 44 49 |J:.40.s...."..DI| 00000C50: 53 43 20 46 49 4C 45 20 4C 49 53 54 49 4E 47 3F |SC FILE LISTING?| 00000C60: 20 11 22 3A 8D 36 33 30 3A 8B 41 24 B3 B1 22 59 | .":.630:.A$.."Y| 00000C70: 22 A7 8E 00 8B 14 D4 03 99 22 93 12 53 43 41 4E |"........"..SCAN| 00000C80: 4E 49 4E 47 20 44 49 53 43 11 22 00 9B 14 DE 03 |NING DISC.".....| 00000C90: 9F 31 2C 38 2C 30 2C 22 24 30 22 00 A9 14 E8 03 |.1,8,0,"$0".....| 00000CA0: A1 23 31 2C 41 24 2C 42 24 00 B7 14 F2 03 A1 23 |.#1,A$,B$......#| 00000CB0: 31 2C 41 24 2C 42 24 00 C5 14 FC 03 A1 23 31 2C |1,A$,B$......#1,| 00000CC0: 41 24 2C 42 24 00 CD 14 06 04 43 B2 30 00 E2 14 |A$,B$.....C.0...| 00000CD0: 10 04 8B 20 41 24 B3 B1 22 22 A7 43 B2 C6 28 41 |... A$.."".C..(A| 00000CE0: 24 29 00 FD 14 1A 04 8B 20 42 24 B3 B1 22 22 A7 |$)...... B$.."".| 00000CF0: 43 B2 43 AA C6 28 42 24 29 AC 32 35 36 00 19 15 |C.C..(B$).256...| 00000D00: 24 04 44 24 B2 44 24 AA 22 12 22 AA CA 28 C4 28 |$.D$.D$."."..(.(| 00000D10: 43 29 2C 32 29 AA 22 92 22 00 32 15 2E 04 A1 23 |C),2).".".2....#| 00000D20: 31 2C 42 24 3A 8B 53 54 B3 B1 30 A7 A0 31 3A 99 |1,B$:.ST..0..1:.| 00000D30: 3A 8E 00 47 15 38 04 8B 20 42 24 B3 B1 C7 28 33 |:..G.8.. B$...(3| 00000D40: 34 29 A7 31 30 37 30 00 6D 15 42 04 A1 23 31 2C |4).1070.m.B..#1,| 00000D50: 42 24 3A 8B 20 42 24 B3 B1 C7 28 33 34 29 A7 44 |B$:. B$...(34).D| 00000D60: 24 B2 44 24 AA 42 24 3A 89 31 30 39 30 00 87 15 |$.D$.B$:.1090...| 00000D70: 4C 04 A1 23 31 2C 42 24 3A 8B 42 24 B2 C7 28 33 |L..#1,B$:.B$..(3| 00000D80: 32 29 A7 31 31 30 30 00 91 15 56 04 43 24 B2 22 |2).1100...V.C$."| 00000D90: 22 00 B2 15 60 04 43 24 B2 43 24 AA 42 24 3A A1 |"...`.C$.C$.B$:.| 00000DA0: 23 31 2C 42 24 3A 8B 42 24 B3 B1 22 22 A7 31 31 |#1,B$:.B$.."".11| 00000DB0: 32 30 00 C7 15 6A 04 8B C9 28 44 24 2C 31 29 B2 |20...j...(D$,1).| 00000DC0: 22 D8 22 A7 99 44 24 00 D7 15 74 04 44 24 B2 22 |"."..D$...t.D$."| 00000DD0: 22 3A 89 31 30 31 30 00 1B 16 7E 04 59 B2 59 AB |":.1010...~.Y.Y.| 00000DE0: 31 3A 81 49 B2 30 A4 43 3A 43 24 28 49 2C 50 25 |1:.I.0.C:C$(I,P%| 00000DF0: 28 4C 29 29 B2 22 C0 22 3A 82 49 3A 81 49 B2 4C |(L)).".":.I:.I.L| 00000E00: A4 59 3A 50 25 28 49 29 B2 50 25 28 49 AA 31 29 |.Y:P%(I).P%(I.1)| 00000E10: 3A 82 49 3A 4C B2 4C AB 31 3A 8E 00 4D 16 88 04 |:.I:L.L.1:..M...| 00000E20: 8B C8 28 53 24 28 4A 29 2C 31 29 B2 22 5F 22 A7 |..(S$(J),1)."_".| 00000E30: 53 24 28 4A 29 B2 22 12 22 AA C9 28 53 24 28 4A |S$(J)."."..(S$(J| 00000E40: 29 2C C3 28 53 24 28 4A 29 29 AB 31 29 00 56 16 |),.(S$(J)).1).V.| 00000E50: 92 04 89 31 34 30 00 00 00 |...140... |
.......53281,14 :T$."NO NAME".C...."..FI LE NAME":.T$:."...... PLEAS E WAIT":T$.H(T$,14).....N.1000:P.1:X.(N. 1).10:.S$(N):R$." LINE#":.810:.80...(.K. 0.G.2.Q.0:."...CATALOG: ";T$"..":."PAGE. ..<..J.K.N:.F(S$(J)).18..".".(J.10.1);S$ (J):Q.Q.1:.Q.10.80...F..J...P..260:.A.0. 80.L.Z..A.40,120,190,220,290,360,410,670 ,470,520,310._.D..J.N.1.K.J:.50.G.N..40. ..X.."..PAGE#":.A$:P.E(A$):.270:.A..0.90 ......P.1.P.X.."...":.120......"..PAGE"P ;T$"..":.I.0.9:L.(P.1).10.I:."."L;S$(L): .......260:.A.0.150... ..A..12.90.....P. P.1:.P.X.P.1......140.P...A$."-1":."..EN TER"R$:.A$:J.E(A$):.270:.A..0.90.S.H..J. 0.J..(X).10.1..".....":.190...R..S$(J):. 1160.....A$."-1":."..INSERT"R$:.A$:J.E(A $):.270:.A..0.90......J.0.J..(X).10.1.." .....":.220......"ENTRY":.D$:."INSERTING ":.R.N.140.7....860:.I.KK.J.1..1:S$(I).S $(I.1):.:S$(J).D$:.1160.M...E$."C,P,E,I, N,S,L,H,K,A,?. ":..9)".."E$"...":.630... ..A.0:.I.1.13:.J(E$,I.2.1,1).A$.A.I:I.13 ......I:...."..660:.A$.."Y".40.X.,.."NEW FILE NAME":.T$:.810:.40...6.."..C.ATALO G.":."CALL .P.AGE.":.".I.NSERT"R$.J.@.." ..E.NTER"R$:."..K.ILL"R$:."..A.LPHABETIZ E.":.".N.EW FILE."...J..".L.OAD FROM TAP E OR DISC":."..S.AVE TO TAPE OR DISC.".D .T..".?. DEFINITIONS":."..H. LIST TO PRI NTER.":.260:.A.0.310.L.^..90...H.."..SAV E TO TAPE OR DISC":.660:.A$.."Y".40.%.R. .".D.ISC OR .T.APE?":.630:.A$."T".400.5. |..A$.."D".40.[....2,8,2,"@0:".T$." X,S, W":J.2:.890.R....1,1,1,T$:J.1:.890...... "..LOAD FROM TAPE OR DISC":.660:.A$.."Y" .40.M....".D.ISC OR .T.APE?":.630:.A$."T ".460......A$.."D".40......970:.".FILE N AME?":.N$:.N$."".40.(.B..2,8,2,"0:".N$." X,S,R":J.2:.930.<.L..1,1,0:J.1:.930.F.V .."..KILL"R$:.A$:J.E(A$):.270:.A..0.90.~ ....J.0.J.N.."..":.470......I.J.N.1:.S$( I).".".S$(I.1).".".I.N.1:.510.D...S$(I). S$(I.1):.650.Y....:S$(N).".":.140......" ..ALPHABETIZE ";:.820:U.E(A$):.U.0.U.N. .80.'....J(S$(U),1,1).".".U.U.1.^....830 :K.0:.I.U.KK:.H((S$(I)),1).".".K.1:NN.I. 1:I.KK.N.&..I:.K.1.570.X.0.NN.KK...:.I.0 ...D.J.U:.I.NN.U.140...N..J.NN.I.620...X ..S$(J).S$(J.1).TP$.S$(J):S$(J).S$(J.1): S$(J.1).TP$...B.J.J.1:.590...L.I.I.1:.53 280,.(.(K).15.1):.580. .V..A$:.A$."".630 .&.....7....".".30);I:..Z...."...ARE YOU SURE? Y/N":.630:..~...."..HARD COPY":.6 60:.A$.."Y".40......"ENTIRE FILE?":.630: .A$."Y".F.0:M.N:.710.J....820:F.E(A$):.F .0.F.N.670......"ENDING"R$:.A$:M.E(A$):. M.0.M.N.M..F.670...F..4,4:A$."":.I.1..(( 40.C(T$)).2).R.P.A$.A$." ":.I:A$.A$.".": .4,G(14)A$.T$.F$G(10)G(10).V.Z.LL.4:.I.K .N:.H(S$(I),1).".".760......S$(I)..".".. 4,G(15)" "S$(I)G(10):LL.LL.2......79 0.....A$."":.KK.7.C(S$(I)).6:A$.A$.G(255 ):.KK......4," "G$.A$:.4,F$." ". S$(I).G$.0....4,F$." ".G$.A$.F$G(10) :LL.LL.4.^....LL.59..NL.LL.72:.4,G(10);: .NL:.4,"":LL.3.L. ..I: 4:.40...*..J.0.N: S$(J).".":.J:....4.."STARTING"R$:.A$:..F .>..I.N.0..1:.S$(I)..".".KK.I:I.0:.850.O .H.KK.I.X.R..I:....\..I.J.1.N:.S$(I)."." .KK.I:I.N:.850...F.KK.I...P..I:..2.Z..I. N.0..1:K.I:.S$(I)..".".I.0.?....I:K.K.1. Z....J,T$." X":.J,K:.I.0.K.U....J,S$(I): .650:.: J:.40......J,N$:.I(N$,2).." X".. N$" NOT FOUND":.630: J:.40.X...T$.N$:T$. H(T$,C(T$).2):."..FOUND "T$:.J,K.#....K. N.."..WARNING:":."FILE ORIGINATED FROM VIC WITH LARGER MEMORY":K.N.E....I.0.K:. J,S$(I):.650:.: J:.40.S.J.."..DISC FILE LISTING? .":.630:.A$.."Y".....T.."..SCAN NING DISC."......1,8,0,"$0"......#1,A$,B $......#1,A$,B$.E....#1,A$,B$.M...C.0... ... A$.."".C.F(A$)...... B$.."".C.C.F(B$ ).256...$.D$.D$.".".J(D(C),2).".".2....# 1,B$:.ST..0. 1:.:..G.8.. B$..G(34).1070. M.B..#1,B$:. B$..G(34).D$.D$.B$:.1090... L..#1,B$:.B$.G(32).1100...V.C$.""...`.C$ .C$.B$:.#1,B$:.B$.."".1120.G.J..I(D$,1). "X"..D$.W.T.D$."":.1010...~.Y.Y.1:.I.0.C :C$(I,P%(L)).".":.I:.I.L.Y:P%(I).P%(I.1) :.I:L.L.1:..M....H(S$(J),1)."_".S$(J).". ".I(S$(J),C(S$(J)).1).V....140...
> CLICK IMAGE PREVIEW FOR FULL MODAL