_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

KARTOTEK

FILE INFORMATION

FILENAME(S): KARTOTEK

FILE TYPE(S): PRG

FILE SIZE: 9.2K

FIRST SEEN: 2025-11-30 20:14:33

APPEARS ON: 1 disk(s)

FILE HASH

c45957e828f81f2a91da94a062af7f19325b8882d3ecb1a37d2c5a450ffc4e23

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SHADOWSOFT KARTOTEK PRG Curtcool, LPN 5 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0A 08 02 00 41 51  B2 31 00 20 08 50 00 86  |......AQ.1. .P..|
00000010: 54 24 28 32 30 30 2C 38  29 2C 41 24 28 32 35 29  |T$(200,8),A$(25)|
00000020: 00 26 08 5A 00 8F 00 6C  08 64 00 4F 24 B2 22 93  |.&.Z...l.d.O$.".|
00000030: 11 12 20 20 20 92 20 05  4B 41 52 54 4F 54 45 4B  |..   . .KARTOTEK|
00000040: 90 20 12 20 20 20 20 20  20 20 20 20 20 20 20 20  |. .             |
00000050: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 92 22  |              ."|
00000060: 3A 99 4F 24 3A A0 39 3A  9F 39 2C 30 00 7D 08 87  |:.O$:.9:.9,0.}..|
00000070: 00 54 49 24 B2 22 30 30  30 30 30 30 22 00 AE 08  |.TI$."000000"...|
00000080: 96 00 52 24 B2 22 91 20  20 20 20 20 20 20 20 20  |..R$.".         |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000A0: 20 20 20 20 20 20 20 20  20 20 20 20 91 22 00 B8  |            ."..|
000000B0: 08 20 03 89 31 30 30 30  00 C0 08 84 03 A1 41 24  |. ..1000......A$|
000000C0: 00 CF 08 8E 03 8B 41 24  B2 22 22 A7 39 30 30 00  |......A$."".900.|
000000D0: EB 08 98 03 8B C6 28 41  24 29 B2 31 33 33 A7 8D  |......(A$).133..|
000000E0: 31 30 30 30 30 3A 89 31  30 30 30 00 00 09 A2 03  |10000:.1000.....|
000000F0: 8B C6 28 41 24 29 B2 31  33 36 A7 31 32 30 30 30  |..(A$).136.12000|
00000100: 00 08 09 AC 03 8F 2B 2D  00 0E 09 DE 03 8E 00 4C  |......+-.......L|
00000110: 09 E8 03 4F 24 B2 22 93  11 12 20 20 20 92 20 05  |...O$."...   . .|
00000120: 4B 41 52 54 4F 54 45 4B  90 20 12 20 20 20 20 20  |KARTOTEK. .     |
00000130: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000140: 20 20 20 20 20 20 92 22  3A 99 4F 24 00 8E 09 ED  |      .":.O$....|
00000150: 03 8B 55 24 B2 22 4A 22  A7 99 22 12 20 30 20 92  |..U$."J"..". 0 .|
00000160: 20 05 4D 55 4C 49 47 48  45 44 20 46 4F 52 20 55  | .MULIGHED FOR U|
00000170: 44 53 4B 52 49 46 54 20  50 41 91 9D 2E 11 20 50  |DSKRIFT PA.... P|
00000180: 52 49 4E 54 45 52 90 22  3A 89 31 30 31 30 00 BF  |RINTER.":.1010..|
00000190: 09 EE 03 99 22 12 20 30  20 92 20 4D 55 4C 49 47  |....". 0 . MULIG|
000001A0: 48 45 44 20 46 4F 52 20  55 44 53 4B 52 49 46 54  |HED FOR UDSKRIFT|
000001B0: 20 50 41 91 9D 2E 11 20  50 52 49 4E 54 45 52 00  | PA.... PRINTER.|
000001C0: DE 09 F2 03 99 22 11 12  20 31 20 92 20 4F 50 52  |.....".. 1 . OPR|
000001D0: 45 54 20 20 20 20 4B 41  52 54 4F 54 45 4B 00 06  |ET    KARTOTEK..|
000001E0: 0A F7 03 99 22 11 12 20  32 20 92 20 48 45 4E 54  |....".. 2 . HENT|
000001F0: 20 20 20 20 20 4B 41 52  54 4F 54 45 4B 20 46 52  |     KARTOTEK FR|
00000200: 41 20 44 49 53 4B 00 25  0A FC 03 99 22 11 12 20  |A DISK.%....".. |
00000210: 33 20 92 20 49 4E 44 4C  5B 53 20 49 20 4B 41 52  |3 . INDL[S I KAR|
00000220: 54 4F 54 45 4B 00 48 0A  06 04 99 22 11 12 20 34  |TOTEK.H....".. 4|
00000230: 20 92 20 4F 50 44 41 54  45 91 9D 2C 11 52 20 20  | . OPDATE..,.R  |
00000240: 4B 41 52 54 4F 54 45 4B  00 67 0A 10 04 99 22 11  |KARTOTEK.g....".|
00000250: 12 20 35 20 92 20 53 30  47 20 20 20 20 49 20 4B  |. 5 . S0G    I K|
00000260: 41 52 54 4F 54 45 4B 00  8F 0A 1A 04 99 22 11 12  |ARTOTEK......"..|
00000270: 20 36 20 92 20 47 45 4D  20 20 20 20 20 20 4B 41  | 6 . GEM      KA|
00000280: 52 54 4F 54 45 4B 20 50  41 41 20 44 49 53 4B 00  |RTOTEK PAA DISK.|
00000290: AE 0A 24 04 99 22 11 12  20 37 20 92 20 4C 49 53  |..$..".. 7 . LIS|
000002A0: 54 20 20 20 20 20 4B 41  52 54 4F 54 45 4B 00 CD  |T     KARTOTEK..|
000002B0: 0A 29 04 99 22 11 12 20  38 20 92 20 45 54 49 4B  |.)..".. 8 . ETIK|
000002C0: 45 54 54 45 20 55 44 53  4B 52 49 46 54 00 E7 0A  |ETTE UDSKRIFT...|
000002D0: 2C 04 99 22 11 12 20 39  20 92 20 53 4C 55 54 20  |,..".. 9 . SLUT |
000002E0: 50 52 4F 47 52 41 4D 00  10 0B 38 04 99 22 11 54  |PROGRAM...8..".T|
000002F0: 49 4C 42 41 47 45 20 48  45 52 54 49 4C 20 56 45  |ILBAGE HERTIL VE|
00000300: 44 20 54 52 59 4B 20 50  41 91 9D 2E 11 20 46 31  |D TRYK PA.... F1|
00000310: 00 35 0B 42 04 8D 39 30  30 3A 50 4B B2 C5 28 41  |.5.B..900:PK..(A|
00000320: 24 29 AC 41 51 3A 8B 50  4B B3 30 B0 50 4B B1 39  |$).AQ:.PK.0.PK.9|
00000330: A7 31 30 39 30 00 45 0B  45 04 8B 50 4B B3 B1 30  |.1090.E.E..PK..0|
00000340: A7 31 31 30 35 00 88 0B  46 04 4F 24 B2 22 93 11  |.1105...F.O$."..|
00000350: 12 20 20 20 92 20 05 50  52 49 4E 54 45 52 52 55  |.   . .PRINTERRU|
00000360: 54 49 4E 45 20 90 12 20  20 20 20 20 20 20 20 20  |TINE ..         |
00000370: 20 20 20 20 20 20 20 20  20 20 20 20 92 22 3A 99  |            .":.|
00000380: 4F 24 3A 8D 31 30 39 36  00 92 0B 47 04 89 31 30  |O$:.1096...G..10|
00000390: 30 30 00 CA 0B 48 04 99  22 11 9E 54 5B 4E 44 20  |00...H.."..T[ND |
000003A0: 46 4F 52 20 50 52 49 4E  54 45 52 20 21 90 2D 22  |FOR PRINTER !.-"|
000003B0: 3A 99 22 11 11 54 52 59  4B 20 3C 52 45 54 55 52  |:."..TRYK <RETUR|
000003C0: 4E 3E 22 3A 55 24 B2 22  4A 22 00 DE 0B 49 04 A1  |N>":U$."J"...I..|
000003D0: 41 24 3A 8B 41 24 B2 22  22 A7 31 30 39 37 00 0D  |A$:.A$."".1097..|
000003E0: 0C 4A 04 99 22 11 4D 41  4E 20 4B 41 4E 20 4E 55  |.J..".MAN KAN NU|
000003F0: 20 46 41 91 9D 2E 11 20  55 44 53 4B 52 49 46 54  | FA.... UDSKRIFT|
00000400: 20 41 46 20 4B 4F 52 54  45 4E 45 20 22 00 3B 0C  | AF KORTENE ".;.|
00000410: 4B 04 99 22 11 50 41 91  9D 2E 11 20 53 4B 5B 52  |K..".PA.... SK[R|
00000420: 4D 45 4E 20 56 45 44 20  41 54 20 54 52 59 4B 4B  |MEN VED AT TRYKK|
00000430: 45 20 50 41 91 9D 2E 11  20 46 37 00 4F 0C 4C 04  |E PA.... F7.O.L.|
00000440: A1 41 24 3A 8B 41 24 B2  22 22 A7 31 31 30 30 00  |.A$:.A$."".1100.|
00000450: 55 0C 50 04 8E 00 65 0C  51 04 8B 50 4B B3 B1 39  |U.P...e.Q..PK..9|
00000460: A7 31 32 30 30 00 A4 0C  56 04 8B 4A B3 B1 30 A7  |.1200...V..J..0.|
00000470: 99 22 11 11 9E 45 52 20  44 45 54 20 4E 59 45 20  |."...ER DET NYE |
00000480: 4B 41 52 54 4F 54 45 4B  20 47 45 4D 54 20 50 41  |KARTOTEK GEMT PA|
00000490: 91 9D 2E 11 20 44 49 53  4B 20 20 3F 20 90 22 3A  |.... DISK  ? .":|
000004A0: 8D 39 30 30 00 BB 0C 60  04 8F 2B 2D 49 46 41 24  |.900...`..+-IFA$|
000004B0: 3D 22 4A 22 54 48 45 4E  45 4E 44 00 CF 0C 6A 04  |="J"THENEND...j.|
000004C0: 8F 2B 2D 49 46 4A 3D 30  54 48 45 4E 45 4E 44 00  |.+-IFJ=0THENEND.|
000004D0: D9 0C 74 04 89 31 30 30  30 00 0A 0D B0 04 91 50  |..t..1000......P|
000004E0: 4B 8D 32 30 30 30 2C 37  30 30 30 2C 33 30 30 30  |K.2000,7000,3000|
000004F0: 2C 34 30 30 30 2C 35 30  30 30 2C 36 30 30 30 2C  |,4000,5000,6000,|
00000500: 39 30 30 30 2C 32 32 35  30 30 00 14 0D CF 07 89  |9000,22500......|
00000510: 31 30 30 30 00 21 0D D0  07 8F 2A 2A 4F 50 52 45  |1000.!....**OPRE|
00000520: 54 00 60 0D DA 07 4F 24  B2 22 93 11 12 20 20 20  |T.`...O$."...   |
00000530: 92 20 05 4F 50 52 45 54  20 4B 41 52 54 4F 54 45  |. .OPRET KARTOTE|
00000540: 4B 90 20 12 20 20 20 20  20 20 20 20 20 20 20 20  |K. .            |
00000550: 20 20 20 20 20 20 20 20  20 90 92 22 3A 99 4F 24  |         ..":.O$|
00000560: 00 8A 0D E4 07 8B 4A B3  B1 30 A7 99 22 11 44 45  |......J..0..".DE|
00000570: 52 20 45 52 20 44 45 46  49 4E 45 52 45 54 20 45  |R ER DEFINERET E|
00000580: 54 20 4B 41 52 54 4F 54  45 4B 00 BD 0D EE 07 8B  |T KARTOTEK......|
00000590: 4A B3 B1 30 A7 99 22 11  30 4E 53 4B 45 53 20 45  |J..0..".0NSKES E|
000005A0: 54 20 4E 59 54 20 28 4A  2F 4E 29 20 22 3A 8D 39  |T NYT (J/N) ":.9|
000005B0: 30 30 3A 8B 41 24 B3 B1  22 4A 22 A7 8E 00 D8 0D  |00:.A$.."J".....|
000005C0: F8 07 81 49 B2 31 A4 50  4E 3A 4B 24 28 49 29 B2  |...I.1.PN:K$(I).|
000005D0: 22 22 3A 82 3A 4A B2 30  00 1C 0E 02 08 99 22 11  |"":.:J.0......".|
000005E0: 48 56 4F 52 20 4D 41 4E  47 45 20 50 4F 53 54 45  |HVOR MANGE POSTE|
000005F0: 52 20 53 4B 41 4C 20 4B  41 52 54 4F 54 45 4B 45  |R SKAL KARTOTEKE|
00000600: 54 20 20 20 20 20 20 20  11 49 4E 44 45 48 4F 4C  |T       .INDEHOL|
00000610: 44 45 3F 20 28 4D 41 58  2E 20 38 29 00 2E 0E 0C  |DE? (MAX. 8)....|
00000620: 08 8D 39 30 30 3A 50 4E  B2 C5 28 41 24 29 00 42  |..900:PN..(A$).B|
00000630: 0E 16 08 8B 50 4E B3 31  B0 50 4E B1 38 A7 32 30  |....PN.1.PN.8.20|
00000640: 36 30 00 67 0E 34 08 8D  38 30 30 30 3A 8F 2A 2A  |60.g.4..8000:.**|
00000650: 55 44 54 45 47 4E 49 4E  47 20 41 46 20 4B 41 52  |UDTEGNING AF KAR|
00000660: 54 4F 54 45 4B 2A 2A 00  73 0E 98 08 81 49 B2 31  |TOTEK**.s....I.1|
00000670: A4 50 4E 00 7F 0E A2 08  8D 32 35 30 30 3A 82 00  |.PN......2500:..|
00000680: 9A 0E FC 08 8F 2A 4B 4F  4E 54 52 4F 4C 20 41 46  |.....*KONTROL AF|
00000690: 20 4B 41 52 54 4F 54 45  4B 2A 00 DA 0E 1A 09 99  | KARTOTEK*......|
000006A0: 22 13 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |"...............|
000006B0: 11 11 11 11 11 11 11 11  11 4B 4F 52 52 45 4B 54  |.........KORREKT|
000006C0: 20 28 4A 2F 4E 29 20 22  3A 8D 39 30 30 3A 8B 41  | (J/N) ":.900:.A|
000006D0: 24 B2 22 4A 22 A7 32 38  30 30 00 E2 0E 24 09 99  |$."J".2800...$..|
000006E0: 52 24 00 FF 0E 2E 09 99  22 52 45 54 54 45 20 54  |R$......"RETTE T|
000006F0: 45 4B 53 54 20 4E 55 4D  4D 45 52 20 3A 20 22 00  |EKST NUMMER : ".|
00000700: 1F 0F 38 09 8D 39 30 30  3A 49 B2 C5 28 41 24 29  |..8..900:I..(A$)|
00000710: 3A 8B 49 B3 31 B0 49 B1  50 4E A7 32 33 36 30 00  |:.I.1.I.PN.2360.|
00000720: 27 0F 3D 09 99 52 24 00  45 0F 42 09 99 50 24 28  |'.=..R$.E.B..P$(|
00000730: 49 29 3B 22 20 20 20 20  20 20 20 20 20 20 20 20  |I);"            |
00000740: 20 3A 20 20 22 00 5D 0F  4C 09 99 50 24 28 49 29  | :  ".].L..P$(I)|
00000750: 3B 3A 8D 32 35 30 30 3A  89 32 33 33 30 00 67 0F  |;:.2500:.2330.g.|
00000760: BA 09 89 32 39 30 30 00  84 0F C4 09 4B 24 28 49  |...2900.....K$(I|
00000770: 29 B2 22 22 3A 5A B2 30  3A 99 50 24 28 49 29 3B  |)."":Z.0:.P$(I);|
00000780: 22 3E 22 3B 00 8F 0F C9  09 5A B2 5A AA 41 51 00  |">";.....Z.Z.AQ.|
00000790: A9 0F CE 09 A1 41 24 28  5A 29 3A 8B 41 24 28 5A  |.....A$(Z):.A$(Z|
000007A0: 29 B2 22 22 A7 32 35 31  30 00 B9 0F D8 09 49 54  |)."".2510.....IT|
000007B0: B2 C6 28 41 24 28 5A 29  29 00 EF 0F E2 09 99 41  |..(A$(Z))......A|
000007C0: 24 28 5A 29 3B 3A 8B 5A  B1 31 33 A7 5A B2 30 3A  |$(Z);:.Z.13.Z.0:|
000007D0: 99 50 24 28 49 29 3B 22  20 20 20 20 20 20 20 20  |.P$(I);"        |
000007E0: 20 20 20 20 20 3A 20 20  22 3A 89 32 35 30 30 00  |     :  ":.2500.|
000007F0: 25 10 EC 09 8B 49 54 B2  31 33 AC 41 51 A7 81 58  |%....IT.13.AQ..X|
00000800: B2 31 A4 5A AB 31 3A 4B  24 28 49 29 B2 4B 24 28  |.1.Z.1:K$(I).K$(|
00000810: 49 29 AA 41 24 28 58 29  3A 82 58 3A 5A B2 30 3A  |I).A$(X):.X:Z.0:|
00000820: 89 32 36 30 30 00 55 10  F1 09 8B 49 54 B2 31 37  |.2600.U....IT.17|
00000830: A7 99 22 91 22 3B 50 24  28 49 29 22 20 20 20 20  |..".";P$(I)"    |
00000840: 20 20 20 20 20 20 20 22  3A 99 50 24 28 49 29 3A  |       ":.P$(I):|
00000850: 89 32 35 30 30 00 8F 10  F6 09 8B 49 54 B2 32 30  |.2500......IT.20|
00000860: B0 49 54 B2 31 35 37 B0  49 54 B2 31 34 35 A7 99  |.IT.157.IT.145..|
00000870: 50 24 28 49 29 22 20 20  20 20 20 20 20 20 20 20  |P$(I)"          |
00000880: 20 22 3A 99 50 24 28 49  29 3A 89 32 35 30 30 00  | ":.P$(I):.2500.|
00000890: 99 10 00 0A 89 32 35 30  35 00 B7 10 0A 0A 8B C6  |.....2505.......|
000008A0: 28 4B 24 28 49 29 29 B2  31 33 AC 41 51 A7 4B 24  |(K$(I)).13.AQ.K$|
000008B0: 28 49 29 B2 22 3A 22 00  C3 10 14 0A 8B 41 51 B2  |(I).":"......AQ.|
000008C0: 31 A7 82 00 C9 10 28 0A  8E 00 CF 10 F0 0A 8E 00  |1.....(.........|
000008D0: DC 10 B8 0B 8F 2A 49 4E  44 53 5B 54 00 1A 11 C2  |.....*INDS[T....|
000008E0: 0B 4F 24 B2 22 93 11 12  20 20 20 92 20 05 49 4E  |.O$."...   . .IN|
000008F0: 44 4C 5B 53 20 49 20 4B  41 52 54 4F 54 45 4B 90  |DL[S I KARTOTEK.|
00000900: 20 12 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | .              |
00000910: 20 20 20 20 92 22 3A 99  4F 24 00 29 11 C4 0B 8B  |    .":.O$.)....|
00000920: 50 4E B1 30 A7 33 30 32  30 00 63 11 C7 0B 99 22  |PN.0.3020.c...."|
00000930: 11 9E 44 45 52 20 45 52  20 49 4B 4B 45 20 44 45  |..DER ER IKKE DE|
00000940: 46 49 4E 45 52 45 54 20  45 54 20 4B 41 52 54 4F  |FINERET ET KARTO|
00000950: 54 45 4B 90 22 3A 81 49  B2 31 A4 32 35 30 30 3A  |TEK.":.I.1.2500:|
00000960: 82 3A 8E 00 78 11 CC 0B  99 22 11 12 20 31 20 92  |.:..x....".. 1 .|
00000970: 20 49 4E 44 4C 5B 53 22  00 94 11 D6 0B 99 22 11  | INDL[S"......".|
00000980: 12 20 32 20 92 20 54 49  4C 20 48 4F 56 45 44 4D  |. 2 . TIL HOVEDM|
00000990: 45 4E 55 22 00 AF 11 E0  0B 99 22 11 12 20 20 20  |ENU"......"..   |
000009A0: 92 20 53 56 41 52 20 4D  45 44 20 54 41 4C 22 00  |. SVAR MED TAL".|
000009B0: CE 11 EA 0B 8D 39 30 30  3A 53 B2 C5 28 41 24 29  |.....900:S..(A$)|
000009C0: 3A 8B 53 B3 31 B0 53 B1  32 A7 33 30 35 30 00 D9  |:.S.1.S.2.3050..|
000009D0: 11 F4 0B 8B 53 B2 32 A7  8E 00 E7 11 FE 0B 99 4F  |....S.2........O|
000009E0: 24 3A 8D 38 30 30 30 00  ED 11 08 0C 3A 00 26 12  |$:.8000.....:.&.|
000009F0: 1C 0C 4A B2 4A AA 41 51  3A 8F 2A 2A 2A 47 48 47  |..J.J.AQ:.***GHG|
00000A00: 46 4B 47 48 47 44 4A 4B  44 4A 4B 47 4A 4B 44 4A  |FKGHGDJKDJKGJKDJ|
00000A10: 4B 4A 47 4B 4C 4B 44 4B  4A 47 4A 4B 3A 4B 44 4B  |KJGKLKDKJGJK:KDK|
00000A20: 4B 46 4B 2A 2A 2A 00 3A  12 21 0C 99 4E 52 24 3B  |KFK***.:.!..NR$;|
00000A30: 22 20 20 20 9D 9D 9D 22  3B 4A 00 55 12 26 0C 81  |"   ...";J.U.&..|
00000A40: 49 B2 31 A4 50 4E 3A 99  50 24 28 49 29 3B 4B 24  |I.1.PN:.P$(I);K$|
00000A50: 28 49 29 3A 82 00 61 12  8A 0C 81 49 B2 31 A4 50  |(I):..a....I.1.P|
00000A60: 4E 00 81 12 8C 0C 5A B2  30 3A 54 24 28 4A 2C 49  |N.....Z.0:T$(J,I|
00000A70: 29 B2 22 22 3A 99 50 31  24 28 49 29 3B 22 3E 22  |)."":.P1$(I);">"|
00000A80: 3B 00 8B 12 8F 0C 5A B2  5A AA 31 00 A5 12 90 0C  |;.....Z.Z.1.....|
00000A90: A1 41 24 28 5A 29 3A 8B  41 24 28 5A 29 B2 22 22  |.A$(Z):.A$(Z).""|
00000AA0: A7 33 32 31 36 00 B5 12  91 0C 49 54 B2 C6 28 41  |.3216.....IT..(A|
00000AB0: 24 28 5A 29 29 00 F2 12  94 0C 99 41 24 28 5A 29  |$(Z))......A$(Z)|
00000AC0: 3B 3A 8B 5A B1 32 31 A7  5A B2 30 3A 99 50 31 24  |;:.Z.21.Z.0:.P1$|
00000AD0: 28 49 29 3B 22 20 20 20  20 20 20 20 20 20 20 20  |(I);"           |
00000AE0: 20 20 20 20 20 20 20 20  20 20 20 22 3A 89 33 32  |           ":.32|
00000AF0: 31 32 00 24 13 9E 0C 8B  49 54 B2 31 37 A7 99 22  |12.$....IT.17.."|
00000B00: 91 22 3B 50 31 24 28 49  29 22 20 20 20 20 20 20  |.";P1$(I)"      |
00000B10: 20 20 20 20 20 22 3A 99  50 31 24 28 49 29 3A 89  |     ":.P1$(I):.|
00000B20: 33 32 31 32 00 5B 13 A3  0C 8B 49 54 B2 31 33 A7  |3212.[....IT.13.|
00000B30: 81 58 B2 31 A4 5A AB 31  3A 54 24 28 4A 2C 49 29  |.X.1.Z.1:T$(J,I)|
00000B40: B2 54 24 28 4A 2C 49 29  AA 41 24 28 58 29 3A 82  |.T$(J,I).A$(X):.|
00000B50: 58 3A 5A B2 30 3A 89 33  32 36 30 00 99 13 A8 0C  |X:Z.0:.3260.....|
00000B60: 8B 49 54 B2 32 30 B0 49  54 B2 31 35 37 B0 49 54  |.IT.20.IT.157.IT|
00000B70: B2 31 34 35 A7 5A B2 30  3A 99 50 31 24 28 49 29  |.145.Z.0:.P1$(I)|
00000B80: 22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |"               |
00000B90: 20 20 22 3A 89 33 32 31  32 00 A3 13 B2 0C 89 33  |  ":.3212......3|
00000BA0: 32 31 35 00 C2 13 BC 0C  8B C6 28 54 24 28 4A 2C  |215.......(T$(J,|
00000BB0: 49 29 29 B2 31 33 A7 54  24 28 4A 2C 49 29 B2 22  |I)).13.T$(J,I)."|
00000BC0: 3A 22 00 C8 13 C6 0C 82  00 F5 13 EE 0C 81 49 B2  |:"............I.|
00000BD0: 31 A4 50 4E 3A 99 50 31  24 28 49 29 3B 22 20 20  |1.PN:.P1$(I);"  |
00000BE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000BF0: 20 20 22 3A 82 00 FF 13  F8 0C 89 33 30 30 30 00  |  ":.......3000.|
00000C00: 05 14 3C 0F 8E 00 13 14  A0 0F 8F 2A 4F 50 44 41  |..<........*OPDA|
00000C10: 54 45 52 00 55 14 AA 0F  4F 24 B2 22 93 11 12 20  |TER.U...O$."... |
00000C20: 20 20 92 20 05 4F 50 44  41 54 45 91 9D 2C 11 52  |  . .OPDATE..,.R|
00000C30: 20 4B 41 52 54 4F 54 45  4B 90 20 12 20 20 20 20  | KARTOTEK. .    |
00000C40: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 92  |               .|
00000C50: 22 3A 99 4F 24 00 8E 14  B4 0F 99 22 11 4D 45 44  |":.O$......".MED|
00000C60: 20 44 45 4E 4E 45 20 52  55 54 49 4E 45 20 4B 41  | DENNE RUTINE KA|
00000C70: 4E 20 4D 41 4E 20 52 45  54 54 45 20 49 20 53 49  |N MAN RETTE I SI|
00000C80: 54 20 20 20 20 4B 41 52  54 4F 54 45 4B 2E 00 9D  |T    KARTOTEK...|
00000C90: 14 BE 0F 8B 4A B3 B1 30  A7 34 31 30 30 00 CB 14  |....J..0.4100...|
00000CA0: C8 0F 99 22 11 9E 4D 45  4E 20 44 45 52 20 45 52  |..."..MEN DER ER|
00000CB0: 20 49 4E 54 45 54 20 4B  41 52 54 4F 54 45 4B 20  | INTET KARTOTEK |
00000CC0: 54 49 4C 20 53 54 45 44  45 90 22 00 DD 14 D2 0F  |TIL STEDE.".....|
00000CD0: 81 49 B2 31 A4 32 35 30  30 3A 82 3A 8E 00 26 15  |.I.1.2500:.:..&.|
00000CE0: 04 10 99 22 11 46 30 52  53 54 45 20 4B 41 52 54  |...".F0RSTE KART|
00000CF0: 4F 54 45 4B 53 4B 4F 52  54 20 4B 4F 4D 4D 45 52  |OTEKSKORT KOMMER|
00000D00: 20 46 52 45 4D 2C 20 48  56 4F 52 2D 20 45 46 54  | FREM, HVOR- EFT|
00000D10: 45 52 20 42 55 4E 44 4C  49 4E 4A 45 4E 20 56 49  |ER BUNDLINJEN VI|
00000D20: 53 45 52 3A 11 22 00 53  15 0E 10 99 22 20 56 49  |SER:.".S...." VI|
00000D30: 44 45 52 45 3D 56 20 2D  20 52 45 54 3D 52 20 2D  |DERE=V - RET=R -|
00000D40: 20 4E 3D 4E 55 4D 4D 45  52 20 2D 20 53 4C 55 54  | N=NUMMER - SLUT|
00000D50: 3D 53 22 00 80 15 18 10  99 22 11 48 56 49 53 20  |=S"......".HVIS |
00000D60: 44 45 52 20 54 52 59 4B  4B 45 53 20 56 20 4B 4F  |DER TRYKKES V KO|
00000D70: 4D 4D 45 52 20 4E 5B 53  54 45 20 4B 4F 52 54 2E  |MMER N[STE KORT.|
00000D80: 00 B0 15 1D 10 99 22 11  54 52 59 4B 4B 45 53 20  |......".TRYKKES |
00000D90: 4E 20 53 50 30 52 47 45  53 20 4F 4D 20 30 4E 53  |N SP0RGES OM 0NS|
00000DA0: 4B 45 54 20 20 4B 4F 52  54 4E 55 4D 4D 45 52 2E  |KET  KORTNUMMER.|
00000DB0: 00 F1 15 22 10 99 22 11  45 46 54 45 52 20 41 54  |..."..".EFTER AT|
00000DC0: 20 48 41 56 45 20 49 4E  44 4C 5B 53 54 20 4E 55  | HAVE INDL[ST NU|
00000DD0: 4D 4D 45 52 45 54 20 4B  4F 4D 4D 45 52 20 20 20  |MMERET KOMMER   |
00000DE0: 44 45 54 20 30 4E 53 4B  45 44 45 20 4B 4F 52 54  |DET 0NSKEDE KORT|
00000DF0: 2E 00 0D 16 27 10 99 22  11 54 52 59 4B 20 50 41  |....'..".TRYK PA|
00000E00: 91 9D 2E 11 20 3C 52 45  54 55 52 4E 3E 00 26 16  |.... <RETURN>.&.|
00000E10: 28 10 A1 41 24 3A 8B 41  24 B2 22 22 B0 41 51 B2  |(..A$:.A$."".AQ.|
00000E20: 30 A7 34 31 33 36 00 6D  16 2C 10 99 4F 24 3A 99  |0.4136.m.,..O$:.|
00000E30: 22 11 4E 41 91 9D 2E 11  52 20 44 45 54 20 52 49  |".NA....R DET RI|
00000E40: 47 54 49 47 45 20 4B 4F  52 54 20 45 52 20 46 52  |GTIGE KORT ER FR|
00000E50: 45 4D 4D 45 20 54 52 59  4B 4B 45 53 20 20 11 9E  |EMME TRYKKES  ..|
00000E60: 52 20 46 4F 52 20 12 52  92 45 54 2E 90 00 B1 16  |R FOR .R.ET.....|
00000E70: 40 10 99 22 11 44 45 52  20 53 50 30 52 47 45 53  |@..".DER SP0RGES|
00000E80: 20 4E 55 20 4F 4D 20 4E  55 4D 4D 45 52 45 54 20  | NU OM NUMMERET |
00000E90: 50 41 91 9D 2E 11 20 4C  49 4E 4A 45 4E 2C 20 20  |PA.... LINJEN,  |
00000EA0: 20 44 45 52 20 53 4B 41  4C 20 52 45 54 54 45 53  | DER SKAL RETTES|
00000EB0: 2E 00 E8 16 45 10 99 22  11 45 46 54 45 52 20 41  |....E..".EFTER A|
00000EC0: 54 20 48 41 56 45 20 49  4E 44 4C 5B 53 54 20 44  |T HAVE INDL[ST D|
00000ED0: 45 54 54 45 2C 20 4B 41  4E 20 4C 49 4E 4A 45 4E  |ETTE, KAN LINJEN|
00000EE0: 20 52 45 54 54 45 53 2E  00 04 17 4A 10 99 22 11  | RETTES....J..".|
00000EF0: 54 52 59 4B 20 50 41 91  9D 2E 11 20 3C 52 45 54  |TRYK PA.... <RET|
00000F00: 55 52 4E 3E 00 18 17 54  10 A1 41 24 3A 8B 41 24  |URN>...T..A$:.A$|
00000F10: B2 22 22 A7 34 31 38 30  00 26 17 68 10 99 4F 24  |."".4180.&.h..O$|
00000F20: 3A 8D 38 30 30 30 00 41  17 72 10 81 49 B2 31 A4  |:.8000.A.r..I.1.|
00000F30: 50 4E 3A 99 50 24 28 49  29 3B 4B 24 28 49 29 3A  |PN:.P$(I);K$(I):|
00000F40: 82 00 58 17 78 10 4E B2  31 3A 81 42 B2 31 A4 50  |..X.x.N.1:.B.1.P|
00000F50: 4E 3A 99 4E 52 24 3B 4E  00 6C 17 79 10 99 50 31  |N:.NR$;N.l.y..P1|
00000F60: 24 28 42 29 3B 54 24 28  4E 2C 42 29 00 73 17 7A  |$(B);T$(N,B).s.z|
00000F70: 10 82 42 00 7D 17 7C 10  89 34 38 30 30 00 C3 17  |..B.}.|..4800...|
00000F80: 9A 10 99 42 54 24 3B 22  20 52 45 54 54 45 20 4C  |...BT$;" RETTE L|
00000F90: 49 4E 4A 45 20 4E 55 4D  4D 45 52 20 3A 20 20 20  |INJE NUMMER :   |
00000FA0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 9D  |               .|
00000FB0: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |................|
00000FC0: 9D 22 3B 00 E3 17 9B 10  8D 39 30 30 3A 49 B2 C5  |.";......900:I..|
00000FD0: 28 41 24 29 3A 8B 49 B3  31 B0 49 B1 50 4E A7 34  |(A$):.I.1.I.PN.4|
00000FE0: 32 35 31 00 2B 18 9F 10  54 24 28 4E 2C 49 29 B2  |251.+...T$(N,I).|
00000FF0: 22 22 3A 99 50 31 24 28  49 29 3B 22 20 20 20 20  |"":.P1$(I);"    |
00001000: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001010: 20 20 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |  ..............|
00001020: 9D 9D 9D 9D 9D 9D 22 3A  5A B2 30 00 4B 18 A0 10  |......":Z.0.K...|
00001030: 54 24 28 4E 2C 49 29 B2  22 22 3A 5A B2 30 3A 99  |T$(N,I)."":Z.0:.|
00001040: 50 31 24 28 49 29 3B 22  3E 22 3B 00 55 18 A4 10  |P1$(I);">";.U...|
00001050: 5A B2 5A AA 31 00 6F 18  AE 10 A1 41 24 28 5A 29  |Z.Z.1.o....A$(Z)|
00001060: 3A 8B 41 24 28 5A 29 B2  22 22 A7 34 32 37 30 00  |:.A$(Z)."".4270.|
00001070: 7F 18 B3 10 49 54 B2 C6  28 41 24 28 5A 29 29 00  |....IT..(A$(Z)).|
00001080: BD 18 B8 10 99 41 24 28  5A 29 3B 3A 8B 5A B1 32  |.....A$(Z);:.Z.2|
00001090: 31 A7 5A B2 30 3A 99 50  31 24 28 49 29 3B 22 20  |1.Z.0:.P1$(I);" |
000010A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000010B0: 20 20 20 20 20 20 22 3A  89 34 32 35 36 00 EF 18  |      ":.4256...|
000010C0: BD 10 8B 49 54 B2 31 37  A7 99 22 91 22 3B 50 31  |...IT.17..".";P1|
000010D0: 24 28 49 29 22 20 20 20  20 20 20 20 20 20 20 20  |$(I)"           |
000010E0: 22 3A 99 50 31 24 28 49  29 3A 89 34 32 35 36 00  |":.P1$(I):.4256.|
000010F0: 26 19 C2 10 8B 49 54 B2  31 33 A7 81 58 B2 31 A4  |&....IT.13..X.1.|
00001100: 5A AB 31 3A 54 24 28 4E  2C 49 29 B2 54 24 28 4E  |Z.1:T$(N,I).T$(N|
00001110: 2C 49 29 AA 41 24 28 58  29 3A 82 58 3A 5A B2 30  |,I).A$(X):.X:Z.0|
00001120: 3A 89 34 38 30 30 00 64  19 CC 10 8B 49 54 B2 32  |:.4800.d....IT.2|
00001130: 30 B0 49 54 B2 31 35 37  B0 49 54 B2 31 34 35 A7  |0.IT.157.IT.145.|
00001140: 5A B2 30 3A 99 50 31 24  28 49 29 22 20 20 20 20  |Z.0:.P1$(I)"    |
00001150: 20 20 20 20 20 20 20 20  20 20 20 20 20 22 3A 89  |             ":.|
00001160: 34 32 35 36 00 6E 19 D6  10 89 34 32 36 30 00 74  |4256.n....4260.t|
00001170: 19 E0 10 3A 00 7A 19 30  11 8E 00 93 19 94 11 8F  |...:.z.0........|
00001180: 2A 2A 46 4F 52 54 53 5B  54 20 53 30 47 4E 49 4E  |**FORTS[T S0GNIN|
00001190: 47 2A 2A 00 AC 19 A8 11  4E B2 4E AA 31 3A 81 42  |G**.....N.N.1:.B|
000011A0: B2 31 A4 50 4E 3A 99 4E  52 24 3B 4E 00 BF 19 A9  |.1.PN:.NR$;N....|
000011B0: 11 8B 4E B1 4A A7 4E B2  30 3A 89 34 35 32 30 00  |..N.J.N.0:.4520.|
000011C0: D3 19 AD 11 99 50 31 24  28 42 29 3B 54 24 28 4E  |.....P1$(B);T$(N|
000011D0: 2C 42 29 00 DA 19 B2 11  82 42 00 E4 19 C6 11 89  |,B)......B......|
000011E0: 34 38 30 30 00 FE 19 F8  11 8F 2A 2A 54 49 4C 20  |4800......**TIL |
000011F0: 4B 4F 52 54 20 23 20 49  2A 2A 2A 2A 2A 2A 00 40  |KORT # I******.@|
00001200: 1A 02 12 99 42 54 24 3B  22 30 4E 53 4B 45 54 20  |....BT$;"0NSKET |
00001210: 4B 4F 52 54 4E 55 4D 4D  45 52 20 3A 20 20 20 20  |KORTNUMMER :    |
00001220: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 9D 9D  |              ..|
00001230: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 22 3B  |..............";|
00001240: 00 62 1A 04 12 84 39 2C  41 24 3A 99 3A 4E B2 C5  |.b....9,A$:.:N..|
00001250: 28 41 24 29 3A 8B 4E B3  31 B0 4E B1 4A A7 34 36  |(A$):.N.1.N.J.46|
00001260: 31 30 00 75 1A 0C 12 81  42 B2 31 A4 50 4E 3A 99  |10.u....B.1.PN:.|
00001270: 4E 52 24 3B 4E 00 89 1A  11 12 99 50 31 24 28 42  |NR$;N......P1$(B|
00001280: 29 3B 54 24 28 4E 2C 42  29 00 90 1A 16 12 82 42  |);T$(N,B)......B|
00001290: 00 9A 1A 1B 12 89 34 38  30 30 00 AF 1A C0 12 8F  |......4800......|
000012A0: 2A 2A 53 50 30 52 47 45  54 45 4B 53 54 2A 2A 00  |**SP0RGETEKST**.|
000012B0: BC 1A CA 12 99 42 54 24  3B 56 52 24 00 E7 1A D4  |.....BT$;VR$....|
000012C0: 12 8D 39 30 30 3A 8B 41  24 B2 22 56 22 B0 41 24  |..900:.A$."V".A$|
000012D0: B2 22 52 22 B0 41 24 B2  22 4E 22 B0 41 24 B2 22  |."R".A$."N".A$."|
000012E0: 53 22 A7 34 38 34 30 00  F1 1A DE 12 89 34 38 32  |S".4840......482|
000012F0: 30 00 FA 1A E8 12 99 52  31 24 00 32 1B ED 12 8B  |0......R1$.2....|
00001300: 41 24 B3 B1 22 52 22 A7  81 49 49 B2 31 A4 50 4E  |A$.."R"..II.1.PN|
00001310: 3A 99 50 31 24 28 49 49  29 3B 22 20 20 20 20 20  |:.P1$(II);"     |
00001320: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00001330: 3A 82 00 43 1B F2 12 8B  41 24 B2 22 56 22 A7 34  |:..C....A$."V".4|
00001340: 35 30 30 00 54 1B FC 12  8B 41 24 B2 22 52 22 A7  |500.T....A$."R".|
00001350: 34 32 35 30 00 65 1B 06  13 8B 41 24 B2 22 4E 22  |4250.e....A$."N"|
00001360: A7 34 36 30 30 00 73 1B  10 13 8B 41 24 B2 22 53  |.4600.s....A$."S|
00001370: 22 A7 8E 00 A2 1B 1A 13  81 49 49 B2 31 A4 50 4E  |"........II.1.PN|
00001380: 3A 99 50 31 24 28 49 49  29 3B 22 20 20 20 20 20  |:.P1$(II);"     |
00001390: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
000013A0: 3A 82 00 A8 1B 24 13 8E  00 B2 1B 88 13 8F 2A 53  |:....$........*S|
000013B0: 30 47 00 F0 1B 92 13 4F  24 B2 22 93 11 12 20 20  |0G.....O$."...  |
000013C0: 20 92 20 05 53 30 47 20  49 20 4B 41 52 54 4F 54  | . .S0G I KARTOT|
000013D0: 45 4B 90 20 12 20 20 20  20 20 20 20 20 20 20 20  |EK. .           |
000013E0: 20 20 20 20 20 20 20 20  20 20 92 22 3A 99 4F 24  |          .":.O$|
000013F0: 00 FF 1B 94 13 8B 4A B3  B1 30 A7 35 30 31 38 00  |......J..0.5018.|
00001400: 3C 1C 97 13 99 22 11 9E  44 45 52 20 45 52 20 49  |<...."..DER ER I|
00001410: 4E 54 45 54 20 4B 41 52  54 4F 54 45 4B 20 49 20  |NTET KARTOTEK I |
00001420: 43 4F 4D 50 55 54 45 52  45 4E 20 21 90 22 3A 81  |COMPUTEREN !.":.|
00001430: 49 B2 31 A4 32 35 30 30  3A 82 3A 8E 00 5C 1C 9A  |I.1.2500:.:..\..|
00001440: 13 99 22 11 12 20 31 20  92 20 41 4C 4D 49 4E 44  |..".. 1 . ALMIND|
00001450: 45 4C 49 47 20 53 30 47  4E 49 4E 47 00 84 1C 9C  |ELIG S0GNING....|
00001460: 13 99 22 11 12 20 32 20  92 20 4C 4F 47 49 53 4B  |..".. 2 . LOGISK|
00001470: 20 20 20 20 20 53 30 47  4E 49 4E 47 20 28 3D 20  |     S0GNING (= |
00001480: 3C 20 3E 29 00 A1 1C 9E  13 99 22 11 12 20 33 20  |< >)......".. 3 |
00001490: 92 20 42 41 91 9D 2E 11  44 45 20 31 20 4F 47 20  |. BA....DE 1 OG |
000014A0: 32 00 BB 1C A0 13 99 22  11 12 20 20 20 92 20 53  |2......"..   . S|
000014B0: 56 41 52 20 4D 45 44 20  54 41 4C 00 CD 1C A1 13  |VAR MED TAL.....|
000014C0: 8D 39 30 30 3A 53 30 B2  C5 28 41 24 29 00 E6 1C  |.900:S0..(A$)...|
000014D0: A2 13 8B 53 30 B3 31 B0  53 30 B1 33 B0 41 51 B2  |...S0.1.S0.3.AQ.|
000014E0: 30 A7 35 30 32 35 00 FA  1C A4 13 8D 38 30 30 30  |0.5025......8000|
000014F0: 3A 46 47 B2 30 3A 41 47  B2 30 00 15 1D A5 13 81  |:FG.0:AG.0......|
00001500: 49 B2 31 A4 50 4E 3A 99  50 24 28 49 29 3B 4B 24  |I.1.PN:.P$(I);K$|
00001510: 28 49 29 3A 82 00 56 1D  A6 13 99 42 54 24 3B 3A  |(I):..V....BT$;:|
00001520: 8B 53 30 B3 B1 32 A7 99  22 20 53 30 47 45 54 45  |.S0..2.." S0GETE|
00001530: 4B 53 54 20 49 20 46 45  4C 54 20 4E 55 4D 4D 45  |KST I FELT NUMME|
00001540: 52 20 3A 20 20 20 20 20  20 9D 9D 9D 9D 9D 22 3B  |R :      .....";|
00001550: 3A 89 35 30 36 30 00 8D  1D B0 13 99 42 54 24 3B  |:.5060......BT$;|
00001560: 3A 8B 53 30 B1 31 A7 99  22 20 4C 4F 47 49 53 4B  |:.S0.1.." LOGISK|
00001570: 20 53 30 47 45 54 45 4B  53 54 20 49 20 46 45 4C  | S0GETEKST I FEL|
00001580: 54 20 4E 55 4D 4D 45 52  20 3A 20 22 3B 00 93 1D  |T NUMMER : ";...|
00001590: BA 13 3A 00 B3 1D C4 13  8D 39 30 30 3A 49 B2 C5  |..:......900:I..|
000015A0: 28 41 24 29 3A 8B 49 B3  31 B0 49 B1 50 4E A7 35  |(A$):.I.1.I.PN.5|
000015B0: 30 36 30 00 D5 1D C9 13  99 42 54 24 3B 52 24 3B  |060......BT$;R$;|
000015C0: 22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |"               |
000015D0: 20 20 20 20 22 00 EA 1D  CE 13 99 50 31 24 28 49  |    "......P1$(I|
000015E0: 29 3B 22 3E 22 3B 3A 5A  B2 30 00 F4 1D D3 13 5A  |);">";:Z.0.....Z|
000015F0: B2 5A AA 31 00 0E 1E D8  13 A1 41 24 28 5A 29 3A  |.Z.1......A$(Z):|
00001600: 8B 41 24 28 5A 29 B2 22  22 A7 35 30 38 30 00 1E  |.A$(Z)."".5080..|
00001610: 1E D9 13 49 54 B2 C6 28  41 24 28 5A 29 29 00 50  |...IT..(A$(Z)).P|
00001620: 1E DA 13 8B 53 30 B2 32  B0 41 47 B2 31 A7 4D 54  |....S0.2.AG.1.MT|
00001630: B2 C6 28 41 24 28 31 29  29 3A 8B 4D 54 B3 36 30  |..(A$(1)):.MT.60|
00001640: B0 4D 54 B1 36 32 A7 5A  B2 30 3A 89 35 30 37 35  |.MT.62.Z.0:.5075|
00001650: 00 87 1E DD 13 99 41 24  28 5A 29 3B 3A 8B 5A B1  |......A$(Z);:.Z.|
00001660: 32 30 A7 99 50 31 24 28  49 29 3B 22 20 20 20 20  |20..P1$(I);"    |
00001670: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001680: 22 3A 89 35 30 37 30 00  BA 1E E2 13 8B 49 54 B2  |":.5070......IT.|
00001690: 31 33 A7 81 58 B2 31 A4  5A 3A 53 31 24 28 49 29  |13..X.1.Z:S1$(I)|
000016A0: B2 53 31 24 28 49 29 AA  41 24 28 58 29 3A 82 58  |.S1$(I).A$(X):.X|
000016B0: 3A 5A B2 30 3A 89 35 32  30 30 00 F4 1E E4 13 8B  |:Z.0:.5200......|
000016C0: 49 54 B2 32 30 B0 49 54  B2 31 35 37 A7 5A B2 30  |IT.20.IT.157.Z.0|
000016D0: 3A 99 50 31 24 28 49 29  3B 22 20 20 20 20 20 20  |:.P1$(I);"      |
000016E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 22 3A 89  |             ":.|
000016F0: 35 30 37 30 00 FE 1E E7  13 89 35 30 37 35 00 1F  |5070......5075..|
00001700: 1F 50 14 53 31 24 28 49  29 B2 C8 28 53 31 24 28  |.P.S1$(I)..(S1$(|
00001710: 49 29 2C C3 28 53 31 24  28 49 29 29 AB 31 29 00  |I),.(S1$(I)).1).|
00001720: 31 1F 52 14 53 32 24 28  49 29 B2 53 31 24 28 49  |1.R.S2$(I).S1$(I|
00001730: 29 00 64 1F 55 14 8B 53  30 B1 31 AF 41 47 B2 31  |).d.U..S0.1.AG.1|
00001740: A7 53 32 24 28 49 29 B2  53 31 24 28 49 29 3A 41  |.S2$(I).S1$(I):A|
00001750: 47 B2 30 3A 53 31 24 28  4A 55 29 B2 53 24 3A 89  |G.0:S1$(JU).S$:.|
00001760: 35 32 31 30 00 7D 1F 57  14 53 24 B2 53 31 24 28  |5210.}.W.S$.S1$(|
00001770: 49 29 3A 4A 55 B2 49 3A  41 47 B2 41 51 00 91 1F  |I):JU.I:AG.AQ...|
00001780: 59 14 8B 53 30 B2 33 AF  41 47 B2 31 A7 35 30 34  |Y..S0.3.AG.1.504|
00001790: 30 00 A3 1F 5A 14 81 41  B2 31 A4 4A 3A 99 4E 52  |0...Z..A.1.J:.NR|
000017A0: 24 3B 41 00 B6 1F 5E 14  42 B2 49 3A 8B 53 30 B2  |$;A...^.B.I:.S0.|
000017B0: 33 A7 42 B2 4A 55 00 E5  1F 5F 14 81 49 49 B2 31  |3.B.JU..._..II.1|
000017C0: A4 50 4E 3A 99 50 31 24  28 49 49 29 3B 22 20 20  |.PN:.P1$(II);"  |
000017D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000017E0: 20 20 22 3A 82 00 FB 1F  61 14 8B 53 30 B2 32 A7  |  ":....a..S0.2.|
000017F0: 8D 35 35 30 30 3A 89 35  32 33 30 00 33 20 64 14  |.5500:.5230.3 d.|
00001800: 8B CA 28 54 24 28 41 2C  42 29 2C 31 2C C3 28 53  |..(T$(A,B),1,.(S|
00001810: 31 24 28 42 29 29 29 B2  53 31 24 28 42 29 A7 46  |1$(B))).S1$(B).F|
00001820: 55 B2 31 3A 8B 53 30 B2  33 A7 42 B2 49 3A 8D 35  |U.1:.S0.3.B.I:.5|
00001830: 35 30 30 00 43 20 6E 14  8B 46 55 B3 B1 31 A7 35  |500.C n..FU..1.5|
00001840: 33 30 30 00 62 20 78 14  81 51 B2 31 A4 50 4E 3A  |300.b x..Q.1.PN:|
00001850: 99 50 31 24 28 51 29 3B  54 24 28 41 2C 51 29 3A  |.P1$(Q);T$(A,Q):|
00001860: 82 51 00 6F 20 82 14 99  42 54 24 3B 46 55 24 00  |.Q.o ...BT$;FU$.|
00001870: 95 20 87 14 8D 39 30 30  3A 8B 41 24 B2 22 4E 22  |. ...900:.A$."N"|
00001880: A7 81 49 B2 49 A4 50 4E  3A 82 3A 81 41 B2 41 A4  |..I.I.PN:.:.A.A.|
00001890: 4A 3A 82 3A 8E 00 B6 20  89 14 8B 41 24 B2 22 4E  |J:.:... ...A$."N|
000018A0: 22 A7 81 49 B2 49 A4 50  4E 3A 82 3A 81 41 B2 41  |"..I.I.PN:.:.A.A|
000018B0: A4 4A 3A 82 3A 8E 00 E7  20 8C 14 99 52 24 3B 22  |.J:.:... ...R$;"|
000018C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000018D0: 20 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  | ...............|
000018E0: 9D 22 3A 46 55 B2 30 00  EE 20 B4 14 82 41 00 10  |.":FU.0.. ...A..|
000018F0: 21 BE 14 81 49 B2 31 A4  50 4E 3A 53 31 24 28 49  |!...I.1.PN:S1$(I|
00001900: 29 B2 22 22 3A 53 32 24  28 49 29 B2 22 22 3A 82  |)."":S2$(I)."":.|
00001910: 00 16 21 18 15 8E 00 3C  21 7C 15 8F 2A 2A 54 45  |..!....<!|..**TE|
00001920: 53 54 20 46 4F 52 20 46  4C 45 52 45 20 53 30 47  |ST FOR FLERE S0G|
00001930: 45 4B 52 49 54 45 52 49  45 52 2A 2A 00 5C 21 86  |EKRITERIER**.\!.|
00001940: 15 8F 2A 2A 2A 2A 2A 2A  2A 2A 2A 49 46 53 30 3C  |..*********IFS0<|
00001950: 3E 32 54 48 45 4E 52 45  54 55 52 4E 00 83 21 90  |>2THENRETURN..!.|
00001960: 15 46 55 B2 30 3A 8B 46  47 B2 30 A7 53 32 24 28  |.FU.0:.FG.0.S2$(|
00001970: 49 29 B2 CA 28 53 32 24  28 49 29 2C 32 29 3A 46  |I)..(S2$(I),2):F|
00001980: 47 B2 31 00 B3 21 9A 15  8B 4D 54 B2 36 31 AF CA  |G.1..!...MT.61..|
00001990: 28 54 24 28 41 2C 42 29  2C 31 2C C3 28 53 32 24  |(T$(A,B),1,.(S2$|
000019A0: 28 49 29 29 29 B2 53 32  24 28 49 29 A7 46 55 B2  |(I))).S2$(I).FU.|
000019B0: 31 3A 8E 00 E3 21 A4 15  8B 4D 54 B2 36 30 AF CA  |1:...!...MT.60..|
000019C0: 28 54 24 28 41 2C 42 29  2C 31 2C C3 28 53 32 24  |(T$(A,B),1,.(S2$|
000019D0: 28 49 29 29 29 B3 53 32  24 28 49 29 A7 46 55 B2  |(I))).S2$(I).FU.|
000019E0: 31 3A 8E 00 13 22 AE 15  8B 4D 54 B2 36 32 AF CA  |1:..."...MT.62..|
000019F0: 28 54 24 28 41 2C 42 29  2C 31 2C C3 28 53 32 24  |(T$(A,B),1,.(S2$|
00001A00: 28 49 29 29 29 B1 53 32  24 28 49 29 A7 46 55 B2  |(I))).S2$(I).FU.|
00001A10: 31 3A 8E 00 19 22 B8 15  8E 00 1F 22 0C 17 8E 00  |1:..."....."....|
00001A20: 32 22 70 17 8F 2A 47 45  4D 20 4B 41 52 54 4F 54  |2"p..*GEM KARTOT|
00001A30: 45 4B 00 70 22 7A 17 4F  24 B2 22 93 11 12 20 20  |EK.p"z.O$."...  |
00001A40: 20 92 20 05 47 45 4D 20  4B 41 52 54 4F 54 45 4B  | . .GEM KARTOTEK|
00001A50: 90 20 12 20 20 20 20 20  20 20 20 20 20 20 20 20  |. .             |
00001A60: 20 20 20 20 20 20 20 20  20 20 92 22 3A 99 4F 24  |          .":.O$|
00001A70: 00 7F 22 84 17 8B 4A B3  B1 30 A7 36 31 32 30 00  |.."...J..0.6120.|
00001A80: AF 22 D4 17 99 22 11 44  45 52 20 46 49 4E 44 45  |."...".DER FINDE|
00001A90: 53 20 49 4E 54 45 54 20  4B 41 52 54 4F 54 45 4B  |S INTET KARTOTEK|
00001AA0: 20 49 20 43 4F 4D 50 55  54 45 52 45 4E 21 22 00  | I COMPUTEREN!".|
00001AB0: C1 22 DE 17 81 49 B2 31  A4 32 35 30 30 3A 82 3A  |."...I.1.2500:.:|
00001AC0: 8E 00 E4 22 E8 17 99 22  11 4E 55 20 53 4B 41 4C  |..."...".NU SKAL|
00001AD0: 20 4B 41 52 54 4F 54 45  4B 45 54 20 47 45 4D 4D  | KARTOTEKET GEMM|
00001AE0: 45 53 20 21 00 18 23 F2  17 99 22 11 4E 41 56 4E  |ES !..#...".NAVN|
00001AF0: 20 50 41 91 9D 2E 11 20  4B 41 52 54 4F 54 45 4B  | PA.... KARTOTEK|
00001B00: 22 3A 99 22 11 4D 41 58  2E 20 31 36 20 41 4E 53  |":.".MAX. 16 ANS|
00001B10: 4C 41 47 20 3A 20 22 3B  00 25 23 F7 17 84 39 2C  |LAG : ";.%#...9,|
00001B20: 4B 4E 24 3A 99 00 3E 23  FC 17 8B C3 28 4B 4E 24  |KN$:..>#....(KN$|
00001B30: 29 B1 31 36 A7 99 52 24  3A 89 36 31 34 30 00 55  |).16..R$:.6140.U|
00001B40: 23 38 18 9F 38 2C 38 2C  38 2C 22 44 55 4D 4D 59  |#8..8,8,8,"DUMMY|
00001B50: 2C 53 2C 57 22 00 77 23  42 18 98 38 2C 50 4E 3A  |,S,W".w#B..8,PN:|
00001B60: 98 38 2C 4A 3A 81 49 B2  31 A4 50 4E 3A 98 38 2C  |.8,J:.I.1.PN:.8,|
00001B70: 4B 24 28 49 29 3A 82 00  A0 23 4C 18 81 41 B2 31  |K$(I):...#L..A.1|
00001B80: A4 4A AC 41 51 3A 81 42  B2 31 A4 50 4E AC 41 51  |.J.AQ:.B.1.PN.AQ|
00001B90: 3A 98 38 2C 54 24 28 41  2C 42 29 3A 82 42 2C 41  |:.8,T$(A,B):.B,A|
00001BA0: 00 A7 23 B0 18 A0 38 00  B8 23 B2 18 53 41 24 B2  |..#...8..#..SA$.|
00001BB0: 22 53 3A 22 AA 4B 4E 24  00 C5 23 B5 18 9F 31 35  |"S:".KN$..#...15|
00001BC0: 2C 38 2C 31 35 00 E7 23  B7 18 98 31 35 2C 53 41  |,8,15..#...15,SA|
00001BD0: 24 3A 98 31 35 2C 22 52  3A 22 AA 4B 4E 24 AA 22  |$:.15,"R:".KN$."|
00001BE0: 3D 44 55 4D 4D 59 22 00  F1 23 BA 18 A0 31 35 3A  |=DUMMY"..#...15:|
00001BF0: 8E 00 08 24 58 1B 8F 2A  2A 48 45 4E 54 20 4B 41  |...$X..**HENT KA|
00001C00: 52 54 4F 54 45 4B 2A 2A  00 45 24 5D 1B 4F 24 B2  |RTOTEK**.E$].O$.|
00001C10: 22 93 11 12 20 20 20 20  20 05 48 45 4E 54 20 46  |"...     .HENT F|
00001C20: 52 41 20 44 49 53 4B 20  12 20 20 20 20 20 20 20  |RA DISK .       |
00001C30: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 92  |               .|
00001C40: 22 3A 99 4F 24 00 53 24  62 1B 99 4F 24 3A 99 22  |":.O$.S$b..O$:."|
00001C50: 11 11 22 00 61 24 67 1B  8B 4A B2 30 A7 37 30 33  |..".a$g..J.0.703|
00001C60: 30 00 A7 24 6C 1B 99 22  11 9E 44 45 52 20 45 52  |0..$l.."..DER ER|
00001C70: 20 45 54 20 4B 41 52 54  4F 54 45 4B 20 49 20 43  | ET KARTOTEK I C|
00001C80: 4F 4D 50 55 54 45 52 45  4E 22 3A 99 22 11 4D 41  |OMPUTEREN":.".MA|
00001C90: 91 9D 2E 11 20 44 45 54  54 45 20 53 4C 45 54 54  |.... DETTE SLETT|
00001CA0: 45 53 20 3F 20 90 22 00  BB 24 6E 1B 8D 39 30 30  |ES ? ."..$n..900|
00001CB0: 3A 8B 41 24 B3 B1 22 4A  22 A7 8E 00 DF 24 76 1B  |:.A$.."J"....$v.|
00001CC0: 99 22 11 9E 4C 5B 47 20  44 41 54 41 20 53 4B 49  |."..L[G DATA SKI|
00001CD0: 56 45 20 49 20 53 54 41  54 49 4F 4E 45 4E 22 00  |VE I STATIONEN".|
00001CE0: F5 24 78 1B 85 22 46 49  4C 20 4E 41 56 4E 3A 20  |.$x.."FIL NAVN: |
00001CF0: 22 3B 46 46 24 00 08 25  79 1B 46 46 24 B2 46 46  |";FF$..%y.FF$.FF|
00001D00: 24 AA 22 2C 53 2C 52 22  00 17 25 80 1B 9F 38 2C  |$.",S,R"..%...8,|
00001D10: 38 2C 38 2C 46 46 24 00  26 25 8A 1B 84 38 2C 50  |8,8,FF$.&%...8,P|
00001D20: 4E 3A 84 38 2C 4A 00 3D  25 94 1B 81 49 B2 31 A4  |N:.8,J.=%...I.1.|
00001D30: 50 4E 3A 84 38 2C 4B 24  28 49 29 3A 82 00 43 25  |PN:.8,K$(I):..C%|
00001D40: C6 1B 3A 00 71 25 D0 1B  81 41 B2 31 A4 4A 3A 81  |..:.q%...A.1.J:.|
00001D50: 42 B2 31 A4 50 4E 3A 84  38 2C 54 24 28 41 2C 42  |B.1.PN:.8,T$(A,B|
00001D60: 29 3A 82 42 2C 41 3A 8B  41 51 B2 30 A7 38 30 30  |):.B,A:.AQ.0.800|
00001D70: 30 00 78 25 20 1C A0 38  00 7E 25 3F 1F 8E 00 9B  |0.x% ..8.~%?....|
00001D80: 25 40 1F 8F 2A 2A 4F 50  52 45 54 54 45 4C 53 45  |%@..**OPRETTELSE|
00001D90: 20 41 46 20 53 4B 45 4D  41 2A 2A 00 CD 25 A4 1F  | AF SKEMA**..%..|
00001DA0: 53 31 24 B2 22 20 B0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |S1$." ..........|
00001DB0: C0 C0 C0 C0 B2 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00001DC0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 AE 22 00 FF 25  |............"..%|
00001DD0: AE 1F 53 32 24 B2 22 20  AB C0 C0 C0 C0 C0 C0 C0  |..S2$." ........|
00001DE0: C0 C0 C0 C0 C0 C0 DB C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00001DF0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 B3 22 00  |..............".|
00001E00: 31 26 B8 1F 53 33 24 B2  22 20 AD C0 C0 C0 C0 C0  |1&..S3$." ......|
00001E10: C0 C0 C0 C0 C0 C0 C0 C0  B1 C0 C0 C0 C0 C0 C0 C0  |................|
00001E20: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 BD  |................|
00001E30: 22 00 60 26 C2 1F 53 34  24 B2 22 20 20 20 20 20  |".`&..S4$."     |
00001E40: 20 20 20 20 20 20 20 3A  20 20 20 20 20 20 20 20  |       :        |
00001E50: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00001E60: 00 92 26 C7 1F 53 35 24  B2 22 20 DD 20 20 20 20  |..&..S5$." .    |
00001E70: 20 20 20 20 20 20 20 20  20 3A 20 20 20 20 20 20  |         :      |
00001E80: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001E90: DD 22 00 A7 26 CC 1F 99  4F 24 3B 22 11 22 3B 53  |."..&...O$;".";S|
00001EA0: 31 24 3A 99 53 35 24 00  C8 26 D6 1F 99 22 91 1D  |1$:.S5$..&..."..|
00001EB0: 1D 1D 46 41 53 54 20 54  45 4B 53 54 1D 1D 1D 1D  |..FAST TEKST....|
00001EC0: 49 4E 44 48 4F 4C 44 22  00 ED 26 E0 1F 81 49 B2  |INDHOLD"..&...I.|
00001ED0: 31 A4 50 4E 3A 99 53 32  24 3A 99 22 05 22 49 22  |1.PN:.S2$:."."I"|
00001EE0: 90 22 3B 53 34 24 3A 82  3A 99 53 33 24 00 0E 27  |.";S4$:.:.S3$..'|
00001EF0: EA 1F 81 49 B2 31 A4 50  4E 3A 50 24 28 49 29 B2  |...I.1.PN:P$(I).|
00001F00: 22 22 3A 50 31 24 28 49  29 B2 22 22 3A 82 00 3D  |"":P1$(I)."":..=|
00001F10: 27 EF 1F 50 24 28 30 29  B2 22 13 11 11 11 11 22  |'..P$(0)."....."|
00001F20: 3A 81 49 B2 31 A4 50 4E  3A 50 24 28 49 29 B2 50  |:.I.1.PN:P$(I).P|
00001F30: 24 28 49 AB 31 29 AA 22  11 11 22 3A 82 00 5C 27  |$(I.1)."..":..\'|
00001F40: F4 1F 81 49 B2 31 A4 50  4E 3A 50 24 28 49 29 B2  |...I.1.PN:P$(I).|
00001F50: 50 24 28 49 29 AA 22 1D  1D 22 3A 82 00 89 27 FE  |P$(I)."..":...'.|
00001F60: 1F 81 49 B2 31 A4 50 4E  3A 50 31 24 28 49 29 B2  |..I.1.PN:P1$(I).|
00001F70: 50 24 28 49 29 AA 22 1D  1D 1D 1D 1D 1D 1D 1D 1D  |P$(I).".........|
00001F80: 1D 1D 1D 1D 1D 1D 22 3A  82 00 AC 27 08 20 42 54  |......":...'. BT|
00001F90: 24 B2 22 13 11 11 11 11  11 11 11 11 11 11 11 11  |$.".............|
00001FA0: 11 11 11 11 11 11 11 11  11 11 11 22 00 DC 27 12  |..........."..'.|
00001FB0: 20 56 52 24 B2 22 20 56  49 44 45 52 45 3D 56 20  | VR$." VIDERE=V |
00001FC0: 2D 20 52 45 54 3D 52 20  2D 20 4E 3D 4E 55 4D 4D  |- RET=R - N=NUMM|
00001FD0: 45 52 20 2D 20 53 4C 55  54 3D 53 22 00 10 28 1C  |ER - SLUT=S"..(.|
00001FE0: 20 52 31 24 B2 42 54 24  AA 22 11 20 20 20 20 20  | R1$.BT$.".     |
00001FF0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002000: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 91 22  |              ."|
00002010: 00 46 28 21 20 52 32 24  B2 22 91 91 20 20 20 20  |.F(! R2$."..    |
00002020: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002040: 20 20 20 20 91 22 00 74  28 26 20 4E 52 24 B2 22  |    .".t(& NR$."|
00002050: 13 11 11 11 11 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00002060: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 20 20 20  |.............   |
00002070: 9D 9D 9D 22 00 AF 28 30  20 46 55 24 B2 22 20 46  |..."..(0 FU$." F|
00002080: 4F 52 54 53 5B 54 54 45  20 28 4A 2F 4E 29 20 3F  |ORTS[TTE (J/N) ?|
00002090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 9D  |               .|
000020A0: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 22 00  |..............".|
000020B0: BB 28 6C 20 8B 41 51 B2  31 A7 8E 00 D0 28 28 23  |.(l .AQ.1....((#|
000020C0: 8F 2A 4C 49 53 54 20 4B  41 52 54 4F 54 45 4B 2A  |.*LIST KARTOTEK*|
000020D0: 00 0E 29 32 23 4F 24 B2  22 93 11 12 20 20 20 92  |..)2#O$."...   .|
000020E0: 20 05 4C 49 53 54 20 4B  41 52 54 4F 54 45 4B 90  | .LIST KARTOTEK.|
000020F0: 20 12 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | .              |
00002100: 20 20 20 20 20 20 20 20  92 22 3A 99 4F 24 00 1D  |        .":.O$..|
00002110: 29 34 23 8B 4A B3 B1 30  A7 39 30 32 30 00 4D 29  |)4#.J..0.9020.M)|
00002120: 37 23 99 22 11 9E 44 45  52 20 45 52 20 49 4E 54  |7#."..DER ER INT|
00002130: 45 54 20 4B 41 52 54 4F  54 45 4B 20 21 90 22 3A  |ET KARTOTEK !.":|
00002140: 81 49 B2 31 A4 32 35 30  30 3A 82 3A 8E 00 57 29  |.I.1.2500:.:..W)|
00002150: 3C 23 8D 38 30 30 30 00  69 29 41 23 8B 55 24 B3  |<#.8000.i)A#.U$.|
00002160: B1 22 4A 22 A7 39 31 30  30 00 99 29 46 23 99 22  |."J".9100..)F#."|
00002170: 30 4E 53 4B 45 53 20 55  44 53 4B 52 49 46 54 20  |0NSKES UDSKRIFT |
00002180: 41 46 20 48 45 4C 45 20  4B 41 52 54 4F 54 45 4B  |AF HELE KARTOTEK|
00002190: 45 54 20 28 4A 2F 4E 29  22 00 B8 29 50 23 8D 39  |ET (J/N)"..)P#.9|
000021A0: 30 30 3A 99 52 32 24 3A  8B 41 24 B2 22 4A 22 A7  |00:.R2$:.A$."J".|
000021B0: 8D 31 32 35 30 30 3A 8E  00 D3 29 8C 23 81 49 B2  |.12500:...).#.I.|
000021C0: 31 A4 50 4E 3A 99 50 24  28 49 29 3B 4B 24 28 49  |1.PN:.P$(I);K$(I|
000021D0: 29 3A 82 00 ED 29 FA 23  81 41 B2 31 A4 4A 3A 81  |):...).#.A.1.J:.|
000021E0: 42 B2 31 A4 50 4E 3A 99  4E 52 24 3B 41 00 01 2A  |B.1.PN:.NR$;A..*|
000021F0: 18 24 99 50 31 24 28 42  29 3B 54 24 28 41 2C 42  |.$.P1$(B);T$(A,B|
00002200: 29 00 08 2A 1D 24 82 42  00 27 2A 22 24 99 42 54  |)..*.$.B.'*"$.BT|
00002210: 24 3B 22 20 46 4F 52 54  53 5B 54 54 45 20 28 4A  |$;" FORTS[TTE (J|
00002220: 2F 4E 29 20 3F 20 22 00  4D 2A 27 24 8D 39 30 30  |/N) ? ".M*'$.900|
00002230: 3A 8B 41 24 B2 22 4E 22  A7 81 49 B2 49 A4 50 4E  |:.A$."N"..I.I.PN|
00002240: 3A 82 3A 81 41 B2 41 A4  4A 3A 82 3A 8E 00 70 2A  |:.:.A.A.J:.:..p*|
00002250: 2C 24 99 52 24 3B 22 20  20 20 20 20 20 20 20 20  |,$.R$;"         |
00002260: 20 20 20 20 20 20 20 20  20 20 22 3A 46 55 B2 30  |          ":FU.0|
00002270: 00 9F 2A 36 24 81 49 49  B2 31 A4 50 4E 3A 99 50  |..*6$.II.1.PN:.P|
00002280: 31 24 28 49 49 29 3B 22  20 20 20 20 20 20 20 20  |1$(II);"        |
00002290: 20 20 20 20 20 20 20 20  20 20 20 20 22 3A 82 00  |            ":..|
000022A0: A6 2A 54 24 82 41 00 AC  2A AC 26 8E 00 ED 2A 10  |.*T$.A..*.&...*.|
000022B0: 27 4F 24 B2 22 93 11 12  20 20 20 92 20 05 4B 41  |'O$."...   . .KA|
000022C0: 52 54 4F 54 45 4B 90 20  12 20 20 20 20 20 20 20  |RTOTEK. .       |
000022D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000022E0: 20 20 20 20 90 92 22 3A  99 4F 24 3A 8E 00 16 2B  |    ..":.O$:...+|
000022F0: E0 2E 8F 2A 2A 55 44 53  4B 52 49 46 54 53 52 55  |...**UDSKRIFTSRU|
00002300: 54 49 4E 45 20 46 4F 52  20 54 52 59 4B 20 50 41  |TINE FOR TRYK PA|
00002310: 41 20 46 37 2A 2A 00 27  2B EA 2E 8B 55 24 B3 B1  |A F7**.'+...U$..|
00002320: 22 4A 22 A7 39 30 30 00  33 2B F4 2E A0 34 3A 9F  |"J".900.3+...4:.|
00002330: 34 2C 34 00 4D 2B FE 2E  81 51 B2 31 A4 50 4E 3A  |4,4.M+...Q.1.PN:|
00002340: 98 34 2C 54 24 28 41 2C  51 29 3A 82 51 00 5D 2B  |.4,T$(A,Q):.Q.]+|
00002350: 08 2F 98 34 2C 3A A0 34  3A 89 39 30 30 00 8A 2B  |./.4,:.4:.900..+|
00002360: D4 30 A0 34 3A 9F 34 2C  34 3A 8F 2A 2A 55 44 53  |.0.4:.4,4:.**UDS|
00002370: 4B 52 49 46 54 20 41 46  20 48 45 4C 45 20 4B 41  |KRIFT AF HELE KA|
00002380: 52 54 4F 54 45 4B 45 54  2A 2A 00 9D 2B D9 30 81  |RTOTEKET**..+.0.|
00002390: 41 B2 31 A4 4A 3A 81 42  B2 31 A4 50 4E 00 AC 2B  |A.1.J:.B.1.PN..+|
000023A0: DE 30 98 34 2C 54 24 28  41 2C 42 29 00 B5 2B E8  |.0.4,T$(A,B)..+.|
000023B0: 30 82 42 2C 41 00 BB 2B  06 31 3A 00 C6 2B 10 31  |0.B,A..+.1:..+.1|
000023C0: 98 34 2C 3A A0 34 00 CC  2B 1A 31 8E 00 EE 2B E4  |.4,:.4..+.1...+.|
000023D0: 57 2E 22 93 11 11 11 12  20 20 20 20 20 45 54 49  |W.".....     ETI|
000023E0: 4B 45 54 54 45 20 55 44  53 4B 52 49 46 54 00 FA  |KETTE UDSKRIFT..|
000023F0: 2B E6 57 A0 34 3A 9F 34  2C 34 00 0A 2C E8 57 4E  |+.W.4:.4,4..,.WN|
00002400: 4E B2 30 3A 3A 98 34 3A  A0 34 00 2C 2C E9 57 81  |N.0::.4:.4.,,.W.|
00002410: 41 B2 31 A4 4A A9 32 3A  4E 4E B2 4E 4E AA 31 3A  |A.1.J.2:NN.NN.1:|
00002420: 9F 34 2C 34 3A 81 42 B2  31 A4 50 4E 00 4E 2C EE  |.4,4:.B.1.PN.N,.|
00002430: 57 98 34 2C 54 24 28 41  2C 42 29 20 C7 28 31 36  |W.4,T$(A,B) .(16|
00002440: 29 22 34 30 22 54 24 28  41 AA 31 2C 42 29 00 61  |)"40"T$(A.1,B).a|
00002450: 2C F8 57 82 42 3A 8B 4E  4E B2 34 A7 32 32 35 33  |,.W.B:.NN.4.2253|
00002460: 30 00 75 2C FA 57 98 34  3A 98 34 3A 98 34 3A 89  |0.u,.W.4:.4:.4:.|
00002470: 32 32 35 34 30 00 99 2C  02 58 98 34 3A 4E 4E B2  |22540..,.X.4:NN.|
00002480: 30 3A 99 22 20 53 4B 49  46 54 20 54 49 4C 20 4E  |0:." SKIFT TIL N|
00002490: 59 20 50 41 50 49 52 20  22 00 AE 2C 04 58 A1 54  |Y PAPIR "..,.X.T|
000024A0: 24 3A 8B 54 24 B2 22 22  A7 32 32 35 33 32 00 BB  |$:.T$."".22532..|
000024B0: 2C 0C 58 98 34 3A A0 34  3A 82 41 00 C1 2C 2A 58  |,.X.4:.4:.A..,*X|
000024C0: 8E 00 00 00 08 AD                                 |......          |
......AQ.1. .P..T$(200,8),A$(25).&.Z...L
.D.O$."...   . .KARTOTEK. .             
              .":.O$: 9:.9,0.}...TI$."00
0000".....R$.".                         
            ."... ..1000......A$.O....A$
."".900......F(A$).133..10000:.1000.....
.F(A$).136.12000......+-.......L...O$.".
..   . .KARTOTEK. .                     
      .":.O$......U$."J"..". 0 . .MULIGH
ED FOR UDSKRIFT PA.... PRINTER.":.1010..
....". 0 . MULIGHED FOR UDSKRIFT PA.... 
PRINTER......".. 1 . OPRET    KARTOTEK..
....".. 2 . HENT     KARTOTEK FRA DISK.%
....".. 3 . INDL[S I KARTOTEK.H....".. 4
 . OPDATE..,.R  KARTOTEK.G....".. 5 . S0
G    I KARTOTEK......".. 6 . GEM      KA
RTOTEK PAA DISK...$..".. 7 . LIST     KA
RTOTEK.M.)..".. 8 . ETIKETTE UDSKRIFT...
,..".. 9 . SLUT PROGRAM...8..".TILBAGE H
ERTIL VED TRYK PA.... F1.5.B..900:PK.E(A
$).AQ:.PK.0.PK.9.1090.E.E..PK..0.1105...
F.O$."...   . .PRINTERRUTINE ..         
            .":.O$:.1096...G..1000.J.H..
"..T[ND FOR PRINTER !.-":."..TRYK <RETUR
N>":U$."J"...I..A$:.A$."".1097...J..".MA
N KAN NU FA.... UDSKRIFT AF KORTENE ".;.
K..".PA.... SK[RMEN VED AT TRYKKE PA....
 F7.O.L..A$:.A$."".1100.U.P...E.Q..PK..9
.1200...V..J..0.."...ER DET NYE KARTOTEK
 GEMT PA.... DISK  ? .":.900...`..+-IFA$
="J"THENEND.O.J..+-IFJ=0THENEND.Y.T..100
0......PK.2000,7000,3000,4000,5000,6000,
9000,22500...O..1000.!.P..**OPRET.`.Z.O$
."...   . .OPRET KARTOTEK. .            
         ..":.O$......J..0..".DER ER DEF
INERET ET KARTOTEK......J..0..".0NSKES E
T NYT (J/N) ":.900:.A$.."J"...X....I.1.P
N:K$(I)."":.:J.0......".HVOR MANGE POSTE
R SKAL KARTOTEKET       .INDEHOLDE? (MAX
. 8)......900:PN.E(A$).B....PN.1.PN.8.20
60.G.4..8000:.**UDTEGNING AF KARTOTEK**.
S....I.1.PN.....2500:.......*KONTROL AF
 KARTOTEK*.Z....".......................
.KORREKT (J/N) ":.900:.A$."J".2800...$..
R$......"RETTE TEKST NUMMER : "...8..900
:I.E(A$):.I.1.I.PN.2360.'.=..R$.E.B..P$(
I);"             :  ".].L..P$(I);:.2500:
.2330.G....2900...D.K$(I)."":Z.0:.P$(I);
">";...I.Z.Z.AQ...N..A$(Z):.A$(Z)."".251
0...X.IT.F(A$(Z))......A$(Z);:.Z.13.Z.0:
.P$(I);"             :  ":.2500.%....IT.
13.AQ..X.1.Z.1:K$(I).K$(I).A$(X):.X:Z.0:
.2600.U....IT.17..".";P$(I)"           "
:.P$(I):.2500......IT.20.IT.157.IT.145..
P$(I)"           ":.P$(I):.2500......250
5......F(K$(I)).13.AQ.K$(I).":".C....AQ.
1...I.(...O..........*INDS[T...B.O$."...
   . .INDL[S I KARTOTEK. .              
    .":.O$.).D..PN.0.3020.C.G.."..DER ER
 IKKE DEFINERET ET KARTOTEK.":.I.1.2500:
.:..X.L..".. 1 . INDL[S"...V..".. 2 . TI
L HOVEDMENU"......"..   . SVAR MED TAL".
N....900:S.E(A$):.S.1.S.2.3050.Y....S.2.
.......O$:.8000.....:.&...J.J.AQ:.***GHG
FKGHGDJKDJKGJKDJKJGKLKDKJGJK:KDKKFK***.:
.!..NR$;"   ...";J.U.&..I.1.PN:.P$(I);K$
(I):..A....I.1.PN.....Z.0:T$(J,I)."":.P1
$(I);">";.....Z.Z.1......A$(Z):.A$(Z).""
.3216.....IT.F(A$(Z))......A$(Z);:.Z.21.
Z.0:.P1$(I);"                      ":.32
12.$....IT.17..".";P1$(I)"           ":.
P1$(I):.3212.[....IT.13..X.1.Z.1:T$(J,I)
.T$(J,I).A$(X):.X:Z.0:.3260......IT.20.I
T.157.IT.145.Z.0:.P1$(I)"               
  ":.3212......3215.B....F(T$(J,I)).13.T
$(J,I).":".H.F........I.1.PN:.P1$(I);"  
                  ":.......3000...<.....
 ..*OPDATER.U...O$."...   . .OPDATE..,.R
 KARTOTEK. .                   .":.O$...
...".MED DENNE RUTINE KAN MAN RETTE I SI
T    KARTOTEK.......J..0.4100.K.H.."..ME
N DER ER INTET KARTOTEK TIL STEDE."...R.
.I.1.2500:.:..&....".F0RSTE KARTOTEKSKOR
T KOMMER FREM, HVOR- EFTER BUNDLINJEN VI
SER:.".S...." VIDERE=V - RET=R - N=NUMME
R - SLUT=S"......".HVIS DER TRYKKES V KO
MMER N[STE KORT.......".TRYKKES N SP0RGE
S OM 0NSKET  KORTNUMMER...."..".EFTER AT
 HAVE INDL[ST NUMMERET KOMMER   DET 0NSK
EDE KORT....'..".TRYK PA.... <RETURN>.&.
(..A$:.A$."".AQ.0.4136.M.,..O$:.".NA....
R DET RIGTIGE KORT ER FREMME TRYKKES  ..
R FOR .R.ET.....@..".DER SP0RGES NU OM N
UMMERET PA.... LINJEN,   DER SKAL RETTES
....E..".EFTER AT HAVE INDL[ST DETTE, KA
N LINJEN RETTES....J..".TRYK PA.... <RET
URN>...T..A$:.A$."".4180.&.H..O$:.8000.A
.R..I.1.PN:.P$(I);K$(I):..X.X.N.1:.B.1.P
N:.NR$;N.L.Y..P1$(B);T$(N,B).S.Z..B.}.|.
.4800.C....BT$;" RETTE LINJE NUMMER :   
               ..................";.....
.900:I.E(A$):.I.1.I.PN.4251.+...T$(N,I).
"":.P1$(I);"                      ......
..............":Z.0.K. .T$(N,I)."":Z.0:.
P1$(I);">";.U...Z.Z.1.O....A$(Z):.A$(Z).
"".4270....IT.F(A$(Z))......A$(Z);:.Z.2
1.Z.0:.P1$(I);"                       ":
.4256......IT.17..".";P1$(I)"           
":.P1$(I):.4256.&.B..IT.13..X.1.Z.1:T$(N
,I).T$(N,I).A$(X):.X:Z.0:.4800.D.L..IT.2
0.IT.157.IT.145.Z.0:.P1$(I)"            
     ":.4256.N.V..4260.T...:.Z.0........
**FORTS[T S0GNING**.....N.N.1:.B.1.PN:.N
R$;N......N.J.N.0:.4520.S....P1$(B);T$(N
,B).Z....B...F..4800......**TIL KORT # I
******.@....BT$;"0NSKET KORTNUMMER :    
              ................";.B....9,
A$:.:N.E(A$):.N.1.N.J.4610.U....B.1.PN:.
NR$;N......P1$(B);T$(N,B)......B......48
00......**SP0RGETEKST**...J..BT$;VR$...T
..900:.A$."V".A$."R".A$."N".A$."S".4840.
.....4820......R1$.2....A$.."R"..II.1.PN
:.P1$(II);"                    ":..C....
A$."V".4500.T....A$."R".4250.E....A$."N"
.4600.S....A$."S"........II.1.PN:.P1$(II
);"                    ":....$........*S
0G.....O$."...   . .S0G I KARTOTEK. .   
                  .":.O$......J..0.5018.
<...."..DER ER INTET KARTOTEK I COMPUTER
EN !.":.I.1.2500:.:..\....".. 1 . ALMIND
ELIG S0GNING......".. 2 . LOGISK     S0G
NING (= < >)......".. 3 . BA....DE 1 OG 
2... .."..   . SVAR MED TAL.M....900:S0.
E(A$)......S0.1.S0.3.AQ.0.5025......8000
:FG.0:AG.0......I.1.PN:.P$(I);K$(I):..V.
...BT$;:.S0..2.." S0GETEKST I FELT NUMME
R :      .....";:.5060......BT$;:.S0.1..
" LOGISK S0GETEKST I FELT NUMMER : ";...
..:...D..900:I.E(A$):.I.1.I.PN.5060.U.I.
.BT$;R$;"                   "...N..P1$(I
);">";:Z.0...S.Z.Z.1...X..A$(Z):.A$(Z)."
".5080...Y.IT.F(A$(Z)).P.Z..S0.2.AG.1.MT
.F(A$(1)):.MT.60.MT.62.Z.0:.5075......A$
(Z);:.Z.20..P1$(I);"                    
":.5070......IT.13..X.1.Z:S1$(I).S1$(I).
A$(X):.X:Z.0:.5200......IT.20.IT.157.Z.0
:.P1$(I);"                   ":.5070....
..5075...P.S1$(I).H(S1$(I),C(S1$(I)).1).
1.R.S2$(I).S1$(I).D.U..S0.1.AG.1.S2$(I).
S1$(I):AG.0:S1$(JU).S$:.5210.}.W.S$.S1$(
I):JU.I:AG.AQ...Y..S0.3.AG.1.5040...Z..A
.1.J:.NR$;A...^.B.I:.S0.3.B.JU..._..II.1
.PN:.P1$(II);"                    ":....
A..S0.2..5500:.5230.3 D..J(T$(A,B),1,C(S
1$(B))).S1$(B).FU.1:.S0.3.B.I:.5500.C N.
.FU..1.5300.B X..Q.1.PN:.P1$(Q);T$(A,Q):
.Q.O ...BT$;FU$.. ...900:.A$."N"..I.I.PN
:.:.A.A.J:.:... ...A$."N"..I.I.PN:.:.A.A
.J:.:... ...R$;"                 .......
.........":FU.0.. ...A..!...I.1.PN:S1$(I
)."":S2$(I)."":...!....<!|..**TEST FOR F
LERE S0GEKRITERIER**.\!...*********IFS0<
>2THENRETURN..!..FU.0:.FG.0.S2$(I).J(S2$
(I),2):FG.1..!...MT.61.J(T$(A,B),1,C(S2$
(I))).S2$(I).FU.1:...!...MT.60.J(T$(A,B)
,1,C(S2$(I))).S2$(I).FU.1:..."...MT.62.J
(T$(A,B),1,C(S2$(I))).S2$(I).FU.1:..."..
..."....2"P..*GEM KARTOTEK.P"Z.O$."...  
 . .GEM KARTOTEK. .                     
  .":.O$."...J..0.6120.."T..".DER FINDE
S INTET KARTOTEK I COMPUTEREN!".A"...I.1
.2500:.:..."...".NU SKAL KARTOTEKET GEMM
ES !..#...".NAVN PA.... KARTOTEK":.".MAX
. 16 ANSLAG : ";.%#...9,KN$:..>#...C(KN$
).16..R$:.6140.U#8..8,8,8,"DUMMY,S,W".W#
B..8,PN:.8,J:.I.1.PN:.8,K$(I):.. #L..A.1
.J.AQ:.B.1.PN.AQ:.8,T$(A,B):.B,A..#.. 8.
.#..SA$."S:".KN$.E#...15,8,15..#...15,SA
$:.15,"R:".KN$."=DUMMY"..#.. 15:...$X..*
*HENT KARTOTEK**.E$].O$."...     .HENT F
RA DISK .                      .":.O$.S$
B..O$:."..".A$G..J.0.7030..$L.."..DER ER
 ET KARTOTEK I COMPUTEREN":.".MA.... DET
TE SLETTES ? ."..$N..900:.A$.."J"....$V.
."..L[G DATA SKIVE I STATIONEN"..$X.."FI
L NAVN: ";FF$..%Y.FF$.FF$.",S,R"..%...8,
8,8,FF$.&%...8,PN:.8,J.=%...I.1.PN:.8,K$
(I):..C%F.:.Q%P..A.1.J:.B.1.PN:.8,T$(A,B
):.B,A:.AQ.0.8000.X% . 8.~%?....%@..**OP
RETTELSE AF SKEMA**.M%..S1$." ..........
............................"..%..S2$." 
......................................".
1&..S3$." ..............................
........".`&B.S4$."            :        
               "..&G.S5$." .            
 :                      ."..&L..O$;".";S
1$:.S5$.H&V.."....FAST TEKST....INDHOLD"
..&...I.1.PN:.S2$:."."I".";S4$:.:.S3$..'
...I.1.PN:P$(I)."":P1$(I)."":..='..P$(0)
.".....":.I.1.PN:P$(I).P$(I.1)."..":..\'
...I.1.PN:P$(I).P$(I)."..":...'...I.1.PN
:P1$(I).P$(I)."...............":...'. BT
$."........................"..'. VR$." V
IDERE=V - RET=R - N=NUMMER - SLUT=S"..(.
 R1$.BT$.".                             
      .".F(! R2$."..                    
                    .".T(& NR$."........
.....................   ..."..(0 FU$." F
ORTS[TTE (J/N) ?               .........
......"..(L .AQ.1...P((#.*LIST KARTOTEK*
..)2#O$."...   . .LIST KARTOTEK. .      
                .":.O$..)4#.J..0.9020.M)
7#."..DER ER INTET KARTOTEK !.":.I.1.250
0:.:..W)<#.8000.I)A#.U$.."J".9100..)F#."
0NSKES UDSKRIFT AF HELE KARTOTEKET (J/N)
"..)P#.900:.R2$:.A$."J"..12500:..S).#.I.
1.PN:.P$(I);K$(I):...).#.A.1.J:.B.1.PN:.
NR$;A..*.$.P1$(B);T$(A,B)..*.$.B.'*"$.BT
$;" FORTS[TTE (J/N) ? ".M*'$.900:.A$."N"
..I.I.PN:.:.A.A.J:.:..P*,$.R$;"         
          ":FU.0..*6$.II.1.PN:.P1$(II);"
                    ":...*T$.A..*.&...*.
'O$."...   . .KARTOTEK. .               
            ..":.O$:...+...**UDSKRIFTSRU
TINE FOR TRYK PAA F7**.'+...U$.."J".900.
3+.. 4:.4,4.M+...Q.1.PN:.4,T$(A,Q):.Q.]+
./.4,: 4:.900..+T0 4:.4,4:.**UDSKRIFT AF
 HELE KARTOTEKET**..+Y0.A.1.J:.B.1.PN..+
.0.4,T$(A,B)..+.0.B,A..+.1:.F+.1.4,: 4.L
+.1...+.W.".....     ETIKETTE UDSKRIFT..
+.W 4:.4,4..,.WNN.0::.4: 4.,,.W.A.1.J.2:
NN.NN.1:.4,4:.B.1.PN.N,.W.4,T$(A,B) G(16
)"40"T$(A.1,B).A,.W.B:.NN.4.22530.U,.W.4
:.4:.4:.22540..,.X.4:NN.0:." SKIFT TIL N
Y PAPIR "..,.X.T$:.T$."".22532..,.X.4: 4
:.A.A,*X......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL