INFOMASTER.SV
FILE INFORMATION
FILENAME(S): INFOMASTER.SV
FILE TYPE(S): PRG
FILE SIZE: 7.9K
FIRST SEEN: 2025-12-01 01:48:20
APPEARS ON: 2 disk(s)
FILE HASH
a6e776202eca0e713952c461b77a67b740b782a66af54c869776f9c3de37b2ce
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CCS 64 REG | INFOMASTER.SV | PRG | hedning, Mattias H00r | 16 | 0 | DOWNLOAD FILE |
| CCS 64 REG | INFOMASTER.SV | PRG | hedning, Mattias H00r | 16 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 05 00 8F 2A 2A 2A 49 4E 46 4F 52 4D |..%....***INFORM|
00000010: 41 53 54 45 52 2A 2A 42 4F 42 20 43 48 41 50 50 |ASTER**BOB CHAPP|
00000020: 45 4C 2A 2A 2A 00 2F 08 0A 00 89 31 30 33 35 00 |EL***./....1035.|
00000030: 3F 08 0F 00 8F 2A 2A 2A 53 4F 52 54 2A 2A 2A 00 |?....***SORT***.|
00000040: 5A 08 14 00 51 B2 B5 28 51 AD 32 29 3A 8B 51 B2 |Z...Q..(Q.2):.Q.|
00000050: 30 A7 52 B2 31 3A 89 38 31 35 00 69 08 19 00 4A |0.R.1:.815.i...J|
00000060: B2 31 3A 4B B2 54 52 AB 51 00 71 08 1E 00 49 B2 |.1:K.TR.Q.q...I.|
00000070: 4A 00 84 08 23 00 4C B2 49 AA 51 3A 8B 4E 53 B2 |J...#.L.I.Q:.NS.|
00000080: 31 89 36 30 00 A6 08 28 00 8B 52 24 28 53 52 28 |1.60...(..R$(SR(|
00000090: 49 29 2C 46 31 29 B3 52 24 28 53 52 28 4C 29 2C |I),F1).R$(SR(L),|
000000A0: 46 31 29 89 35 30 00 D5 08 2D 00 53 B2 53 52 28 |F1).50...-.S.SR(|
000000B0: 49 29 3A 53 52 28 49 29 B2 53 52 28 4C 29 3A 53 |I):SR(I).SR(L):S|
000000C0: 52 28 4C 29 B2 53 3A 49 B2 49 AB 51 3A 8B 49 B1 |R(L).S:I.I.Q:.I.|
000000D0: B2 31 A7 33 35 00 E8 08 32 00 4A B2 4A AA 31 3A |.1.35...2.J.J.1:|
000000E0: 8B 4A B3 B2 4B 89 33 30 00 F0 08 37 00 89 32 30 |.J..K.30...7..20|
000000F0: 00 18 09 3C 00 8B C5 28 52 24 28 53 52 28 49 29 |...<...(R$(SR(I)|
00000100: 2C 46 31 29 29 B3 C5 28 52 24 28 53 52 28 4C 29 |,F1))..(R$(SR(L)|
00000110: 2C 46 31 29 29 89 35 30 00 20 09 41 00 89 34 35 |,F1)).50. .A..45|
00000120: 00 39 09 46 00 8F 2A 2A 2A 46 4F 52 4D 41 54 20 |.9.F..***FORMAT |
00000130: 53 43 52 45 45 4E 2A 2A 2A 00 4A 09 4B 00 99 22 |SCREEN***.J.K.."|
00000140: 93 22 3A 81 5A B2 31 A4 54 4C 00 74 09 50 00 99 |.":.Z.1.TL.t.P..|
00000150: C8 28 43 44 24 2C C5 28 46 24 28 5A 2C 30 29 29 |.(CD$,.(F$(Z,0))|
00000160: 29 3B C8 28 43 52 24 2C C5 28 46 24 28 5A 2C 31 |);.(CR$,.(F$(Z,1|
00000170: 29 29 29 3B 00 9A 09 55 00 99 46 24 28 5A 2C 32 |)));...U..F$(Z,2|
00000180: 29 3B 3A 46 31 B2 C5 28 46 24 28 5A 2C 33 29 29 |);:F1..(F$(Z,3))|
00000190: 3A 8B 46 31 B2 30 89 31 30 35 00 C8 09 5A 00 99 |:.F1.0.105...Z..|
000001A0: C8 28 43 44 24 2C C5 28 46 24 28 5A 2C 34 29 29 |.(CD$,.(F$(Z,4))|
000001B0: 29 3B C8 28 43 52 24 2C C5 28 46 24 28 5A 2C 35 |);.(CR$,.(F$(Z,5|
000001C0: 29 29 29 3B 22 92 22 3B 00 DF 09 5F 00 8B 46 24 |)));".";..._..F$|
000001D0: 28 5A 2C 36 29 B2 22 31 22 A7 99 22 12 22 3B 00 |(Z,6)."1"..".";.|
000001E0: EE 09 64 00 99 52 24 28 53 2C 46 31 29 3B 00 FC |..d..R$(S,F1);..|
000001F0: 09 69 00 99 22 92 22 3A 82 5A 3A 8E 00 13 0A 6E |.i..".":.Z:....n|
00000200: 00 8F 2A 2A 2A 49 54 45 4D 20 53 45 41 52 43 48 |..***ITEM SEARCH|
00000210: 2A 2A 2A 00 31 0A 73 00 81 5A B2 31 A4 54 52 3A |***.1.s..Z.1.TR:|
00000220: 53 B2 53 52 28 5A 29 3A 8B 4D 53 B2 30 89 31 38 |S.SR(Z):.MS.0.18|
00000230: 35 00 3F 0A 78 00 8B 4D 53 B2 32 89 31 36 30 00 |5.?.x..MS.2.160.|
00000240: 59 0A 7D 00 8F 2A 2A 2A 4C 45 41 44 49 4E 47 20 |Y.}..***LEADING |
00000250: 53 54 52 49 4E 47 2A 2A 2A 00 81 0A 82 00 41 24 |STRING***.....A$|
00000260: B2 C8 28 52 24 28 53 2C 46 31 29 2C 4C 29 3A 8B |..(R$(S,F1),L):.|
00000270: 42 24 B2 22 4D 22 AF 41 24 B3 44 49 24 89 32 34 |B$."M".A$.DI$.24|
00000280: 30 00 98 0A 87 00 8B 42 24 B2 22 4C 22 AF 41 24 |0......B$."L".A$|
00000290: B2 44 49 24 89 32 34 30 00 B0 0A 8C 00 8B 42 24 |.DI$.240......B$|
000002A0: B2 22 45 22 AF 41 24 B3 B1 44 49 24 89 32 34 30 |."E".A$..DI$.240|
000002B0: 00 C7 0A 91 00 8B 42 24 B2 22 53 22 AF 41 24 B1 |......B$."S".A$.|
000002C0: 44 49 24 89 32 34 30 00 D0 0A 96 00 89 32 34 35 |DI$.240......245|
000002D0: 00 EA 0A 9B 00 8F 2A 2A 2A 53 4C 49 44 49 4E 47 |......***SLIDING|
000002E0: 20 53 54 52 49 4E 47 2A 2A 2A 00 0E 0B A0 00 51 | STRING***.....Q|
000002F0: 51 B2 30 3A 41 24 B2 52 24 28 53 2C 46 31 29 3A |Q.0:A$.R$(S,F1):|
00000300: 81 51 B2 31 A4 C3 28 41 24 29 AB 4C AA 31 00 2B |.Q.1..(A$).L.1.+|
00000310: 0B A5 00 8B CA 28 41 24 2C 51 2C 4C 29 B2 44 49 |.....(A$,Q,L).DI|
00000320: 24 A7 51 B2 39 39 3A 51 51 B2 31 00 3C 0B AA 00 |$.Q.99:QQ.1.<...|
00000330: 82 51 3A 8B 51 51 B2 31 89 32 34 30 00 45 0B AF |.Q:.QQ.1.240.E..|
00000340: 00 89 32 34 35 00 5B 0B B4 00 8F 2A 2A 2A 57 48 |..245.[....***WH|
00000350: 4F 4C 45 20 49 54 45 4D 2A 2A 2A 00 7F 0B B9 00 |OLE ITEM***.....|
00000360: 41 24 B2 52 24 28 53 2C 46 31 29 3A 8B 4E 53 B2 |A$.R$(S,F1):.NS.|
00000370: 31 A7 4B 4D B2 C5 28 41 24 29 3A 89 32 31 35 00 |1.KM..(A$):.215.|
00000380: 96 0B BE 00 8B 42 24 B2 22 4D 22 AF 41 24 B3 44 |.....B$."M".A$.D|
00000390: 49 24 89 32 34 30 00 AD 0B C3 00 8B 42 24 B2 22 |I$.240......B$."|
000003A0: 4C 22 AF 41 24 B2 44 49 24 89 32 34 30 00 C5 0B |L".A$.DI$.240...|
000003B0: C8 00 8B 42 24 B2 22 45 22 AF 41 24 B3 B1 44 49 |...B$."E".A$..DI|
000003C0: 24 89 32 34 30 00 DC 0B CD 00 8B 42 24 B2 22 53 |$.240......B$."S|
000003D0: 22 AF 41 24 B1 44 49 24 89 32 34 30 00 E5 0B D2 |".A$.DI$.240....|
000003E0: 00 89 32 34 35 00 FB 0B D7 00 8B 42 24 B2 22 4D |..245......B$."M|
000003F0: 22 AF 4B 4D B3 4B 56 89 32 34 30 00 11 0C DC 00 |".KM.KV.240.....|
00000400: 8B 42 24 B2 22 4C 22 AF 4B 4D B2 4B 56 89 32 34 |.B$."L".KM.KV.24|
00000410: 30 00 28 0C E1 00 8B 42 24 B2 22 45 22 AF 4B 4D |0.(....B$."E".KM|
00000420: B3 B1 4B 56 89 32 34 30 00 3E 0C E6 00 8B 42 24 |..KV.240.>....B$|
00000430: B2 22 53 22 AF 4B 4D B1 4B 56 89 32 34 30 00 47 |."S".KM.KV.240.G|
00000440: 0C EB 00 89 32 34 35 00 6B 0C F0 00 99 5A 3B A3 |....245.k....Z;.|
00000450: 35 29 3B 52 24 28 53 2C 46 31 29 3A 45 58 B2 45 |5);R$(S,F1):EX.E|
00000460: 58 AA 31 3A 57 28 45 58 29 B2 5A 00 9D 0C F5 00 |X.1:W(EX).Z.....|
00000470: 82 3A 8B 45 58 B2 30 A7 99 22 11 11 12 20 C9 4E |.:.EX.0.."... .N|
00000480: 47 45 4E 20 48 49 54 54 41 44 20 22 3A 81 51 B2 |GEN HITTAD ":.Q.|
00000490: 31 A4 34 30 30 30 3A 82 3A 89 38 31 35 00 A6 0C |1.4000:.:.815...|
000004A0: FA 00 89 35 39 30 00 BF 0C FF 00 8F 2A 2A 2A 52 |...590......***R|
000004B0: 45 43 4F 52 44 20 53 45 41 52 43 48 2A 2A 2A 00 |ECORD SEARCH***.|
000004C0: CD 0C 04 01 8B 46 59 B2 31 89 32 37 30 00 F3 0C |.....FY.1.270...|
000004D0: 09 01 99 22 93 12 C9 4E 47 45 4E 20 46 49 4C 20 |..."...NGEN FIL |
000004E0: 49 20 4D 49 4E 4E 45 54 22 3A 8D 36 33 30 3A 89 |I MINNET":.630:.|
000004F0: 38 31 35 00 16 0D 0E 01 99 22 93 22 A3 38 29 22 |815......".".8)"|
00000500: 92 20 D3 5C 4B 46 55 4E 4B 54 49 4F 4E 45 4E 20 |. .\KFUNKTIONEN |
00000510: 22 3A 99 4C 4E 24 00 44 0D 13 01 99 22 11 D3 4B |":.LN$.D...."..K|
00000520: 52 49 56 20 20 46 20 20 46 5C 52 20 41 54 54 20 |RIV F F\R ATT |
00000530: 53 5C 4B 41 20 50 5D 20 45 54 54 20 12 20 46 5B |S\KA P] ETT . F[|
00000540: 4C 54 20 22 00 7B 0D 18 01 99 22 11 D3 4B 52 49 |LT ".{...."..KRI|
00000550: 56 20 20 50 20 20 46 5C 52 20 41 54 54 20 53 5C |V P F\R ATT S\|
00000560: 4B 41 20 45 54 54 20 12 20 D0 4F 53 54 4E 55 4D |KA ETT . .OSTNUM|
00000570: 4D 45 52 20 11 22 3A 99 4C 4E 24 00 90 0D 1D 01 |MER .":.LN$.....|
00000580: 8D 36 34 30 3A 8B 43 24 B2 22 46 22 A7 34 32 35 |.640:.C$."F".425|
00000590: 00 A1 0D 22 01 8B 43 24 B3 B1 22 50 22 A7 32 38 |..."..C$.."P".28|
000005A0: 35 00 BE 0D 27 01 99 22 11 20 C4 45 54 20 46 49 |5...'..". .ET FI|
000005B0: 4E 4E 53 22 54 52 22 50 4F 53 54 45 52 2E 00 F1 |NNS"TR"POSTER...|
000005C0: 0D 2C 01 99 22 11 D0 4F 53 54 20 4E 52 2E 20 3F |.,.."..OST NR. ?|
000005D0: 20 22 3B 3A 8D 31 33 34 30 3A 99 3A 52 B2 C5 28 | ";:.1340:.:R..(|
000005E0: 42 24 29 3A 8B 52 B3 31 B0 52 B1 54 52 89 33 30 |B$):.R.1.R.TR.30|
000005F0: 30 00 09 0E 31 01 8F 2A 2A 2A 45 58 41 4D 49 4E |0...1..***EXAMIN|
00000600: 45 20 46 49 4C 45 2A 2A 2A 00 17 0E 36 01 8B 46 |E FILE***...6..F|
00000610: 59 B2 30 89 32 36 35 00 36 0E 3B 01 53 B2 53 52 |Y.0.265.6.;.S.SR|
00000620: 28 52 29 3A 8D 37 35 3A 99 C8 28 43 44 24 2C 32 |(R):.75:..(CD$,2|
00000630: 33 29 3B 4C 4E 24 00 55 0E 40 01 99 4E 24 3B 22 |3);LN$.U.@..N$;"|
00000640: 20 22 3B A3 32 35 29 22 20 D0 4F 53 54 22 3B 52 | ";.25)" .OST";R|
00000650: 3A 99 43 4D 24 00 7C 0E 45 01 8D 36 34 30 3A 8B |:.CM$.|.E..640:.|
00000660: 43 24 B2 22 2E 22 A7 52 B2 52 AA 31 3A 8B 52 B1 |C$.".".R.R.1:.R.|
00000670: 54 52 A7 52 B2 54 52 3A 89 33 32 35 00 9C 0E 4A |TR.R.TR:.325...J|
00000680: 01 8B 43 24 B2 22 2C 22 A7 52 B2 52 AB 31 3A 8B |..C$.",".R.R.1:.|
00000690: 52 B3 31 A7 52 B2 31 3A 89 33 32 35 00 B1 0E 4F |R.1.R.1:.325...O|
000006A0: 01 8B 43 24 B2 22 5B 22 AF 55 50 B2 30 A7 38 36 |..C$."[".UP.0.86|
000006B0: 30 00 C8 0E 54 01 8B 43 24 B2 22 53 22 A7 8D 31 |0...T..C$."S"..1|
000006C0: 34 30 35 3A 89 33 31 35 00 DF 0E 59 01 8B 43 24 |405:.315...Y..C$|
000006D0: B2 22 48 22 A7 8D 31 32 33 35 3A 89 33 31 35 00 |."H"..1235:.315.|
000006E0: EF 0E 5E 01 8B 43 24 B2 22 4D 22 A7 38 31 35 00 |..^..C$."M".815.|
000006F0: 04 0F 63 01 8B 43 24 B2 22 49 22 AF 55 50 B2 30 |..c..C$."I".UP.0|
00000700: 89 39 32 30 00 1B 0F 68 01 8B 43 24 B2 22 2C 22 |.920...h..C$.","|
00000710: B0 43 24 B2 22 2E 22 89 33 31 35 00 24 0F 6D 01 |.C$.".".315.$.m.|
00000720: 89 33 32 35 00 42 0F 72 01 8F 2A 2A 2A 20 45 58 |.325.B.r..*** EX|
00000730: 54 52 41 43 54 45 44 20 52 45 43 4F 52 44 53 2A |TRACTED RECORDS*|
00000740: 2A 2A 00 61 0F 77 01 53 B2 53 52 28 52 29 3A 8D |**.a.w.S.SR(R):.|
00000750: 37 35 3A 99 C8 28 43 44 24 2C 32 33 29 3B 4C 4E |75:..(CD$,23);LN|
00000760: 24 00 80 0F 7C 01 99 4E 24 3B 22 20 22 3B A3 32 |$...|..N$;" ";.2|
00000770: 35 29 22 20 D0 4F 53 54 22 3B 52 3A 99 43 58 24 |5)" .OST";R:.CX$|
00000780: 00 89 0F 81 01 8D 36 34 30 00 B7 0F 86 01 8B 43 |......640......C|
00000790: 24 B2 22 2E 22 A7 53 58 B2 53 58 AA 31 3A 8B 53 |$.".".SX.SX.1:.S|
000007A0: 58 B1 45 58 A7 53 58 B2 45 58 3A 52 B2 57 28 53 |X.EX.SX.EX:R.W(S|
000007B0: 58 29 3A 89 33 38 35 00 E3 0F 8B 01 8B 43 24 B2 |X):.385......C$.|
000007C0: 22 2C 22 A7 53 58 B2 53 58 AB 31 3A 8B 53 58 B3 |",".SX.SX.1:.SX.|
000007D0: 31 A7 53 58 B2 31 3A 52 B2 57 28 53 58 29 3A 89 |1.SX.1:R.W(SX):.|
000007E0: 33 38 35 00 03 10 90 01 8B 43 24 B2 22 2E 22 B0 |385......C$.".".|
000007F0: 43 24 B2 22 2C 22 A7 52 B2 57 28 53 58 29 3A 89 |C$.",".R.W(SX):.|
00000800: 33 37 35 00 19 10 95 01 8B 43 24 B2 22 45 22 A7 |375......C$."E".|
00000810: 45 58 B2 30 3A 89 33 31 30 00 30 10 9A 01 8B 43 |EX.0:.310.0....C|
00000820: 24 B2 22 53 22 A7 8D 31 33 38 30 3A 89 33 38 35 |$."S"..1380:.385|
00000830: 00 39 10 9F 01 89 33 38 35 00 57 10 A4 01 8F 2A |.9....385.W....*|
00000840: 2A 2A 20 49 54 45 4D 20 53 45 41 52 43 48 20 4D |** ITEM SEARCH M|
00000850: 45 4E 55 20 2A 2A 2A 00 81 10 A9 01 99 22 93 22 |ENU ***......"."|
00000860: A3 39 29 22 12 20 D3 5C 4B 20 50 5D 20 45 54 54 |.9)". .\K P] ETT|
00000870: 20 46 5B 4C 54 11 22 3A 8D 34 33 30 3A 89 34 35 | F[LT.":.430:.45|
00000880: 30 00 97 10 AE 01 99 4C 4E 24 3A 46 32 B2 30 3A |0......LN$:F2.0:|
00000890: 81 5A B2 31 A4 54 4C 00 B3 10 B3 01 46 31 B2 C5 |.Z.1.TL.....F1..|
000008A0: 28 46 24 28 5A 2C 33 29 29 3A 8B 46 31 B2 30 89 |(F$(Z,3)):.F1.0.|
000008B0: 34 34 35 00 DC 10 B8 01 46 32 B2 46 32 AA 31 3A |445.....F2.F2.1:|
000008C0: 57 28 46 32 29 B2 46 31 3A 99 46 32 3B A3 38 29 |W(F2).F1:.F2;.8)|
000008D0: 3B 22 12 22 3B 46 24 28 5A 2C 32 29 00 EA 10 BD |;".";F$(Z,2)....|
000008E0: 01 82 5A 3A 99 4C 4E 24 3A 8E 00 16 11 C2 01 99 |..Z:.LN$:.......|
000008F0: 3A 99 22 11 12 C6 92 5B 4C 54 4E 55 4D 4D 45 52 |:."....[LTNUMMER|
00000900: 20 41 54 54 20 53 5C 4B 41 20 50 5D 3F 20 22 3B | ATT S\KA P]? ";|
00000910: 3A 8D 31 33 34 30 00 33 11 C7 01 46 31 B2 C5 28 |:.1340.3...F1..(|
00000920: 42 24 29 3A 8B 46 31 B1 46 32 B0 46 31 B3 31 89 |B$):.F1.F2.F1.1.|
00000930: 34 35 30 00 41 11 CC 01 8D 34 36 35 3A 89 34 37 |450.A....465:.47|
00000940: 35 00 71 11 D1 01 46 31 B2 57 28 46 31 29 3A 81 |5.q...F1.W(F1):.|
00000950: 4A B2 31 A4 54 4C 3A 8B C5 28 46 24 28 4A 2C 33 |J.1.TL:..(F$(J,3|
00000960: 29 29 B2 46 31 A7 53 45 24 B2 46 24 28 4A 2C 32 |)).F1.SE$.F$(J,2|
00000970: 29 00 79 11 D6 01 82 3A 8E 00 98 11 DB 01 99 22 |).y....:......."|
00000980: 93 22 A3 39 29 22 12 20 22 53 45 24 22 20 D3 5C |.".9)". "SE$" .\|
00000990: 4B 20 22 3A 99 4C 4E 24 00 C0 11 E0 01 99 22 2A |K ":.LN$......"*|
000009A0: 20 4F 43 48 20 54 45 43 4B 4E 45 4E 20 46 5C 52 | OCH TECKNEN F\R|
000009B0: 20 22 3B 53 31 24 3B 22 20 53 5C 4B 4E 49 4E 47 | ";S1$;" S\KNING|
000009C0: 00 E8 11 E5 01 99 22 2B 20 4F 43 48 20 54 45 43 |......"+ OCH TEC|
000009D0: 4B 4E 45 4E 20 46 5C 52 20 22 3B 53 32 24 3B 22 |KNEN F\R ";S2$;"|
000009E0: 20 53 5C 4B 4E 49 4E 47 00 15 12 EA 01 99 53 33 | S\KNING......S3|
000009F0: 24 3B 22 20 45 4E 44 41 53 54 20 54 45 43 4B 4E |$;" ENDAST TECKN|
00000A00: 45 4E 20 46 5C 52 20 45 58 41 4B 54 20 50 41 53 |EN F\R EXAKT PAS|
00000A10: 53 4E 49 4E 47 00 2B 12 EF 01 99 22 11 D6 5B 52 |SNING.+...."..[R|
00000A20: 44 45 3A 22 3B 3A 8D 31 33 34 30 00 3D 12 F4 01 |DE:";:.1340.=...|
00000A30: 99 3A 44 49 24 B2 42 24 3A 99 4C 4E 24 00 66 12 |.:DI$.B$:.LN$.f.|
00000A40: F9 01 4D 53 B2 30 3A 8B C8 28 44 49 24 2C 31 29 |..MS.0:..(DI$,1)|
00000A50: B2 22 2A 22 A7 4D 53 B2 31 3A 41 31 24 B2 53 31 |."*".MS.1:A1$.S1|
00000A60: 24 3A 89 35 32 30 00 8A 12 FE 01 8B C8 28 44 49 |$:.520.......(DI|
00000A70: 24 2C 31 29 B2 22 2B 22 A7 4D 53 B2 32 3A 41 31 |$,1)."+".MS.2:A1|
00000A80: 24 B2 53 32 24 3A 89 35 32 30 00 9B 12 03 02 41 |$.S2$:.520.....A|
00000A90: 31 24 B2 53 33 24 3A 89 35 32 35 00 C8 12 08 02 |1$.S3$:.525.....|
00000AA0: 44 49 24 B2 CA 28 44 49 24 2C 32 29 3A 4C B2 C3 |DI$..(DI$,2):L..|
00000AB0: 28 44 49 24 29 3A 8B 4D 53 B2 32 A7 41 32 24 B2 |(DI$):.MS.2.A2$.|
00000AC0: 53 34 24 3A 89 35 38 35 00 E1 12 0D 02 8D 37 38 |S4$:.585......78|
00000AD0: 30 3A 8B 4E 53 B2 31 A7 4B 56 B2 C5 28 44 49 24 |0:.NS.1.KV..(DI$|
00000AE0: 29 00 03 13 12 02 99 3A 99 22 11 D6 49 4C 4C 20 |)......:."..ILL |
00000AF0: 44 55 20 41 54 54 20 12 20 22 53 45 24 22 20 92 |DU ATT . "SE$" .|
00000B00: 3A 2D 22 00 1B 13 17 02 99 22 11 28 4C 29 20 22 |:-"......".(L) "|
00000B10: 53 34 24 3B A3 31 38 29 44 49 24 00 33 13 1C 02 |S4$;.18)DI$.3...|
00000B20: 99 22 11 28 45 29 20 22 53 35 24 3B A3 31 38 29 |.".(E) "S5$;.18)|
00000B30: 44 49 24 00 4B 13 21 02 99 22 11 28 4D 29 20 22 |DI$.K.!..".(M) "|
00000B40: 53 36 24 3B A3 31 38 29 44 49 24 00 63 13 26 02 |S6$;.18)DI$.c.&.|
00000B50: 99 22 11 28 53 29 20 22 53 37 24 3B A3 31 38 29 |.".(S) "S7$;.18)|
00000B60: 44 49 24 00 7D 13 2B 02 99 22 11 D6 49 4C 4B 45 |DI$.}.+.."..ILKE|
00000B70: 54 3F 20 22 3B 3A 8D 31 33 34 30 3A 99 00 96 13 |T? ";:.1340:....|
00000B80: 30 02 8B 42 24 B2 22 4C 22 A7 41 32 24 B2 53 34 |0..B$."L".A2$.S4|
00000B90: 24 3A 89 35 38 35 00 AF 13 35 02 8B 42 24 B2 22 |$:.585...5..B$."|
00000BA0: 45 22 A7 41 32 24 B2 53 35 24 3A 89 35 38 35 00 |E".A2$.S5$:.585.|
00000BB0: C8 13 3A 02 8B 42 24 B2 22 4D 22 A7 41 32 24 B2 |..:..B$."M".A2$.|
00000BC0: 53 36 24 3A 89 35 38 35 00 E1 13 3F 02 8B 42 24 |S6$:.585...?..B$|
00000BD0: B2 22 53 22 A7 41 32 24 B2 53 37 24 3A 89 35 38 |."S".A2$.S7$:.58|
00000BE0: 35 00 EA 13 44 02 89 35 35 35 00 21 14 49 02 99 |5...D..555.!.I..|
00000BF0: 22 93 22 53 45 24 22 20 22 3B 41 32 24 3B 22 20 |"."SE$" ";A2$;" |
00000C00: 22 3B 44 49 24 3B 22 20 28 22 3B 41 31 24 3B 22 |";DI$;" (";A1$;"|
00000C10: 29 22 3A 99 4C 4E 24 3A 45 58 B2 30 3A 89 31 31 |)":.LN$:EX.0:.11|
00000C20: 35 00 4B 14 4E 02 99 4C 4E 24 3A 99 22 C1 4E 54 |5.K.N..LN$:.".NT|
00000C30: 41 4C 20 48 49 54 54 41 54 20 54 4F 54 41 4C 54 |AL HITTAT TOTALT|
00000C40: 20 3D 22 3B 45 58 3A 99 4C 4E 24 00 71 14 53 02 | =";EX:.LN$.q.S.|
00000C50: 99 43 57 24 3A 8D 36 34 30 3A 52 B2 57 28 31 29 |.CW$:.640:R.W(1)|
00000C60: 3A 53 58 B2 31 3A 8B 43 24 B2 22 47 22 89 33 37 |:SX.1:.C$."G".37|
00000C70: 35 00 87 14 58 02 8B 43 24 B2 22 4D 22 A7 45 58 |5...X..C$."M".EX|
00000C80: B2 30 3A 89 33 31 35 00 9E 14 5D 02 8B 43 24 B2 |.0:.315...]..C$.|
00000C90: 22 48 22 A7 8D 31 32 33 35 3A 89 35 39 30 00 B5 |"H"..1235:.590..|
00000CA0: 14 62 02 8B 43 24 B3 B1 22 55 22 A7 99 22 93 22 |.b..C$.."U".."."|
00000CB0: 3A 89 35 39 35 00 EE 14 67 02 53 B2 53 52 28 52 |:.595...g.S.SR(R|
00000CC0: 29 3A 8D 31 34 30 35 3A 53 58 B2 53 58 AA 31 3A |):.1405:SX.SX.1:|
00000CD0: 8B 53 58 B1 45 58 A7 53 58 B2 45 58 3A 52 B2 57 |.SX.EX.SX.EX:R.W|
00000CE0: 28 53 58 29 3A 45 58 B2 30 3A 89 33 31 35 00 FF |(SX):EX.0:.315..|
00000CF0: 14 6C 02 52 B2 57 28 53 58 29 3A 89 36 31 35 00 |.l.R.W(SX):.615.|
00000D00: 10 15 76 02 81 51 B2 31 A4 39 39 39 3A 82 3A 8E |..v..Q.1.999:.:.|
00000D10: 00 36 15 7B 02 99 22 11 11 11 12 20 D3 56 41 52 |.6.{..".... .VAR|
00000D20: 41 20 4A 20 28 4A 41 29 20 2F 20 4E 20 28 4E 45 |A J (JA) / N (NE|
00000D30: 4A 29 20 22 3A 8E 00 49 15 80 02 A1 43 24 3A 8B |J) ":..I....C$:.|
00000D40: 43 24 B2 22 22 89 36 34 30 00 4F 15 85 02 8E 00 |C$."".640.O.....|
00000D50: 66 15 8A 02 8F 2A 2A 2A 20 53 41 56 45 20 46 49 |f....*** SAVE FI|
00000D60: 4C 45 20 2A 2A 2A 00 74 15 8F 02 8B 46 59 B2 30 |LE ***.t....FY.0|
00000D70: 89 32 36 35 00 9C 15 94 02 99 22 93 11 11 11 CE |.265......".....|
00000D80: 55 56 41 52 41 4E 44 45 20 46 49 4C 4E 41 4D 4E |UVARANDE FILNAMN|
00000D90: 20 5B 52 20 12 20 22 4E 24 22 20 22 00 C7 15 99 | [R . "N$" "....|
00000DA0: 02 99 22 11 11 11 C7 45 20 45 54 54 20 4E 59 54 |.."....E ETT NYT|
00000DB0: 54 20 4E 41 4D 4E 20 22 3B 3A 8D 31 33 34 30 3A |T NAMN ";:.1340:|
00000DC0: 99 3A 4E 24 B2 42 24 00 DE 15 9E 02 4E 4E 24 B2 |.:N$.B$.....NN$.|
00000DD0: 22 30 3A 22 AA 4E 24 AA 22 2C 53 2C 57 22 00 F8 |"0:".N$.",S,W"..|
00000DE0: 15 A3 02 9F 35 2C 38 2C 35 2C 4E 4E 24 3A 98 35 |....5,8,5,NN$:.5|
00000DF0: 2C 54 52 3B 52 54 24 3B 00 18 16 A8 02 98 35 2C |,TR;RT$;......5,|
00000E00: 54 46 3B 52 54 24 3B 3A 81 52 B2 31 A4 54 52 3A |TF;RT$;:.R.1.TR:|
00000E10: 81 46 4C B2 31 A4 54 46 00 31 16 AD 02 98 35 2C |.FL.1.TF.1....5,|
00000E20: 52 24 28 53 52 28 52 29 2C 46 4C 29 3B 52 54 24 |R$(SR(R),FL);RT$|
00000E30: 3B 00 49 16 B2 02 82 46 4C 2C 52 3A A0 35 3A 8B |;.I....FL,R:.5:.|
00000E40: 53 43 B2 31 89 31 33 33 30 00 57 16 B7 02 52 B2 |SC.1.1330.W...R.|
00000E50: 54 52 3A 89 38 31 35 00 71 16 BC 02 8F 2A 2A 2A |TR:.815.q....***|
00000E60: 20 52 45 41 44 20 49 4E 20 46 49 4C 45 20 2A 2A | READ IN FILE **|
00000E70: 2A 00 7F 16 C1 02 8B 46 59 B2 30 89 37 32 30 00 |*......FY.0.720.|
00000E80: A0 16 C6 02 99 22 93 12 C6 49 4E 4E 53 20 52 45 |....."...INNS RE|
00000E90: 44 41 4E 20 45 4E 20 49 20 4D 49 4E 4E 45 54 22 |DAN EN I MINNET"|
00000EA0: 00 B5 16 CB 02 81 4A B2 31 A4 31 30 30 30 3A 82 |......J.1.1000:.|
00000EB0: 3A 89 38 31 35 00 E0 16 D0 02 99 22 93 11 11 11 |:.815......"....|
00000EC0: 11 11 11 C1 4E 47 45 20 46 49 4C 4E 41 4D 4E 20 |....NGE FILNAMN |
00000ED0: 22 3B 3A 8D 31 33 34 30 3A 99 3A 4E 24 B2 42 24 |";:.1340:.:N$.B$|
00000EE0: 00 02 17 D5 02 4E 4E 24 B2 22 30 3A 22 AA 4E 24 |.....NN$."0:".N$|
00000EF0: AA 22 2C 53 2C 52 22 3A 9F 35 2C 38 2C 35 2C 4E |.",S,R":.5,8,5,N|
00000F00: 4E 24 00 2A 17 DA 02 84 35 2C 54 52 3A 84 35 2C |N$.*....5,TR:.5,|
00000F10: 54 46 3A 52 4D B2 54 52 AA 35 30 3A 8B 52 4D B1 |TF:RM.TR.50:.RM.|
00000F20: 34 35 30 A7 52 4D B2 34 35 30 00 4D 17 DF 02 86 |450.RM.450.M....|
00000F30: 52 24 28 52 4D 2C 54 46 29 2C 57 28 52 4D 29 2C |R$(RM,TF),W(RM),|
00000F40: 53 52 28 52 4D 29 2C 54 24 28 54 46 29 00 86 17 |SR(RM),T$(TF)...|
00000F50: E4 02 81 52 B2 31 A4 54 52 3A 81 46 4C B2 31 A4 |...R.1.TR:.FL.1.|
00000F60: 54 46 3A 84 35 2C 52 24 28 52 2C 46 4C 29 3A 82 |TF:.5,R$(R,FL):.|
00000F70: 46 4C 2C 52 3A 81 52 B2 31 A4 54 52 3A 53 52 28 |FL,R:.R.1.TR:SR(|
00000F80: 52 29 B2 52 3A 82 00 9B 17 E9 02 A0 35 3A 52 B2 |R).R:.......5:R.|
00000F90: 31 3A 46 59 B2 31 3A 89 38 31 35 00 B4 17 EE 02 |1:FY.1:.815.....|
00000FA0: 8F 2A 2A 2A 20 53 45 4C 45 43 54 20 53 4F 52 54 |.*** SELECT SORT|
00000FB0: 20 2A 2A 2A 00 C2 17 F3 02 8B 46 59 B2 30 89 32 | ***......FY.0.2|
00000FC0: 36 35 00 DD 17 F8 02 99 22 93 22 A3 31 34 29 22 |65......".".14)"|
00000FD0: 12 20 D3 4F 52 54 20 22 3A 8D 34 33 30 00 11 18 |. .ORT ":.430...|
00000FE0: FD 02 99 22 11 CE 55 4D 4D 45 52 20 41 56 20 12 |..."..UMMER AV .|
00000FF0: 20 C6 5B 4C 54 45 54 20 92 20 41 54 54 20 53 4F | .[LTET . ATT SO|
00001000: 52 54 45 52 41 3F 20 22 3B 3A 8D 31 33 34 30 3A |RTERA? ";:.1340:|
00001010: 99 00 2E 18 02 03 46 31 B2 C5 28 42 24 29 3A 8B |......F1..(B$):.|
00001020: 46 31 B1 46 32 B0 46 31 B3 31 89 37 36 35 00 41 |F1.F2.F1.1.765.A|
00001030: 18 07 03 8D 34 36 35 3A 8D 37 38 30 3A 89 38 30 |....465:.780:.80|
00001040: 35 00 6A 18 0C 03 4E 53 B2 30 3A 99 3A 99 22 D2 |5.j...NS.0:.:.".|
00001050: 59 4D 4D 45 52 20 46 5B 4C 54 45 54 20 41 4C 46 |YMMER F[LTET ALF|
00001060: 41 4E 55 4D 45 52 49 53 4B 41 00 8B 18 11 03 99 |ANUMERISKA......|
00001070: 22 54 45 43 4B 45 4E 20 28 4A 41 20 2F 20 4E 45 |"TECKEN (JA / NE|
00001080: 4A 29 20 22 3B 3A 8D 31 33 34 30 00 A9 18 16 03 |J) ";:.1340.....|
00001090: 42 24 B2 C8 28 42 24 2C 31 29 3A 8B 42 24 B2 22 |B$..(B$,1):.B$."|
000010A0: 4E 22 A7 4E 53 B2 31 3A 8E 00 BA 18 1B 03 8B 42 |N".NS.1:.......B|
000010B0: 24 B3 B1 22 4A 22 89 37 38 30 00 C0 18 20 03 8E |$.."J".780... ..|
000010C0: 00 F7 18 25 03 99 3A 99 22 11 11 12 20 D3 4F 52 |...%..:."... .OR|
000010D0: 54 45 52 41 52 20 22 3B 53 45 24 3B 22 20 2D 20 |TERAR ";SE$;" - |
000010E0: D6 41 52 47 4F 44 20 56 5B 4E 54 41 2E 22 3A 51 |.ARGOD V[NTA.":Q|
000010F0: B2 54 52 3A 89 32 30 00 0E 19 2A 03 8F 2A 2A 2A |.TR:.20...*..***|
00001100: 20 4D 41 49 4E 20 4D 45 4E 55 20 2A 2A 2A 00 30 | MAIN MENU ***.0|
00001110: 19 2F 03 99 22 93 22 A3 38 29 22 92 20 C9 CE C6 |./..".".8)". ...|
00001120: CF D2 CD C1 D3 D4 C5 D2 20 11 22 3A 99 4C 4E 24 |........ .":.LN$|
00001130: 00 43 19 34 03 99 22 31 2E 20 D3 5C 4B 22 3A 99 |.C.4.."1. .\K":.|
00001140: 4C 4E 24 00 6D 19 39 03 99 22 32 2E 20 C7 52 41 |LN$.m.9.."2. .RA|
00001150: 4E 53 4B 41 22 3A 99 4C 4E 24 3A 99 22 33 2E 20 |NSKA":.LN$:."3. |
00001160: D3 4F 52 54 45 52 41 22 3A 99 4C 4E 24 00 A1 19 |.ORTERA":.LN$...|
00001170: 3E 03 99 22 34 2E 20 CC 5B 53 20 49 4E 20 45 4E |>.."4. .[S IN EN|
00001180: 20 46 49 4C 22 3A 99 4C 4E 24 3A 99 22 35 2E 20 | FIL":.LN$:."5. |
00001190: D3 50 41 52 41 20 46 49 4C 45 4E 22 3A 99 4C 4E |.PARA FILEN":.LN|
000011A0: 24 00 B6 19 43 03 99 22 36 2E 20 D3 4C 55 54 41 |$...C.."6. .LUTA|
000011B0: 22 3A 99 4C 4E 24 00 CE 19 48 03 99 22 11 11 D6 |":.LN$...H.."...|
000011C0: 49 4C 4B 45 54 20 4E 55 4D 4D 45 52 3F 22 00 EB |ILKET NUMMER?"..|
000011D0: 19 4D 03 A1 43 24 3A 41 B2 C5 28 43 24 29 3A 8B |.M..C$:A..(C$):.|
000011E0: 41 B3 31 B0 41 B1 36 A7 38 34 35 00 0B 1A 52 03 |A.1.A.6.845...R.|
000011F0: 91 41 89 32 36 30 2C 33 31 30 2C 37 35 35 2C 37 |.A.260,310,755,7|
00001200: 30 35 2C 36 35 35 2C 31 33 30 35 00 25 1A 57 03 |05,655,1305.%.W.|
00001210: 8F 2A 2A 2A 20 41 4D 45 4E 44 20 52 45 43 4F 52 |.*** AMEND RECOR|
00001220: 44 20 2A 2A 2A 00 43 1A 5C 03 8D 37 35 3A 8D 39 |D ***.C.\..75:.9|
00001230: 38 30 3A 99 A3 39 29 22 12 20 DB 4E 44 52 41 52 |80:..9)". .NDRAR|
00001240: 20 13 22 00 67 1A 61 03 81 5A B2 31 A4 54 4C 3A | .".g.a..Z.1.TL:|
00001250: 46 31 B2 C5 28 46 24 28 5A 2C 33 29 29 3A 8B 46 |F1..(F$(Z,3)):.F|
00001260: 31 B2 30 89 38 38 30 00 A1 1A 66 03 54 24 28 46 |1.0.880...f.T$(F|
00001270: 31 29 B2 52 24 28 53 2C 46 31 29 3A 99 C8 28 43 |1).R$(S,F1):..(C|
00001280: 44 24 2C C5 28 46 24 28 5A 2C 34 29 29 29 3B C8 |D$,.(F$(Z,4)));.|
00001290: 28 43 52 24 2C C5 28 46 24 28 5A 2C 35 29 29 29 |(CR$,.(F$(Z,5)))|
000012A0: 3B 00 BC 1A 6B 03 52 46 B2 31 3A 8D 31 33 34 30 |;...k.RF.1:.1340|
000012B0: 3A 52 24 28 53 2C 46 31 29 B2 42 24 00 C8 1A 70 |:R$(S,F1).B$...p|
000012C0: 03 82 5A 3A 52 46 B2 30 00 F2 1A 75 03 8D 37 35 |..Z:RF.0...u..75|
000012D0: 3A 8D 39 38 30 3A 99 A3 39 29 22 12 20 CF CB 20 |:.980:..9)". .. |
000012E0: 28 4A 20 2F 20 4E 29 3F 92 20 22 3B 3A 8D 31 33 |(J / N)?. ";:.13|
000012F0: 34 30 00 02 1B 7A 03 8B 42 24 B2 22 4A 22 89 33 |40...z..B$."J".3|
00001300: 31 35 00 13 1B 7F 03 8B 42 24 B3 B1 22 4E 22 89 |15......B$.."N".|
00001310: 38 38 35 00 37 1B 84 03 81 5A B2 31 A4 54 4C 3A |885.7....Z.1.TL:|
00001320: 46 31 B2 C5 28 46 24 28 5A 2C 33 29 29 3A 8B 46 |F1..(F$(Z,3)):.F|
00001330: 31 B2 30 89 39 31 30 00 4B 1B 89 03 52 24 28 53 |1.0.910.K...R$(S|
00001340: 2C 46 31 29 B2 54 24 28 46 31 29 00 57 1B 8E 03 |,F1).T$(F1).W...|
00001350: 82 5A 3A 89 38 36 30 00 76 1B 93 03 8F 2A 2A 2A |.Z:.860.v....***|
00001360: 20 49 4E 53 45 52 54 20 4E 45 57 20 52 45 43 4F | INSERT NEW RECO|
00001370: 52 44 20 2A 2A 2A 00 87 1B 98 03 54 52 B2 54 52 |RD ***.....TR.TR|
00001380: AA 31 3A 52 B2 54 52 00 96 1B 9D 03 8B 52 B3 B2 |.1:R.TR......R..|
00001390: 52 4D 89 39 34 35 00 C2 1B A2 03 99 22 93 12 CD |RM.945......"...|
000013A0: 41 58 49 4D 55 4D 20 35 30 20 4E 59 41 20 50 4F |AXIMUM 50 NYA PO|
000013B0: 53 54 45 52 20 48 41 52 20 55 50 50 4E 5D 54 54 |STER HAR UPPN]TT|
000013C0: 53 2E 00 EE 1B A7 03 99 22 11 D3 50 41 52 41 20 |S......."..PARA |
000013D0: 4F 43 48 20 4B 5C 52 20 49 47 45 4E 20 46 5C 52 |OCH K\R IGEN F\R|
000013E0: 20 41 54 54 20 46 4F 52 54 53 5B 54 54 41 00 10 | ATT FORTS[TTA..|
000013F0: 1C AC 03 81 4A B2 31 A4 33 30 30 30 3A 82 3A 54 |....J.1.3000:.:T|
00001400: 52 B2 54 52 AB 31 3A 52 B2 54 52 3A 89 38 31 35 |R.TR.1:R.TR:.815|
00001410: 00 2C 1C B1 03 99 22 93 22 B5 28 B8 28 30 29 29 |.,....".".(.(0))|
00001420: 22 42 59 54 45 53 20 4B 56 41 52 22 00 59 1C B6 |"BYTES KVAR".Y..|
00001430: 03 99 22 11 CD 41 58 2E 20 20 22 52 4D AB 52 AA |.."..AX. "RM.R.|
00001440: 31 22 50 4F 53 54 45 52 20 54 49 4C 4C 20 44 45 |1"POSTER TILL DE|
00001450: 4E 4E 41 20 47 5D 4E 47 2E 00 84 1C BB 03 99 22 |NNA G]NG......."|
00001460: 11 D3 4B 52 49 56 20 2A 20 49 20 45 54 54 20 46 |..KRIV * I ETT F|
00001470: 5B 4C 54 20 4E 5B 52 20 46 5B 52 44 49 47 22 3A |[LT N[R F[RDIG":|
00001480: 99 4C 4E 24 00 8D 1C C0 03 99 43 54 24 00 A7 1C |.LN$......CT$...|
00001490: C5 03 81 4A B2 31 A4 54 46 3A 52 24 28 52 2C 4A |...J.1.TF:R$(R,J|
000014A0: 29 B2 22 3E 22 3A 82 00 BC 1C CA 03 A1 43 24 3A |).">":.......C$:|
000014B0: 8B 43 24 B3 B1 22 20 22 89 39 37 30 00 CF 1C CF |.C$.." ".970....|
000014C0: 03 99 22 93 22 3A 8D 39 38 30 3A 89 39 39 30 00 |..".":.980:.990.|
000014D0: E2 1C D4 03 99 C8 28 43 44 24 2C 32 33 29 3B 4C |......(CD$,23);L|
000014E0: 4E 24 00 FC 1C D9 03 99 A3 39 29 22 D0 4F 53 54 |N$.......9)".OST|
000014F0: 20 4E 55 4D 4D 45 52 22 3B 52 3A 8E 00 2E 1D DE | NUMMER";R:.....|
00001500: 03 81 5A B2 31 A4 54 4C 3A 99 C8 28 43 44 24 2C |..Z.1.TL:..(CD$,|
00001510: C5 28 46 24 28 5A 2C 30 29 29 29 3B C8 28 43 52 |.(F$(Z,0)));.(CR|
00001520: 24 2C C5 28 46 24 28 5A 2C 31 29 29 29 3B 00 43 |$,.(F$(Z,1)));.C|
00001530: 1D E3 03 99 46 24 28 5A 2C 32 29 3A 99 22 92 22 |....F$(Z,2):."."|
00001540: 3A 82 5A 00 68 1D E8 03 81 5A B2 31 A4 54 4C 3A |:.Z.h....Z.1.TL:|
00001550: 46 31 B2 C5 28 46 24 28 5A 2C 33 29 29 3A 8B 46 |F1..(F$(Z,3)):.F|
00001560: 31 B2 30 89 31 30 32 30 00 98 1D ED 03 99 C8 28 |1.0.1020.......(|
00001570: 43 44 24 2C C5 28 46 24 28 5A 2C 34 29 29 29 3B |CD$,.(F$(Z,4)));|
00001580: C8 28 43 52 24 2C C5 28 46 24 28 5A 2C 35 29 29 |.(CR$,.(F$(Z,5))|
00001590: 29 3B 3A 8D 31 33 34 30 00 AF 1D F2 03 8B 42 24 |);:.1340......B$|
000015A0: B2 22 2A 22 A7 5A B2 54 4C 3A 89 31 30 32 30 00 |."*".Z.TL:.1020.|
000015B0: BF 1D F7 03 52 24 28 52 2C 46 31 29 B2 42 24 00 |....R$(R,F1).B$.|
000015C0: E0 1D FC 03 82 5A 3A 8B 42 24 B2 22 2A 22 A7 54 |.....Z:.B$."*".T|
000015D0: 52 B2 54 52 AB 31 3A 52 B2 54 52 3A 89 38 31 35 |R.TR.1:R.TR:.815|
000015E0: 00 F1 1D 01 04 53 52 28 52 29 B2 52 3A 89 39 32 |.....SR(R).R:.92|
000015F0: 30 00 09 1E 06 04 8F 2A 2A 2A 20 49 4E 49 54 49 |0......*** INITI|
00001600: 41 4C 49 53 45 20 2A 2A 2A 00 35 1E 0B 04 99 22 |ALISE ***.5...."|
00001610: 93 1C 22 3A 97 35 33 32 37 32 2C 32 33 3A 97 35 |..":.53272,23:.5|
00001620: 33 32 38 30 2C 38 3A 97 35 33 32 38 31 2C 38 3A |3280,8:.53281,8:|
00001630: 99 C7 28 38 29 00 63 1E 10 04 43 54 24 B2 22 11 |..(8).c...CT$.".|
00001640: 11 20 12 20 CD C5 CC CC C1 CE D3 CC C1 C7 A0 C6 |. . ............|
00001650: DC D2 A0 C1 D4 D4 A0 C6 CF D2 D4 D3 DB D4 D4 C1 |................|
00001660: A0 13 22 00 7E 1E 15 04 43 43 24 B2 22 90 05 1C |..".~...CC$."...|
00001670: 9F 9C 1E 1F 9E 81 95 96 97 98 99 9A 9B 22 00 A0 |............."..|
00001680: 1E 1A 04 43 44 24 B2 22 13 11 11 11 11 11 11 11 |...CD$."........|
00001690: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
000016A0: 00 DD 1E 1F 04 43 52 24 B2 22 1D 1D 1D 1D 1D 1D |.....CR$."......|
000016B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000016C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000016D0: 1D 1D 22 3A 52 54 24 B2 C7 28 31 33 29 00 06 1F |..":RT$..(13)...|
000016E0: 24 04 53 31 24 B2 22 CC 45 44 41 4E 44 45 22 3A |$.S1$.".EDANDE":|
000016F0: 53 32 24 B2 22 C9 4E 52 45 22 3A 53 33 24 B2 22 |S2$.".NRE":S3$."|
00001700: C5 58 41 4B 54 22 00 2B 1F 29 04 53 34 24 B2 22 |.XAKT".+.).S4$."|
00001710: CC 49 4B 41 20 4D 45 44 22 3A 53 35 24 B2 22 C5 |.IKA MED":S5$.".|
00001720: 4A 20 4C 49 4B 41 20 4D 45 44 22 00 4F 1F 2E 04 |J LIKA MED".O...|
00001730: 53 36 24 B2 22 CD 49 4E 44 52 45 20 5B 4E 22 3A |S6$.".INDRE [N":|
00001740: 53 37 24 B2 22 D3 54 5C 52 52 45 20 5B 4E 22 00 |S7$.".T\RRE [N".|
00001750: 70 1F 33 04 99 22 93 22 A3 38 29 22 12 20 C9 CE |p.3..".".8)". ..|
00001760: C6 CF D2 CD C1 D3 D4 C5 D2 A0 22 3A 99 4C 4E 24 |..........":.LN$|
00001770: 00 92 1F 38 04 99 22 11 11 D6 41 44 20 48 41 52 |...8.."...AD HAR|
00001780: 20 53 4B 5B 52 4D 46 4F 52 4D 41 54 46 49 4C 45 | SK[RMFORMATFILE|
00001790: 4E 22 00 C6 1F 3D 04 99 22 11 46 5C 52 20 CE 41 |N"...=..".F\R .A|
000017A0: 4D 4E 3F 20 22 3B 3A 8D 31 33 34 30 3A 99 3A 46 |MN? ";:.1340:.:F|
000017B0: 24 B2 42 24 3A 42 24 B2 22 30 3A 22 AA 46 24 AA |$.B$:B$."0:".F$.|
000017C0: 22 2C 53 2C 52 22 00 EA 1F 42 04 9F 35 2C 38 2C |",S,R"...B..5,8,|
000017D0: 35 2C 42 24 3A 84 35 2C 54 4C 3A 84 35 2C 55 50 |5,B$:.5,TL:.5,UP|
000017E0: 3A 86 46 24 28 54 4C 2C 36 29 00 1E 20 47 04 8B |:.F$(TL,6).. G..|
000017F0: 55 50 B2 31 A7 43 4D 24 B2 22 12 20 CB CF CD CD |UP.1.CM$.". ....|
00001800: C1 CE C4 CF 20 20 20 20 3C 20 20 20 3E 20 20 20 |.... < > |
00001810: 53 20 20 20 48 20 20 20 4D 20 20 20 13 22 00 53 |S H M .".S|
00001820: 20 4C 04 8B 55 50 B2 30 A7 43 4D 24 B2 22 12 20 | L..UP.0.CM$.". |
00001830: CB CF CD CD C1 CE C4 CF 20 20 20 20 3C 20 20 3E |........ < >|
00001840: 20 20 5B 20 20 49 20 20 53 20 20 48 20 20 4D 20 | [ I S H M |
00001850: 20 13 22 00 85 20 51 04 4C 4E 24 B2 22 2D 2D 2D | .".. Q.LN$."---|
00001860: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001870: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001880: 2D 2D 2D 2D 22 00 AF 20 56 04 43 58 24 B2 22 12 |----".. V.CX$.".|
00001890: 20 CB CF CD CD C1 CE C4 CF 20 20 20 20 3C 20 20 | ........ < |
000018A0: 20 3E 20 20 20 53 20 20 20 45 20 20 20 13 22 00 | > S E .".|
000018B0: E1 20 5B 04 43 57 24 B2 22 11 11 12 20 CB CF CD |. [.CW$."... ...|
000018C0: CD C1 CE C4 CF 20 20 20 55 20 28 41 4C 4C 41 29 |..... U (ALLA)|
000018D0: 20 20 20 47 20 20 20 4D 20 20 20 48 20 20 20 13 | G M H .|
000018E0: 22 00 F4 20 60 04 81 4A B2 31 A4 54 4C 3A 81 4B |".. `..J.1.TL:.K|
000018F0: B2 30 A4 36 00 12 21 65 04 84 35 2C 46 24 28 4A |.0.6..!e..5,F$(J|
00001900: 2C 4B 29 3A 82 4B 3A 84 35 2C 41 24 3A 82 4A 3A |,K):.K:.5,A$:.J:|
00001910: A0 35 00 2D 21 6A 04 8F 2A 2A 2A 20 53 45 4C 45 |.5.-!j..*** SELE|
00001920: 43 54 20 43 4F 4C 4F 55 52 20 2A 2A 2A 00 50 21 |CT COLOUR ***.P!|
00001930: 6F 04 99 22 93 11 11 11 D6 5B 4C 4A 20 53 4B 5B |o..".....[LJ SK[|
00001940: 52 4D 46 5B 52 47 20 4E 5B 52 48 45 4C 53 54 22 |RMF[RG N[RHELST"|
00001950: 00 78 21 74 04 99 22 11 4D 41 52 4B 5C 52 45 4E |.x!t..".MARK\REN|
00001960: 20 42 4C 49 4E 4B 41 52 2C 20 45 4C 4C 45 52 20 | BLINKAR, ELLER |
00001970: 4E 55 20 4D 45 44 3A 2D 00 A8 21 79 04 99 22 11 |NU MED:-..!y..".|
00001980: 20 20 20 46 31 20 20 20 20 20 CB 41 4E 54 20 20 | F1 .ANT |
00001990: 22 3A 99 22 11 20 20 20 46 33 20 20 20 20 20 C2 |":.". F3 .|
000019A0: 41 43 4B 47 52 55 4E 44 00 DE 21 7E 04 99 22 11 |ACKGRUND..!~..".|
000019B0: 20 20 20 46 35 20 20 20 20 20 D4 45 58 54 22 3A | F5 .EXT":|
000019C0: 99 22 11 11 22 3B 43 54 24 3A 5A 5A B2 31 3A 8D |."..";CT$:ZZ.1:.|
000019D0: 31 31 35 35 3A 5A 5A B2 30 3A 89 38 31 35 00 F2 |1155:ZZ.0:.815..|
000019E0: 21 83 04 A1 41 24 3A 8B 41 24 B2 22 22 89 31 31 |!...A$:.A$."".11|
000019F0: 35 35 00 06 22 88 04 8B C6 28 41 24 29 B2 31 33 |55.."....(A$).13|
00001A00: 33 89 31 31 38 35 00 1A 22 8D 04 8B C6 28 41 24 |3.1185.."....(A$|
00001A10: 29 B2 31 33 34 89 31 31 39 35 00 2E 22 92 04 8B |).134.1195.."...|
00001A20: C6 28 41 24 29 B2 31 33 35 89 31 32 30 35 00 3C |.(A$).135.1205.<|
00001A30: 22 97 04 8B 41 24 B2 22 20 22 A7 8E 00 46 22 9C |"...A$." "...F".|
00001A40: 04 89 31 31 35 35 00 5E 22 A1 04 45 43 B2 45 43 |..1155.^"..EC.EC|
00001A50: AA 31 3A 8B 45 43 B1 31 35 A7 45 43 B2 30 00 72 |.1:.EC.15.EC.0.r|
00001A60: 22 A6 04 97 35 33 32 38 30 2C 45 43 3A 89 31 32 |"...53280,EC:.12|
00001A70: 32 30 00 8A 22 AB 04 42 43 B2 42 43 AA 31 3A 8B |20.."..BC.BC.1:.|
00001A80: 42 43 B1 31 35 A7 42 43 B2 30 00 9E 22 B0 04 97 |BC.15.BC.0.."...|
00001A90: 35 33 32 38 31 2C 42 43 3A 89 31 32 32 30 00 B6 |53281,BC:.1220..|
00001AA0: 22 B5 04 43 43 B2 43 43 AA 31 3A 8B 43 43 B1 31 |"..CC.CC.1:.CC.1|
00001AB0: 36 A7 43 43 B2 31 00 C8 22 BA 04 99 CA 28 43 43 |6.CC.1.."....(CC|
00001AC0: 24 2C 43 43 2C 31 29 3B 00 EA 22 BF 04 8B 5A 5A |$,CC,1);.."...ZZ|
00001AD0: B2 31 A7 99 C8 28 43 44 24 2C 31 32 29 3B A3 31 |.1...(CD$,12);.1|
00001AE0: 30 29 3B 22 D4 45 58 54 22 3B 00 F9 22 C4 04 8B |0);".EXT";.."...|
00001AF0: 5A 5A B2 31 89 31 31 35 35 00 FF 22 C9 04 8E 00 |ZZ.1.1155.."....|
00001B00: 11 23 CE 04 8F 2A 2A 2A 20 48 45 4C 50 20 2A 2A |.#...*** HELP **|
00001B10: 2A 00 39 23 D3 04 99 22 93 12 20 C8 CA DB CC D0 |*.9#...".. .....|
00001B20: D3 CB DB D2 CD 2E 20 20 CB CF CD CD C1 CE C4 CF |...... ........|
00001B30: CE C1 20 5B 52 3A 2D 20 22 00 65 23 D8 04 99 22 |.. [R:- ".e#..."|
00001B40: 11 3C 20 20 D3 45 20 CE DB D3 D4 C1 20 50 4F 53 |.< .E ..... POS|
00001B50: 54 45 4E 20 28 41 4E 56 5B 4E 44 20 45 4A 20 53 |TEN (ANV[ND EJ S|
00001B60: 4B 49 46 54 29 00 90 23 DD 04 99 22 11 3E 20 20 |KIFT)..#...".> |
00001B70: D3 45 20 C6 DC D2 C5 C7 DD C5 CE C4 C5 20 50 4F |.E .......... PO|
00001B80: 53 54 45 4E 20 20 20 27 27 27 20 20 20 20 27 27 |STEN ''' ''|
00001B90: 00 A7 23 E2 04 99 22 11 5B 20 20 DB CE C4 D2 C1 |..#...".[ .....|
00001BA0: 20 50 4F 53 54 45 4E 00 C0 23 E7 04 99 22 11 47 | POSTEN..#...".G|
00001BB0: 20 20 C7 D2 C1 CE D3 CB C1 20 50 4F 53 54 45 4E | ....... POSTEN|
00001BC0: 00 D9 23 EC 04 99 22 11 49 20 20 C9 CE D3 C5 D2 |..#...".I .....|
00001BD0: D4 20 45 4E 20 50 4F 53 54 00 F0 23 F1 04 99 22 |. EN POST..#..."|
00001BE0: 11 53 20 20 D3 CB D2 C9 D6 20 50 4F 53 54 45 4E |.S ..... POSTEN|
00001BF0: 00 1C 24 F6 04 99 22 11 55 20 20 28 41 4C 4C 41 |..$...".U (ALLA|
00001C00: 29 20 D3 CB D2 C9 D6 20 D5 D4 20 41 4C 4C 41 20 |) ..... .. ALLA |
00001C10: 44 45 53 53 41 20 50 4F 53 54 45 52 00 42 24 FB |DESSA POSTER.B$.|
00001C20: 04 99 22 11 45 20 20 C5 D8 C9 D4 20 54 49 4C 4C |..".E .... TILL|
00001C30: 42 41 4B 41 20 54 49 4C 4C 20 C7 D2 C1 CE D3 CB |BAKA TILL ......|
00001C40: C1 2E 00 5D 24 00 05 99 22 11 4D 20 CD C5 CE D9 |...]$...".M ....|
00001C50: 22 3A 99 22 11 48 20 20 C8 CA DB CC D0 00 66 24 |":.".H ......f$|
00001C60: 05 05 99 43 54 24 00 7C 24 0A 05 A1 41 24 3A 8B |...CT$.|$...A$:.|
00001C70: 41 24 B3 B1 22 20 22 89 31 32 39 30 00 87 24 0F |A$.." ".1290..$.|
00001C80: 05 99 22 93 22 3A 8E 00 A1 24 14 05 8F 2A 2A 2A |..".":...$...***|
00001C90: 20 45 58 49 54 20 50 52 4F 47 52 41 4D 20 2A 2A | EXIT PROGRAM **|
00001CA0: 2A 00 B0 24 19 05 8B 54 52 B2 30 89 31 33 33 30 |*..$...TR.0.1330|
00001CB0: 00 DD 24 1E 05 99 22 93 12 20 D6 49 4C 4C 20 44 |..$...".. .ILL D|
00001CC0: 55 20 48 41 20 45 4E 20 53 5B 4B 45 52 48 45 54 |U HA EN S[KERHET|
00001CD0: 53 4B 4F 50 49 41 3F 22 3A 8D 36 33 35 00 F3 24 |SKOPIA?":.635..$|
00001CE0: 23 05 8D 36 34 30 3A 8B 43 24 B2 22 4E 22 A7 31 |#..640:.C$."N".1|
00001CF0: 33 33 30 00 09 25 28 05 8B 43 24 B2 22 4A 22 A7 |330..%(..C$."J".|
00001D00: 53 43 B2 31 3A 89 36 35 35 00 13 25 2D 05 89 31 |SC.1:.655..%-..1|
00001D10: 33 31 35 00 2A 25 32 05 99 22 93 12 20 D3 CC D5 |315.*%2..".. ...|
00001D20: D4 20 22 3A 8D 36 33 30 3A 80 00 41 25 37 05 8F |. ":.630:..A%7..|
00001D30: 2A 2A 2A 20 47 45 54 20 49 4E 50 55 54 20 2A 2A |*** GET INPUT **|
00001D40: 2A 00 50 25 3C 05 42 24 B2 22 22 3A 54 43 B2 30 |*.P%<.B$."":TC.0|
00001D50: 00 6B 25 41 05 99 22 A6 9D 22 3B 3A A1 41 24 3A |.k%A.."..";:.A$:|
00001D60: 8B 41 24 B2 22 22 89 31 33 39 30 00 7D 25 46 05 |.A$."".1390.}%F.|
00001D70: 8B 41 24 B3 B1 52 54 24 89 31 33 37 30 00 91 25 |.A$..RT$.1370..%|
00001D80: 4B 05 8B 54 43 B2 30 AF 52 46 B2 30 89 31 33 34 |K..TC.0.RF.0.134|
00001D90: 35 00 B3 25 50 05 8B 54 43 B2 30 AF 52 46 B2 31 |5..%P..TC.0.RF.1|
00001DA0: A7 42 24 B2 52 24 28 53 2C 46 31 29 3A 99 42 24 |.B$.R$(S,F1):.B$|
00001DB0: 3B 3A 8E 00 BF 25 55 05 99 22 20 22 3B 3A 8E 00 |;:...%U.." ";:..|
00001DC0: E4 25 5A 05 41 B2 C6 28 41 24 29 3A 8B 41 B1 31 |.%Z.A..(A$):.A.1|
00001DD0: 33 32 AF 41 B3 31 33 36 A7 8D 31 31 36 30 3A 89 |32.A.136..1160:.|
00001DE0: 31 33 39 30 00 14 26 5F 05 8B 41 24 B3 B1 C7 28 |1390..&_..A$...(|
00001DF0: 32 30 29 A7 99 41 24 3B 22 A6 9D 22 3B 3A 54 43 |20)..A$;"..";:TC|
00001E00: B2 54 43 AA 31 3A 42 24 B2 42 24 AA 41 24 3A 89 |.TC.1:B$.B$.A$:.|
00001E10: 31 33 34 35 00 23 26 64 05 8B 54 43 B2 30 89 31 |1345.#&d..TC.0.1|
00001E20: 33 34 35 00 4B 26 69 05 54 43 B2 54 43 AB 31 3A |345.K&i.TC.TC.1:|
00001E30: 99 22 20 9D 9D A6 9D 22 3B 3A 42 24 B2 C8 28 42 |." ....";:B$..(B|
00001E40: 24 2C 54 43 29 3A 89 31 33 34 35 00 7B 26 6E 05 |$,TC):.1345.{&n.|
00001E50: 81 51 B2 31 A4 38 30 3A 82 3A 99 22 20 9D 22 3B |.Q.1.80:.:." .";|
00001E60: 3A A1 41 24 3A 8B 41 24 B2 22 22 A7 81 51 B2 31 |:.A$:.A$.""..Q.1|
00001E70: A4 38 30 3A 82 3A 89 31 33 34 35 00 85 26 73 05 |.80:.:.1345..&s.|
00001E80: 89 31 33 35 30 00 A3 26 78 05 8F 2A 2A 2A 20 56 |.1350..&x..*** V|
00001E90: 49 43 20 31 35 31 35 20 50 52 49 4E 54 45 52 20 |IC 1515 PRINTER |
00001EA0: 2A 2A 2A 00 C3 26 7D 05 97 35 33 32 36 35 2C 31 |***..&}..53265,1|
00001EB0: 31 3A 9F 34 2C 34 2C 37 3A 8B 50 50 B2 31 89 31 |1:.4,4,7:.PP.1.1|
00001EC0: 34 31 35 00 F7 26 82 05 50 50 B2 31 3A 98 34 2C |415..&..PP.1:.4,|
00001ED0: 4C 4E 24 3B 4C 4E 24 3A 98 34 2C 22 22 3B A3 32 |LN$;LN$:.4,"";.2|
00001EE0: 35 29 3B 22 C6 C9 CC 3A 22 3B 4E 24 3A 98 34 2C |5);"...:";N$:.4,|
00001EF0: 4C 4E 24 3B 4C 4E 24 00 0C 27 87 05 98 34 2C 22 |LN$;LN$..'...4,"|
00001F00: 20 20 D0 CF D3 D4 22 3B 52 3A 98 34 00 31 27 8C | ....";R:.4.1'.|
00001F10: 05 81 5A B2 31 A4 54 4C 3A 46 31 B2 C5 28 46 24 |..Z.1.TL:F1..(F$|
00001F20: 28 5A 2C 33 29 29 3A 8B 46 31 B2 30 89 31 34 34 |(Z,3)):.F1.0.144|
00001F30: 30 00 63 27 91 05 8B C8 28 46 24 28 5A 2C 32 29 |0.c'....(F$(Z,2)|
00001F40: 2C 31 29 B2 22 12 22 A7 98 34 2C 22 20 20 22 3B |,1)."."..4," ";|
00001F50: CA 28 46 24 28 5A 2C 32 29 2C 32 29 3B 3A 89 31 |.(F$(Z,2),2);:.1|
00001F60: 34 33 35 00 78 27 96 05 98 34 2C 22 20 20 22 3B |435.x'...4," ";|
00001F70: 46 24 28 5A 2C 32 29 3B 00 8D 27 9B 05 98 34 2C |F$(Z,2);..'...4,|
00001F80: 22 3A 20 22 3B 52 24 28 53 2C 46 31 29 00 AE 27 |": ";R$(S,F1)..'|
00001F90: A0 05 82 5A 3A 98 34 2C 4C 4E 24 3B 4C 4E 24 3A |...Z:.4,LN$;LN$:|
00001FA0: A0 34 3A 97 35 33 32 36 35 2C 32 37 3A 8E 00 00 |.4:.53265,27:...|
00001FB0: 00 |. |
..%....***INFORMASTER**BOB CHAPPEL***./.
...1035.?....***SORT***.Z...Q..(Q.2):.Q.
0.R.1:.815.I...J.1:K.TR.Q.Q...I.J...#.L.
I.Q:.NS.1.60...(..R$(SR(I),F1).R$(SR(L),
F1).50.U.-.S.SR(I):SR(I).SR(L):SR(L).S:I
.I.Q:.I..1.35...2.J.J.1:.J..K.30...7..20
...<..E(R$(SR(I),F1)).E(R$(SR(L),F1)).50
. .A..45.9.F..***FORMAT SCREEN***.J.K.."
.":.Z.1.TL.T.P..H(CD$,E(F$(Z,0)));H(CR$,
E(F$(Z,1)));...U..F$(Z,2);:F1.E(F$(Z,3))
:.F1.0.105.H.Z..H(CD$,E(F$(Z,4)));H(CR$,
E(F$(Z,5)));".";..._..F$(Z,6)."1"..".";.
..D..R$(S,F1);...I..".":.Z:....N..***ITE
M SEARCH***.1.S..Z.1.TR:S.SR(Z):.MS.0.18
5.?.X..MS.2.160.Y.}..***LEADING STRING**
*.....A$.H(R$(S,F1),L):.B$."M".A$.DI$.24
0......B$."L".A$.DI$.240......B$."E".A$.
.DI$.240.G....B$."S".A$.DI$.240.P....245
......***SLIDING STRING***... .QQ.0:A$.R
$(S,F1):.Q.1.C(A$).L.1.+....J(A$,Q,L).DI
$.Q.99:QQ.1.<....Q:.QQ.1.240.E....245.[.
...***WHOLE ITEM***....A$.R$(S,F1):.NS.
1.KM.E(A$):.215......B$."M".A$.DI$.240..
.C..B$."L".A$.DI$.240.E.H..B$."E".A$..DI
$.240...M..B$."S".A$.DI$.240...R..245...
W..B$."M".KM.KV.240......B$."L".KM.KV.24
0.(....B$."E".KM..KV.240.>....B$."S".KM.
KV.240.G....245.K....Z;.5);R$(S,F1):EX.E
X.1:W(EX).Z......:.EX.0.."... INGEN HITT
AD ":.Q.1.4000:.:.815......590......***R
ECORD SEARCH***.M....FY.1.270......"..IN
GEN FIL I MINNET":.630:.815......".".8)"
. S\KFUNKTIONEN ":.LN$.D....".SKRIV F
F\R ATT S\KA P] ETT . F[LT ".{....".SKRI
V P F\R ATT S\KA ETT . POSTNUMMER .":.
LN$......640:.C$."F".425..."..C$.."P".28
5...'..". DET FINNS"TR"POSTER....,..".PO
ST NR. ? ";:.1340:.:R.E(B$):.R.1.R.TR.30
0...1..***EXAMINE FILE***...6..FY.0.265.
6.;.S.SR(R):.75:.H(CD$,23);LN$.U.@..N$;"
";.25)" POST";R:.CM$.|.E..640:.C$.".".R
.R.1:.R.TR.R.TR:.325...J..C$.",".R.R.1:.
R.1.R.1:.325...O..C$."[".UP.0.860.H.T..C
$."S"..1405:.315...Y..C$."H"..1235:.315.
..^..C$."M".815...C..C$."I".UP.0.920...H
..C$.",".C$.".".315.$.M..325.B.R..*** EX
TRACTED RECORDS***.A.W.S.SR(R):.75:.H(CD
$,23);LN$...|..N$;" ";.25)" POST";R:.CX$
......640......C$.".".SX.SX.1:.SX.EX.SX.
EX:R.W(SX):.385......C$.",".SX.SX.1:.SX.
1.SX.1:R.W(SX):.385......C$.".".C$.",".R
.W(SX):.375......C$."E".EX.0:.310.0....C
$."S"..1380:.385.9....385.W....*** ITEM
SEARCH MENU ***......".".9)". S\K P] ETT
F[LT.":.430:.450......LN$:F2.0:.Z.1.TL.
....F1.E(F$(Z,3)):.F1.0.445.....F2.F2.1:
W(F2).F1:.F2;.8);".";F$(Z,2)......Z:.LN$
:....B..:."..F.[LTNUMMER ATT S\KA P]? ";
:.1340.3.G.F1.E(B$):.F1.F2.F1.1.450.A.L.
.465:.475.Q.Q.F1.W(F1):.J.1.TL:.E(F$(J,3
)).F1.SE$.F$(J,2).Y.V..:.......".".9)".
"SE$" S\K ":.LN$......"* OCH TECKNEN F\R
";S1$;" S\KNING......"+ OCH TECKNEN F\R
";S2$;" S\KNING......S3$;" ENDAST TECKN
EN F\R EXAKT PASSNING.+....".V[RDE:";:.1
340.=....:DI$.B$:.LN$.F...MS.0:.H(DI$,1)
."*".MS.1:A1$.S1$:.520......H(DI$,1)."+"
.MS.2:A1$.S2$:.520.....A1$.S3$:.525.H...
DI$.J(DI$,2):L.C(DI$):.MS.2.A2$.S4$:.585
......780:.NS.1.KV.E(DI$)......:.".VILL
DU ATT . "SE$" .:-"......".(L) "S4$;.18)
DI$.3....".(E) "S5$;.18)DI$.K.!..".(M) "
S6$;.18)DI$.C.&..".(S) "S7$;.18)DI$.}.+.
.".VILKET? ";:.1340:....0..B$."L".A2$.S4
$:.585...5..B$."E".A2$.S5$:.585.H.:..B$.
"M".A2$.S6$:.585...?..B$."S".A2$.S7$:.58
5...D..555.!.I.."."SE$" ";A2$;" ";DI$;"
(";A1$;")":.LN$:EX.0:.115.K.N..LN$:."ANT
AL HITTAT TOTALT =";EX:.LN$.Q.S..CW$:.64
0:R.W(1):SX.1:.C$."G".375...X..C$."M".EX
.0:.315...]..C$."H"..1235:.590...B..C$..
"U"..".":.595...G.S.SR(R):.1405:SX.SX.1:
.SX.EX.SX.EX:R.W(SX):EX.0:.315...L.R.W(S
X):.615...V..Q.1.999:.:..6.{..".... SVAR
A J (JA) / N (NEJ) ":..I....C$:.C$."".64
0.O.....F....*** SAVE FILE ***.T....FY.0
.265......"....NUVARANDE FILNAMN [R . "N
$" ".G...."...GE ETT NYTT NAMN ";:.1340:
.:N$.B$.....NN$."0:".N$.",S,W"......5,8,
5,NN$:.5,TR;RT$;......5,TF;RT$;:.R.1.TR:
.FL.1.TF.1....5,R$(SR(R),FL);RT$;.I....F
L,R: 5:.SC.1.1330.W...R.TR:.815.Q....***
READ IN FILE ***..A..FY.0.720. .F.."..
FINNS REDAN EN I MINNET"...K..J.1.1000:.
:.815...P..".......ANGE FILNAMN ";:.1340
:.:N$.B$...U.NN$."0:".N$.",S,R":.5,8,5,N
N$.*.Z..5,TR:.5,TF:RM.TR.50:.RM.450.RM.4
50.M....R$(RM,TF),W(RM),SR(RM),T$(TF)...
...R.1.TR:.FL.1.TF:.5,R$(R,FL):.FL,R:.R.
1.TR:SR(R).R:...... 5:R.1:FY.1:.815.....
.*** SELECT SORT ***.B....FY.0.265......
".".14)". SORT ":.430......".NUMMER AV .
F[LTET . ATT SORTERA? ";:.1340:......F1
.E(B$):.F1.F2.F1.1.765.A....465:.780:.80
5.J...NS.0:.:."RYMMER F[LTET ALFANUMERIS
KA......"TECKEN (JA / NEJ) ";:.1340.....
B$.H(B$,1):.B$."N".NS.1:.......B$.."J".7
80... .....%..:."... SORTERAR ";SE$;" -
VARGOD V[NTA.":Q.TR:.20...*..*** MAIN ME
NU ***.0./..".".8)". INFORMASTER .":.LN$
.C.4.."1. S\K":.LN$.M.9.."2. GRANSKA":.L
N$:."3. SORTERA":.LN$...>.."4. L[S IN EN
FIL":.LN$:."5. SPARA FILEN":.LN$...C.."
6. SLUTA":.LN$.N.H.."..VILKET NUMMER?"..
.M..C$:A.E(C$):.A.1.A.6.845...R..A.260,3
10,755,705,655,1305.%.W..*** AMEND RECOR
D ***.C.\..75:.980:..9)". .NDRAR .".G.A.
.Z.1.TL:F1.E(F$(Z,3)):.F1.0.880...F.T$(F
1).R$(S,F1):.H(CD$,E(F$(Z,4)));H(CR$,E(F
$(Z,5)));...K.RF.1:.1340:R$(S,F1).B$.H.P
..Z:RF.0...U..75:.980:..9)". OK (J / N)?
. ";:.1340...Z..B$."J".315.....B$.."N".
885.7....Z.1.TL:F1.E(F$(Z,3)):.F1.0.910.
K...R$(S,F1).T$(F1).W....Z:.860.V....***
INSERT NEW RECORD ***.....TR.TR.1:R.TR.
.....R..RM.945.B...."..MAXIMUM 50 NYA PO
STER HAR UPPN]TTS.......".SPARA OCH K\R
IGEN F\R ATT FORTS[TTA......J.1.3000:.:T
R.TR.1:R.TR:.815.,....".".(.(0))"BYTES K
VAR".Y....".MAX. "RM.R.1"POSTER TILL DE
NNA G]NG.......".SKRIV * I ETT F[LT N[R
F[RDIG":.LN$......CT$...E..J.1.TF:R$(R,J
).">":....J..C$:.C$.." ".970.O.O..".":.9
80:.990...T..H(CD$,23);LN$...Y...9)"POST
NUMMER";R:.......Z.1.TL:.H(CD$,E(F$(Z,0
)));H(CR$,E(F$(Z,1)));.C....F$(Z,2):."."
:.Z.H....Z.1.TL:F1.E(F$(Z,3)):.F1.0.1020
......H(CD$,E(F$(Z,4)));H(CR$,E(F$(Z,5))
);:.1340......B$."*".Z.TL:.1020.....R$(R
,F1).B$......Z:.B$."*".TR.TR.1:R.TR:.815
.....SR(R).R:.920......*** INITIALISE **
*.5...."..":.53272,23:.53280,8:.53281,8:
.G(8).C...CT$.".. . MELLANSLAG F.R ATT F
ORTS.TTA .".~...CC$."................".
...CD$.".......................".....CR$
."......................................
..":RT$.G(13)...$.S1$."LEDANDE":S2$."INR
E":S3$."EXAKT".+.).S4$."LIKA MED":S5$."E
J LIKA MED".O...S6$."MINDRE [N":S7$."ST\
RRE [N".P.3..".".8)". INFORMASTER ":.LN$
...8.."..VAD HAR SK[RMFORMATFILEN".F.=..
".F\R NAMN? ";:.1340:.:F$.B$:B$."0:".F$.
",S,R"...B..5,8,5,B$:.5,TL:.5,UP:.F$(TL,
6).. G..UP.1.CM$.". KOMMANDO < >
S H M .".S L..UP.0.CM$.". KOMMANDO
< > [ I S H M .".. Q.LN$."---
------------------------------------"..
V.CX$.". KOMMANDO < > S E .".
. [.CW$."... KOMMANDO U (ALLA) G M
H .".. `..J.1.TL:.K.0.6..!E..5,F$(J
,K):.K:.5,A$:.J: 5.-!J..*** SELECT COLOU
R ***.P!O.."....V[LJ SK[RMF[RG N[RHELST"
.X!T..".MARK\REN BLINKAR, ELLER NU MED:-
..!Y..". F1 KANT ":.". F3 B
ACKGRUND..!~..". F5 TEXT":."..";CT
$:ZZ.1:.1155:ZZ.0:.815..!...A$:.A$."".11
55.."...F(A$).133.1185.."...F(A$).134.11
95.."...F(A$).135.1205.<"...A$." "...F".
..1155.^"..EC.EC.1:.EC.15.EC.0.R"...5328
0,EC:.1220.."..BC.BC.1:.BC.15.BC.0.."...
53281,BC:.1220.."..CC.CC.1:.CC.16.CC.1.H
"...J(CC$,CC,1);.."...ZZ.1..H(CD$,12);.1
0);"TEXT";.."D..ZZ.1.1155.."I....#N..***
HELP ***.9#S..".. HJ.LPSK.RM. KOMMANDO
NA [R:- ".E#X..".< SE N.STA POSTEN (ANV
[ND EJ SKIFT)..#...".> SE F.REG.ENDE PO
STEN ''' ''..#...".[ .NDRA POSTEN.
.#...".G GRANSKA POSTEN.Y#...".I INSER
T EN POST..#...".S SKRIV POSTEN..$...".
U (ALLA) SKRIV UT ALLA DESSA POSTER.B$.
..".E EXIT TILLBAKA TILL GRANSKA..]$...
".M MENY":.".H HJ.LP.F$...CT$.|$...A$:.
A$.." ".1290..$...".":...$...*** EXIT PR
OGRAM ***..$...TR.0.1330..$...".. VILL D
U HA EN S[KERHETSKOPIA?":.635..$#..640:.
C$."N".1330..%(..C$."J".SC.1:.655..%-..1
315.*%2..".. SLUT ":.630:..A%7..*** GET
INPUT ***.P%<.B$."":TC.0.K%A.."..";:.A$:
.A$."".1390.}%F..A$..RT$.1370..%K..TC.0.
RF.0.1345..%P..TC.0.RF.1.B$.R$(S,F1):.B$
;:...%U.." ";:...%Z.A.F(A$):.A.132.A.136
..1160:.1390..&_..A$..G(20)..A$;"..";:TC
.TC.1:B$.B$.A$:.1345.#&D..TC.0.1345.K&I.
TC.TC.1:." ....";:B$.H(B$,TC):.1345.{&N.
.Q.1.80:.:." .";:.A$:.A$.""..Q.1.80:.:.1
345..&S..1350..&X..*** VIC 1515 PRINTER
***.C&}..53265,11:.4,4,7:.PP.1.1415..&..
PP.1:.4,LN$;LN$:.4,"";.25);"FIL:";N$:.4,
LN$;LN$..'...4," POST";R:.4.1'...Z.1.TL
:F1.E(F$(Z,3)):.F1.0.1440.C'...H(F$(Z,2)
,1)."."..4," ";J(F$(Z,2),2);:.1435.X'..
.4," ";F$(Z,2);..'...4,": ";R$(S,F1)..'
..Z:.4,LN$;LN$: 4:.53265,27:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL