TEXTBEHANDLING
FILE INFORMATION
FILENAME(S): TEXTBEHANDLING
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 19:38:38
APPEARS ON: 2 disk(s)
FILE HASH
ea050a5105b72fbe8fed2d98b2a2ac7119c44644ff7b3ecce0e1dc8f29357b47
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TEST DISK | TEXTBEHANDLING | PRG | Curtcool, Brian | 16 | 3 | DOWNLOAD FILE |
| NILLE | TEXTBEHANDLING | PRG | Curtcool, Brian | 17 | 20 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 F8 2A 8F 23 2A 2A 2A 2A 2A 2A 2A 00 |.....*.#*******.| 00000010: 1F 08 02 2B 8F 49 4E 49 54 49 41 4C 49 53 45 00 |...+.INITIALISE.| 00000020: 2F 08 0C 2B 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |/..+.**********.| 00000030: 3F 08 E0 2E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |?....**********.| 00000040: 60 08 EA 2E 99 22 93 22 3B 3A 86 20 54 45 58 54 |`....".";:. TEXT| 00000050: 24 28 35 30 30 29 3A 4C 4C B2 31 3A 50 4C B2 31 |$(500):LL.1:PL.1| 00000060: 00 99 08 F4 2E 54 45 58 54 24 28 30 29 B2 22 9E |.....TEXT$(0).".| 00000070: DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 |................| 00000080: DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 |................| 00000090: DF A9 DF A9 DF A9 DF A9 22 00 D4 08 FE 2E 54 45 |........".....TE| 000000A0: 58 54 24 28 31 29 B2 22 9E 12 A9 DF A9 DF A9 DF |XT$(1)."........| 000000B0: A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF |................| 000000C0: A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF |................| 000000D0: A9 DF 92 22 00 ED 08 08 2F 96 20 A5 41 28 50 29 |..."..../. .A(P)| 000000E0: B2 31 30 32 34 AA 32 30 AC 34 30 AA 50 00 05 09 |.1024.20.40.P...| 000000F0: 12 2F 96 20 A5 42 28 50 32 29 B2 31 30 32 34 AA |./. .B(P2).1024.| 00000100: 34 30 AC 50 32 00 10 09 1C 2F 8D 31 34 31 31 30 |40.P2..../.14110| 00000110: 00 21 09 C8 32 8F 23 2A 2A 2A 2A 2A 2A 2A 2A 2A |.!..2.#*********| 00000120: 2A 00 31 09 D2 32 8F 20 45 44 49 54 20 4C 49 4E |*.1..2. EDIT LIN| 00000130: 45 00 41 09 DC 32 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |E.A..2.*********| 00000140: 2A 00 4C 09 E6 32 41 24 B2 22 20 22 00 71 09 F0 |*.L..2A$." ".q..| 00000150: 32 50 B2 30 3A 99 22 9A 13 11 11 11 11 11 11 11 |2P.0:.".........| 00000160: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3B 41 |.............";A| 00000170: 24 00 9D 09 FA 32 43 48 B2 C2 28 A5 41 28 50 29 |$....2CH..(.A(P)| 00000180: 29 3A 97 20 35 34 32 37 32 AA A5 41 28 50 29 2C |):. 54272..A(P),| 00000190: 31 34 3A 97 A5 41 28 50 29 2C 31 36 30 00 B9 09 |14:..A(P),160...| 000001A0: 04 33 81 20 54 54 B2 31 A4 35 3A 82 20 54 54 3A |.3. TT.1.5:. TT:| 000001B0: 97 A5 41 28 50 29 2C 43 48 00 D2 09 0E 33 A1 20 |..A(P),CH....3. | 000001C0: 54 24 3A 8B 54 24 B2 22 22 A7 20 89 20 31 33 30 |T$:.T$."". . 130| 000001D0: 35 30 00 FB 09 18 33 8B 54 24 B2 C7 28 31 33 29 |50....3.T$..(13)| 000001E0: 20 B0 20 C3 28 41 24 29 B2 38 31 A7 20 8D 20 31 | . .(A$).81. . 1| 000001F0: 34 30 30 30 3A 89 31 33 30 35 30 00 25 0A 22 33 |4000:.13050.%."3| 00000200: 8B 54 24 B2 22 5E 22 A7 20 8D 20 31 35 30 30 30 |.T$."^". . 15000| 00000210: 3A 97 A5 42 28 50 4C AB 53 53 29 2C 36 32 3A 89 |:..B(PL.SS),62:.| 00000220: 31 33 30 34 30 00 3D 0A 2C 33 8B 54 24 B2 22 5F |13040.=.,3.T$."_| 00000230: 22 AF 50 B3 B1 30 A7 20 31 33 30 34 30 00 5E 0A |".P..0. 13040.^.| 00000240: 36 33 8B 54 24 B2 22 5F 22 AF 50 B2 30 A7 50 B2 |63.T$."_".P.0.P.| 00000250: C3 28 41 24 29 AB 31 3A 89 31 33 31 35 30 00 94 |.(A$).1:.13150..| 00000260: 0A 40 33 8B 50 B1 30 AF 54 24 B2 C7 28 32 30 29 |.@3.P.0.T$..(20)| 00000270: A7 41 24 B2 C8 28 41 24 2C 50 AB 31 29 AA CA 28 |.A$..(A$,P.1)..(| 00000280: 41 24 2C 50 AA 31 29 3A 50 B2 50 AB 31 3A 89 31 |A$,P.1):P.P.1:.1| 00000290: 33 31 35 30 00 A8 0A 4A 33 8B 54 24 B2 C7 28 32 |3150...J3.T$..(2| 000002A0: 30 29 A7 31 33 30 35 30 00 E3 0A 54 33 8B 54 24 |0).13050...T3.T$| 000002B0: B3 B1 22 22 AF 54 24 B3 B1 22 9D 22 AF 54 24 B3 |.."".T$..".".T$.| 000002C0: B1 22 1D 22 A7 20 41 24 B2 C8 28 41 24 2C 50 29 |.".". A$..(A$,P)| 000002D0: AA 54 24 AA CA 28 41 24 2C 50 AA 31 29 3A 50 B2 |.T$..(A$,P.1):P.| 000002E0: 50 AA 31 00 15 0B 5E 33 99 22 13 11 11 11 11 11 |P.1...^3."......| 000002F0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."| 00000300: 3B 41 24 3A 8B 54 24 B2 22 9D 22 AF 50 B1 30 A7 |;A$:.T$.".".P.0.| 00000310: 50 B2 50 AB 31 00 31 0B 68 33 8B 54 24 B2 22 1D |P.P.1.1.h3.T$.".| 00000320: 22 AF 50 B3 C3 28 41 24 29 AB 31 A7 50 B2 50 AA |".P..(A$).1.P.P.| 00000330: 31 00 3C 0B 72 33 89 31 33 30 35 30 00 4E 0B B0 |1.<.r3.13050.N..| 00000340: 36 8F 23 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 60 |6.#***********.`| 00000350: 0B BA 36 8F 20 49 4E 53 45 52 54 20 4C 49 4E 45 |..6. INSERT LINE| 00000360: 00 72 0B C4 36 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.r..6.**********| 00000370: 2A 2A 00 7A 0B CE 36 58 B2 30 00 AA 0B D8 36 8B |**.z..6X.0....6.| 00000380: C3 28 41 24 29 B3 34 31 A7 54 54 24 28 58 29 B2 |.(A$).41.TT$(X).| 00000390: C8 28 41 24 2C C3 28 41 24 29 AB 31 29 3A 41 24 |.(A$,.(A$).1):A$| 000003A0: B2 22 22 3A 89 31 34 30 37 30 00 D1 0B E2 36 81 |."":.14070....6.| 000003B0: 49 B2 34 31 A4 31 A9 AB 31 3A 8B CA 28 41 24 2C |I.41.1..1:..(A$,| 000003C0: 49 2C 31 29 B3 B1 22 20 22 A7 82 49 3A 49 B2 34 |I,1).." "..I:I.4| 000003D0: 31 00 F3 0B EC 36 54 54 24 28 58 29 B2 C8 28 41 |1....6TT$(X)..(A| 000003E0: 24 2C 49 AB 31 29 3A 41 24 B2 CA 28 41 24 2C 49 |$,I.1):A$..(A$,I| 000003F0: AA 31 29 00 14 0C F6 36 58 B2 58 AA 31 3A 8B 41 |.1)....6X.X.1:.A| 00000400: 24 B3 B1 22 22 AF 41 24 B3 B1 22 20 22 A7 89 31 |$.."".A$.." "..1| 00000410: 34 30 34 30 00 3F 0C 00 37 81 49 B2 4C 4C AA 58 |4040.?..7.I.LL.X| 00000420: A4 50 4C AA 58 A9 AB 31 3A 54 45 58 54 24 28 49 |.PL.X..1:TEXT$(I| 00000430: 29 B2 54 45 58 54 24 28 49 AB 58 29 3A 82 49 00 |).TEXT$(I.X):.I.| 00000440: 61 0C 0A 37 81 49 B2 30 A4 58 AB 31 3A 54 45 58 |a..7.I.0.X.1:TEX| 00000450: 54 24 28 50 4C AA 49 29 B2 54 54 24 28 49 29 3A |T$(PL.I).TT$(I):| 00000460: 82 00 86 0C 14 37 41 24 B2 22 20 22 3A 50 B2 30 |.....7A$." ":P.0| 00000470: 3A 99 22 93 22 3B 3A 4C 4C B2 4C 4C AA 58 3A 50 |:.".";:LL.LL.X:P| 00000480: 4C B2 50 4C AA 58 00 A4 0C 1E 37 53 53 B2 50 4C |L.PL.X....7SS.PL| 00000490: AB 37 3A 8B 4C 4C AB 50 4C B3 38 A7 53 53 B2 4C |.7:.LL.PL.8.SS.L| 000004A0: 4C AB 31 35 00 D5 0C 28 37 99 22 93 9A 11 11 11 |L.15...(7.".....| 000004B0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000004C0: 11 22 3B 41 24 3B 22 13 22 3B 3A 8B 53 53 B3 30 |.";A$;".";:.SS.0| 000004D0: A7 53 53 B2 30 00 06 0D 32 37 81 49 B2 53 53 A4 |.SS.0...27.I.SS.| 000004E0: 53 53 AA 31 35 3A 99 22 9E 22 3B 54 45 58 54 24 |SS.15:.".";TEXT$| 000004F0: 28 49 29 3B 3A 8B C3 28 54 45 58 54 24 28 49 29 |(I);:..(TEXT$(I)| 00000500: 29 B3 34 30 A7 99 00 19 0D 3C 37 8B 49 B2 50 4C |).40.....<7.I.PL| 00000510: AB 31 A7 99 C7 28 36 32 29 00 50 0D 46 37 82 49 |.1...(62).P.F7.I| 00000520: 3A 99 22 12 1E 20 20 20 20 20 20 20 20 20 20 20 |:.".. | 00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000540: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 8E | ":.| 00000550: 00 5E 0D 98 3A 8F 23 2A 2A 2A 2A 2A 2A 2A 00 73 |.^..:.#*******.s| 00000560: 0D A2 3A 8F 20 4D 4F 56 45 20 45 44 49 54 20 4C |..:. MOVE EDIT L| 00000570: 49 4E 45 00 80 0D B6 3A 50 32 B2 50 4C AB 53 53 |INE....:P2.PL.SS| 00000580: 00 98 0D C0 3A A1 54 31 24 3A 8B 54 31 24 B3 B1 |....:.T1$:.T1$..| 00000590: 22 22 A7 31 35 30 37 30 00 C4 0D CA 3A 97 35 34 |"".15070....:.54| 000005A0: 32 37 32 AA A5 42 28 50 32 29 2C 38 3A 97 A5 42 |272..B(P2),8:..B| 000005B0: 28 50 32 29 2C 36 32 3A 81 49 54 20 49 B2 31 A4 |(P2),62:.IT I.1.| 000005C0: 32 30 3A 82 00 DA 0D D4 3A 97 A5 42 28 50 32 29 |20:.....:..B(P2)| 000005D0: 2C 33 32 3A 89 31 35 30 34 30 00 06 0E DE 3A 50 |,32:.15040....:P| 000005E0: 4C B2 50 4C AA 28 54 31 24 B2 22 91 22 29 AA 31 |L.PL.(T1$.".").1| 000005F0: 30 AC 28 54 31 24 B2 22 55 22 29 3A 8B 50 4C B3 |0.(T1$."U"):.PL.| 00000600: 31 A7 50 4C B2 31 00 34 0E E8 3A 50 4C B2 50 4C |1.PL.1.4..:PL.PL| 00000610: AB 28 54 31 24 B2 22 11 22 29 AB 31 30 AC 28 54 |.(T1$.".").10.(T| 00000620: 31 24 B2 22 44 22 29 3A 8B 50 4C B1 4C 4C A7 50 |1$."D"):.PL.LL.P| 00000630: 4C B2 4C 4C 00 46 0E F2 3A 8B 54 31 24 B2 C7 28 |L.LL.F..:.T1$..(| 00000640: 31 33 29 A7 20 8E 00 63 0E FC 3A 8B 50 4C B2 B1 |13). ..c..:.PL..| 00000650: 4C 4C B0 54 31 24 B3 B1 C7 28 32 30 29 A7 31 35 |LL.T1$...(20).15| 00000660: 31 32 30 00 9D 0E 06 3B 4C 4C B2 4C 4C AB 31 3A |120....;LL.LL.1:| 00000670: 81 49 B2 50 4C A4 4C 4C 3A 54 45 58 54 24 28 49 |.I.PL.LL:TEXT$(I| 00000680: 29 B2 54 45 58 54 24 28 49 AA 31 29 3A 82 3A 54 |).TEXT$(I.1):.:T| 00000690: 45 58 54 24 28 4C 4C AA 31 29 B2 22 22 00 C3 0E |EXT$(LL.1).""...| 000006A0: 10 3B 8B 50 4C B3 4C 4C AF 54 31 24 B2 22 43 22 |.;.PL.LL.T1$."C"| 000006B0: A7 41 24 B2 54 45 58 54 24 28 50 4C 29 AA 22 20 |.A$.TEXT$(PL)." | 000006C0: 22 3A 8E 00 D8 0E 1A 3B 8B 54 31 24 B2 22 50 22 |":.....;.T1$."P"| 000006D0: A7 20 8D 31 37 30 30 30 00 ED 0E 24 3B 8B 54 31 |. .17000...$;.T1| 000006E0: 24 B2 22 53 22 A7 20 8D 31 38 30 30 30 00 02 0F |$."S". .18000...| 000006F0: 2E 3B 8B 54 31 24 B2 22 46 22 A7 20 8D 31 36 30 |.;.T1$."F". .160| 00000700: 30 30 00 14 0F 38 3B 8D 31 34 31 31 30 3A 89 31 |00...8;.14110:.1| 00000710: 35 30 33 30 00 1F 0F 80 3E 8F 2A 2A 2A 2A 2A 00 |5030....>.*****.| 00000720: 31 0F 8A 3E 8F 20 46 4F 52 4D 41 54 20 4C 49 4E |1..>. FORMAT LIN| 00000730: 45 00 61 0F 9E 3E 81 49 B2 31 A4 4C 4C AB 32 3A |E.a..>.I.1.LL.2:| 00000740: 8B 20 54 45 58 54 24 28 49 29 B2 22 22 B0 54 45 |. TEXT$(I)."".TE| 00000750: 58 54 24 28 49 AA 31 29 B2 22 22 A7 31 36 31 32 |XT$(I.1)."".1612| 00000760: 30 00 8A 0F A8 3E 53 50 B2 34 30 AB C3 28 54 45 |0....>SP.40..(TE| 00000770: 58 54 24 28 49 29 29 3A 81 4A B2 31 A4 C3 28 54 |XT$(I)):.J.1..(T| 00000780: 45 58 54 24 28 49 AA 31 29 29 00 B0 0F B2 3E 8B |EXT$(I.1))....>.| 00000790: 20 CA 28 54 45 58 54 24 28 49 AA 31 29 2C 4A 2C | .(TEXT$(I.1),J,| 000007A0: 31 29 B3 B1 22 20 22 A7 82 4A 3A 4A B2 4A AB 31 |1).." "..J:J.J.1| 000007B0: 00 D1 0F BC 3E 8B 53 50 B3 4A B0 20 4A B2 C3 28 |....>.SP.J. J..(| 000007C0: 54 45 58 54 24 28 49 AA 31 29 29 A7 31 36 30 39 |TEXT$(I.1)).1609| 000007D0: 30 00 FD 0F C6 3E 54 45 58 54 24 28 49 29 B2 54 |0....>TEXT$(I).T| 000007E0: 45 58 54 24 28 49 29 AA 22 20 22 AA C8 28 54 45 |EXT$(I)." "..(TE| 000007F0: 58 54 24 28 49 AA 31 29 2C 4A AB 31 29 00 25 10 |XT$(I.1),J.1).%.| 00000800: D0 3E 54 45 58 54 24 28 49 AA 31 29 B2 CA 28 54 |.>TEXT$(I.1)..(T| 00000810: 45 58 54 24 28 49 AA 31 29 2C 4A AA 31 29 3A 89 |EXT$(I.1),J.1):.| 00000820: 31 36 30 34 30 00 43 10 DA 3E 8B 20 C3 28 54 45 |16040.C..>. .(TE| 00000830: 58 54 24 28 49 AA 31 29 29 B2 B1 53 50 A7 31 36 |XT$(I.1))..SP.16| 00000840: 31 32 30 00 68 10 E4 3E 54 45 58 54 24 28 49 29 |120.h..>TEXT$(I)| 00000850: B2 54 45 58 54 24 28 49 29 AA 22 20 22 AA 54 45 |.TEXT$(I)." ".TE| 00000860: 58 54 24 28 49 AA 31 29 00 A4 10 EE 3E 81 4A B2 |XT$(I.1)....>.J.| 00000870: 49 AA 31 A4 4C 4C 3A 54 45 58 54 24 28 4A 29 B2 |I.1.LL:TEXT$(J).| 00000880: 54 45 58 54 24 28 4A AA 31 29 3A 82 4A 3A 4C 4C |TEXT$(J.1):.J:LL| 00000890: B2 4C 4C AB 31 3A 50 4C B2 50 4C AB 31 3A 89 31 |.LL.1:PL.PL.1:.1| 000008A0: 36 30 34 30 00 AD 10 F8 3E 82 49 3A 8E 00 BA 10 |6040....>.I:....| 000008B0: 68 42 8F 2A 2A 2A 2A 2A 2A 2A 00 D2 10 72 42 8F |hB.*******...rB.| 000008C0: 2A 4F 55 54 50 55 54 20 54 4F 20 50 52 49 4E 54 |*OUTPUT TO PRINT| 000008D0: 45 52 00 E1 10 86 42 9F 31 2C 34 2C 37 3A 58 B2 |ER....B.1,4,7:X.| 000008E0: 31 00 F1 10 90 42 8B 58 B2 4C 4C A7 31 37 31 30 |1....B.X.LL.1710| 000008F0: 30 00 15 11 9A 42 8B 54 45 58 54 24 28 58 29 B2 |0....B.TEXT$(X).| 00000900: 22 22 A7 98 31 2C 22 22 3A 58 B2 58 AA 31 3A 89 |""..1,"":X.X.1:.| 00000910: 31 37 30 34 30 00 2A 11 A4 42 98 31 2C 54 45 58 |17040.*..B.1,TEX| 00000920: 54 24 28 58 29 3B 22 20 22 3B 00 3C 11 AE 42 8B |T$(X);" ";.<..B.| 00000930: 58 AA 31 B2 4C 4C A7 31 37 31 30 30 00 63 11 B8 |X.1.LL.17100.c..| 00000940: 42 98 31 2C 54 45 58 54 24 28 58 AA 31 29 3A 8B |B.1,TEXT$(X.1):.| 00000950: 54 45 58 54 24 28 58 AA 31 29 B2 22 22 A7 98 31 |TEXT$(X.1).""..1| 00000960: 2C 22 22 00 74 11 C2 42 58 B2 58 AA 32 3A 89 31 |,"".t..BX.X.2:.1| 00000970: 37 30 34 30 00 8F 11 CC 42 81 49 B2 4C 4C A4 20 |7040....B.I.LL. | 00000980: 37 33 3A 98 31 2C 22 22 3A 82 3A A0 31 3A 8E 00 |73:.1,"":.:.1:..| 00000990: A3 11 50 46 8F 23 20 44 41 54 41 20 46 49 4C 45 |..PF.# DATA FILE| 000009A0: 2A 2A 2A 00 BB 11 5A 46 85 22 4E 41 56 4E 20 50 |***...ZF."NAVN P| 000009B0: 5D 20 54 45 4B 53 54 22 3B 48 24 00 DE 11 64 46 |] TEKST";H$...dF| 000009C0: 99 22 11 31 3A 53 41 56 45 20 44 41 54 41 22 3A |.".1:SAVE DATA":| 000009D0: 99 22 32 3A 4C 4F 41 44 20 44 41 54 41 22 00 04 |."2:LOAD DATA"..| 000009E0: 12 6E 46 85 22 48 56 41 44 20 5C 4E 53 4B 45 53 |.nF."HVAD \NSKES| 000009F0: 3F 22 3B 51 3A 91 51 20 89 31 38 30 35 30 2C 31 |?";Q:.Q .18050,1| 00000A00: 38 31 30 30 00 0A 12 78 46 8E 00 24 12 82 46 9F |8100...xF..$..F.| 00000A10: 33 2C 38 2C 33 2C 22 40 30 3A 22 AA 48 24 AA 22 |3,8,3,"@0:".H$."| 00000A20: 53 2C 57 22 00 34 12 8C 46 98 33 2C 50 4C 3A 98 |S,W".4..F.3,PL:.| 00000A30: 33 2C 4C 4C 00 57 12 96 46 81 49 B2 30 A4 4C 4C |3,LL.W..F.I.0.LL| 00000A40: 3A 46 46 24 B2 54 45 58 54 24 28 49 29 3A 98 33 |:FF$.TEXT$(I):.3| 00000A50: 2C 46 46 24 3A 82 49 00 60 12 A0 46 A0 33 3A 8E |,FF$:.I.`..F.3:.| 00000A60: 00 80 12 B4 46 9F 33 2C 38 2C 33 2C 48 24 AA 22 |....F.3,8,3,H$."| 00000A70: 53 2C 52 22 3A 84 33 2C 50 4C 3A 84 33 2C 4C 4C |S,R":.3,PL:.3,LL| 00000A80: 00 98 12 B6 46 81 49 B2 30 A4 4C 4C 3A 54 45 58 |....F.I.0.LL:TEX| 00000A90: 54 24 28 49 29 B2 22 22 00 CA 12 B8 46 A1 23 33 |T$(I).""....F.#3| 00000AA0: 2C 44 24 3A 54 45 58 54 24 28 49 29 B2 54 45 58 |,D$:TEXT$(I).TEX| 00000AB0: 54 24 28 49 29 AA 44 24 3A 8B 44 24 B2 C7 28 31 |T$(I).D$:.D$..(1| 00000AC0: 33 29 A7 20 89 31 38 31 31 36 00 D5 12 BA 46 89 |3). .18116....F.| 00000AD0: 31 38 31 30 34 00 DC 12 C4 46 82 49 00 E3 12 C6 |18104....F.I....| 00000AE0: 46 A0 33 00 EF 12 C8 46 81 49 B2 30 A4 4C 4C 00 |F.3....F.I.0.LL.| 00000AF0: 26 13 D2 46 8B 54 45 58 54 24 28 49 29 B3 B1 22 |&..F.TEXT$(I).."| 00000B00: 40 22 A7 20 54 45 58 54 24 28 49 29 B2 C8 28 54 |@". TEXT$(I)..(T| 00000B10: 45 58 54 24 28 49 29 2C C3 28 54 45 58 54 24 28 |EXT$(I),.(TEXT$(| 00000B20: 49 29 29 AB 31 29 00 45 13 DC 46 8B 54 45 58 54 |I)).1).E..F.TEXT| 00000B30: 24 28 49 29 B2 22 40 22 A7 20 54 45 58 54 24 28 |$(I)."@". TEXT$(| 00000B40: 49 29 B2 22 22 00 4E 13 FA 46 82 49 3A 8E 00 5A |I)."".N..F.I:..Z| 00000B50: 13 40 9C 9F 31 2C 38 2C 31 35 00 6A 13 4A 9C 84 |.@..1,8,15.j.J..| 00000B60: 31 2C 41 2C 42 24 2C 43 2C 44 00 78 13 54 9C 99 |1,A,B$,C,D.x.T..| 00000B70: 41 2C 42 24 2C 43 2C 44 00 00 00 |A,B$,C,D... |
.....*.#*******....+.INITIALISE./..+.***
*******.?....**********.`....".";:. TEXT
$(500):LL.1:PL.1.....TEXT$(0).".........
................................".T...TE
XT$(1)."................................
..........."..../. .A(P).1024.20.40.P...
./. .B(P2).1024.40.P2..../.14110.!.H2.#*
*********.1.R2. EDIT LINE.A..2.*********
*.L..2A$." ".Q..2P.0:.".................
.....";A$....2CH.B(.A(P)):. 54272..A(P),
14:..A(P),160....3. TT.1.5:. TT:..A(P),C
H.R..3. T$:.T$."". . 13050....3.T$.G(13)
. C(A$).81. . 14000:.13050.%."3.T$."^".
. 15000:..B(PL.SS),62:.13040.=.,3.T$."_
".P..0. 13040.^.63.T$."_".P.0.P.C(A$).1:
.13150...@3.P.0.T$.G(20).A$.H(A$,P.1).J(
A$,P.1):P.P.1:.13150...J3.T$.G(20).13050
...T3.T$.."".T$..".".T$..".". A$.H(A$,P)
.T$.J(A$,P.1):P.P.1...^3."..............
.......";A$:.T$.".".P.0.P.P.1.1.H3.T$.".
".P.C(A$).1.P.P.1.<.R3.13050.N..6.#*****
******.`..6. INSERT LINE.R.D6.**********
**.Z.N6X.0...X6.C(A$).41.TT$(X).H(A$,C(A
$).1):A$."":.14070.Q..6.I.41.1..1:.J(A$,
I,1).." "..I:I.41....6TT$(X).H(A$,I.1):A
$.J(A$,I.1)....6X.X.1:.A$.."".A$.." "..1
4040.?..7.I.LL.X.PL.X..1:TEXT$(I).TEXT$(
I.X):.I.A..7.I.0.X.1:TEXT$(PL.I).TT$(I):
.....7A$." ":P.0:.".";:LL.LL.X:PL.PL.X..
..7SS.PL.7:.LL.PL.8.SS.LL.15.U.(7.".....
.................";A$;".";:.SS.0.SS.0...
27.I.SS.SS.15:.".";TEXT$(I);:.C(TEXT$(I)
).40.....<7.I.PL.1..G(62).P.F7.I:."..
":.
.^..:.#*******.S..:. MOVE EDIT LINE....:
P2.PL.SS....:.T1$:.T1$.."".15070.D.J:.54
272..B(P2),8:..B(P2),62:.IT I.1.20:..Z.T
:..B(P2),32:.15040....:PL.PL.(T1$.".").1
0.(T1$."U"):.PL.1.PL.1.4..:PL.PL.(T1$.".
").10.(T1$."D"):.PL.LL.PL.LL.F..:.T1$.G(
13). ..C..:.PL..LL.T1$..G(20).15120....;
LL.LL.1:.I.PL.LL:TEXT$(I).TEXT$(I.1):.:T
EXT$(LL.1)."".C..;.PL.LL.T1$."C".A$.TEXT
$(PL)." ":..X..;.T1$."P". .17000...$;.T1
$."S". .18000....;.T1$."F". .16000...8;.
14110:.15030....>.*****.1..>. FORMAT LIN
E.A..>.I.1.LL.2:. TEXT$(I)."".TEXT$(I.1)
."".16120....>SP.40.C(TEXT$(I)):.J.1.C(T
EXT$(I.1))....>. J(TEXT$(I.1),J,1).." ".
.J:J.J.1.Q..>.SP.J. J.C(TEXT$(I.1)).1609
0...F>TEXT$(I).TEXT$(I)." ".H(TEXT$(I.1)
,J.1).%.P>TEXT$(I.1).J(TEXT$(I.1),J.1):.
16040.C.Z>. C(TEXT$(I.1))..SP.16120.H..>
TEXT$(I).TEXT$(I)." ".TEXT$(I.1)....>.J.
I.1.LL:TEXT$(J).TEXT$(J.1):.J:LL.LL.1:PL
.PL.1:.16040....>.I:....HB.*******.R.RB.
*OUTPUT TO PRINTER....B.1,4,7:X.1....B.X
.LL.17100....B.TEXT$(X).""..1,"":X.X.1:.
17040.*..B.1,TEXT$(X);" ";.<..B.X.1.LL.1
7100.C..B.1,TEXT$(X.1):.TEXT$(X.1).""..1
,"".T.BBX.X.2:.17040...LB.I.LL. 73:.1,""
:.: 1:....PF.# DATA FILE***...ZF."NAVN P
] TEKST";H$...DF.".1:SAVE DATA":."2:LOAD
DATA"...NF."HVAD \NSKES?";Q:.Q .18050,1
8100...XF..$..F.3,8,3,"@0:".H$."S,W".4..
F.3,PL:.3,LL.W..F.I.0.LL:FF$.TEXT$(I):.3
,FF$:.I.`. F 3:.....F.3,8,3,H$."S,R":.3,
PL:.3,LL....F.I.0.LL:TEXT$(I)."".J..F.#3
,D$:TEXT$(I).TEXT$(I).D$:.D$.G(13). .181
16.U..F.18104...DF.I...FF 3...HF.I.0.LL.
&.RF.TEXT$(I).."@". TEXT$(I).H(TEXT$(I),
C(TEXT$(I)).1).E..F.TEXT$(I)."@". TEXT$(
I)."".N..F.I:..Z.@..1,8,15.J.J..1,A,B$,C
,D.X.T..A,B$,C,D...
> CLICK IMAGE PREVIEW FOR FULL MODAL