FILE CASE
FILE INFORMATION
FILENAME(S): FILE CASE
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 17:31:36
APPEARS ON: 1 disk(s)
FILE HASH
9e9b1cdde229da39249b7a9777112dd073a4be693d8c1b9a2f308c8687123e26
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0016UT | FILE CASE | PRG | UK CD | 25 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 97 35 33 32 38 31 2C 31 20 3A |.......53281,1 :|
00000010: 54 24 B2 22 1C 4E 4F 20 4E 41 4D 45 90 22 00 5C |T$.".NO NAME.".\|
00000020: 08 14 00 99 22 93 1C 46 49 4C 45 20 4E 41 4D 45 |...."..FILE NAME|
00000030: 22 3A 85 54 24 3A 99 22 11 11 11 11 11 11 22 A3 |":.T$:."......".|
00000040: 31 34 29 22 50 4C 45 41 53 45 20 57 41 49 54 22 |14)"PLEASE WAIT"|
00000050: 3A 54 24 B2 C8 28 54 24 2C 31 34 29 00 92 08 1E |:T$..(T$,14)....|
00000060: 00 4E B2 31 30 30 30 3A 50 B2 31 3A 58 B2 28 4E |.N.1000:P.1:X.(N|
00000070: AA 31 29 AD 31 30 3A 86 53 24 28 4E 29 3A 52 24 |.1).10:.S$(N):R$|
00000080: B2 22 20 4C 49 4E 45 23 22 3A 8D 38 31 30 3A 89 |." LINE#":.810:.|
00000090: 38 30 00 9A 08 28 00 4B B2 30 00 C0 08 32 00 51 |80...(.K.0...2.Q|
000000A0: B2 30 3A 99 22 93 90 12 43 41 54 41 4C 4F 47 3A |.0:."...CATALOG:|
000000B0: 20 22 3B 54 24 22 11 11 22 3A 99 22 50 41 47 45 | ";T$"..":."PAGE|
000000C0: 00 FB 08 3C 00 81 4A B2 4B A4 4E 3A 8B C6 28 53 |...<..J.K.N:..(S|
000000D0: 24 28 4A 29 29 B2 31 38 A7 99 22 9D 22 B5 28 4A |$(J)).18..".".(J|
000000E0: AD 31 30 AA 31 29 3B 53 24 28 4A 29 3A 51 B2 51 |.10.1);S$(J):Q.Q|
000000F0: AA 31 3A 8B 51 B1 31 30 A7 38 30 00 02 09 46 00 |.1:.Q.10.80...F.|
00000100: 82 4A 00 13 09 50 00 8D 32 36 30 3A 8B 41 B2 30 |.J...P..260:.A.0|
00000110: A7 38 30 00 45 09 5A 00 91 41 89 34 30 2C 31 32 |.80.E.Z..A.40,12|
00000120: 30 2C 31 39 30 2C 32 32 30 2C 32 39 30 2C 33 36 |0,190,220,290,36|
00000130: 30 2C 34 31 30 2C 36 37 30 2C 34 37 30 2C 35 32 |0,410,670,470,52|
00000140: 30 2C 33 31 30 00 58 09 64 00 8B 4A B3 4E AA 31 |0,310.X.d..J.N.1|
00000150: A7 4B B2 4A 3A 89 35 30 00 60 09 6E 00 89 34 30 |.K.J:.50.`.n..40|
00000160: 00 89 09 78 00 99 22 11 11 50 41 47 45 23 22 3A |...x.."..PAGE#":|
00000170: 85 41 24 3A 50 B2 C5 28 41 24 29 3A 8D 32 37 30 |.A$:P..(A$):.270|
00000180: 3A 8B 41 B3 B1 30 A7 39 30 00 A2 09 82 00 8B 50 |:.A..0.90......P|
00000190: B3 31 B0 50 B1 58 A7 99 22 91 91 91 22 3A 89 31 |.1.P.X.."...":.1|
000001A0: 32 30 00 DA 09 8C 00 99 22 12 93 50 41 47 45 22 |20......"..PAGE"|
000001B0: 50 3B 54 24 22 11 11 22 3A 81 49 B2 30 A4 39 3A |P;T$"..":.I.0.9:|
000001C0: 4C B2 28 50 AB 31 29 AC 31 30 AA 49 3A 99 22 9D |L.(P.1).10.I:.".|
000001D0: 22 4C 3B 53 24 28 4C 29 3A 82 00 EC 09 96 00 8D |"L;S$(L):.......|
000001E0: 32 36 30 3A 8B 41 B2 30 A7 31 35 30 00 FA 09 A0 |260:.A.0.150....|
000001F0: 00 8B 41 B3 B1 31 32 A7 39 30 00 0D 0A AA 00 50 |..A..12.90.....P|
00000200: B2 50 AA 31 3A 8B 50 B1 58 A7 50 B2 31 00 16 0A |.P.1:.P.X.P.1...|
00000210: B4 00 89 31 34 30 00 49 0A BE 00 41 24 B2 22 2D |...140.I...A$."-|
00000220: 31 22 3A 99 22 11 11 45 4E 54 45 52 22 52 24 3A |1":."..ENTER"R$:|
00000230: 85 41 24 3A 4A B2 C5 28 41 24 29 3A 8D 32 37 30 |.A$:J..(A$):.270|
00000240: 3A 8B 41 B3 B1 30 A7 39 30 00 6C 0A C8 00 8B 4A |:.A..0.90.l....J|
00000250: B3 30 B0 4A B1 B5 28 58 29 AC 31 30 AA 31 A7 99 |.0.J..(X).10.1..|
00000260: 22 91 91 91 91 91 22 3A 89 31 39 30 00 7D 0A D2 |".....":.190.}..|
00000270: 00 85 53 24 28 4A 29 3A 89 31 31 36 30 00 B1 0A |..S$(J):.1160...|
00000280: DC 00 41 24 B2 22 2D 31 22 3A 99 22 11 11 49 4E |..A$."-1":."..IN|
00000290: 53 45 52 54 22 52 24 3A 85 41 24 3A 4A B2 C5 28 |SERT"R$:.A$:J..(|
000002A0: 41 24 29 3A 8D 32 37 30 3A 8B 41 B3 B1 30 A7 39 |A$):.270:.A..0.9|
000002B0: 30 00 D4 0A E6 00 8B 4A B3 30 B0 4A B1 B5 28 58 |0......J.0.J..(X|
000002C0: 29 AC 31 30 AA 31 A7 99 22 91 91 91 91 91 22 3A |).10.1..".....":|
000002D0: 89 32 32 30 00 FB 0A F0 00 99 22 45 4E 54 52 59 |.220......"ENTRY|
000002E0: 22 3A 85 44 24 3A 99 22 49 4E 53 45 52 54 49 4E |":.D$:."INSERTIN|
000002F0: 47 22 3A 8B 52 B2 4E A7 31 34 30 00 30 0B FA 00 |G":.R.N.140.0...|
00000300: 8D 38 36 30 3A 81 49 B2 4B 4B A4 4A AA 31 A9 AB |.860:.I.KK.J.1..|
00000310: 31 3A 53 24 28 49 29 B2 53 24 28 49 AB 31 29 3A |1:S$(I).S$(I.1):|
00000320: 82 3A 53 24 28 4A 29 B2 44 24 3A 89 31 31 36 30 |.:S$(J).D$:.1160|
00000330: 00 66 0B 04 01 45 24 B2 22 43 2C 50 2C 45 2C 49 |.f...E$."C,P,E,I|
00000340: 2C 4E 2C 53 2C 4C 2C 48 2C 4B 2C 41 2C 3F 92 20 |,N,S,L,H,K,A,?. |
00000350: 22 3A 99 A3 39 29 22 12 11 22 45 24 22 9D 91 91 |":..9)".."E$"...|
00000360: 22 3A 8D 36 33 30 00 91 0B 0E 01 41 B2 30 3A 81 |":.630.....A.0:.|
00000370: 49 B2 31 A4 31 33 3A 8B CA 28 45 24 2C 49 AC 32 |I.1.13:..(E$,I.2|
00000380: AB 31 2C 31 29 B2 41 24 A7 41 B2 49 3A 49 B2 31 |.1,1).A$.A.I:I.1|
00000390: 33 00 9A 0B 18 01 82 49 3A 8E 00 AF 0B 22 01 8D |3......I:...."..|
000003A0: 36 36 30 3A 8B 41 24 B3 B1 22 59 22 A7 34 30 00 |660:.A$.."Y".40.|
000003B0: D1 0B 2C 01 99 22 4E 45 57 20 46 49 4C 45 20 4E |..,.."NEW FILE N|
000003C0: 41 4D 45 22 3A 85 54 24 3A 8D 38 31 30 3A 89 34 |AME":.T$:.810:.4|
000003D0: 30 00 02 0C 36 01 99 22 93 12 43 92 41 54 41 4C |0...6.."..C.ATAL|
000003E0: 4F 47 11 22 3A 99 22 43 41 4C 4C 20 12 50 92 41 |OG.":."CALL .P.A|
000003F0: 47 45 11 22 3A 99 22 12 49 92 4E 53 45 52 54 22 |GE.":.".I.NSERT"|
00000400: 52 24 00 43 0C 40 01 99 22 11 12 45 92 4E 54 45 |R$.C.@.."..E.NTE|
00000410: 52 22 52 24 3A 99 22 11 12 4B 92 49 4C 4C 22 52 |R"R$:."..K.ILL"R|
00000420: 24 3A 99 22 11 12 41 92 4C 50 48 41 42 45 54 49 |$:."..A.LPHABETI|
00000430: 5A 45 11 22 3A 99 22 12 4E 92 45 57 20 46 49 4C |ZE.":.".N.EW FIL|
00000440: 45 11 22 00 7F 0C 4A 01 99 22 12 4C 92 4F 41 44 |E."...J..".L.OAD|
00000450: 20 46 52 4F 4D 20 54 41 50 45 20 4F 52 20 44 49 | FROM TAPE OR DI|
00000460: 53 43 22 3A 99 22 11 12 53 92 41 56 45 20 54 4F |SC":."..S.AVE TO|
00000470: 20 54 41 50 45 20 4F 52 20 44 49 53 43 11 22 00 | TAPE OR DISC.".|
00000480: BD 0C 54 01 99 22 12 3F 92 20 44 45 46 49 4E 49 |..T..".?. DEFINI|
00000490: 54 49 4F 4E 53 22 3A 99 22 11 12 48 92 20 4C 49 |TIONS":."..H. LI|
000004A0: 53 54 20 54 4F 20 50 52 49 4E 54 45 52 91 22 3A |ST TO PRINTER.":|
000004B0: 8D 32 36 30 3A 8B 41 B2 30 A7 33 31 30 00 C5 0C |.260:.A.0.310...|
000004C0: 5E 01 89 39 30 00 F4 0C 68 01 99 22 93 90 53 41 |^..90...h.."..SA|
000004D0: 56 45 20 54 4F 20 54 41 50 45 20 4F 52 20 44 49 |VE TO TAPE OR DI|
000004E0: 53 43 22 3A 8D 36 36 30 3A 8B 41 24 B3 B1 22 59 |SC":.660:.A$.."Y|
000004F0: 22 A7 34 30 00 1E 0D 72 01 99 22 12 44 92 49 53 |".40...r..".D.IS|
00000500: 43 20 4F 52 20 12 54 92 41 50 45 3F 22 3A 8D 36 |C OR .T.APE?":.6|
00000510: 33 30 3A 8B 41 24 B2 22 54 22 A7 34 30 30 00 2E |30:.A$."T".400..|
00000520: 0D 7C 01 8B 41 24 B3 B1 22 44 22 A7 34 30 00 54 |.|..A$.."D".40.T|
00000530: 0D 86 01 9F 32 2C 38 2C 32 2C 22 40 30 3A 22 AA |....2,8,2,"@0:".|
00000540: 54 24 AA 22 20 D8 2C 53 2C 57 22 3A 4A B2 32 3A |T$." .,S,W":J.2:|
00000550: 89 38 39 30 00 6B 0D 90 01 9F 31 2C 31 2C 31 2C |.890.k....1,1,1,|
00000560: 54 24 3A 4A B2 31 3A 89 38 39 30 00 9C 0D 9A 01 |T$:J.1:.890.....|
00000570: 99 22 93 12 4C 4F 41 44 20 46 52 4F 4D 20 54 41 |."..LOAD FROM TA|
00000580: 50 45 20 4F 52 20 44 49 53 43 22 3A 8D 36 36 30 |PE OR DISC":.660|
00000590: 3A 8B 41 24 B3 B1 22 59 22 A7 34 30 00 C6 0D A4 |:.A$.."Y".40....|
000005A0: 01 99 22 12 44 92 49 53 43 20 4F 52 20 12 54 92 |..".D.ISC OR .T.|
000005B0: 41 50 45 3F 22 3A 8D 36 33 30 3A 8B 41 24 B2 22 |APE?":.630:.A$."|
000005C0: 54 22 A7 34 36 30 00 D6 0D AE 01 8B 41 24 B3 B1 |T".460......A$..|
000005D0: 22 44 22 A7 34 30 00 FC 0D B8 01 8D 39 37 30 3A |"D".40......970:|
000005E0: 99 22 11 46 49 4C 45 20 4E 41 4D 45 3F 22 3A 85 |.".FILE NAME?":.|
000005F0: 4E 24 3A 8B 4E 24 B2 22 22 A7 34 30 00 21 0E C2 |N$:.N$."".40.!..|
00000600: 01 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA 4E 24 AA |..2,8,2,"0:".N$.|
00000610: 22 20 D8 2C 53 2C 52 22 3A 4A B2 32 3A 89 39 33 |" .,S,R":J.2:.93|
00000620: 30 00 35 0E CC 01 9F 31 2C 31 2C 30 3A 4A B2 31 |0.5....1,1,0:J.1|
00000630: 3A 89 39 33 30 00 5F 0E D6 01 99 22 11 11 4B 49 |:.930._...."..KI|
00000640: 4C 4C 22 52 24 3A 85 41 24 3A 4A B2 C5 28 41 24 |LL"R$:.A$:J..(A$|
00000650: 29 3A 8D 32 37 30 3A 8B 41 B3 B1 30 A7 39 30 00 |):.270:.A..0.90.|
00000660: 77 0E E0 01 8B 4A B3 30 B0 4A B1 4E A7 99 22 91 |w....J.0.J.N..".|
00000670: 91 22 3A 89 34 37 30 00 A6 0E EA 01 81 49 B2 4A |.":.470......I.J|
00000680: A4 4E AB 31 3A 8B 53 24 28 49 29 B2 22 C0 22 AF |.N.1:.S$(I).".".|
00000690: 53 24 28 49 AA 31 29 B2 22 C0 22 A7 49 B2 4E AB |S$(I.1).".".I.N.|
000006A0: 31 3A 89 35 31 30 00 BD 0E F4 01 53 24 28 49 29 |1:.510.....S$(I)|
000006B0: B2 53 24 28 49 AA 31 29 3A 8D 36 35 30 00 D2 0E |.S$(I.1):.650...|
000006C0: FE 01 82 3A 53 24 28 4E 29 B2 22 C0 22 3A 89 31 |...:S$(N).".":.1|
000006D0: 34 30 00 04 0F 08 02 99 22 11 11 41 4C 50 48 41 |40......"..ALPHA|
000006E0: 42 45 54 49 5A 45 20 20 22 3B 3A 8D 38 32 30 3A |BETIZE ";:.820:|
000006F0: 55 B2 C5 28 41 24 29 3A 8B 55 B3 30 B0 55 B1 4E |U..(A$):.U.0.U.N|
00000700: A7 89 38 30 00 20 0F 12 02 8B CA 28 53 24 28 55 |..80. .....(S$(U|
00000710: 29 2C 31 2C 31 29 B2 22 12 22 A7 55 B2 55 AA 31 |),1,1).".".U.U.1|
00000720: 00 57 0F 1C 02 8D 38 33 30 3A 4B B2 30 3A 81 49 |.W....830:K.0:.I|
00000730: B2 55 A4 4B 4B 3A 8B C8 28 28 53 24 28 49 29 29 |.U.KK:..((S$(I))|
00000740: 2C 31 29 B2 22 12 22 A7 4B B2 31 3A 4E 4E B2 49 |,1).".".K.1:NN.I|
00000750: AB 31 3A 49 B2 4B 4B 00 67 0F 26 02 82 49 3A 8B |.1:I.KK.g.&..I:.|
00000760: 4B B2 31 A7 35 37 30 00 71 0F 30 02 4E 4E B2 4B |K.1.570.q.0.NN.K|
00000770: 4B 00 79 0F 3A 02 49 B2 30 00 8D 0F 44 02 4A B2 |K.y.:.I.0...D.J.|
00000780: 55 3A 8B 49 B2 4E 4E AB 55 A7 31 34 30 00 9D 0F |U:.I.NN.U.140...|
00000790: 4E 02 8B 4A B2 4E 4E AB 49 A7 36 32 30 00 D4 0F |N..J.NN.I.620...|
000007A0: 58 02 8B 53 24 28 4A 29 B1 53 24 28 4A AA 31 29 |X..S$(J).S$(J.1)|
000007B0: A7 54 50 24 B2 53 24 28 4A 29 3A 53 24 28 4A 29 |.TP$.S$(J):S$(J)|
000007C0: B2 53 24 28 4A AA 31 29 3A 53 24 28 4A AA 31 29 |.S$(J.1):S$(J.1)|
000007D0: B2 54 50 24 00 E3 0F 62 02 4A B2 4A AA 31 3A 89 |.TP$...b.J.J.1:.|
000007E0: 35 39 30 00 06 10 6C 02 49 B2 49 AA 31 3A 97 35 |590...l.I.I.1:.5|
000007F0: 33 32 38 30 2C B5 28 BB 28 4B 29 AC 31 35 AA 31 |3280,.(.(K).15.1|
00000800: 29 3A 89 35 38 30 00 19 10 76 02 A1 41 24 3A 8B |):.580...v..A$:.|
00000810: 41 24 B2 22 22 A7 36 33 30 00 1F 10 80 02 8E 00 |A$."".630.......|
00000820: 30 10 8A 02 99 22 13 22 A3 33 30 29 3B 49 3A 8E |0....".".30);I:.|
00000830: 00 53 10 94 02 99 22 11 11 12 41 52 45 20 59 4F |.S...."...ARE YO|
00000840: 55 20 53 55 52 45 3F 20 59 2F 4E 22 3A 8D 36 33 |U SURE? Y/N":.63|
00000850: 30 3A 8E 00 77 10 9E 02 99 22 93 12 48 41 52 44 |0:..w...."..HARD|
00000860: 20 43 4F 50 59 22 3A 8D 36 36 30 3A 8B 41 24 B3 | COPY":.660:.A$.|
00000870: B1 22 59 22 A7 34 30 00 A5 10 A8 02 99 22 45 4E |."Y".40......"EN|
00000880: 54 49 52 45 20 46 49 4C 45 3F 22 3A 8D 36 33 30 |TIRE FILE?":.630|
00000890: 3A 8B 41 24 B2 22 59 22 A7 46 B2 30 3A 4D B2 4E |:.A$."Y".F.0:M.N|
000008A0: 3A 89 37 31 30 00 C7 10 B2 02 8D 38 32 30 3A 46 |:.710......820:F|
000008B0: B2 C5 28 41 24 29 3A 4B B2 46 3A 8B 46 B3 30 B0 |..(A$):K.F:.F.0.|
000008C0: 46 B1 4E 89 36 37 30 00 F5 10 BC 02 99 22 45 4E |F.N.670......"EN|
000008D0: 44 49 4E 47 22 52 24 3A 85 41 24 3A 4D B2 C5 28 |DING"R$:.A$:M..(|
000008E0: 41 24 29 3A 8B 4D B3 30 B0 4D B1 4E B0 4D B2 B3 |A$):.M.0.M.N.M..|
000008F0: 46 A7 36 37 30 00 2A 11 C6 02 9F 34 2C 34 3A 41 |F.670.*....4,4:A|
00000900: 24 B2 22 22 3A 81 49 B2 31 A4 B5 28 28 34 30 AB |$."":.I.1..((40.|
00000910: C3 28 54 24 29 29 AD 32 29 3A 47 24 B2 C7 28 38 |.(T$)).2):G$..(8|
00000920: 29 3A 46 24 B2 C7 28 31 35 29 00 60 11 D0 02 41 |):F$..(15).`...A|
00000930: 24 B2 41 24 AA 22 20 22 3A 82 49 3A 41 24 B2 41 |$.A$." ":.I:A$.A|
00000940: 24 AA 22 92 22 3A 98 34 2C C7 28 31 34 29 41 24 |$.".":.4,.(14)A$|
00000950: AA 54 24 AA 46 24 C7 28 31 30 29 C7 28 31 30 29 |.T$.F$.(10).(10)|
00000960: 00 84 11 DA 02 4C 4C B2 34 3A 81 49 B2 4B A4 4D |.....LL.4:.I.K.M|
00000970: 3A 8B C8 28 53 24 28 49 29 2C 31 29 B2 22 12 22 |:..(S$(I),1)."."|
00000980: A7 37 36 30 00 B6 11 E4 02 8B 53 24 28 49 29 B3 |.760......S$(I).|
00000990: B1 22 C0 22 A7 98 34 2C C7 28 31 35 29 22 20 20 |."."..4,.(15)" |
000009A0: 20 20 20 22 53 24 28 49 29 C7 28 31 30 29 3A 4C | "S$(I).(10):L|
000009B0: 4C B2 4C 4C AA 32 00 BF 11 EE 02 89 37 39 30 00 |L.LL.2......790.|
000009C0: EB 11 F8 02 41 24 B2 22 22 3A 81 4B 4B B2 37 A4 |....A$."":.KK.7.|
000009D0: C3 28 53 24 28 49 29 29 AC 36 3A 41 24 B2 41 24 |.(S$(I)).6:A$.A$|
000009E0: AA C7 28 32 35 35 29 3A 82 4B 4B 00 16 12 02 03 |..(255):.KK.....|
000009F0: 98 34 2C 22 20 20 20 20 20 22 47 24 AA 41 24 3A |.4," "G$.A$:|
00000A00: 98 34 2C 46 24 AA 22 20 20 20 20 20 22 AA 53 24 |.4,F$." ".S$|
00000A10: 28 49 29 AA 47 24 00 3E 12 0C 03 98 34 2C 46 24 |(I).G$.>....4,F$|
00000A20: AA 22 20 20 20 20 20 22 AA 47 24 AA 41 24 AA 46 |." ".G$.A$.F|
00000A30: 24 C7 28 31 30 29 3A 4C 4C B2 4C 4C AA 34 00 6C |$.(10):LL.LL.4.l|
00000A40: 12 16 03 8B 4C 4C B1 35 39 A7 81 4E 4C B2 4C 4C |....LL.59..NL.LL|
00000A50: A4 37 32 3A 98 34 2C C7 28 31 30 29 3B 3A 82 4E |.72:.4,.(10);:.N|
00000A60: 4C 3A 98 34 2C 22 22 3A 4C 4C B2 33 00 7A 12 20 |L:.4,"":LL.3.z. |
00000A70: 03 82 49 3A A0 34 3A 89 34 30 00 94 12 2A 03 81 |..I:.4:.40...*..|
00000A80: 4A B2 30 A4 4E 3A 53 24 28 4A 29 B2 22 C0 22 3A |J.0.N:S$(J).".":|
00000A90: 82 4A 3A 8E 00 AC 12 34 03 99 22 53 54 41 52 54 |.J:....4.."START|
00000AA0: 49 4E 47 22 52 24 3A 85 41 24 3A 8E 00 D4 12 3E |ING"R$:.A$:....>|
00000AB0: 03 81 49 B2 4E A4 30 A9 AB 31 3A 8B 53 24 28 49 |..I.N.0..1:.S$(I|
00000AC0: 29 B3 B1 22 C0 22 A7 4B 4B B2 49 3A 49 B2 30 3A |)..".".KK.I:I.0:|
00000AD0: 89 38 35 30 00 DD 12 48 03 4B 4B B2 49 00 E6 12 |.850...H.KK.I...|
00000AE0: 52 03 82 49 3A 8E 00 0C 13 5C 03 81 49 B2 4A AA |R..I:....\..I.J.|
00000AF0: 31 A4 4E 3A 8B 53 24 28 49 29 B2 22 C0 22 A7 4B |1.N:.S$(I).".".K|
00000B00: 4B B2 49 3A 49 B2 4E 3A 89 38 35 30 00 15 13 66 |K.I:I.N:.850...f|
00000B10: 03 4B 4B B2 49 00 1E 13 70 03 82 49 3A 8E 00 40 |.KK.I...p..I:..@|
00000B20: 13 7A 03 81 49 B2 4E A4 30 A9 AB 31 3A 4B B2 49 |.z..I.N.0..1:K.I|
00000B30: 3A 8B 53 24 28 49 29 B3 B1 22 C0 22 A7 49 B2 30 |:.S$(I)..".".I.0|
00000B40: 00 4D 13 84 03 82 49 3A 4B B2 4B AA 31 00 68 13 |.M....I:K.K.1.h.|
00000B50: 8E 03 98 4A 2C 54 24 AA 22 20 D8 22 3A 98 4A 2C |...J,T$." .":.J,|
00000B60: 4B 3A 81 49 B2 30 A4 4B 00 83 13 98 03 98 4A 2C |K:.I.0.K......J,|
00000B70: 53 24 28 49 29 3A 8D 36 35 30 3A 82 3A A0 4A 3A |S$(I):.650:.:.J:|
00000B80: 89 34 30 00 B8 13 A2 03 84 4A 2C 4E 24 3A 8B C9 |.40......J,N$:..|
00000B90: 28 4E 24 2C 32 29 B3 B1 22 20 D8 22 A7 99 4E 24 |(N$,2).." ."..N$|
00000BA0: 22 20 4E 4F 54 20 46 4F 55 4E 44 22 3A 8D 36 33 |" NOT FOUND":.63|
00000BB0: 30 3A A0 4A 3A 89 34 30 00 E6 13 AC 03 54 24 B2 |0:.J:.40.....T$.|
00000BC0: 4E 24 3A 54 24 B2 C8 28 54 24 2C C3 28 54 24 29 |N$:T$..(T$,.(T$)|
00000BD0: AB 32 29 3A 99 22 11 12 46 4F 55 4E 44 20 22 54 |.2):."..FOUND "T|
00000BE0: 24 3A 84 4A 2C 4B 00 31 14 B6 03 8B 4B B1 4E A7 |$:.J,K.1....K.N.|
00000BF0: 99 22 11 12 57 41 52 4E 49 4E 47 3A 22 3A 99 22 |."..WARNING:":."|
00000C00: 46 49 4C 45 20 4F 52 49 47 49 4E 41 54 45 44 20 |FILE ORIGINATED |
00000C10: 46 52 4F 4D 20 20 56 49 43 20 57 49 54 48 20 4C |FROM VIC WITH L|
00000C20: 41 52 47 45 52 20 4D 45 4D 4F 52 59 22 3A 4B B2 |ARGER MEMORY":K.|
00000C30: 4E 00 53 14 C0 03 81 49 B2 30 A4 4B 3A 84 4A 2C |N.S....I.0.K:.J,|
00000C40: 53 24 28 49 29 3A 8D 36 35 30 3A 82 3A A0 4A 3A |S$(I):.650:.:.J:|
00000C50: 89 34 30 00 81 14 CA 03 99 22 12 93 44 49 53 43 |.40......"..DISC|
00000C60: 20 46 49 4C 45 20 4C 49 53 54 49 4E 47 3F 20 11 | FILE LISTING? .|
00000C70: 22 3A 8D 36 33 30 3A 8B 41 24 B3 B1 22 59 22 A7 |":.630:.A$.."Y".|
00000C80: 8E 00 99 14 D4 03 99 22 93 12 53 43 41 4E 4E 49 |......."..SCANNI|
00000C90: 4E 47 20 44 49 53 43 11 22 00 A9 14 DE 03 9F 31 |NG DISC."......1|
00000CA0: 2C 38 2C 30 2C 22 24 30 22 00 B7 14 E8 03 A1 23 |,8,0,"$0"......#|
00000CB0: 31 2C 41 24 2C 42 24 00 C5 14 F2 03 A1 23 31 2C |1,A$,B$......#1,|
00000CC0: 41 24 2C 42 24 00 D3 14 FC 03 A1 23 31 2C 41 24 |A$,B$......#1,A$|
00000CD0: 2C 42 24 00 DB 14 06 04 43 B2 30 00 F0 14 10 04 |,B$.....C.0.....|
00000CE0: 8B 20 41 24 B3 B1 22 22 A7 43 B2 C6 28 41 24 29 |. A$.."".C..(A$)|
00000CF0: 00 0B 15 1A 04 8B 20 42 24 B3 B1 22 22 A7 43 B2 |...... B$.."".C.|
00000D00: 43 AA C6 28 42 24 29 AC 32 35 36 00 27 15 24 04 |C..(B$).256.'.$.|
00000D10: 44 24 B2 44 24 AA 22 12 22 AA CA 28 C4 28 43 29 |D$.D$."."..(.(C)|
00000D20: 2C 32 29 AA 22 92 22 00 40 15 2E 04 A1 23 31 2C |,2).".".@....#1,|
00000D30: 42 24 3A 8B 53 54 B3 B1 30 A7 A0 31 3A 99 3A 8E |B$:.ST..0..1:.:.|
00000D40: 00 55 15 38 04 8B 20 42 24 B3 B1 C7 28 33 34 29 |.U.8.. B$...(34)|
00000D50: A7 31 30 37 30 00 7B 15 42 04 A1 23 31 2C 42 24 |.1070.{.B..#1,B$|
00000D60: 3A 8B 20 42 24 B3 B1 C7 28 33 34 29 A7 44 24 B2 |:. B$...(34).D$.|
00000D70: 44 24 AA 42 24 3A 89 31 30 39 30 00 95 15 4C 04 |D$.B$:.1090...L.|
00000D80: A1 23 31 2C 42 24 3A 8B 42 24 B2 C7 28 33 32 29 |.#1,B$:.B$..(32)|
00000D90: A7 31 31 30 30 00 9F 15 56 04 43 24 B2 22 22 00 |.1100...V.C$."".|
00000DA0: C0 15 60 04 43 24 B2 43 24 AA 42 24 3A A1 23 31 |..`.C$.C$.B$:.#1|
00000DB0: 2C 42 24 3A 8B 42 24 B3 B1 22 22 A7 31 31 32 30 |,B$:.B$.."".1120|
00000DC0: 00 E1 15 6A 04 8B C9 28 44 24 2C 31 29 B2 22 D8 |...j...(D$,1).".|
00000DD0: 22 A7 99 44 24 3B C7 28 32 30 29 3B C7 28 32 30 |"..D$;.(20);.(20|
00000DE0: 29 00 F1 15 74 04 44 24 B2 22 22 3A 89 31 30 31 |)...t.D$."":.101|
00000DF0: 30 00 35 16 7E 04 59 B2 59 AB 31 3A 81 49 B2 30 |0.5.~.Y.Y.1:.I.0|
00000E00: A4 43 3A 43 24 28 49 2C 50 25 28 4C 29 29 B2 22 |.C:C$(I,P%(L))."|
00000E10: C0 22 3A 82 49 3A 81 49 B2 4C A4 59 3A 50 25 28 |.":.I:.I.L.Y:P%(|
00000E20: 49 29 B2 50 25 28 49 AA 31 29 3A 82 49 3A 4C B2 |I).P%(I.1):.I:L.|
00000E30: 4C AB 31 3A 8E 00 67 16 88 04 8B C8 28 53 24 28 |L.1:..g.....(S$(|
00000E40: 4A 29 2C 31 29 B2 22 5F 22 A7 53 24 28 4A 29 B2 |J),1)."_".S$(J).|
00000E50: 22 12 22 AA C9 28 53 24 28 4A 29 2C C3 28 53 24 |"."..(S$(J),.(S$|
00000E60: 28 4A 29 29 AB 31 29 00 70 16 92 04 89 31 34 30 |(J)).1).p....140|
00000E70: 00 00 00 |... |
.......53281,1 :T$.".NO NAME.".\...."..F
ILE NAME":.T$:."......".14)"PLEASE WAIT"
:T$.H(T$,14).....N.1000:P.1:X.(N.1).10:.
S$(N):R$." LINE#":.810:.80...(.K.0...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.E.Z.
.A.40,120,190,220,290,360,410,670,470,52
0,310.X.D..J.N.1.K.J:.50.`.N..40...X..".
.PAGE#":.A$:P.E(A$):.270:.A..0.90......P
.1.P.X.."...":.120.Z...."..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.I...A$."-1":."..ENTER"R$:
.A$:J.E(A$):.270:.A..0.90.L.H..J.0.J..(X
).10.1..".....":.190.}.R..S$(J):.1160...
..A$."-1":."..INSERT"R$:.A$:J.E(A$):.270
:.A..0.90.T....J.0.J..(X).10.1..".....":
.220......"ENTRY":.D$:."INSERTING":.R.N.
140.0....860:.I.KK.J.1..1:S$(I).S$(I.1):
.:S$(J).D$:.1160.F...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.Q.,.."NEW FILE N
AME":.T$:.810:.40...6.."..C.ATALOG.":."C
ALL .P.AGE.":.".I.NSERT"R$.C.@.."..E.NTE
R"R$:."..K.ILL"R$:."..A.LPHABETIZE.":.".
N.EW FILE."..J..".L.OAD FROM TAPE OR DI
SC":."..S.AVE TO TAPE OR DISC."...T..".?
. DEFINITIONS":."..H. LIST TO PRINTER.":
.260:.A.0.310.E.^..90...H.."..SAVE TO TA
PE OR DISC":.660:.A$.."Y".40...R..".D.IS
C OR .T.APE?":.630:.A$."T".400...|..A$..
"D".40.T....2,8,2,"@0:".T$." X,S,W":J.2:
.890.K....1,1,1,T$:J.1:.890......"..LOAD
FROM TAPE OR DISC":.660:.A$.."Y".40.F..
..".D.ISC OR .T.APE?":.630:.A$."T".460.V
....A$.."D".40......970:.".FILE NAME?":.
N$:.N$."".40.!.B..2,8,2,"0:".N$." X,S,R"
:J.2:.930.5.L..1,1,0:J.1:.930._.V.."..KI
LL"R$:.A$:J.E(A$):.270:.A..0.90.W....J.0
.J.N.."..":.470......I.J.N.1:.S$(I).".".
S$(I.1).".".I.N.1:.510.....S$(I).S$(I.1)
:.650.R....:S$(N).".":.140......"..ALPHA
BETIZE ";:.820:U.E(A$):.U.0.U.N..80. ..
..J(S$(U),1,1).".".U.U.1.W....830:K.0:.I
.U.KK:.H((S$(I)),1).".".K.1:NN.I.1:I.KK.
G.&..I:.K.1.570.Q.0.NN.KK.Y.:.I.0...D.J.
U:.I.NN.U.140...N..J.NN.I.620.T.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:.53280,.(.
(K).15.1):.580...V..A$:.A$."".630.......
0....".".30);I:..S...."...ARE YOU SURE?
Y/N":.630:..W...."..HARD COPY":.660:.A$.
."Y".40......"ENTIRE FILE?":.630:.A$."Y"
.F.0:M.N:.710.G....820:F.E(A$):K.F:.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):G$.G(8):F$.G(15).`.P.A$.A$." "
:.I:A$.A$.".":.4,G(14)A$.T$.F$G(10)G(10)
...Z.LL.4:.I.K.M:.H(S$(I),1).".".760....
..S$(I).."."..4,G(15)" "S$(I)G(10):L
L.LL.2......790.....A$."":.KK.7.C(S$(I))
.6:A$.A$.G(255):.KK......4," "G$.A$:
.4,F$." ".S$(I).G$.>....4,F$." "
.G$.A$.F$G(10):LL.LL.4.L....LL.59..NL.LL
.72:.4,G(10);:.NL:.4,"":LL.3.Z. ..I: 4:.
40...*..J.0.N:S$(J).".":.J:....4.."START
ING"R$:.A$:..T.>..I.N.0..1:.S$(I)..".".K
K.I:I.0:.850...H.KK.I...R..I:....\..I.J.
1.N:.S$(I).".".KK.I:I.N:.850...F.KK.I...
P..I:..@.Z..I.N.0..1:K.I:.S$(I)..".".I.0
.M....I:K.K.1.H....J,T$." X":.J,K:.I.0.K
......J,S$(I):.650:.: J:.40......J,N$:.I
(N$,2).." X"..N$" NOT FOUND":.630: J:.40
.....T$.N$:T$.H(T$,C(T$).2):."..FOUND "T
$:.J,K.1....K.N.."..WARNING:":."FILE ORI
GINATED FROM VIC WITH LARGER MEMORY":K.
N.S....I.0.K:.J,S$(I):.650:.: J:.40...J.
."..DISC FILE LISTING? .":.630:.A$.."Y".
....T.."..SCANNING DISC."......1,8,0,"$0
"......#1,A$,B$.E....#1,A$,B$.S....#1,A$
,B$.....C.0...... A$.."".C.F(A$)...... B
$.."".C.C.F(B$).256.'.$.D$.D$.".".J(D(C)
,2).".".@....#1,B$:.ST..0. 1:.:..U.8.. B
$..G(34).1070.{.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
...J..I(D$,1)."X"..D$;G(20);G(20)...T.D$
."":.1010.5.~.Y.Y.1:.I.0.C:C$(I,P%(L))."
.":.I:.I.L.Y:P%(I).P%(I.1):.I:L.L.1:..G.
...H(S$(J),1)."_".S$(J).".".I(S$(J),C(S$
(J)).1).P....140...
> CLICK IMAGE PREVIEW FOR FULL MODAL