HELTEX KARTOTEK
FILE INFORMATION
FILENAME(S): HELTEX KARTOTEK
FILE TYPE(S): PRG, DEL
FILE SIZE: 9.3K
FIRST SEEN: 2025-11-30 20:14:30
APPEARS ON: 2 disk(s)
FILE HASH
c35cd860bd6d7af651721204c5852a60e87dc8039581740378e6043a3a3329f8
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SHADOWSOFT | HELTEX KARTOTEK | PRG | Curtcool, LPN | 20 | 18 | DOWNLOAD FILE |
| SHADOWSOFT | HELTEX KARTOTEK | DEL | Curtcool, LPN | 28 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 23 08 01 00 8F 2A 2A 2A 43 4F 50 59 52 49 |..#....***COPYRI|
00000010: 47 48 54 20 4A 55 53 54 20 52 2E 2D 44 41 54 41 |GHT JUST R.-DATA|
00000020: 2A 2A 2A 00 2C 08 02 00 41 51 B2 31 00 42 08 50 |***.,...AQ.1.B.P|
00000030: 00 86 54 24 28 32 30 30 2C 38 29 2C 41 24 28 32 |..T$(200,8),A$(2|
00000040: 35 29 00 72 08 5A 00 97 35 33 32 38 30 2C 35 3A |5).r.Z..53280,5:|
00000050: 97 35 33 32 38 31 2C 35 3A 99 C7 28 31 34 34 29 |.53281,5:..(144)|
00000060: 3A 99 C7 28 38 29 3A 99 4F 24 3A A0 39 3A 9F 39 |:..(8):.O$:.9:.9|
00000070: 2C 30 00 B8 08 64 00 4F 24 B2 22 93 11 12 20 20 |,0...d.O$."... |
00000080: 20 92 20 05 4B 41 52 54 4F 54 45 4B 90 20 12 20 | . .KARTOTEK. . |
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 92 22 3A 99 4F 24 | .":.O$|
000000B0: 3A A0 39 3A 9F 39 2C 30 00 D0 08 6E 00 99 22 11 |:.9:.9,0...n..".|
000000C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 D5 C9 |................|
000000D0: 00 EA 08 78 00 99 22 CA 52 20 43 4F 50 59 52 49 |...x..".R COPYRI|
000000E0: 47 48 54 20 20 20 31 39 38 33 00 1B 09 82 00 99 |GHT 1983......|
000000F0: 22 20 20 20 4A 55 53 54 20 52 2E 2D 44 41 54 41 |" JUST R.-DATA|
00000100: 20 41 50 53 22 3A 99 22 20 20 20 44 4B 20 20 38 | APS":." DK 8|
00000110: 37 30 30 20 48 4F 52 53 45 4E 53 00 2C 09 87 00 |700 HORSENS.,...|
00000120: 54 49 24 B2 22 30 30 30 30 30 30 22 00 4C 09 8C |TI$."000000".L..|
00000130: 00 A1 41 24 3A 8B 41 24 B2 22 22 AF 54 49 24 B3 |..A$:.A$."".TI$.|
00000140: 22 30 30 30 30 30 36 22 A7 31 34 30 00 7D 09 96 |"000006".140.}..|
00000150: 00 52 24 B2 22 91 20 20 20 20 20 20 20 20 20 20 |.R$.". |
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 20 20 20 20 20 20 20 20 20 20 91 22 00 87 09 | ."...|
00000180: 20 03 89 31 30 30 30 00 8F 09 84 03 A1 41 24 00 | ..1000......A$.|
00000190: 9E 09 8E 03 8B 41 24 B2 22 22 A7 39 30 30 00 BA |.....A$."".900..|
000001A0: 09 98 03 8B C6 28 41 24 29 B2 31 33 33 A7 8D 31 |.....(A$).133..1|
000001B0: 30 30 30 30 3A 89 31 30 30 30 00 CF 09 A2 03 8B |0000:.1000......|
000001C0: C6 28 41 24 29 B2 31 33 36 A7 31 32 30 30 30 00 |.(A$).136.12000.|
000001D0: E6 09 AC 03 8B C6 28 41 24 29 B2 31 33 37 A7 97 |......(A$).137..|
000001E0: 37 38 38 2C 34 39 00 EC 09 DE 03 8E 00 2A 0A E8 |788,49.......*..|
000001F0: 03 4F 24 B2 22 93 11 12 20 20 20 92 20 05 4B 41 |.O$."... . .KA|
00000200: 52 54 4F 54 45 4B 90 20 12 20 20 20 20 20 20 20 |RTOTEK. . |
00000210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000220: 20 20 20 20 92 22 3A 99 4F 24 00 6C 0A ED 03 8B | .":.O$.l....|
00000230: 55 24 B2 22 4A 22 A7 99 22 12 20 30 20 92 20 05 |U$."J"..". 0 . .|
00000240: 4D 55 4C 49 47 48 45 44 20 46 4F 52 20 55 44 53 |MULIGHED FOR UDS|
00000250: 4B 52 49 46 54 20 50 41 91 9D 2E 11 20 50 52 49 |KRIFT PA.... PRI|
00000260: 4E 54 45 52 90 22 3A 89 31 30 31 30 00 9D 0A EE |NTER.":.1010....|
00000270: 03 99 22 12 20 30 20 92 20 4D 55 4C 49 47 48 45 |..". 0 . MULIGHE|
00000280: 44 20 46 4F 52 20 55 44 53 4B 52 49 46 54 20 50 |D FOR UDSKRIFT P|
00000290: 41 91 9D 2E 11 20 50 52 49 4E 54 45 52 00 BC 0A |A.... PRINTER...|
000002A0: F2 03 99 22 11 12 20 31 20 92 20 4F 50 52 45 54 |...".. 1 . OPRET|
000002B0: 20 20 20 20 4B 41 52 54 4F 54 45 4B 00 E8 0A F7 | KARTOTEK....|
000002C0: 03 99 22 11 12 20 32 20 92 20 48 45 4E 54 20 20 |..".. 2 . HENT |
000002D0: 20 20 20 4B 41 52 54 4F 54 45 4B 20 46 52 41 20 | KARTOTEK FRA |
000002E0: 44 49 53 4B 45 54 54 45 00 07 0B FC 03 99 22 11 |DISKETTE......".|
000002F0: 12 20 33 20 92 20 49 4E 44 4C 5B 53 20 49 20 4B |. 3 . INDL[S I K|
00000300: 41 52 54 4F 54 45 4B 00 2A 0B 06 04 99 22 11 12 |ARTOTEK.*...."..|
00000310: 20 34 20 92 20 4F 50 44 41 54 45 91 9D 2C 11 52 | 4 . OPDATE..,.R|
00000320: 20 20 4B 41 52 54 4F 54 45 4B 00 49 0B 10 04 99 | KARTOTEK.I....|
00000330: 22 11 12 20 35 20 92 20 53 30 47 20 20 20 20 49 |".. 5 . S0G I|
00000340: 20 4B 41 52 54 4F 54 45 4B 00 78 0B 1A 04 99 22 | KARTOTEK.x...."|
00000350: 11 12 20 36 20 92 20 47 45 4D 20 20 20 20 20 20 |.. 6 . GEM |
00000360: 4B 41 52 54 4F 54 45 4B 20 50 41 91 9D 2E 11 20 |KARTOTEK PA.... |
00000370: 44 49 53 4B 45 54 54 45 00 97 0B 24 04 99 22 11 |DISKETTE...$..".|
00000380: 12 20 37 20 92 20 4C 49 53 54 20 20 20 20 20 4B |. 7 . LIST K|
00000390: 41 52 54 4F 54 45 4B 00 B3 0B 29 04 99 22 11 12 |ARTOTEK...).."..|
000003A0: 20 38 20 92 20 41 46 53 4C 55 54 20 50 52 4F 47 | 8 . AFSLUT PROG|
000003B0: 52 41 4D 00 CD 0B 2E 04 99 22 11 12 20 20 20 92 |RAM......".. .|
000003C0: 20 53 56 41 52 20 4D 45 44 20 54 41 4C 00 F6 0B | SVAR MED TAL...|
000003D0: 38 04 99 22 11 54 49 4C 42 41 47 45 20 48 45 52 |8..".TILBAGE HER|
000003E0: 54 49 4C 20 56 45 44 20 54 52 59 4B 20 50 41 91 |TIL VED TRYK PA.|
000003F0: 9D 2E 11 20 46 31 00 1B 0C 42 04 8D 39 30 30 3A |... F1...B..900:|
00000400: 50 4B B2 C5 28 41 24 29 AC 41 51 3A 8B 50 4B B3 |PK..(A$).AQ:.PK.|
00000410: 30 B0 50 4B B1 38 A7 31 30 39 30 00 2B 0C 45 04 |0.PK.8.1090.+.E.|
00000420: 8B 50 4B B3 B1 30 A7 31 31 30 35 00 6E 0C 46 04 |.PK..0.1105.n.F.|
00000430: 4F 24 B2 22 93 11 12 20 20 20 92 20 05 50 52 49 |O$."... . .PRI|
00000440: 4E 54 45 52 52 55 54 49 4E 45 20 90 12 20 20 20 |NTERRUTINE .. |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000460: 20 20 92 22 3A 99 4F 24 3A 8D 31 30 39 36 00 78 | .":.O$:.1096.x|
00000470: 0C 47 04 89 31 30 30 30 00 B0 0C 48 04 99 22 11 |.G..1000...H..".|
00000480: 9E 54 5B 4E 44 20 46 4F 52 20 50 52 49 4E 54 45 |.T[ND FOR PRINTE|
00000490: 52 20 21 90 2D 22 3A 99 22 11 11 54 52 59 4B 20 |R !.-":."..TRYK |
000004A0: 3C 52 45 54 55 52 4E 3E 22 3A 55 24 B2 22 4A 22 |<RETURN>":U$."J"|
000004B0: 00 C4 0C 49 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 |...I..A$:.A$."".|
000004C0: 31 30 39 37 00 F3 0C 4A 04 99 22 11 4D 41 4E 20 |1097...J..".MAN |
000004D0: 4B 41 4E 20 4E 55 20 46 41 91 9D 2E 11 20 55 44 |KAN NU FA.... UD|
000004E0: 53 4B 52 49 46 54 20 41 46 20 4B 4F 52 54 45 4E |SKRIFT AF KORTEN|
000004F0: 45 20 22 00 21 0D 4B 04 99 22 11 50 41 91 9D 2E |E ".!.K..".PA...|
00000500: 11 20 53 4B 5B 52 4D 45 4E 20 56 45 44 20 41 54 |. SK[RMEN VED AT|
00000510: 20 54 52 59 4B 4B 45 20 50 41 91 9D 2E 11 20 46 | TRYKKE PA.... F|
00000520: 37 00 35 0D 4C 04 A1 41 24 3A 8B 41 24 B2 22 22 |7.5.L..A$:.A$.""|
00000530: A7 31 31 30 30 00 3B 0D 50 04 8E 00 4B 0D 51 04 |.1100.;.P...K.Q.|
00000540: 8B 50 4B B3 B1 38 A7 31 32 30 30 00 8D 0D 56 04 |.PK..8.1200...V.|
00000550: 8B 4A B3 B1 30 A7 99 22 11 11 9E 45 52 20 44 45 |.J..0.."...ER DE|
00000560: 54 20 4E 59 45 20 4B 41 52 54 4F 54 45 4B 20 47 |T NYE KARTOTEK G|
00000570: 45 4D 54 20 50 41 91 9D 2E 11 20 42 41 91 9D 2E |EMT PA.... BA...|
00000580: 11 4E 44 20 3F 20 90 22 3A 8D 39 30 30 00 9B 0D |.ND ? .":.900...|
00000590: 60 04 8B 41 24 B2 22 4A 22 A7 A2 00 A6 0D 6A 04 |`..A$."J".....j.|
000005A0: 8B 4A B2 30 A7 A2 00 B0 0D 74 04 89 31 30 30 30 |.J.0.....t..1000|
000005B0: 00 DB 0D B0 04 91 50 4B 8D 32 30 30 30 2C 37 30 |......PK.2000,70|
000005C0: 30 30 2C 33 30 30 30 2C 34 30 30 30 2C 35 30 30 |00,3000,4000,500|
000005D0: 30 2C 36 30 30 30 2C 39 30 30 30 00 E5 0D CF 07 |0,6000,9000.....|
000005E0: 89 31 30 30 30 00 F2 0D D0 07 8F 2A 2A 4F 50 52 |.1000......**OPR|
000005F0: 45 54 00 31 0E DA 07 4F 24 B2 22 93 11 12 20 20 |ET.1...O$."... |
00000600: 20 92 20 05 4F 50 52 45 54 20 4B 41 52 54 4F 54 | . .OPRET KARTOT|
00000610: 45 4B 90 20 12 20 20 20 20 20 20 20 20 20 20 20 |EK. . |
00000620: 20 20 20 20 20 20 20 20 20 20 90 92 22 3A 99 4F | ..":.O|
00000630: 24 00 5B 0E E4 07 8B 4A B3 B1 30 A7 99 22 11 44 |$.[....J..0..".D|
00000640: 45 52 20 45 52 20 44 45 46 49 4E 45 52 45 54 20 |ER ER DEFINERET |
00000650: 45 54 20 4B 41 52 54 4F 54 45 4B 00 8E 0E EE 07 |ET KARTOTEK.....|
00000660: 8B 4A B3 B1 30 A7 99 22 11 30 4E 53 4B 45 53 20 |.J..0..".0NSKES |
00000670: 45 54 20 4E 59 54 20 28 4A 2F 4E 29 20 22 3A 8D |ET NYT (J/N) ":.|
00000680: 39 30 30 3A 8B 41 24 B3 B1 22 4A 22 A7 8E 00 A9 |900:.A$.."J"....|
00000690: 0E F8 07 81 49 B2 31 A4 50 4E 3A 4B 24 28 49 29 |....I.1.PN:K$(I)|
000006A0: B2 22 22 3A 82 3A 4A B2 30 00 ED 0E 02 08 99 22 |."":.:J.0......"|
000006B0: 11 48 56 4F 52 20 4D 41 4E 47 45 20 50 4F 53 54 |.HVOR MANGE POST|
000006C0: 45 52 20 53 4B 41 4C 20 4B 41 52 54 4F 54 45 4B |ER SKAL KARTOTEK|
000006D0: 45 54 20 20 20 20 20 20 20 11 49 4E 44 45 48 4F |ET .INDEHO|
000006E0: 4C 44 45 3F 20 28 4D 41 58 2E 20 38 29 00 FF 0E |LDE? (MAX. 8)...|
000006F0: 0C 08 8D 39 30 30 3A 50 4E B2 C5 28 41 24 29 00 |...900:PN..(A$).|
00000700: 13 0F 16 08 8B 50 4E B3 31 B0 50 4E B1 38 A7 32 |.....PN.1.PN.8.2|
00000710: 30 36 30 00 38 0F 34 08 8D 38 30 30 30 3A 8F 2A |060.8.4..8000:.*|
00000720: 2A 55 44 54 45 47 4E 49 4E 47 20 41 46 20 4B 41 |*UDTEGNING AF KA|
00000730: 52 54 4F 54 45 4B 2A 2A 00 44 0F 98 08 81 49 B2 |RTOTEK**.D....I.|
00000740: 31 A4 50 4E 00 50 0F A2 08 8D 32 35 30 30 3A 82 |1.PN.P....2500:.|
00000750: 00 6B 0F FC 08 8F 2A 4B 4F 4E 54 52 4F 4C 20 41 |.k....*KONTROL A|
00000760: 46 20 4B 41 52 54 4F 54 45 4B 2A 00 AB 0F 1A 09 |F KARTOTEK*.....|
00000770: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000780: 11 11 11 11 11 11 11 11 11 11 4B 4F 52 52 45 4B |..........KORREK|
00000790: 54 20 28 4A 2F 4E 29 20 22 3A 8D 39 30 30 3A 8B |T (J/N) ":.900:.|
000007A0: 41 24 B2 22 4A 22 A7 32 38 30 30 00 B3 0F 24 09 |A$."J".2800...$.|
000007B0: 99 52 24 00 D0 0F 2E 09 99 22 52 45 54 54 45 20 |.R$......"RETTE |
000007C0: 54 45 4B 53 54 20 4E 55 4D 4D 45 52 20 3A 20 22 |TEKST NUMMER : "|
000007D0: 00 F0 0F 38 09 8D 39 30 30 3A 49 B2 C5 28 41 24 |...8..900:I..(A$|
000007E0: 29 3A 8B 49 B3 31 B0 49 B1 50 4E A7 32 33 36 30 |):.I.1.I.PN.2360|
000007F0: 00 F8 0F 3D 09 99 52 24 00 16 10 42 09 99 50 24 |...=..R$...B..P$|
00000800: 28 49 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 |(I);" |
00000810: 20 20 3A 20 20 22 00 2E 10 4C 09 99 50 24 28 49 | : "...L..P$(I|
00000820: 29 3B 3A 8D 32 35 30 30 3A 89 32 33 33 30 00 38 |);:.2500:.2330.8|
00000830: 10 BA 09 89 32 39 30 30 00 55 10 C4 09 4B 24 28 |....2900.U...K$(|
00000840: 49 29 B2 22 22 3A 5A B2 30 3A 99 50 24 28 49 29 |I)."":Z.0:.P$(I)|
00000850: 3B 22 3E 22 3B 00 60 10 C9 09 5A B2 5A AA 41 51 |;">";.`...Z.Z.AQ|
00000860: 00 7A 10 CE 09 A1 41 24 28 5A 29 3A 8B 41 24 28 |.z....A$(Z):.A$(|
00000870: 5A 29 B2 22 22 A7 32 35 31 30 00 8A 10 D8 09 49 |Z)."".2510.....I|
00000880: 54 B2 C6 28 41 24 28 5A 29 29 00 C0 10 E2 09 99 |T..(A$(Z))......|
00000890: 41 24 28 5A 29 3B 3A 8B 5A B1 31 33 A7 5A B2 30 |A$(Z);:.Z.13.Z.0|
000008A0: 3A 99 50 24 28 49 29 3B 22 20 20 20 20 20 20 20 |:.P$(I);" |
000008B0: 20 20 20 20 20 20 3A 20 20 22 3A 89 32 35 30 30 | : ":.2500|
000008C0: 00 F6 10 EC 09 8B 49 54 B2 31 33 AC 41 51 A7 81 |......IT.13.AQ..|
000008D0: 58 B2 31 A4 5A AB 31 3A 4B 24 28 49 29 B2 4B 24 |X.1.Z.1:K$(I).K$|
000008E0: 28 49 29 AA 41 24 28 58 29 3A 82 58 3A 5A B2 30 |(I).A$(X):.X:Z.0|
000008F0: 3A 89 32 36 30 30 00 26 11 F1 09 8B 49 54 B2 31 |:.2600.&....IT.1|
00000900: 37 A7 99 22 91 22 3B 50 24 28 49 29 22 20 20 20 |7..".";P$(I)" |
00000910: 20 20 20 20 20 20 20 20 22 3A 99 50 24 28 49 29 | ":.P$(I)|
00000920: 3A 89 32 35 30 30 00 60 11 F6 09 8B 49 54 B2 32 |:.2500.`....IT.2|
00000930: 30 B0 49 54 B2 31 35 37 B0 49 54 B2 31 34 35 A7 |0.IT.157.IT.145.|
00000940: 99 50 24 28 49 29 22 20 20 20 20 20 20 20 20 20 |.P$(I)" |
00000950: 20 20 22 3A 99 50 24 28 49 29 3A 89 32 35 30 30 | ":.P$(I):.2500|
00000960: 00 6A 11 00 0A 89 32 35 30 35 00 88 11 0A 0A 8B |.j....2505......|
00000970: C6 28 4B 24 28 49 29 29 B2 31 33 AC 41 51 A7 4B |.(K$(I)).13.AQ.K|
00000980: 24 28 49 29 B2 22 3A 22 00 94 11 14 0A 8B 41 51 |$(I).":"......AQ|
00000990: B2 31 A7 82 00 9A 11 28 0A 8E 00 A0 11 F0 0A 8E |.1.....(........|
000009A0: 00 AD 11 B8 0B 8F 2A 49 4E 44 53 5B 54 00 EB 11 |......*INDS[T...|
000009B0: C2 0B 4F 24 B2 22 93 11 12 20 20 20 92 20 05 49 |..O$."... . .I|
000009C0: 4E 44 4C 5B 53 20 49 20 4B 41 52 54 4F 54 45 4B |NDL[S I KARTOTEK|
000009D0: 90 20 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |. . |
000009E0: 20 20 20 20 20 92 22 3A 99 4F 24 00 FA 11 C4 0B | .":.O$.....|
000009F0: 8B 50 4E B1 30 A7 33 30 32 30 00 34 12 C7 0B 99 |.PN.0.3020.4....|
00000A00: 22 11 9E 44 45 52 20 45 52 20 49 4B 4B 45 20 44 |"..DER ER IKKE D|
00000A10: 45 46 49 4E 45 52 45 54 20 45 54 20 4B 41 52 54 |EFINERET ET KART|
00000A20: 4F 54 45 4B 90 22 3A 81 49 B2 31 A4 32 35 30 30 |OTEK.":.I.1.2500|
00000A30: 3A 82 3A 8E 00 49 12 CC 0B 99 22 11 12 20 31 20 |:.:..I....".. 1 |
00000A40: 92 20 49 4E 44 4C 5B 53 22 00 65 12 D6 0B 99 22 |. INDL[S".e...."|
00000A50: 11 12 20 32 20 92 20 54 49 4C 20 48 4F 56 45 44 |.. 2 . TIL HOVED|
00000A60: 4D 45 4E 55 22 00 80 12 E0 0B 99 22 11 12 20 20 |MENU"......".. |
00000A70: 20 92 20 53 56 41 52 20 4D 45 44 20 54 41 4C 22 | . SVAR MED TAL"|
00000A80: 00 9F 12 EA 0B 8D 39 30 30 3A 53 B2 C5 28 41 24 |......900:S..(A$|
00000A90: 29 3A 8B 53 B3 31 B0 53 B1 32 A7 33 30 35 30 00 |):.S.1.S.2.3050.|
00000AA0: AA 12 F4 0B 8B 53 B2 32 A7 8E 00 B8 12 FE 0B 99 |.....S.2........|
00000AB0: 4F 24 3A 8D 38 30 30 30 00 BE 12 08 0C 3A 00 F7 |O$:.8000.....:..|
00000AC0: 12 1C 0C 4A B2 4A AA 41 51 3A 8F 2A 2A 2A 47 48 |...J.J.AQ:.***GH|
00000AD0: 47 46 4B 47 48 47 44 4A 4B 44 4A 4B 47 4A 4B 44 |GFKGHGDJKDJKGJKD|
00000AE0: 4A 4B 4A 47 4B 4C 4B 44 4B 4A 47 4A 4B 3A 4B 44 |JKJGKLKDKJGJK:KD|
00000AF0: 4B 4B 46 4B 2A 2A 2A 00 0B 13 21 0C 99 4E 52 24 |KKFK***...!..NR$|
00000B00: 3B 22 20 20 20 9D 9D 9D 22 3B 4A 00 26 13 26 0C |;" ...";J.&.&.|
00000B10: 81 49 B2 31 A4 50 4E 3A 99 50 24 28 49 29 3B 4B |.I.1.PN:.P$(I);K|
00000B20: 24 28 49 29 3A 82 00 32 13 8A 0C 81 49 B2 31 A4 |$(I):..2....I.1.|
00000B30: 50 4E 00 52 13 8C 0C 5A B2 30 3A 54 24 28 4A 2C |PN.R...Z.0:T$(J,|
00000B40: 49 29 B2 22 22 3A 99 50 31 24 28 49 29 3B 22 3E |I)."":.P1$(I);">|
00000B50: 22 3B 00 5C 13 8F 0C 5A B2 5A AA 31 00 76 13 90 |";.\...Z.Z.1.v..|
00000B60: 0C A1 41 24 28 5A 29 3A 8B 41 24 28 5A 29 B2 22 |..A$(Z):.A$(Z)."|
00000B70: 22 A7 33 32 31 36 00 86 13 91 0C 49 54 B2 C6 28 |".3216.....IT..(|
00000B80: 41 24 28 5A 29 29 00 C3 13 94 0C 99 41 24 28 5A |A$(Z))......A$(Z|
00000B90: 29 3B 3A 8B 5A B1 32 31 A7 5A B2 30 3A 99 50 31 |);:.Z.21.Z.0:.P1|
00000BA0: 24 28 49 29 3B 22 20 20 20 20 20 20 20 20 20 20 |$(I);" |
00000BB0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 89 33 | ":.3|
00000BC0: 32 31 32 00 F5 13 9E 0C 8B 49 54 B2 31 37 A7 99 |212......IT.17..|
00000BD0: 22 91 22 3B 50 31 24 28 49 29 22 20 20 20 20 20 |".";P1$(I)" |
00000BE0: 20 20 20 20 20 20 22 3A 99 50 31 24 28 49 29 3A | ":.P1$(I):|
00000BF0: 89 33 32 31 32 00 2C 14 A3 0C 8B 49 54 B2 31 33 |.3212.,....IT.13|
00000C00: A7 81 58 B2 31 A4 5A AB 31 3A 54 24 28 4A 2C 49 |..X.1.Z.1:T$(J,I|
00000C10: 29 B2 54 24 28 4A 2C 49 29 AA 41 24 28 58 29 3A |).T$(J,I).A$(X):|
00000C20: 82 58 3A 5A B2 30 3A 89 33 32 36 30 00 6A 14 A8 |.X:Z.0:.3260.j..|
00000C30: 0C 8B 49 54 B2 32 30 B0 49 54 B2 31 35 37 B0 49 |..IT.20.IT.157.I|
00000C40: 54 B2 31 34 35 A7 5A B2 30 3A 99 50 31 24 28 49 |T.145.Z.0:.P1$(I|
00000C50: 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |)" |
00000C60: 20 20 20 22 3A 89 33 32 31 32 00 74 14 B2 0C 89 | ":.3212.t....|
00000C70: 33 32 31 35 00 93 14 BC 0C 8B C6 28 54 24 28 4A |3215.......(T$(J|
00000C80: 2C 49 29 29 B2 31 33 A7 54 24 28 4A 2C 49 29 B2 |,I)).13.T$(J,I).|
00000C90: 22 3A 22 00 99 14 C6 0C 82 00 C6 14 EE 0C 81 49 |":"............I|
00000CA0: B2 31 A4 50 4E 3A 99 50 31 24 28 49 29 3B 22 20 |.1.PN:.P1$(I);" |
00000CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CC0: 20 20 20 22 3A 82 00 D0 14 F8 0C 89 33 30 30 30 | ":.......3000|
00000CD0: 00 D6 14 3C 0F 8E 00 E4 14 A0 0F 8F 2A 4F 50 44 |...<........*OPD|
00000CE0: 41 54 45 52 00 26 15 AA 0F 4F 24 B2 22 93 11 12 |ATER.&...O$."...|
00000CF0: 20 20 20 92 20 05 4F 50 44 41 54 45 91 9D 2C 11 | . .OPDATE..,.|
00000D00: 52 20 4B 41 52 54 4F 54 45 4B 90 20 12 20 20 20 |R KARTOTEK. . |
00000D10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D20: 92 22 3A 99 4F 24 00 5F 15 B4 0F 99 22 11 4D 45 |.":.O$._....".ME|
00000D30: 44 20 44 45 4E 4E 45 20 52 55 54 49 4E 45 20 4B |D DENNE RUTINE K|
00000D40: 41 4E 20 4D 41 4E 20 52 45 54 54 45 20 49 20 53 |AN MAN RETTE I S|
00000D50: 49 54 20 20 20 20 4B 41 52 54 4F 54 45 4B 2E 00 |IT KARTOTEK..|
00000D60: 6E 15 BE 0F 8B 4A B3 B1 30 A7 34 31 30 30 00 9C |n....J..0.4100..|
00000D70: 15 C8 0F 99 22 11 9E 4D 45 4E 20 44 45 52 20 45 |...."..MEN DER E|
00000D80: 52 20 49 4E 54 45 54 20 4B 41 52 54 4F 54 45 4B |R INTET KARTOTEK|
00000D90: 20 54 49 4C 20 53 54 45 44 45 90 22 00 AE 15 D2 | TIL STEDE."....|
00000DA0: 0F 81 49 B2 31 A4 32 35 30 30 3A 82 3A 8E 00 F7 |..I.1.2500:.:...|
00000DB0: 15 04 10 99 22 11 46 30 52 53 54 45 20 4B 41 52 |....".F0RSTE KAR|
00000DC0: 54 4F 54 45 4B 53 4B 4F 52 54 20 4B 4F 4D 4D 45 |TOTEKSKORT KOMME|
00000DD0: 52 20 46 52 45 4D 2C 20 48 56 4F 52 2D 20 45 46 |R FREM, HVOR- EF|
00000DE0: 54 45 52 20 42 55 4E 44 4C 49 4E 4A 45 4E 20 56 |TER BUNDLINJEN V|
00000DF0: 49 53 45 52 3A 11 22 00 24 16 0E 10 99 22 20 56 |ISER:.".$...." V|
00000E00: 49 44 45 52 45 3D 56 20 2D 20 52 45 54 3D 52 20 |IDERE=V - RET=R |
00000E10: 2D 20 4E 3D 4E 55 4D 4D 45 52 20 2D 20 53 4C 55 |- N=NUMMER - SLU|
00000E20: 54 3D 53 22 00 51 16 18 10 99 22 11 48 56 49 53 |T=S".Q....".HVIS|
00000E30: 20 44 45 52 20 54 52 59 4B 4B 45 53 20 56 20 4B | DER TRYKKES V K|
00000E40: 4F 4D 4D 45 52 20 4E 5B 53 54 45 20 4B 4F 52 54 |OMMER N[STE KORT|
00000E50: 2E 00 81 16 1D 10 99 22 11 54 52 59 4B 4B 45 53 |.......".TRYKKES|
00000E60: 20 4E 20 53 50 30 52 47 45 53 20 4F 4D 20 30 4E | N SP0RGES OM 0N|
00000E70: 53 4B 45 54 20 20 4B 4F 52 54 4E 55 4D 4D 45 52 |SKET KORTNUMMER|
00000E80: 2E 00 C2 16 22 10 99 22 11 45 46 54 45 52 20 41 |...."..".EFTER A|
00000E90: 54 20 48 41 56 45 20 49 4E 44 4C 5B 53 54 20 4E |T HAVE INDL[ST N|
00000EA0: 55 4D 4D 45 52 45 54 20 4B 4F 4D 4D 45 52 20 20 |UMMERET KOMMER |
00000EB0: 20 44 45 54 20 30 4E 53 4B 45 44 45 20 4B 4F 52 | DET 0NSKEDE KOR|
00000EC0: 54 2E 00 DE 16 27 10 99 22 11 54 52 59 4B 20 50 |T....'..".TRYK P|
00000ED0: 41 91 9D 2E 11 20 3C 52 45 54 55 52 4E 3E 00 F7 |A.... <RETURN>..|
00000EE0: 16 28 10 A1 41 24 3A 8B 41 24 B2 22 22 B0 41 51 |.(..A$:.A$."".AQ|
00000EF0: B2 30 A7 34 31 33 36 00 3E 17 2C 10 99 4F 24 3A |.0.4136.>.,..O$:|
00000F00: 99 22 11 4E 41 91 9D 2E 11 52 20 44 45 54 20 52 |.".NA....R DET R|
00000F10: 49 47 54 49 47 45 20 4B 4F 52 54 20 45 52 20 46 |IGTIGE KORT ER F|
00000F20: 52 45 4D 4D 45 20 54 52 59 4B 4B 45 53 20 20 11 |REMME TRYKKES .|
00000F30: 9E 52 20 46 4F 52 20 12 52 92 45 54 2E 90 00 82 |.R FOR .R.ET....|
00000F40: 17 40 10 99 22 11 44 45 52 20 53 50 30 52 47 45 |.@..".DER SP0RGE|
00000F50: 53 20 4E 55 20 4F 4D 20 4E 55 4D 4D 45 52 45 54 |S NU OM NUMMERET|
00000F60: 20 50 41 91 9D 2E 11 20 4C 49 4E 4A 45 4E 2C 20 | PA.... LINJEN, |
00000F70: 20 20 44 45 52 20 53 4B 41 4C 20 52 45 54 54 45 | DER SKAL RETTE|
00000F80: 53 2E 00 B9 17 45 10 99 22 11 45 46 54 45 52 20 |S....E..".EFTER |
00000F90: 41 54 20 48 41 56 45 20 49 4E 44 4C 5B 53 54 20 |AT HAVE INDL[ST |
00000FA0: 44 45 54 54 45 2C 20 4B 41 4E 20 4C 49 4E 4A 45 |DETTE, KAN LINJE|
00000FB0: 4E 20 52 45 54 54 45 53 2E 00 D5 17 4A 10 99 22 |N RETTES....J.."|
00000FC0: 11 54 52 59 4B 20 50 41 91 9D 2E 11 20 3C 52 45 |.TRYK PA.... <RE|
00000FD0: 54 55 52 4E 3E 00 E9 17 54 10 A1 41 24 3A 8B 41 |TURN>...T..A$:.A|
00000FE0: 24 B2 22 22 A7 34 31 38 30 00 F7 17 68 10 99 4F |$."".4180...h..O|
00000FF0: 24 3A 8D 38 30 30 30 00 12 18 72 10 81 49 B2 31 |$:.8000...r..I.1|
00001000: A4 50 4E 3A 99 50 24 28 49 29 3B 4B 24 28 49 29 |.PN:.P$(I);K$(I)|
00001010: 3A 82 00 29 18 78 10 4E B2 31 3A 81 42 B2 31 A4 |:..).x.N.1:.B.1.|
00001020: 50 4E 3A 99 4E 52 24 3B 4E 00 3D 18 79 10 99 50 |PN:.NR$;N.=.y..P|
00001030: 31 24 28 42 29 3B 54 24 28 4E 2C 42 29 00 44 18 |1$(B);T$(N,B).D.|
00001040: 7A 10 82 42 00 4E 18 7C 10 89 34 38 30 30 00 94 |z..B.N.|..4800..|
00001050: 18 9A 10 99 42 54 24 3B 22 20 52 45 54 54 45 20 |....BT$;" RETTE |
00001060: 4C 49 4E 4A 45 20 4E 55 4D 4D 45 52 20 3A 20 20 |LINJE NUMMER : |
00001070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001080: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00001090: 9D 9D 22 3B 00 B4 18 9B 10 8D 39 30 30 3A 49 B2 |..";......900:I.|
000010A0: C5 28 41 24 29 3A 8B 49 B3 31 B0 49 B1 50 4E A7 |.(A$):.I.1.I.PN.|
000010B0: 34 32 35 31 00 FC 18 9F 10 54 24 28 4E 2C 49 29 |4251.....T$(N,I)|
000010C0: B2 22 22 3A 99 50 31 24 28 49 29 3B 22 20 20 20 |."":.P1$(I);" |
000010D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000010E0: 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | .............|
000010F0: 9D 9D 9D 9D 9D 9D 9D 22 3A 5A B2 30 00 1C 19 A0 |.......":Z.0....|
00001100: 10 54 24 28 4E 2C 49 29 B2 22 22 3A 5A B2 30 3A |.T$(N,I)."":Z.0:|
00001110: 99 50 31 24 28 49 29 3B 22 3E 22 3B 00 26 19 A4 |.P1$(I);">";.&..|
00001120: 10 5A B2 5A AA 31 00 40 19 AE 10 A1 41 24 28 5A |.Z.Z.1.@....A$(Z|
00001130: 29 3A 8B 41 24 28 5A 29 B2 22 22 A7 34 32 37 30 |):.A$(Z)."".4270|
00001140: 00 50 19 B3 10 49 54 B2 C6 28 41 24 28 5A 29 29 |.P...IT..(A$(Z))|
00001150: 00 8E 19 B8 10 99 41 24 28 5A 29 3B 3A 8B 5A B1 |......A$(Z);:.Z.|
00001160: 32 31 A7 5A B2 30 3A 99 50 31 24 28 49 29 3B 22 |21.Z.0:.P1$(I);"|
00001170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001180: 20 20 20 20 20 20 20 22 3A 89 34 32 35 36 00 C0 | ":.4256..|
00001190: 19 BD 10 8B 49 54 B2 31 37 A7 99 22 91 22 3B 50 |....IT.17..".";P|
000011A0: 31 24 28 49 29 22 20 20 20 20 20 20 20 20 20 20 |1$(I)" |
000011B0: 20 22 3A 99 50 31 24 28 49 29 3A 89 34 32 35 36 | ":.P1$(I):.4256|
000011C0: 00 F7 19 C2 10 8B 49 54 B2 31 33 A7 81 58 B2 31 |......IT.13..X.1|
000011D0: A4 5A AB 31 3A 54 24 28 4E 2C 49 29 B2 54 24 28 |.Z.1:T$(N,I).T$(|
000011E0: 4E 2C 49 29 AA 41 24 28 58 29 3A 82 58 3A 5A B2 |N,I).A$(X):.X:Z.|
000011F0: 30 3A 89 34 38 30 30 00 35 1A CC 10 8B 49 54 B2 |0:.4800.5....IT.|
00001200: 32 30 B0 49 54 B2 31 35 37 B0 49 54 B2 31 34 35 |20.IT.157.IT.145|
00001210: A7 5A B2 30 3A 99 50 31 24 28 49 29 22 20 20 20 |.Z.0:.P1$(I)" |
00001220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
00001230: 89 34 32 35 36 00 3F 1A D6 10 89 34 32 36 30 00 |.4256.?....4260.|
00001240: 45 1A E0 10 3A 00 4B 1A 30 11 8E 00 64 1A 94 11 |E...:.K.0...d...|
00001250: 8F 2A 2A 46 4F 52 54 53 5B 54 20 53 30 47 4E 49 |.**FORTS[T S0GNI|
00001260: 4E 47 2A 2A 00 7D 1A A8 11 4E B2 4E AA 31 3A 81 |NG**.}...N.N.1:.|
00001270: 42 B2 31 A4 50 4E 3A 99 4E 52 24 3B 4E 00 90 1A |B.1.PN:.NR$;N...|
00001280: A9 11 8B 4E B1 4A A7 4E B2 30 3A 89 34 35 32 30 |...N.J.N.0:.4520|
00001290: 00 A4 1A AD 11 99 50 31 24 28 42 29 3B 54 24 28 |......P1$(B);T$(|
000012A0: 4E 2C 42 29 00 AB 1A B2 11 82 42 00 B5 1A C6 11 |N,B)......B.....|
000012B0: 89 34 38 30 30 00 CF 1A F8 11 8F 2A 2A 54 49 4C |.4800......**TIL|
000012C0: 20 4B 4F 52 54 20 23 20 49 2A 2A 2A 2A 2A 2A 00 | KORT # I******.|
000012D0: 11 1B 02 12 99 42 54 24 3B 22 30 4E 53 4B 45 54 |.....BT$;"0NSKET|
000012E0: 20 4B 4F 52 54 4E 55 4D 4D 45 52 20 3A 20 20 20 | KORTNUMMER : |
000012F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 9D | .|
00001300: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 |..............."|
00001310: 3B 00 33 1B 04 12 84 39 2C 41 24 3A 99 3A 4E B2 |;.3....9,A$:.:N.|
00001320: C5 28 41 24 29 3A 8B 4E B3 31 B0 4E B1 4A A7 34 |.(A$):.N.1.N.J.4|
00001330: 36 31 30 00 46 1B 0C 12 81 42 B2 31 A4 50 4E 3A |610.F....B.1.PN:|
00001340: 99 4E 52 24 3B 4E 00 5A 1B 11 12 99 50 31 24 28 |.NR$;N.Z....P1$(|
00001350: 42 29 3B 54 24 28 4E 2C 42 29 00 61 1B 16 12 82 |B);T$(N,B).a....|
00001360: 42 00 6B 1B 1B 12 89 34 38 30 30 00 80 1B C0 12 |B.k....4800.....|
00001370: 8F 2A 2A 53 50 30 52 47 45 54 45 4B 53 54 2A 2A |.**SP0RGETEKST**|
00001380: 00 8D 1B CA 12 99 42 54 24 3B 56 52 24 00 B8 1B |......BT$;VR$...|
00001390: D4 12 8D 39 30 30 3A 8B 41 24 B2 22 56 22 B0 41 |...900:.A$."V".A|
000013A0: 24 B2 22 52 22 B0 41 24 B2 22 4E 22 B0 41 24 B2 |$."R".A$."N".A$.|
000013B0: 22 53 22 A7 34 38 34 30 00 C2 1B DE 12 89 34 38 |"S".4840......48|
000013C0: 32 30 00 CB 1B E8 12 99 52 31 24 00 03 1C ED 12 |20......R1$.....|
000013D0: 8B 41 24 B3 B1 22 52 22 A7 81 49 49 B2 31 A4 50 |.A$.."R"..II.1.P|
000013E0: 4E 3A 99 50 31 24 28 49 49 29 3B 22 20 20 20 20 |N:.P1$(II);" |
000013F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001400: 22 3A 82 00 14 1C F2 12 8B 41 24 B2 22 56 22 A7 |":.......A$."V".|
00001410: 34 35 30 30 00 25 1C FC 12 8B 41 24 B2 22 52 22 |4500.%....A$."R"|
00001420: A7 34 32 35 30 00 36 1C 06 13 8B 41 24 B2 22 4E |.4250.6....A$."N|
00001430: 22 A7 34 36 30 30 00 44 1C 10 13 8B 41 24 B2 22 |".4600.D....A$."|
00001440: 53 22 A7 8E 00 73 1C 1A 13 81 49 49 B2 31 A4 50 |S"...s....II.1.P|
00001450: 4E 3A 99 50 31 24 28 49 49 29 3B 22 20 20 20 20 |N:.P1$(II);" |
00001460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001470: 22 3A 82 00 79 1C 24 13 8E 00 83 1C 88 13 8F 2A |":..y.$........*|
00001480: 53 30 47 00 C1 1C 92 13 4F 24 B2 22 93 11 12 20 |S0G.....O$."... |
00001490: 20 20 92 20 05 53 30 47 20 49 20 4B 41 52 54 4F | . .S0G I KARTO|
000014A0: 54 45 4B 90 20 12 20 20 20 20 20 20 20 20 20 20 |TEK. . |
000014B0: 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 99 4F | .":.O|
000014C0: 24 00 D0 1C 94 13 8B 4A B3 B1 30 A7 35 30 31 38 |$......J..0.5018|
000014D0: 00 0D 1D 97 13 99 22 11 9E 44 45 52 20 45 52 20 |......"..DER ER |
000014E0: 49 4E 54 45 54 20 4B 41 52 54 4F 54 45 4B 20 49 |INTET KARTOTEK I|
000014F0: 20 43 4F 4D 50 55 54 45 52 45 4E 20 21 90 22 3A | COMPUTEREN !.":|
00001500: 81 49 B2 31 A4 32 35 30 30 3A 82 3A 8E 00 2D 1D |.I.1.2500:.:..-.|
00001510: 9A 13 99 22 11 12 20 31 20 92 20 41 4C 4D 49 4E |...".. 1 . ALMIN|
00001520: 44 45 4C 49 47 20 53 30 47 4E 49 4E 47 00 55 1D |DELIG S0GNING.U.|
00001530: 9C 13 99 22 11 12 20 32 20 92 20 4C 4F 47 49 53 |...".. 2 . LOGIS|
00001540: 4B 20 20 20 20 20 53 30 47 4E 49 4E 47 20 28 3D |K S0GNING (=|
00001550: 20 3C 20 3E 29 00 72 1D 9E 13 99 22 11 12 20 33 | < >).r....".. 3|
00001560: 20 92 20 42 41 91 9D 2E 11 44 45 20 31 20 4F 47 | . BA....DE 1 OG|
00001570: 20 32 00 8C 1D A0 13 99 22 11 12 20 20 20 92 20 | 2......".. . |
00001580: 53 56 41 52 20 4D 45 44 20 54 41 4C 00 9E 1D A1 |SVAR MED TAL....|
00001590: 13 8D 39 30 30 3A 53 30 B2 C5 28 41 24 29 00 B7 |..900:S0..(A$)..|
000015A0: 1D A2 13 8B 53 30 B3 31 B0 53 30 B1 33 B0 41 51 |....S0.1.S0.3.AQ|
000015B0: B2 30 A7 35 30 32 35 00 CB 1D A4 13 8D 38 30 30 |.0.5025......800|
000015C0: 30 3A 46 47 B2 30 3A 41 47 B2 30 00 E6 1D A5 13 |0:FG.0:AG.0.....|
000015D0: 81 49 B2 31 A4 50 4E 3A 99 50 24 28 49 29 3B 4B |.I.1.PN:.P$(I);K|
000015E0: 24 28 49 29 3A 82 00 27 1E A6 13 99 42 54 24 3B |$(I):..'....BT$;|
000015F0: 3A 8B 53 30 B3 B1 32 A7 99 22 20 53 30 47 45 54 |:.S0..2.." S0GET|
00001600: 45 4B 53 54 20 49 20 46 45 4C 54 20 4E 55 4D 4D |EKST I FELT NUMM|
00001610: 45 52 20 3A 20 20 20 20 20 20 9D 9D 9D 9D 9D 22 |ER : ....."|
00001620: 3B 3A 89 35 30 36 30 00 5E 1E B0 13 99 42 54 24 |;:.5060.^....BT$|
00001630: 3B 3A 8B 53 30 B1 31 A7 99 22 20 4C 4F 47 49 53 |;:.S0.1.." LOGIS|
00001640: 4B 20 53 30 47 45 54 45 4B 53 54 20 49 20 46 45 |K S0GETEKST I FE|
00001650: 4C 54 20 4E 55 4D 4D 45 52 20 3A 20 22 3B 00 64 |LT NUMMER : ";.d|
00001660: 1E BA 13 3A 00 84 1E C4 13 8D 39 30 30 3A 49 B2 |...:......900:I.|
00001670: C5 28 41 24 29 3A 8B 49 B3 31 B0 49 B1 50 4E A7 |.(A$):.I.1.I.PN.|
00001680: 35 30 36 30 00 A6 1E C9 13 99 42 54 24 3B 52 24 |5060......BT$;R$|
00001690: 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |;" |
000016A0: 20 20 20 20 20 22 00 BB 1E CE 13 99 50 31 24 28 | "......P1$(|
000016B0: 49 29 3B 22 3E 22 3B 3A 5A B2 30 00 C5 1E D3 13 |I);">";:Z.0.....|
000016C0: 5A B2 5A AA 31 00 DF 1E D8 13 A1 41 24 28 5A 29 |Z.Z.1......A$(Z)|
000016D0: 3A 8B 41 24 28 5A 29 B2 22 22 A7 35 30 38 30 00 |:.A$(Z)."".5080.|
000016E0: EF 1E D9 13 49 54 B2 C6 28 41 24 28 5A 29 29 00 |....IT..(A$(Z)).|
000016F0: 21 1F DA 13 8B 53 30 B2 32 B0 41 47 B2 31 A7 4D |!....S0.2.AG.1.M|
00001700: 54 B2 C6 28 41 24 28 31 29 29 3A 8B 4D 54 B3 36 |T..(A$(1)):.MT.6|
00001710: 30 B0 4D 54 B1 36 32 A7 5A B2 30 3A 89 35 30 37 |0.MT.62.Z.0:.507|
00001720: 35 00 58 1F DD 13 99 41 24 28 5A 29 3B 3A 8B 5A |5.X....A$(Z);:.Z|
00001730: B1 32 30 A7 99 50 31 24 28 49 29 3B 22 20 20 20 |.20..P1$(I);" |
00001740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001750: 20 22 3A 89 35 30 37 30 00 8B 1F E2 13 8B 49 54 | ":.5070......IT|
00001760: B2 31 33 A7 81 58 B2 31 A4 5A 3A 53 31 24 28 49 |.13..X.1.Z:S1$(I|
00001770: 29 B2 53 31 24 28 49 29 AA 41 24 28 58 29 3A 82 |).S1$(I).A$(X):.|
00001780: 58 3A 5A B2 30 3A 89 35 32 30 30 00 C5 1F E4 13 |X:Z.0:.5200.....|
00001790: 8B 49 54 B2 32 30 B0 49 54 B2 31 35 37 A7 5A B2 |.IT.20.IT.157.Z.|
000017A0: 30 3A 99 50 31 24 28 49 29 3B 22 20 20 20 20 20 |0:.P1$(I);" |
000017B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
000017C0: 89 35 30 37 30 00 CF 1F E7 13 89 35 30 37 35 00 |.5070......5075.|
000017D0: F0 1F 50 14 53 31 24 28 49 29 B2 C8 28 53 31 24 |..P.S1$(I)..(S1$|
000017E0: 28 49 29 2C C3 28 53 31 24 28 49 29 29 AB 31 29 |(I),.(S1$(I)).1)|
000017F0: 00 02 20 52 14 53 32 24 28 49 29 B2 53 31 24 28 |.. R.S2$(I).S1$(|
00001800: 49 29 00 35 20 55 14 8B 53 30 B1 31 AF 41 47 B2 |I).5 U..S0.1.AG.|
00001810: 31 A7 53 32 24 28 49 29 B2 53 31 24 28 49 29 3A |1.S2$(I).S1$(I):|
00001820: 41 47 B2 30 3A 53 31 24 28 4A 55 29 B2 53 24 3A |AG.0:S1$(JU).S$:|
00001830: 89 35 32 31 30 00 4E 20 57 14 53 24 B2 53 31 24 |.5210.N W.S$.S1$|
00001840: 28 49 29 3A 4A 55 B2 49 3A 41 47 B2 41 51 00 62 |(I):JU.I:AG.AQ.b|
00001850: 20 59 14 8B 53 30 B2 33 AF 41 47 B2 31 A7 35 30 | Y..S0.3.AG.1.50|
00001860: 34 30 00 74 20 5A 14 81 41 B2 31 A4 4A 3A 99 4E |40.t Z..A.1.J:.N|
00001870: 52 24 3B 41 00 87 20 5E 14 42 B2 49 3A 8B 53 30 |R$;A.. ^.B.I:.S0|
00001880: B2 33 A7 42 B2 4A 55 00 B6 20 5F 14 81 49 49 B2 |.3.B.JU.. _..II.|
00001890: 31 A4 50 4E 3A 99 50 31 24 28 49 49 29 3B 22 20 |1.PN:.P1$(II);" |
000018A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018B0: 20 20 20 22 3A 82 00 CC 20 61 14 8B 53 30 B2 32 | ":... a..S0.2|
000018C0: A7 8D 35 35 30 30 3A 89 35 32 33 30 00 04 21 64 |..5500:.5230..!d|
000018D0: 14 8B CA 28 54 24 28 41 2C 42 29 2C 31 2C C3 28 |...(T$(A,B),1,.(|
000018E0: 53 31 24 28 42 29 29 29 B2 53 31 24 28 42 29 A7 |S1$(B))).S1$(B).|
000018F0: 46 55 B2 31 3A 8B 53 30 B2 33 A7 42 B2 49 3A 8D |FU.1:.S0.3.B.I:.|
00001900: 35 35 30 30 00 14 21 6E 14 8B 46 55 B3 B1 31 A7 |5500..!n..FU..1.|
00001910: 35 33 30 30 00 33 21 78 14 81 51 B2 31 A4 50 4E |5300.3!x..Q.1.PN|
00001920: 3A 99 50 31 24 28 51 29 3B 54 24 28 41 2C 51 29 |:.P1$(Q);T$(A,Q)|
00001930: 3A 82 51 00 40 21 82 14 99 42 54 24 3B 46 55 24 |:.Q.@!...BT$;FU$|
00001940: 00 66 21 87 14 8D 39 30 30 3A 8B 41 24 B2 22 4E |.f!...900:.A$."N|
00001950: 22 A7 81 49 B2 49 A4 50 4E 3A 82 3A 81 41 B2 41 |"..I.I.PN:.:.A.A|
00001960: A4 4A 3A 82 3A 8E 00 87 21 89 14 8B 41 24 B2 22 |.J:.:...!...A$."|
00001970: 4E 22 A7 81 49 B2 49 A4 50 4E 3A 82 3A 81 41 B2 |N"..I.I.PN:.:.A.|
00001980: 41 A4 4A 3A 82 3A 8E 00 B8 21 8C 14 99 52 24 3B |A.J:.:...!...R$;|
00001990: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000019A0: 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ..............|
000019B0: 9D 9D 22 3A 46 55 B2 30 00 BF 21 B4 14 82 41 00 |..":FU.0..!...A.|
000019C0: E1 21 BE 14 81 49 B2 31 A4 50 4E 3A 53 31 24 28 |.!...I.1.PN:S1$(|
000019D0: 49 29 B2 22 22 3A 53 32 24 28 49 29 B2 22 22 3A |I)."":S2$(I)."":|
000019E0: 82 00 E7 21 18 15 8E 00 0D 22 7C 15 8F 2A 2A 54 |...!....."|..**T|
000019F0: 45 53 54 20 46 4F 52 20 46 4C 45 52 45 20 53 30 |EST FOR FLERE S0|
00001A00: 47 45 4B 52 49 54 45 52 49 45 52 2A 2A 00 2D 22 |GEKRITERIER**.-"|
00001A10: 86 15 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 49 46 53 30 |...*********IFS0|
00001A20: 3C 3E 32 54 48 45 4E 52 45 54 55 52 4E 00 54 22 |<>2THENRETURN.T"|
00001A30: 90 15 46 55 B2 30 3A 8B 46 47 B2 30 A7 53 32 24 |..FU.0:.FG.0.S2$|
00001A40: 28 49 29 B2 CA 28 53 32 24 28 49 29 2C 32 29 3A |(I)..(S2$(I),2):|
00001A50: 46 47 B2 31 00 84 22 9A 15 8B 4D 54 B2 36 31 AF |FG.1.."...MT.61.|
00001A60: CA 28 54 24 28 41 2C 42 29 2C 31 2C C3 28 53 32 |.(T$(A,B),1,.(S2|
00001A70: 24 28 49 29 29 29 B2 53 32 24 28 49 29 A7 46 55 |$(I))).S2$(I).FU|
00001A80: B2 31 3A 8E 00 B4 22 A4 15 8B 4D 54 B2 36 30 AF |.1:..."...MT.60.|
00001A90: CA 28 54 24 28 41 2C 42 29 2C 31 2C C3 28 53 32 |.(T$(A,B),1,.(S2|
00001AA0: 24 28 49 29 29 29 B3 53 32 24 28 49 29 A7 46 55 |$(I))).S2$(I).FU|
00001AB0: B2 31 3A 8E 00 E4 22 AE 15 8B 4D 54 B2 36 32 AF |.1:..."...MT.62.|
00001AC0: CA 28 54 24 28 41 2C 42 29 2C 31 2C C3 28 53 32 |.(T$(A,B),1,.(S2|
00001AD0: 24 28 49 29 29 29 B1 53 32 24 28 49 29 A7 46 55 |$(I))).S2$(I).FU|
00001AE0: B2 31 3A 8E 00 EA 22 B8 15 8E 00 F0 22 0C 17 8E |.1:..."....."...|
00001AF0: 00 03 23 70 17 8F 2A 47 45 4D 20 4B 41 52 54 4F |..#p..*GEM KARTO|
00001B00: 54 45 4B 00 41 23 7A 17 4F 24 B2 22 93 11 12 20 |TEK.A#z.O$."... |
00001B10: 20 20 92 20 05 47 45 4D 20 4B 41 52 54 4F 54 45 | . .GEM KARTOTE|
00001B20: 4B 90 20 12 20 20 20 20 20 20 20 20 20 20 20 20 |K. . |
00001B30: 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 99 4F | .":.O|
00001B40: 24 00 50 23 84 17 8B 4A B3 B1 30 A7 36 31 32 30 |$.P#...J..0.6120|
00001B50: 00 80 23 D4 17 99 22 11 44 45 52 20 46 49 4E 44 |..#...".DER FIND|
00001B60: 45 53 20 49 4E 54 45 54 20 4B 41 52 54 4F 54 45 |ES INTET KARTOTE|
00001B70: 4B 20 49 20 43 4F 4D 50 55 54 45 52 45 4E 21 22 |K I COMPUTEREN!"|
00001B80: 00 92 23 DE 17 81 49 B2 31 A4 32 35 30 30 3A 82 |..#...I.1.2500:.|
00001B90: 3A 8E 00 B5 23 E8 17 99 22 11 4E 55 20 53 4B 41 |:...#...".NU SKA|
00001BA0: 4C 20 4B 41 52 54 4F 54 45 4B 45 54 20 47 45 4D |L KARTOTEKET GEM|
00001BB0: 4D 45 53 20 21 00 C5 23 F7 17 84 39 2C 48 45 4C |MES !..#...9,HEL|
00001BC0: 54 45 58 3A 99 00 0E 24 0C 18 99 22 11 4C 5B 47 |TEX:...$...".L[G|
00001BD0: 20 42 41 91 9D 2E 11 4E 44 45 54 20 49 20 42 41 | BA....NDET I BA|
00001BE0: 91 9D 2E 11 4E 44 4F 50 54 41 47 45 52 45 4E 20 |....NDOPTAGEREN |
00001BF0: 22 3A 99 22 11 4F 47 20 53 50 4F 4C 20 44 45 54 |":.".OG SPOL DET|
00001C00: 20 48 45 4C 54 20 54 49 4C 42 41 47 45 2E 00 2B | HELT TILBAGE..+|
00001C10: 24 0D 18 99 22 11 54 52 59 4B 20 50 41 91 9D 2E |$...".TRYK PA...|
00001C20: 11 20 3C 52 45 54 55 52 4E 3E 22 00 3F 24 0E 18 |. <RETURN>".?$..|
00001C30: A1 41 24 3A 8B 41 24 B2 22 22 A7 36 31 35 38 00 |.A$:.A$."".6158.|
00001C40: 47 24 10 18 99 4F 24 00 7B 24 1A 18 99 22 11 9E |G$...O$.{$..."..|
00001C50: 46 4F 52 54 52 59 44 20 56 45 44 20 41 54 20 54 |FORTRYD VED AT T|
00001C60: 52 59 4B 4B 45 20 22 C7 28 33 34 29 22 20 4E 45 |RYKKE ".(34)" NE|
00001C70: 4A 20 22 C7 28 33 34 29 22 90 22 00 AC 24 24 18 |J ".(34)"."..$$.|
00001C80: 99 22 11 45 4C 4C 45 52 20 53 4B 52 49 56 22 C7 |.".ELLER SKRIV".|
00001C90: 28 33 34 29 22 20 47 45 4D 20 22 C7 28 33 34 29 |(34)" GEM ".(34)|
00001CA0: 22 20 22 3B 3A 84 39 2C 41 24 3A 99 00 BC 24 29 |" ";:.9,A$:...$)|
00001CB0: 18 8B 41 24 B2 22 4E 45 4A 22 A7 8E 00 D5 24 2E |..A$."NEJ"....$.|
00001CC0: 18 8B 41 24 B3 B1 22 47 45 4D 22 A7 99 52 24 3A |..A$.."GEM"..R$:|
00001CD0: 89 32 38 39 30 00 F2 24 38 18 99 22 11 11 22 3A |.2890..$8.."..":|
00001CE0: 9F 31 2C 38 2C 31 2C 22 40 30 3A 48 45 4C 54 45 |.1,8,1,"@0:HELTE|
00001CF0: 58 22 00 14 25 42 18 98 31 2C 50 4E 3A 98 31 2C |X"..%B..1,PN:.1,|
00001D00: 4A 3A 81 49 B2 31 A4 50 4E 3A 98 31 2C 4B 24 28 |J:.I.1.PN:.1,K$(|
00001D10: 49 29 3A 82 00 3D 25 4C 18 81 41 B2 31 A4 4A AC |I):..=%L..A.1.J.|
00001D20: 41 51 3A 81 42 B2 31 A4 50 4E AC 41 51 3A 98 31 |AQ:.B.1.PN.AQ:.1|
00001D30: 2C 54 24 28 41 2C 42 29 3A 82 42 2C 41 00 44 25 |,T$(A,B):.B,A.D%|
00001D40: B0 18 A0 31 00 4A 25 BA 18 8E 00 61 25 58 1B 8F |...1.J%....a%X..|
00001D50: 2A 2A 48 45 4E 54 20 4B 41 52 54 4F 54 45 4B 2A |**HENT KARTOTEK*|
00001D60: 2A 00 A2 25 5D 1B 4F 24 B2 22 93 11 12 20 20 20 |*..%].O$."... |
00001D70: 92 20 05 48 45 4E 54 20 46 52 41 20 44 49 53 4B |. .HENT FRA DISK|
00001D80: 45 54 54 45 20 12 20 20 20 20 20 20 20 20 20 20 |ETTE . |
00001D90: 20 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 99 | .":.|
00001DA0: 4F 24 00 B0 25 62 1B 99 4F 24 3A 99 22 11 11 22 |O$..%b..O$:.".."|
00001DB0: 00 BE 25 67 1B 8B 4A B2 30 A7 37 30 33 30 00 04 |..%g..J.0.7030..|
00001DC0: 26 6C 1B 99 22 11 9E 44 45 52 20 45 52 20 45 54 |&l.."..DER ER ET|
00001DD0: 20 4B 41 52 54 4F 54 45 4B 20 49 20 43 4F 4D 50 | KARTOTEK I COMP|
00001DE0: 55 54 45 52 45 4E 22 3A 99 22 11 4D 41 91 9D 2E |UTEREN":.".MA...|
00001DF0: 11 20 44 45 54 54 45 20 53 4C 45 54 54 45 53 20 |. DETTE SLETTES |
00001E00: 3F 20 90 22 00 18 26 6E 1B 8D 39 30 30 3A 8B 41 |? ."..&n..900:.A|
00001E10: 24 B3 B1 22 4A 22 A7 8E 00 2C 26 76 1B A1 41 24 |$.."J"...,&v..A$|
00001E20: 3A 8B 41 24 B2 22 22 A7 37 30 33 35 00 36 26 7B |:.A$."".7035.6&{|
00001E30: 1B 89 37 30 34 30 00 4A 26 80 1B 9F 31 2C 38 2C |..7040.J&...1,8,|
00001E40: 30 2C 22 48 45 4C 54 45 58 22 00 59 26 8A 1B 84 |0,"HELTEX".Y&...|
00001E50: 31 2C 50 4E 3A 84 31 2C 4A 00 70 26 94 1B 81 49 |1,PN:.1,J.p&...I|
00001E60: B2 31 A4 50 4E 3A 84 31 2C 4B 24 28 49 29 3A 82 |.1.PN:.1,K$(I):.|
00001E70: 00 76 26 C6 1B 3A 00 A4 26 D0 1B 81 41 B2 31 A4 |.v&..:..&...A.1.|
00001E80: 4A 3A 81 42 B2 31 A4 50 4E 3A 84 31 2C 54 24 28 |J:.B.1.PN:.1,T$(|
00001E90: 41 2C 42 29 3A 82 42 2C 41 3A 8B 41 51 B2 30 A7 |A,B):.B,A:.AQ.0.|
00001EA0: 38 30 30 30 00 AB 26 20 1C A0 31 00 B1 26 3F 1F |8000..& ..1..&?.|
00001EB0: 8E 00 CE 26 40 1F 8F 2A 2A 4F 50 52 45 54 54 45 |...&@..**OPRETTE|
00001EC0: 4C 53 45 20 41 46 20 53 4B 45 4D 41 2A 2A 00 00 |LSE AF SKEMA**..|
00001ED0: 27 A4 1F 53 31 24 B2 22 20 D5 C0 C0 C0 C0 C0 C0 |'..S1$." .......|
00001EE0: C0 C0 C0 C0 C0 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001EF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 22 |..............."|
00001F00: 00 32 27 AE 1F 53 32 24 B2 22 20 AB C0 C0 C0 C0 |.2'..S2$." .....|
00001F10: C0 C0 C0 C0 C0 C0 C0 C0 C0 DB C0 C0 C0 C0 C0 C0 |................|
00001F20: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001F30: B3 22 00 64 27 B8 1F 53 33 24 B2 22 20 CA C0 C0 |.".d'..S3$." ...|
00001F40: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 |................|
00001F50: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001F60: C0 C0 CB 22 00 93 27 C2 1F 53 34 24 B2 22 20 20 |..."..'..S4$." |
00001F70: 20 20 20 20 20 20 20 20 20 20 3A 20 20 20 20 20 | : |
00001F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F90: 20 20 22 00 C5 27 C7 1F 53 35 24 B2 22 20 DD 20 | "..'..S5$." . |
00001FA0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 20 20 20 | : |
00001FB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001FC0: 20 20 20 DD 22 00 DA 27 CC 1F 99 4F 24 3B 22 11 | ."..'...O$;".|
00001FD0: 22 3B 53 31 24 3A 99 53 35 24 00 FB 27 D6 1F 99 |";S1$:.S5$..'...|
00001FE0: 22 91 1D 1D 1D 46 41 53 54 20 54 45 4B 53 54 1D |"....FAST TEKST.|
00001FF0: 1D 1D 1D 49 4E 44 48 4F 4C 44 22 00 20 28 E0 1F |...INDHOLD". (..|
00002000: 81 49 B2 31 A4 50 4E 3A 99 53 32 24 3A 99 22 05 |.I.1.PN:.S2$:.".|
00002010: 22 49 22 90 22 3B 53 34 24 3A 82 3A 99 53 33 24 |"I".";S4$:.:.S3$|
00002020: 00 41 28 EA 1F 81 49 B2 31 A4 50 4E 3A 50 24 28 |.A(...I.1.PN:P$(|
00002030: 49 29 B2 22 22 3A 50 31 24 28 49 29 B2 22 22 3A |I)."":P1$(I)."":|
00002040: 82 00 70 28 EF 1F 50 24 28 30 29 B2 22 13 11 11 |..p(..P$(0)."...|
00002050: 11 11 22 3A 81 49 B2 31 A4 50 4E 3A 50 24 28 49 |..":.I.1.PN:P$(I|
00002060: 29 B2 50 24 28 49 AB 31 29 AA 22 11 11 22 3A 82 |).P$(I.1)."..":.|
00002070: 00 8F 28 F4 1F 81 49 B2 31 A4 50 4E 3A 50 24 28 |..(...I.1.PN:P$(|
00002080: 49 29 B2 50 24 28 49 29 AA 22 1D 1D 22 3A 82 00 |I).P$(I)."..":..|
00002090: BC 28 FE 1F 81 49 B2 31 A4 50 4E 3A 50 31 24 28 |.(...I.1.PN:P1$(|
000020A0: 49 29 B2 50 24 28 49 29 AA 22 1D 1D 1D 1D 1D 1D |I).P$(I)."......|
000020B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3A 82 00 DF 28 08 |.........":...(.|
000020C0: 20 42 54 24 B2 22 13 11 11 11 11 11 11 11 11 11 | BT$."..........|
000020D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".|
000020E0: 0F 29 12 20 56 52 24 B2 22 20 56 49 44 45 52 45 |.). VR$." VIDERE|
000020F0: 3D 56 20 2D 20 52 45 54 3D 52 20 2D 20 4E 3D 4E |=V - RET=R - N=N|
00002100: 55 4D 4D 45 52 20 2D 20 53 4C 55 54 3D 53 22 00 |UMMER - SLUT=S".|
00002110: 43 29 1C 20 52 31 24 B2 42 54 24 AA 22 11 20 20 |C). R1$.BT$.". |
00002120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002140: 20 91 22 00 79 29 21 20 52 32 24 B2 22 91 91 20 | .".y)! R2$.".. |
00002150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002170: 20 20 20 20 20 20 20 91 22 00 A7 29 26 20 4E 52 | ."..)& NR|
00002180: 24 B2 22 13 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |$.".............|
00002190: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000021A0: 20 20 20 9D 9D 9D 22 00 E2 29 30 20 46 55 24 B2 | ..."..)0 FU$.|
000021B0: 22 20 46 4F 52 54 53 5B 54 54 45 20 28 4A 2F 4E |" FORTS[TTE (J/N|
000021C0: 29 20 3F 20 20 20 20 20 20 20 20 20 20 20 20 20 |) ? |
000021D0: 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ..............|
000021E0: 9D 22 00 EE 29 6C 20 8B 41 51 B2 31 A7 8E 00 03 |."..)l .AQ.1....|
000021F0: 2A 28 23 8F 2A 4C 49 53 54 20 4B 41 52 54 4F 54 |*(#.*LIST KARTOT|
00002200: 45 4B 2A 00 41 2A 32 23 4F 24 B2 22 93 11 12 20 |EK*.A*2#O$."... |
00002210: 20 20 92 20 05 4C 49 53 54 20 4B 41 52 54 4F 54 | . .LIST KARTOT|
00002220: 45 4B 90 20 12 20 20 20 20 20 20 20 20 20 20 20 |EK. . |
00002230: 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 99 4F | .":.O|
00002240: 24 00 50 2A 34 23 8B 4A B3 B1 30 A7 39 30 32 30 |$.P*4#.J..0.9020|
00002250: 00 80 2A 37 23 99 22 11 9E 44 45 52 20 45 52 20 |..*7#."..DER ER |
00002260: 49 4E 54 45 54 20 4B 41 52 54 4F 54 45 4B 20 21 |INTET KARTOTEK !|
00002270: 90 22 3A 81 49 B2 31 A4 32 35 30 30 3A 82 3A 8E |.":.I.1.2500:.:.|
00002280: 00 8A 2A 3C 23 8D 38 30 30 30 00 9C 2A 41 23 8B |..*<#.8000..*A#.|
00002290: 55 24 B3 B1 22 4A 22 A7 39 31 30 30 00 CC 2A 46 |U$.."J".9100..*F|
000022A0: 23 99 22 30 4E 53 4B 45 53 20 55 44 53 4B 52 49 |#."0NSKES UDSKRI|
000022B0: 46 54 20 41 46 20 48 45 4C 45 20 4B 41 52 54 4F |FT AF HELE KARTO|
000022C0: 54 45 4B 45 54 20 28 4A 2F 4E 29 22 00 EB 2A 50 |TEKET (J/N)"..*P|
000022D0: 23 8D 39 30 30 3A 99 52 32 24 3A 8B 41 24 B2 22 |#.900:.R2$:.A$."|
000022E0: 4A 22 A7 8D 31 32 35 30 30 3A 8E 00 06 2B 8C 23 |J"..12500:...+.#|
000022F0: 81 49 B2 31 A4 50 4E 3A 99 50 24 28 49 29 3B 4B |.I.1.PN:.P$(I);K|
00002300: 24 28 49 29 3A 82 00 20 2B FA 23 81 41 B2 31 A4 |$(I):.. +.#.A.1.|
00002310: 4A 3A 81 42 B2 31 A4 50 4E 3A 99 4E 52 24 3B 41 |J:.B.1.PN:.NR$;A|
00002320: 00 34 2B 18 24 99 50 31 24 28 42 29 3B 54 24 28 |.4+.$.P1$(B);T$(|
00002330: 41 2C 42 29 00 3B 2B 1D 24 82 42 00 5A 2B 22 24 |A,B).;+.$.B.Z+"$|
00002340: 99 42 54 24 3B 22 20 46 4F 52 54 53 5B 54 54 45 |.BT$;" FORTS[TTE|
00002350: 20 28 4A 2F 4E 29 20 3F 20 22 00 80 2B 27 24 8D | (J/N) ? "..+'$.|
00002360: 39 30 30 3A 8B 41 24 B2 22 4E 22 A7 81 49 B2 49 |900:.A$."N"..I.I|
00002370: A4 50 4E 3A 82 3A 81 41 B2 41 A4 4A 3A 82 3A 8E |.PN:.:.A.A.J:.:.|
00002380: 00 A3 2B 2C 24 99 52 24 3B 22 20 20 20 20 20 20 |..+,$.R$;" |
00002390: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 46 | ":F|
000023A0: 55 B2 30 00 D2 2B 36 24 81 49 49 B2 31 A4 50 4E |U.0..+6$.II.1.PN|
000023B0: 3A 99 50 31 24 28 49 49 29 3B 22 20 20 20 20 20 |:.P1$(II);" |
000023C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000023D0: 3A 82 00 D9 2B 54 24 82 41 00 DF 2B AC 26 8E 00 |:...+T$.A..+.&..|
000023E0: 20 2C 10 27 4F 24 B2 22 93 11 12 20 20 20 92 20 | ,.'O$."... . |
000023F0: 05 4B 41 52 54 4F 54 45 4B 90 20 12 20 20 20 20 |.KARTOTEK. . |
00002400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002410: 20 20 20 20 20 20 20 90 92 22 3A 99 4F 24 3A 8E | ..":.O$:.|
00002420: 00 49 2C E0 2E 8F 2A 2A 55 44 53 4B 52 49 46 54 |.I,...**UDSKRIFT|
00002430: 53 52 55 54 49 4E 45 20 46 4F 52 20 54 52 59 4B |SRUTINE FOR TRYK|
00002440: 20 50 41 41 20 46 37 2A 2A 00 5A 2C EA 2E 8B 55 | PAA F7**.Z,...U|
00002450: 24 B3 B1 22 4A 22 A7 39 30 30 00 66 2C F4 2E A0 |$.."J".900.f,...|
00002460: 34 3A 9F 34 2C 34 00 80 2C FE 2E 81 51 B2 31 A4 |4:.4,4..,...Q.1.|
00002470: 50 4E 3A 98 34 2C 54 24 28 41 2C 51 29 3A 82 51 |PN:.4,T$(A,Q):.Q|
00002480: 00 90 2C 08 2F 98 34 2C 3A A0 34 3A 89 39 30 30 |..,./.4,:.4:.900|
00002490: 00 BD 2C D4 30 A0 34 3A 9F 34 2C 34 3A 8F 2A 2A |..,.0.4:.4,4:.**|
000024A0: 55 44 53 4B 52 49 46 54 20 41 46 20 48 45 4C 45 |UDSKRIFT AF HELE|
000024B0: 20 4B 41 52 54 4F 54 45 4B 45 54 2A 2A 00 D0 2C | KARTOTEKET**..,|
000024C0: D9 30 81 41 B2 31 A4 4A 3A 81 42 B2 31 A4 50 4E |.0.A.1.J:.B.1.PN|
000024D0: 00 DF 2C DE 30 98 34 2C 54 24 28 41 2C 42 29 00 |..,.0.4,T$(A,B).|
000024E0: E8 2C E8 30 82 42 2C 41 00 EE 2C 06 31 3A 00 F9 |.,.0.B,A..,.1:..|
000024F0: 2C 10 31 98 34 2C 3A A0 34 00 FF 2C 1A 31 8E 00 |,.1.4,:.4..,.1..|
00002500: 00 08 |.. |
..#....***COPYRIGHT JUST R.-DATA***.,...
AQ.1.B.P..T$(200,8),A$(25).R.Z..53280,5:
.53281,5:.G(144):.G(8):.O$: 9:.9,0...D.O
$."... . .KARTOTEK. .
.":.O$: 9:.9,0.P.N..".........
......UI...X.."JR COPYRIGHT 1983......
" JUST R.-DATA APS":." DK 8700 HORS
ENS.,...TI$."000000".L....A$:.A$."".TI$.
"000006".140.}...R$.".
."... ..1000......A$.
.....A$."".900......F(A$).133..10000:.10
00.O....F(A$).136.12000......F(A$).137..
788,49.......*...O$."... . .KARTOTEK.
. .":.O$.L....
U$."J"..". 0 . .MULIGHED FOR UDSKRIFT PA
.... PRINTER.":.1010......". 0 . MULIGHE
D FOR UDSKRIFT PA.... PRINTER......".. 1
. OPRET KARTOTEK......".. 2 . HENT
KARTOTEK FRA DISKETTE......".. 3 . IN
DL[S I KARTOTEK.*....".. 4 . OPDATE..,.R
KARTOTEK.I....".. 5 . S0G I KARTOTE
K.X....".. 6 . GEM KARTOTEK PA....
DISKETTE...$..".. 7 . LIST KARTOTEK.
..)..".. 8 . AFSLUT PROGRAM.M....".. .
SVAR MED TAL...8..".TILBAGE HERTIL VED
TRYK PA.... F1...B..900:PK.E(A$).AQ:.PK.
0.PK.8.1090.+.E..PK..0.1105.N.F.O$."...
. .PRINTERRUTINE ..
.":.O$:.1096.X.G..1000...H.."..T[ND FO
R PRINTER !.-":."..TRYK <RETURN>":U$."J"
.D.I..A$:.A$."".1097...J..".MAN KAN NU F
A.... UDSKRIFT AF KORTENE ".!.K..".PA...
. SK[RMEN VED AT TRYKKE PA.... F7.5.L..A
$:.A$."".1100.;.P...K.Q..PK..8.1200...V.
.J..0.."...ER DET NYE KARTOTEK GEMT PA..
.. BA....ND ? .":.900...`..A$."J".....J.
.J.0.....T..1000......PK.2000,7000,3000,
4000,5000,6000,9000...O..1000...P..**OPR
ET.1.Z.O$."... . .OPRET KARTOTEK. .
..":.O$.[....J..0..".D
ER ER DEFINERET ET KARTOTEK......J..0.."
.0NSKES ET NYT (J/N) ":.900:.A$.."J"....
....I.1.PN:K$(I)."":.:J.0......".HVOR MA
NGE POSTER SKAL KARTOTEKET .INDEHO
LDE? (MAX. 8)......900:PN.E(A$)......PN.
1.PN.8.2060.8.4..8000:.**UDTEGNING AF KA
RTOTEK**.D....I.1.PN.P....2500:..K....*K
ONTROL AF KARTOTEK*......"..............
..........KORREKT (J/N) ":.900:.A$."J".2
800...$..R$.P...."RETTE TEKST NUMMER : "
...8..900:I.E(A$):.I.1.I.PN.2360...=..R$
...B..P$(I);" : "...L..P$(I
);:.2500:.2330.8....2900.U.D.K$(I)."":Z.
0:.P$(I);">";.`.I.Z.Z.AQ.Z.N..A$(Z):.A$(
Z)."".2510...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.&....IT.17..".";P$(I)"
":.P$(I):.2500.`....IT.20.IT.157
.IT.145..P$(I)" ":.P$(I):.2500
.J....2505......F(K$(I)).13.AQ.K$(I).":"
......AQ.1.....(... ..........*INDS[T...
B.O$."... . .INDL[S I KARTOTEK. .
.":.O$...D..PN.0.3020.4.G..
"..DER ER IKKE DEFINERET ET KARTOTEK.":.
I.1.2500:.:..I.L..".. 1 . INDL[S".E.V.."
.. 2 . TIL HOVEDMENU"......".. . SVAR
MED TAL"......900:S.E(A$):.S.1.S.2.3050.
.....S.2........O$:.8000.....:.....J.J.A
Q:.***GHGFKGHGDJKDJKGJKDJKJGKLKDKJGJK:KD
KKFK***...!..NR$;" ...";J.&.&..I.1.PN:
.P$(I);K$(I):..2....I.1.PN.R...Z.0:T$(J,
I)."":.P1$(I);">";.\...Z.Z.1.V....A$(Z):
.A$(Z)."".3216.....IT.F(A$(Z)).C....A$(Z
);:.Z.21.Z.0:.P1$(I);"
":.3212......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.J..
..IT.20.IT.157.IT.145.Z.0:.P1$(I)"
":.3212.T....3215......F(T$(J
,I)).13.T$(J,I).":"...F...F....I.1.PN:.P
1$(I);" ":..P....3000
.V.<..... ..*OPDATER.&...O$."... . .OP
DATE..,.R KARTOTEK. .
.":.O$._....".MED DENNE RUTINE KAN MAN R
ETTE I SIT KARTOTEK..N....J..0.4100..
.H.."..MEN DER ER INTET KARTOTEK TIL STE
DE."...R..I.1.2500:.:.......".F0RSTE KAR
TOTEKSKORT KOMMER FREM, HVOR- EFTER BUND
LINJEN VISER:.".$...." VIDERE=V - RET=R
- N=NUMMER - SLUT=S".Q....".HVIS DER TRY
KKES V KOMMER N[STE KORT.......".TRYKKES
N SP0RGES OM 0NSKET KORTNUMMER..B.".."
.EFTER AT HAVE INDL[ST NUMMERET KOMMER
DET 0NSKEDE KORT....'..".TRYK PA.... <R
ETURN>...(..A$:.A$."".AQ.0.4136.>.,..O$:
.".NA....R DET RIGTIGE KORT ER FREMME TR
YKKES ..R FOR .R.ET.....@..".DER SP0RGE
S NU OM NUMMERET PA.... LINJEN, DER SK
AL RETTES....E..".EFTER AT HAVE INDL[ST
DETTE, KAN LINJEN RETTES..U.J..".TRYK PA
.... <RETURN>...T..A$:.A$."".4180...H..O
$:.8000...R..I.1.PN:.P$(I);K$(I):..).X.N
.1:.B.1.PN:.NR$;N.=.Y..P1$(B);T$(N,B).D.
Z..B.N.|..4800......BT$;" RETTE LINJE NU
MMER : ................
..";......900:I.E(A$):.I.1.I.PN.4251....
.T$(N,I)."":.P1$(I);"
....................":Z.0... .T$(N,I)
."":Z.0:.P1$(I);">";.&...Z.Z.1.@....A$(Z
):.A$(Z)."".4270.P...IT.F(A$(Z))......A$
(Z);:.Z.21.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.
5.L..IT.20.IT.157.IT.145.Z.0:.P1$(I)"
":.4256.?.V..4260.E...:.K.
0...D....**FORTS[T S0GNING**.}...N.N.1:.
B.1.PN:.NR$;N......N.J.N.0:.4520......P1
$(B);T$(N,B)......B...F..4800.O....**TIL
KORT # I******......BT$;"0NSKET KORTNUM
MER : ................"
;.3....9,A$:.:N.E(A$):.N.1.N.J.4610.F...
.B.1.PN:.NR$;N.Z....P1$(B);T$(N,B).A....
B.K....4800......**SP0RGETEKST**...J..BT
$;VR$...T..900:.A$."V".A$."R".A$."N".A$.
"S".4840.B....4820.K....R1$......A$.."R"
..II.1.PN:.P1$(II);"
":.......A$."V".4500.%....A$."R".4250.6.
...A$."N".4600.D....A$."S"...S....II.1.P
N:.P1$(II);" ":..Y.$.
.......*S0G.A...O$."... . .S0G I KARTO
TEK. . .":.O$.P....J
..0.5018......"..DER ER INTET KARTOTEK I
COMPUTEREN !.":.I.1.2500:.:..-....".. 1
. ALMINDELIG S0GNING.U....".. 2 . LOGIS
K S0GNING (= < >).R....".. 3 . BA...
.DE 1 OG 2... ..".. . SVAR MED TAL....
..900:S0.E(A$)......S0.1.S0.3.AQ.0.5025.
K....8000:FG.0:AG.0......I.1.PN:.P$(I);K
$(I):..'....BT$;:.S0..2.." S0GETEKST I F
ELT NUMMER : .....";:.5060.^....BT$
;:.S0.1.." LOGISK S0GETEKST I FELT NUMME
R : ";.D...:...D..900:I.E(A$):.I.1.I.PN.
5060...I..BT$;R$;" "..
.N..P1$(I);">";:Z.0.E.S.Z.Z.1...X..A$(Z)
:.A$(Z)."".5080...Y.IT.F(A$(Z)).!.Z..S0.
2.AG.1.MT.F(A$(1)):.MT.60.MT.62.Z.0:.507
5.X....A$(Z);:.Z.20..P1$(I);"
":.5070......IT.13..X.1.Z:S1$(I
).S1$(I).A$(X):.X:Z.0:.5200.E....IT.20.I
T.157.Z.0:.P1$(I);" ":
.5070.O....5075...P.S1$(I).H(S1$(I),C(S1
$(I)).1).. R.S2$(I).S1$(I).5 U..S0.1.AG.
1.S2$(I).S1$(I):AG.0:S1$(JU).S$:.5210.N
W.S$.S1$(I):JU.I:AG.AQ.B Y..S0.3.AG.1.50
40.T Z..A.1.J:.NR$;A.. ^.B.I:.S0.3.B.JU.
. _..II.1.PN:.P1$(II);"
":..L A..S0.2..5500:.5230..!D..J(T$(A
,B),1,C(S1$(B))).S1$(B).FU.1:.S0.3.B.I:.
5500..!N..FU..1.5300.3!X..Q.1.PN:.P1$(Q)
;T$(A,Q):.Q.@!...BT$;FU$.F!...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)."":...!....."|..**T
EST FOR FLERE S0GEKRITERIER**.-"...*****
****IFS0<>2THENRETURN.T"..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:...".....".....#P..*GEM KARTOTEK.A#Z.
O$."... . .GEM KARTOTEK. .
.":.O$.P#...J..0.6120..#T..".
DER FINDES INTET KARTOTEK I COMPUTEREN!"
..#...I.1.2500:.:...#...".NU SKAL KARTOT
EKET GEMMES !.E#...9,HELTEX:...$...".L[G
BA....NDET I BA....NDOPTAGEREN ":.".OG
SPOL DET HELT TILBAGE..+$...".TRYK PA...
. <RETURN>".?$...A$:.A$."".6158.G$...O$.
{$..."..FORTRYD VED AT TRYKKE "G(34)" NE
J "G(34)"."..$$..".ELLER SKRIV"G(34)" GE
M "G(34)" ";:.9,A$:...$)..A$."NEJ"...U$.
..A$.."GEM"..R$:.2890..$8.."..":.1,8,1,"
@0:HELTEX"..%B..1,PN:.1,J:.I.1.PN:.1,K$(
I):..=%L..A.1.J.AQ:.B.1.PN.AQ:.1,T$(A,B)
:.B,A.D%.. 1.J%....A%X..**HENT KARTOTEK*
*..%].O$."... . .HENT FRA DISKETTE .
.":.O$..%B..O$:.".."
..%G..J.0.7030..&L.."..DER ER ET KARTOTE
K I COMPUTEREN":.".MA.... DETTE SLETTES
? ."..&N..900:.A$.."J"...,&V..A$:.A$."".
7035.6&{..7040.J&...1,8,0,"HELTEX".Y&...
1,PN:.1,J.P&...I.1.PN:.1,K$(I):..V&F.:..
&P..A.1.J:.B.1.PN:.1,T$(A,B):.B,A:.AQ.0.
8000..& . 1..&?...N&@..**OPRETTELSE AF S
KEMA**..'..S1$." U......................
..............I".2'..S2$." .............
.........................".D'..S3$." J..
..................................K"..'B
.S4$." :
".E'G.S5$." . :
.".Z'L..O$;".";S1$:.S5$..'V..
"....FAST TEKST....INDHOLD". (...I.1.PN:
.S2$:."."I".";S4$:.:.S3$.A(...I.1.PN:P$(
I)."":P1$(I)."":..P(..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$." VIDERE=V - RET
=R - N=NUMMER - SLUT=S".C). R1$.BT$.".
.".Y)!
R2$."..
."..)& NR$.".....................
........ ..."..)0 FU$." FORTS[TTE (J/N
) ? ..............."..)L .
AQ.1....*(#.*LIST KARTOTEK*.A*2#O$."...
. .LIST KARTOTEK. .
.":.O$.P*4#.J..0.9020..*7#."..DER ER
INTET KARTOTEK !.":.I.1.2500:.:...*<#.80
00..*A#.U$.."J".9100.L*F#."0NSKES UDSKRI
FT AF HELE KARTOTEKET (J/N)"..*P#.900:.R
2$:.A$."J"..12500:...+.#.I.1.PN:.P$(I);K
$(I):.. +.#.A.1.J:.B.1.PN:.NR$;A.4+.$.P1
$(B);T$(A,B).;+.$.B.Z+"$.BT$;" FORTS[TTE
(J/N) ? "..+'$.900:.A$."N"..I.I.PN:.:.A
.A.J:.:...+,$.R$;" ":F
U.0.R+6$.II.1.PN:.P1$(II);"
":..Y+T$.A..+.&.. ,.'O$."... .
.KARTOTEK. . .
.":.O$:..I,...**UDSKRIFTSRUTINE FOR TRYK
PAA F7**.Z,...U$.."J".900.F,.. 4:.4,4..
,...Q.1.PN:.4,T$(A,Q):.Q..,./.4,: 4:.900
..,T0 4:.4,4:.**UDSKRIFT AF HELE KARTOTE
KET**.P,Y0.A.1.J:.B.1.PN..,.0.4,T$(A,B).
.,.0.B,A..,.1:..,.1.4,: 4..,.1....
> CLICK IMAGE PREVIEW FOR FULL MODAL