R0DE KORS DATA
FILE INFORMATION
FILENAME(S): R0DE KORS DATA
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-11-30 19:47:10
APPEARS ON: 1 disk(s)
FILE HASH
213344a00361fb6d75d8985d631c39f59ad2cd471230c46488bec70998820940
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A2 2 | R0DE KORS DATA | PRG | Curtcool, Frank | 8 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 01 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..)....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 51 08 02 00 8F 2A |*********.Q....*|
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 2A 00 79 08 03 00 8F 2A 20 20 44 41 54 41 42 41 |*.y....* DATABA|
00000060: 53 45 20 46 4F 52 20 44 41 4E 53 4B 20 52 5C 44 |SE FOR DANSK R\D|
00000070: 45 20 4B 4F 52 53 20 20 2A 00 A1 08 04 00 8F 2A |E KORS *......*|
00000080: 20 20 4C 41 4E 47 45 53 4B 4F 56 20 41 46 44 45 | LANGESKOV AFDE|
00000090: 4C 49 4E 47 2E 20 28 43 29 20 31 39 38 34 20 20 |LING. (C) 1984 |
000000A0: 2A 00 C9 08 05 00 8F 2A 20 20 53 2E 4C 55 4E 44 |*......* S.LUND|
000000B0: 2D 48 41 4E 53 45 4E 2E 20 28 30 39 29 20 39 35 |-HANSEN. (09) 95|
000000C0: 20 31 34 20 30 39 20 20 2A 00 F1 08 06 00 8F 2A | 14 09 *......*|
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 2A 00 19 09 07 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*......*********|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 38 09 08 00 8F 20 |*********.8.... |
00000120: 20 20 20 20 20 20 2A 2A 20 54 45 4B 53 54 20 4C | ** TEKST L|
00000130: 49 4E 49 45 52 20 2A 2A 00 60 09 09 00 8F 2D 2D |INIER **.`....--|
00000140: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000150: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000160: 00 72 09 0A 00 44 4C B2 31 3A 97 36 35 30 2C 31 |.r...DL.1:.650,1|
00000170: 32 38 00 A6 09 5A 00 86 4E 24 28 33 30 30 29 2C |28...Z..N$(300),|
00000180: 41 24 28 33 30 30 29 2C 50 24 28 33 30 30 29 2C |A$(300),P$(300),|
00000190: 54 24 28 33 30 30 29 2C 44 24 28 33 30 30 29 2C |T$(300),D$(300),|
000001A0: 5A 24 28 31 36 29 00 D1 09 5B 00 99 22 93 1D 1D |Z$(16)...[.."...|
000001B0: 1D 1D 1D 1D 1D 1D 1D 11 11 11 4C 4F 41 44 45 52 |..........LOADER|
000001C0: 20 4D 45 44 4C 45 4D 53 52 45 47 49 53 54 45 52 | MEDLEMSREGISTER|
000001D0: 22 00 F8 09 5C 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D |"...\.."........|
000001E0: 1D 1D 11 46 4F 52 20 20 44 41 4E 53 4B 20 52 5C |...FOR DANSK R\|
000001F0: 44 45 20 4B 4F 52 53 22 00 1E 0A 5D 00 99 22 1D |DE KORS"...]..".|
00000200: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 4C 41 4E 47 45 |...........LANGE|
00000210: 53 4B 4F 56 20 41 46 44 45 4C 49 4E 47 22 00 44 |SKOV AFDELING".D|
00000220: 0A 5E 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.^.."...........|
00000230: 11 4D 45 44 4C 45 4D 53 2D 52 45 47 49 53 54 45 |.MEDLEMS-REGISTE|
00000240: 52 45 54 22 00 6B 0A 5F 00 99 22 1D 1D 1D 1D 1D |RET".k._..".....|
00000250: 1D 1D 1D 1D 1D 1D 11 4B 41 4E 20 49 4E 44 45 48 |.......KAN INDEH|
00000260: 4F 4C 44 45 20 32 30 30 30 20 22 00 93 0A 60 00 |OLDE 2000 "...`.|
00000270: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 4D 45 44 4C |."..........MEDL|
00000280: 45 4D 4D 45 52 20 41 46 20 52 5C 44 45 20 4B 4F |EMMER AF R\DE KO|
00000290: 52 53 22 00 BC 0A 61 00 99 22 1D 1D 1D 1D 1D 1D |RS"...a.."......|
000002A0: 1D 1D 1D 11 12 28 43 29 20 31 39 38 34 20 53 2E |.....(C) 1984 S.|
000002B0: 4C 55 4E 44 2D 48 41 4E 53 45 4E 22 00 E3 0A 62 |LUND-HANSEN"...b|
000002C0: 00 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..--------------|
000002D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002E0: 2D 2D 2D 00 ED 0A 63 00 89 33 30 30 30 00 11 0B |---...c..3000...|
000002F0: 64 00 97 36 34 36 2C 31 3A 97 35 33 32 38 30 2C |d..646,1:.53280,|
00000300: 31 34 3A 97 35 33 32 38 31 2C 31 34 3A 99 22 93 |14:.53281,14:.".|
00000310: 22 00 42 0B 6E 00 99 22 D5 C3 C3 C3 C3 C3 C3 C3 |".B.n.."........|
00000320: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000330: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 |................|
00000340: 22 3B 00 73 0B 78 00 99 22 C2 20 52 5C 44 45 20 |";.s.x..". R\DE |
00000350: 4B 4F 52 53 20 4B 41 52 54 4F 54 45 4B 20 28 43 |KORS KARTOTEK (C|
00000360: 29 20 53 2E 4C 55 4E 44 2D 48 41 4E 53 45 4E 20 |) S.LUND-HANSEN |
00000370: DD 22 3B 00 A3 0B 82 00 99 22 CA C3 C3 C3 C3 C3 |.";......"......|
00000380: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000390: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
000003A0: C3 CB 22 00 C7 0B 96 00 99 22 1D 1D 1D 1D 1D 1D |.."......"......|
000003B0: 1D 1D 11 11 12 46 31 92 20 4E 59 45 20 4D 45 44 |.....F1. NYE MED|
000003C0: 4C 45 4D 4D 45 52 22 00 EB 0B A0 00 99 22 1D 1D |LEMMER"......"..|
000003D0: 1D 1D 1D 1D 1D 1D 11 12 46 32 92 20 53 41 56 45 |........F2. SAVE|
000003E0: 20 4D 45 44 4C 45 4D 4D 45 52 22 00 0E 0C AA 00 | MEDLEMMER".....|
000003F0: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 11 12 46 33 92 20 |."..........F3. |
00000400: 53 49 44 53 54 45 20 4B 5C 52 53 45 4C 22 00 2F |SIDSTE K\RSEL"./|
00000410: 0C B4 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 11 12 46 |...."..........F|
00000420: 34 92 20 42 52 45 56 20 4C 41 42 45 4C 53 22 00 |4. BREV LABELS".|
00000430: 4C 0C BE 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 11 12 |L...."..........|
00000440: 46 35 92 20 53 5C 47 4E 49 4E 47 22 00 6C 0C C8 |F5. S\GNING".l..|
00000450: 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 11 12 46 36 92 |.."..........F6.|
00000460: 20 41 46 53 4C 55 54 4E 49 4E 47 22 00 90 0C D2 | AFSLUTNING"....|
00000470: 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 11 12 46 37 92 |.."..........F7.|
00000480: 20 49 4B 4B 45 20 42 45 54 41 4C 54 20 38 34 22 | IKKE BETALT 84"|
00000490: 00 B2 0C DC 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 11 |......".........|
000004A0: 12 46 38 92 20 4D 45 44 4C 45 4D 53 4C 49 53 54 |.F8. MEDLEMSLIST|
000004B0: 45 22 00 D8 0C E1 00 8F 2D 2D 2D 2D 2D 2D 2D 2D |E"......--------|
000004C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000004D0: 2D 2D 2D 2D 2D 2D 2D 2D 00 E0 0C E6 00 A1 58 24 |--------......X$|
000004E0: 00 F3 0C F0 00 8B 58 24 B2 22 85 22 20 A7 20 31 |......X$."." . 1|
000004F0: 30 30 30 00 06 0D FA 00 8B 58 24 B2 22 89 22 20 |000......X$."." |
00000500: A7 20 32 30 30 30 00 19 0D 04 01 8B 58 24 B2 22 |. 2000......X$."|
00000510: 86 22 20 A7 20 36 30 30 30 00 2C 0D 0E 01 8B 58 |." . 6000.,....X|
00000520: 24 B2 22 8A 22 20 A7 20 33 32 30 30 00 3F 0D 18 |$."." . 3200.?..|
00000530: 01 8B 58 24 B2 22 87 22 20 A7 20 35 30 30 30 00 |..X$."." . 5000.|
00000540: 52 0D 22 01 8B 58 24 B2 22 8B 22 20 A7 20 36 30 |R."..X$."." . 60|
00000550: 35 30 00 66 0D 2C 01 8B 58 24 B2 22 88 22 20 A7 |50.f.,..X$."." .|
00000560: 20 35 30 37 30 30 00 7A 0D 36 01 8B 58 24 B2 22 | 50700.z.6..X$."|
00000570: 8C 22 20 A7 20 34 39 30 30 30 00 83 0D 40 01 89 |." . 49000...@..|
00000580: 32 33 30 00 9E 0D E8 03 8F 20 20 20 20 20 20 20 |230...... |
00000590: 2A 2A 20 4E 59 45 20 44 41 54 41 20 2A 2A 00 C3 |** NYE DATA **..|
000005A0: 0D E9 03 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |....------------|
000005B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000005C0: 2D 2D 2D 00 CD 0D EC 03 8D 36 37 30 30 00 FF 0D |---......6700...|
000005D0: ED 03 99 22 93 1D 1D 1D 1D 11 12 1C 20 27 49 27 |..."........ 'I'|
000005E0: 20 3D 20 49 4B 4B 45 20 42 45 54 41 4C 54 20 3A | = IKKE BETALT :|
000005F0: 20 27 27 20 3D 20 42 45 54 41 4C 54 20 05 22 00 | '' = BETALT .".|
00000600: 33 0E F2 03 4E 24 28 44 4C 29 B2 22 22 3A 85 22 |3...N$(DL)."":."|
00000610: 4E 41 56 4E 20 22 3B 4E 24 28 44 4C 29 3A 8B 4E |NAVN ";N$(DL):.N|
00000620: 24 28 44 4C 29 B2 22 22 A7 4E 24 28 44 4C 29 B2 |$(DL)."".N$(DL).|
00000630: 22 2D 22 00 6A 0E FC 03 41 24 28 44 4C 29 B2 22 |"-".j...A$(DL)."|
00000640: 22 3A 85 22 41 44 52 45 53 53 45 20 22 3B 41 24 |":."ADRESSE ";A$|
00000650: 28 44 4C 29 3A 8B 41 24 28 44 4C 29 B2 22 22 A7 |(DL):.A$(DL)."".|
00000660: 41 24 28 44 4C 29 B2 22 2D 22 00 A1 0E 06 04 50 |A$(DL)."-".....P|
00000670: 24 28 44 4C 29 B2 22 22 3A 85 22 50 4F 53 54 4E |$(DL)."":."POSTN|
00000680: 52 2E 20 22 3B 50 24 28 44 4C 29 3A 8B 50 24 28 |R. ";P$(DL):.P$(|
00000690: 44 4C 29 B2 22 22 A7 50 24 28 44 4C 29 B2 22 2D |DL)."".P$(DL)."-|
000006A0: 22 00 DB 0E 10 04 54 24 28 44 4C 29 B2 22 22 3A |".....T$(DL)."":|
000006B0: 85 22 54 45 4C 45 46 4F 4E 4E 52 2E 20 22 3B 54 |."TELEFONNR. ";T|
000006C0: 24 28 44 4C 29 3A 8B 54 24 28 44 4C 29 B2 22 22 |$(DL):.T$(DL).""|
000006D0: A7 54 24 28 44 4C 29 B2 22 2D 22 00 14 0F 1A 04 |.T$(DL)."-".....|
000006E0: 44 24 28 44 4C 29 B2 22 22 3A 85 22 44 41 54 41 |D$(DL)."":."DATA|
000006F0: 20 22 3B 44 24 28 44 4C 29 3A 8B 44 24 28 44 4C | ";D$(DL):.D$(DL|
00000700: 29 B2 22 22 A7 44 24 28 44 4C 29 B2 22 42 45 54 |)."".D$(DL)."BET|
00000710: 41 4C 54 22 00 39 0F 1F 04 8B 44 24 28 44 4C 29 |ALT".9....D$(DL)|
00000720: B2 22 49 22 A7 44 24 28 44 4C 29 B2 22 49 4B 4B |."I".D$(DL)."IKK|
00000730: 45 20 42 45 54 41 4C 54 22 00 51 0F 24 04 99 22 |E BETALT".Q.$.."|
00000740: 11 44 41 54 41 20 4F 4B 20 3F 20 28 4A 2F 4E 29 |.DATA OK ? (J/N)|
00000750: 22 00 65 0F 2E 04 A1 58 24 3A 8B 58 24 B2 22 4E |".e....X$:.X$."N|
00000760: 22 A7 31 30 30 00 7B 0F 38 04 A1 58 24 3A 8B 58 |".100.{.8..X$:.X|
00000770: 24 B3 B1 22 4A 22 A7 31 30 37 30 00 C0 0F 3D 04 |$.."J".1070...=.|
00000780: 44 4C B2 44 4C AA 31 3A 8F 20 4C 24 3D 22 2A 2A |DL.DL.1:. L$="**|
00000790: 2A 2A 22 3A 4E 24 28 44 29 3D 4C 24 3A 41 24 28 |**":N$(D)=L$:A$(|
000007A0: 44 29 3D 4C 24 3A 50 24 28 44 29 3D 4C 24 3A 54 |D)=L$:P$(D)=L$:T|
000007B0: 24 28 44 29 3D 4C 24 3A 44 24 28 44 29 3D 4C 24 |$(D)=L$:D$(D)=L$|
000007C0: 00 C9 0F 42 04 89 31 30 30 00 EE 0F CB 07 8F 2A |...B..100......*|
000007D0: 2A 20 53 41 56 45 20 4E 59 45 20 44 41 54 41 2C |* SAVE NYE DATA,|
000007E0: 20 53 4C 45 54 20 47 41 4D 4C 45 20 2A 2A 00 13 | SLET GAMLE **..|
000007F0: 10 CC 07 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |....------------|
00000800: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000810: 2D 2D 2D 00 2E 10 D0 07 9F 31 35 2C 38 2C 31 35 |---......15,8,15|
00000820: 2C 22 53 30 3A 44 41 54 41 22 3A A0 31 35 00 44 |,"S0:DATA":.15.D|
00000830: 10 D1 07 9F 32 2C 38 2C 32 2C 22 44 41 54 41 2C |....2,8,2,"DATA,|
00000840: 53 2C 57 22 00 8C 10 D2 07 44 58 B2 44 4C AA 31 |S,W".....DX.DL.1|
00000850: 3A 4C 24 B2 22 2A 2A 2A 2A 22 3A 4E 24 28 44 58 |:L$."****":N$(DX|
00000860: 29 B2 4C 24 3A 41 24 28 44 58 29 B2 4C 24 3A 50 |).L$:A$(DX).L$:P|
00000870: 24 28 44 58 29 B2 4C 24 3A 54 24 28 44 58 29 B2 |$(DX).L$:T$(DX).|
00000880: 4C 24 3A 44 24 28 44 58 29 B2 4C 24 00 98 10 D5 |L$:D$(DX).L$....|
00000890: 07 81 58 B2 31 A4 44 58 00 C9 10 DA 07 98 32 2C |..X.1.DX......2,|
000008A0: 4E 24 28 58 29 3A 98 32 2C 41 24 28 58 29 3A 98 |N$(X):.2,A$(X):.|
000008B0: 32 2C 50 24 28 58 29 3A 98 32 2C 54 24 28 58 29 |2,P$(X):.2,T$(X)|
000008C0: 3A 98 32 2C 44 24 28 58 29 00 D1 10 E4 07 82 20 |:.2,D$(X)...... |
000008D0: 58 00 E1 10 EE 07 A0 32 3A 53 41 24 B2 22 4F 4B |X......2:SA$."OK|
000008E0: 22 00 EA 10 F8 07 89 31 30 30 00 0D 11 86 0B 8F |"......100......|
000008F0: 20 20 2A 2A 20 4C 5B 53 20 44 41 54 41 20 49 4E | ** L[S DATA IN|
00000900: 44 20 49 20 54 41 42 45 4C 20 20 2A 2A 00 32 11 |D I TABEL **.2.|
00000910: 90 0B 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...-------------|
00000920: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000930: 2D 2D 00 48 11 B8 0B 9F 32 2C 38 2C 32 2C 22 44 |--.H....2,8,2,"D|
00000940: 41 54 41 2C 53 2C 52 22 00 7E 11 C3 0B 84 32 2C |ATA,S,R".~....2,|
00000950: 4E 24 28 44 4C 29 3A 84 32 2C 41 24 28 44 4C 29 |N$(DL):.2,A$(DL)|
00000960: 3A 84 32 2C 50 24 28 44 4C 29 3A 84 32 2C 54 24 |:.2,P$(DL):.2,T$|
00000970: 28 44 4C 29 3A 84 32 2C 44 24 28 44 4C 29 00 99 |(DL):.2,D$(DL)..|
00000980: 11 CC 0B 8B 4E 24 28 44 4C 29 B2 22 2A 2A 2A 2A |....N$(DL)."****|
00000990: 22 A7 A0 32 3A 89 31 30 30 00 A5 11 D1 0B 44 4C |"..2:.100.....DL|
000009A0: B2 44 4C AA 31 00 AF 11 D6 0B 89 33 30 31 31 00 |.DL.1......3011.|
000009B0: D0 11 80 0C 8F 20 20 20 20 2A 2A 20 50 52 49 4E |..... ** PRIN|
000009C0: 54 20 42 52 45 56 20 4C 41 42 45 4C 53 20 2A 2A |T BREV LABELS **|
000009D0: 00 F5 11 85 0C 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |......----------|
000009E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000009F0: 2D 2D 2D 2D 2D 00 01 12 8A 0C 9F 34 2C 34 3A 9D |-----......4,4:.|
00000A00: 34 00 0B 12 8F 0C 5A 59 B2 33 33 00 16 12 94 0C |4.....ZY.33.....|
00000A10: 8D 35 30 35 30 30 00 20 12 9E 0C 98 34 3A A0 34 |.50500. ....4:.4|
00000A20: 00 29 12 A2 0D 89 31 30 30 00 2F 12 AC 0D 8F 00 |.)....100./.....|
00000A30: 35 12 B6 0D 8F 00 3B 12 C0 0D 8F 00 41 12 CA 0D |5.....;.....A...|
00000A40: 8F 00 47 12 D4 0D 8F 00 4D 12 DE 0D 8F 00 53 12 |..G.....M.....S.|
00000A50: 10 0E 8F 00 59 12 42 0E 8F 00 5F 12 74 0E 8F 00 |....Y.B..._.t...|
00000A60: 65 12 3C 0F 8F 00 84 12 96 0F 8F 20 20 20 20 20 |e.<........ |
00000A70: 2A 2A 20 52 45 54 2F 53 4C 45 54 20 44 41 54 41 |** RET/SLET DATA|
00000A80: 20 20 2A 2A 00 A9 12 9B 0F 8F 2D 2D 2D 2D 2D 2D | **......------|
00000A90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000AA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 B2 12 A0 0F 99 22 |---------......"|
00000AB0: 93 22 00 C7 12 AA 0F 99 22 4E 41 56 4E 20 3F 20 |."......"NAVN ? |
00000AC0: 22 3B 4E 24 28 47 29 00 DF 12 B4 0F 99 22 41 44 |";N$(G)......"AD|
00000AD0: 52 45 53 53 45 20 3F 20 22 3B 41 24 28 47 29 00 |RESSE ? ";A$(G).|
00000AE0: F7 12 BE 0F 99 22 50 4F 53 54 4E 52 2E 20 3F 20 |....."POSTNR. ? |
00000AF0: 22 3B 50 24 28 47 29 00 12 13 C8 0F 99 22 54 45 |";P$(G)......"TE|
00000B00: 4C 45 46 4F 4E 4E 52 2E 20 3F 20 22 3B 54 24 28 |LEFONNR. ? ";T$(|
00000B10: 47 29 00 27 13 D2 0F 99 22 44 41 54 41 20 3F 20 |G).'...."DATA ? |
00000B20: 22 3B 44 24 28 47 29 00 30 13 DC 0F 99 22 13 22 |";D$(G).0...."."|
00000B30: 00 43 13 E6 0F 85 22 4E 41 56 4E 20 22 3B 4E 24 |.C...."NAVN ";N$|
00000B40: 28 47 29 00 59 13 F0 0F 85 22 41 44 52 45 53 53 |(G).Y...."ADRESS|
00000B50: 45 20 22 3B 41 24 28 47 29 00 6F 13 FA 0F 85 22 |E ";A$(G).o...."|
00000B60: 50 4F 53 54 4E 52 2E 20 22 3B 50 24 28 47 29 00 |POSTNR. ";P$(G).|
00000B70: 88 13 04 10 85 22 54 45 4C 45 46 4F 4E 4E 52 2E |....."TELEFONNR.|
00000B80: 20 22 3B 54 24 28 47 29 00 9B 13 0E 10 85 22 44 | ";T$(G)......"D|
00000B90: 41 54 41 20 22 3B 44 24 28 47 29 00 A1 13 18 10 |ATA ";D$(G).....|
00000BA0: 8E 00 BB 13 7E 13 8F 20 20 20 20 20 20 20 2A 2A |....~.. **|
00000BB0: 20 53 5C 47 4E 49 4E 47 20 2A 2A 00 E0 13 83 13 | S\GNING **.....|
00000BC0: 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.---------------|
00000BD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000BE0: 00 12 14 88 13 99 22 93 D5 C3 C3 C3 C3 C3 C3 C3 |......".........|
00000BF0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000C00: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 |................|
00000C10: 22 3B 00 43 14 92 13 99 22 C2 20 20 20 20 20 20 |";.C....". |
00000C20: 20 20 20 20 20 20 20 20 53 20 5C 20 47 20 4E 20 | S \ G N |
00000C30: 49 20 4E 20 47 20 20 20 20 20 20 20 20 20 20 20 |I N G |
00000C40: DD 22 3B 00 73 14 9C 13 99 22 CA C3 C3 C3 C3 C3 |.";.s...."......|
00000C50: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000C60: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000C70: C3 CB 22 00 95 14 A6 13 99 22 1D 1D 1D 1D 1D 1D |.."......"......|
00000C80: 1D 1D 11 11 12 46 31 92 20 53 5C 47 20 50 5D 20 |.....F1. S\G P] |
00000C90: 4E 41 56 4E 22 00 B9 14 B0 13 99 22 1D 1D 1D 1D |NAVN"......"....|
00000CA0: 1D 1D 1D 1D 11 12 46 33 92 20 53 5C 47 20 50 5D |......F3. S\G P]|
00000CB0: 20 41 44 52 45 53 53 45 22 00 DD 14 BA 13 99 22 | ADRESSE"......"|
00000CC0: 1D 1D 1D 1D 1D 1D 1D 1D 11 12 46 35 92 20 53 5C |..........F5. S\|
00000CD0: 47 20 50 5D 20 50 4F 53 54 4E 52 2E 22 00 04 15 |G P] POSTNR."...|
00000CE0: C4 13 99 22 1D 1D 1D 1D 1D 1D 1D 1D 11 12 46 37 |..."..........F7|
00000CF0: 92 20 53 5C 47 20 50 5D 20 54 45 4C 45 46 4F 4E |. S\G P] TELEFON|
00000D00: 4E 52 2E 22 00 2A 15 C9 13 99 22 1D 1D 1D 1D 1D |NR.".*....".....|
00000D10: 1D 1D 1D 11 12 46 38 92 20 53 5C 47 20 50 5D 20 |.....F8. S\G P] |
00000D20: 42 45 53 5C 47 53 56 45 4E 22 00 32 15 CE 13 A1 |BES\GSVEN".2....|
00000D30: 58 24 00 44 15 D8 13 8B 58 24 B2 22 85 22 A7 31 |X$.D....X$.".".1|
00000D40: 30 30 30 30 00 56 15 E2 13 8B 58 24 B2 22 86 22 |0000.V....X$."."|
00000D50: A7 32 30 30 30 30 00 68 15 EC 13 8B 58 24 B2 22 |.20000.h....X$."|
00000D60: 87 22 A7 33 30 30 30 30 00 7A 15 F6 13 8B 58 24 |.".30000.z....X$|
00000D70: B2 22 88 22 A7 34 30 30 30 30 00 8B 15 FB 13 8B |.".".40000......|
00000D80: 58 24 B2 22 8C 22 A7 36 35 30 30 00 95 15 00 14 |X$.".".6500.....|
00000D90: 89 35 30 37 30 00 9B 15 0A 14 80 00 C0 15 66 17 |.5070.........f.|
00000DA0: 8F 20 2A 2A 20 53 54 59 52 49 4E 47 20 41 46 20 |. ** STYRING AF |
00000DB0: 53 49 44 53 54 45 20 4B 5C 52 53 45 4C 20 2A 2A |SIDSTE K\RSEL **|
00000DC0: 00 E5 15 6B 17 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...k..----------|
00000DD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DE0: 2D 2D 2D 2D 2D 00 FB 15 70 17 9F 33 2C 38 2C 33 |-----...p..3,8,3|
00000DF0: 2C 22 44 41 54 4F 2C 53 2C 52 22 00 10 16 7A 17 |,"DATO,S,R"...z.|
00000E00: 84 33 2C 44 41 24 3A 84 33 2C 42 4E 24 3A A0 33 |.3,DA$:.3,BN$:.3|
00000E10: 00 32 16 84 17 99 22 93 11 11 1D 1D 1D 53 49 44 |.2...."......SID|
00000E20: 53 54 45 20 4B 5C 52 53 45 4C 20 44 2E 22 3B 44 |STE K\RSEL D.";D|
00000E30: 41 24 00 50 16 86 17 99 22 11 1D 1D 1D 53 49 44 |A$.P...."....SID|
00000E40: 53 54 45 20 42 52 55 47 45 52 20 22 3B 42 4E 24 |STE BRUGER ";BN$|
00000E50: 00 70 16 89 17 99 22 11 11 11 1D 1D 1D 1D 1D 05 |.p....".........|
00000E60: 20 54 52 59 4B 20 27 52 45 54 55 52 4E 27 20 22 | TRYK 'RETURN' "|
00000E70: 00 88 16 8A 17 A1 58 24 3A 8B 58 24 B3 B1 C7 28 |......X$:.X$...(|
00000E80: 31 33 29 A7 36 30 32 36 00 91 16 8B 17 89 31 30 |13).6026......10|
00000E90: 30 00 97 16 8E 17 80 00 BC 16 A2 17 8F 2D 2D 2D |0............---|
00000EA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000EB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E5 16 A7 |------------....|
00000EC0: 17 99 22 93 22 3A 85 22 20 44 41 47 53 20 44 41 |..".":." DAGS DA|
00000ED0: 54 4F 20 22 3B 44 41 24 3A 8B 44 41 24 B2 22 22 |TO ";DA$:.DA$.""|
00000EE0: A7 36 30 35 35 00 0E 17 A9 17 85 22 11 11 20 42 |.6055......".. B|
00000EF0: 52 55 47 45 52 53 20 4E 41 56 4E 20 22 3B 42 4E |RUGERS NAVN ";BN|
00000F00: 24 3A 8B 42 4E 24 B2 22 22 A7 36 30 35 37 00 29 |$:.BN$."".6057.)|
00000F10: 17 AC 17 9F 31 35 2C 38 2C 31 35 2C 22 53 30 3A |....15,8,15,"S0:|
00000F20: 44 41 54 4F 22 3A A0 31 35 00 3F 17 B6 17 9F 33 |DATO":.15.?....3|
00000F30: 2C 38 2C 33 2C 22 44 41 54 4F 2C 53 2C 57 22 00 |,8,3,"DATO,S,W".|
00000F40: 54 17 C0 17 98 33 2C 44 41 24 3A 98 33 2C 42 4E |T....3,DA$:.3,BN|
00000F50: 24 3A A0 33 00 95 17 C5 17 8B 53 41 24 B3 B1 22 |$:.3......SA$.."|
00000F60: 4F 4B 22 A7 99 22 93 1D 11 1D 1D 1D 44 55 20 47 |OK".."......DU G|
00000F70: 4C 45 4D 54 45 20 41 54 20 53 41 56 45 20 4D 45 |LEMTE AT SAVE ME|
00000F80: 44 4C 45 4D 53 52 45 47 49 53 54 45 52 22 3A 92 |DLEMSREGISTER":.|
00000F90: 31 39 38 2C 31 00 B8 17 C6 17 8B 53 41 24 B3 B1 |198,1......SA$..|
00000FA0: 22 4F 4B 22 A7 31 30 30 3A 8F 2D 2D 20 47 4F 54 |"OK".100:.-- GOT|
00000FB0: 4F 32 30 30 30 20 2D 2D 00 E1 17 CA 17 99 22 93 |O2000 --......".|
00000FC0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000FD0: 1D 12 20 54 41 4B 20 46 4F 52 20 49 44 41 47 20 |.. TAK FOR IDAG |
00000FE0: 22 00 E7 17 D4 17 80 00 ED 17 38 18 8F 00 09 18 |".........8.....|
00000FF0: 64 19 8F 20 20 20 20 20 20 20 2A 2A 20 42 45 53 |d.. ** BES|
00001000: 5C 47 53 56 45 4E 20 2A 2A 00 2E 18 96 19 8F 2D |\GSVEN **......-|
00001010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 3A |--------------.:|
00001030: 18 BE 19 81 58 B2 30 A4 44 4C 00 5C 18 C8 19 8B |....X.0.DL.\....|
00001040: C9 28 44 24 28 58 29 2C 39 29 B2 22 42 45 53 5C |.(D$(X),9)."BES\|
00001050: 47 53 56 45 4E 22 A7 8D 36 36 35 30 00 63 18 D2 |GSVEN"..6650.c..|
00001060: 19 82 58 00 6C 18 DC 19 89 31 30 30 00 72 18 E6 |..X.l....100.r..|
00001070: 19 80 00 78 18 F0 19 8F 00 A6 18 FA 19 99 22 93 |...x..........".|
00001080: 11 11 22 3A 99 C9 28 44 24 28 58 29 2C 39 29 3A |..":..(D$(X),9):|
00001090: 99 3A 99 4E 24 28 58 29 3A 99 41 24 28 58 29 3A |.:.N$(X):.A$(X):|
000010A0: 99 50 24 28 58 29 00 C1 18 04 1A 99 22 11 11 1D |.P$(X)......"...|
000010B0: 1D 05 54 52 59 4B 20 27 52 45 54 55 52 4E 27 1C |..TRYK 'RETURN'.|
000010C0: 22 00 DB 18 0E 1A A1 52 45 24 3A 8B 52 45 24 B3 |"......RE$:.RE$.|
000010D0: B1 C7 28 31 33 29 A7 36 36 37 30 00 E1 18 18 1A |..(13).6670.....|
000010E0: 8E 00 E7 18 22 1A 80 00 05 19 2C 1A 8F 20 20 20 |....".....,.. |
000010F0: 20 2A 2A 20 43 48 45 43 4B 20 50 41 53 53 57 4F | ** CHECK PASSWO|
00001100: 52 44 20 2A 2A 00 2A 19 36 1A 8F 2D 2D 2D 2D 2D |RD **.*.6..-----|
00001110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 4D 19 40 1A 99 |----------.M.@..|
00001130: 22 93 11 11 11 1D 1D 22 3A 85 22 20 41 44 47 41 |"......":." ADGA|
00001140: 4E 47 53 4B 4F 44 45 20 22 3B 41 47 24 00 87 19 |NGSKODE ";AG$...|
00001150: 4A 1A 8B 41 47 24 B3 B1 22 53 5C 52 45 4E 22 A7 |J..AG$.."S\REN".|
00001160: 9F 31 35 2C 38 2C 31 35 2C 22 53 3A 44 41 54 4F |.15,8,15,"S:DATO|
00001170: 22 3A A0 31 35 3A 9F 33 2C 38 2C 33 2C 22 44 41 |":.15:.3,8,3,"DA|
00001180: 54 4F 2C 53 2C 57 22 00 C4 19 4F 1A 8B 41 47 24 |TO,S,W"...O..AG$|
00001190: B3 B1 22 53 5C 52 45 4E 22 A7 44 41 24 B2 22 44 |.."S\REN".DA$."D|
000011A0: 41 54 4F 20 55 4B 45 4E 44 54 22 3A 42 4E 24 B2 |ATO UKENDT":BN$.|
000011B0: 22 55 4C 4F 56 4C 49 47 20 49 4E 44 54 52 5B 4E |"ULOVLIG INDTR[N|
000011C0: 47 45 4E 22 00 E7 19 54 1A 8B 41 47 24 B3 B1 22 |GEN"...T..AG$.."|
000011D0: 53 5C 52 45 4E 22 A7 98 33 2C 44 41 24 3A 98 33 |S\REN"..3,DA$:.3|
000011E0: 2C 42 4E 24 3A A0 33 00 00 1A 5E 1A 8B 41 47 24 |,BN$:.3...^..AG$|
000011F0: B3 B1 22 53 5C 52 45 4E 22 A7 9E 36 34 37 33 38 |.."S\REN"..64738|
00001200: 00 06 1A 68 1A 8E 00 0C 1A 72 1A 80 00 12 1A 58 |...h.....r.....X|
00001210: 1B 8F 00 18 1A 62 1B 8F 00 1E 1A 6C 1B 8F 00 24 |.....b.....l...$|
00001220: 1A BC 1B 8F 00 2A 1A C6 1B 8F 00 30 1A D0 1B 8F |.....*.....0....|
00001230: 00 36 1A 40 1F 8F 00 3C 1A 4A 1F 8F 00 42 1A 28 |.6.@...<.J...B.(|
00001240: 23 8F 00 61 1A 06 27 8F 20 20 20 20 2A 2A 20 53 |#..a..'. ** S|
00001250: 5C 47 4E 49 4E 47 53 52 4F 55 54 49 4E 45 20 2A |\GNINGSROUTINE *|
00001260: 2A 00 86 1A 0B 27 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D |*....'.---------|
00001270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001280: 2D 2D 2D 2D 2D 2D 00 8F 1A 10 27 99 22 93 22 00 |------....'.".".|
00001290: B2 1A 1A 27 85 22 4E 41 56 4E 20 22 3B 4E 24 3A |...'."NAVN ";N$:|
000012A0: 4E B2 C3 28 4E 24 29 3A 8B 4E 24 B2 22 22 A7 31 |N..(N$):.N$."".1|
000012B0: 30 30 00 D4 1A 24 27 81 47 B2 31 A4 44 4C 3A 8B |00...$'.G.1.DL:.|
000012C0: C8 28 4E 24 28 47 29 2C 4E 29 B2 4E 24 A7 8D 31 |.(N$(G),N).N$..1|
000012D0: 30 30 34 30 00 DB 1A 2E 27 82 47 00 E4 1A 34 27 |0040....'.G...4'|
000012E0: 89 31 30 30 00 0F 1B 38 27 99 22 93 22 3B 4E 24 |.100...8'.".";N$|
000012F0: 28 47 29 3A 99 41 24 28 47 29 3A 99 50 24 28 47 |(G):.A$(G):.P$(G|
00001300: 29 3A 99 54 24 28 47 29 3A 99 44 24 28 47 29 00 |):.T$(G):.D$(G).|
00001310: 35 1B 3D 27 99 22 53 4B 41 4C 20 44 49 53 53 45 |5.='."SKAL DISSE|
00001320: 20 44 41 54 41 20 52 45 54 54 45 53 20 3F 20 28 | DATA RETTES ? (|
00001330: 4A 2F 4E 29 22 00 4B 1B 3E 27 A1 58 24 3A 8B 58 |J/N)".K.>'.X$:.X|
00001340: 24 B2 22 4E 22 A7 31 30 30 35 30 00 64 1B 3F 27 |$."N".10050.d.?'|
00001350: 8B 58 24 B2 22 4A 22 A7 8D 34 30 30 30 3A 89 31 |.X$."J"..4000:.1|
00001360: 30 30 35 30 00 6F 1B 40 27 89 31 30 30 34 36 00 |0050.o.@'.10046.|
00001370: 85 1B 42 27 99 22 11 11 54 52 59 4B 20 45 4E 20 |..B'."..TRYK EN |
00001380: 54 41 53 54 22 00 9A 1B 4C 27 A1 58 24 3A 8B 58 |TAST"...L'.X$:.X|
00001390: 24 B2 22 22 A7 31 30 30 36 30 00 A0 1B 56 27 8E |$."".10060...V'.|
000013A0: 00 A9 1B 20 4E 99 22 93 22 00 CF 1B 2A 4E 85 22 |... N."."...*N."|
000013B0: 41 44 52 45 53 53 45 20 22 3B 41 24 3A 41 B2 C3 |ADRESSE ";A$:A..|
000013C0: 28 41 24 29 3A 8B 41 24 B2 22 22 A7 31 30 30 00 |(A$):.A$."".100.|
000013D0: F1 1B 34 4E 81 47 B2 31 A4 44 4C 3A 8B C8 28 41 |..4N.G.1.DL:..(A|
000013E0: 24 28 47 29 2C 41 29 B2 41 24 A7 8D 32 30 30 34 |$(G),A).A$..2004|
000013F0: 30 00 F8 1B 3E 4E 82 47 00 01 1C 44 4E 89 31 30 |0...>N.G...DN.10|
00001400: 30 00 2C 1C 48 4E 99 22 93 22 3B 4E 24 28 47 29 |0.,.HN.".";N$(G)|
00001410: 3A 99 41 24 28 47 29 3A 99 50 24 28 47 29 3A 99 |:.A$(G):.P$(G):.|
00001420: 54 24 28 47 29 3A 99 44 24 28 47 29 00 52 1C 4D |T$(G):.D$(G).R.M|
00001430: 4E 99 22 53 4B 41 4C 20 44 49 53 53 45 20 44 41 |N."SKAL DISSE DA|
00001440: 54 41 20 52 45 54 54 45 53 20 3F 20 28 4A 2F 4E |TA RETTES ? (J/N|
00001450: 29 22 00 68 1C 4E 4E A1 58 24 3A 8B 58 24 B2 22 |)".h.NN.X$:.X$."|
00001460: 4E 22 A7 32 30 30 35 30 00 81 1C 4F 4E 8B 58 24 |N".20050...ON.X$|
00001470: B2 22 4A 22 A7 8D 34 30 30 30 3A 89 32 30 30 35 |."J"..4000:.2005|
00001480: 30 00 8C 1C 50 4E 89 32 30 30 34 36 00 A2 1C 52 |0...PN.20046...R|
00001490: 4E 99 22 11 11 54 52 59 4B 20 45 4E 20 54 41 53 |N."..TRYK EN TAS|
000014A0: 54 22 00 B7 1C 5C 4E A1 58 24 3A 8B 58 24 B2 22 |T"...\N.X$:.X$."|
000014B0: 22 A7 32 30 30 36 30 00 BD 1C 66 4E 8E 00 C6 1C |".20060...fN....|
000014C0: 30 75 99 22 93 22 00 EC 1C 3A 75 85 22 50 4F 53 |0u."."...:u."POS|
000014D0: 54 4E 52 2E 20 22 3B 50 24 3A 50 B2 C3 28 50 24 |TNR. ";P$:P..(P$|
000014E0: 29 3A 8B 50 24 B2 22 22 A7 31 30 30 00 0E 1D 44 |):.P$."".100...D|
000014F0: 75 81 47 B2 31 A4 44 4C 3A 8B C8 28 50 24 28 47 |u.G.1.DL:..(P$(G|
00001500: 29 2C 50 29 B2 50 24 A7 8D 33 30 30 34 30 00 15 |),P).P$..30040..|
00001510: 1D 4E 75 82 47 00 1E 1D 54 75 89 31 30 30 00 49 |.Nu.G...Tu.100.I|
00001520: 1D 58 75 99 22 93 22 3B 4E 24 28 47 29 3A 99 41 |.Xu.".";N$(G):.A|
00001530: 24 28 47 29 3A 99 50 24 28 47 29 3A 99 54 24 28 |$(G):.P$(G):.T$(|
00001540: 47 29 3A 99 44 24 28 47 29 00 6F 1D 5D 75 99 22 |G):.D$(G).o.]u."|
00001550: 53 4B 41 4C 20 44 49 53 53 45 20 44 41 54 41 20 |SKAL DISSE DATA |
00001560: 52 45 54 54 45 53 20 3F 20 28 4A 2F 4E 29 22 00 |RETTES ? (J/N)".|
00001570: 85 1D 5E 75 A1 58 24 3A 8B 58 24 B2 22 4E 22 A7 |..^u.X$:.X$."N".|
00001580: 33 30 30 35 30 00 9E 1D 5F 75 8B 58 24 B2 22 4A |30050..._u.X$."J|
00001590: 22 A7 8D 34 30 30 30 3A 89 33 30 30 35 30 00 A9 |"..4000:.30050..|
000015A0: 1D 60 75 89 33 30 30 34 36 00 BF 1D 62 75 99 22 |.`u.30046...bu."|
000015B0: 11 11 54 52 59 4B 20 45 4E 20 54 41 53 54 22 00 |..TRYK EN TAST".|
000015C0: D4 1D 6C 75 A1 58 24 3A 8B 58 24 B2 22 22 A7 33 |..lu.X$:.X$."".3|
000015D0: 30 30 36 30 00 DA 1D 76 75 8E 00 E3 1D 40 9C 99 |0060...vu....@..|
000015E0: 22 93 22 00 0C 1E 4A 9C 85 22 54 45 4C 45 46 4F |"."...J.."TELEFO|
000015F0: 4E 4E 52 2E 20 22 3B 54 24 3A 54 B2 C3 28 54 24 |NNR. ";T$:T..(T$|
00001600: 29 3A 8B 54 24 B2 22 22 A7 31 30 30 00 2E 1E 54 |):.T$."".100...T|
00001610: 9C 81 47 B2 30 A4 44 4C 3A 8B C8 28 54 24 28 47 |..G.0.DL:..(T$(G|
00001620: 29 2C 54 29 B2 54 24 A7 8D 34 30 30 34 30 00 35 |),T).T$..40040.5|
00001630: 1E 5E 9C 82 47 00 3E 1E 64 9C 89 31 30 30 00 69 |.^..G.>.d..100.i|
00001640: 1E 68 9C 99 22 93 22 3B 4E 24 28 47 29 3A 99 41 |.h..".";N$(G):.A|
00001650: 24 28 47 29 3A 99 50 24 28 47 29 3A 99 54 24 28 |$(G):.P$(G):.T$(|
00001660: 47 29 3A 99 44 24 28 47 29 00 94 1E 6D 9C 99 3A |G):.D$(G)...m..:|
00001670: 99 22 11 1D 1D 53 4B 41 4C 20 44 49 53 53 45 20 |."...SKAL DISSE |
00001680: 44 41 54 41 20 52 45 54 54 45 53 20 3F 20 28 4A |DATA RETTES ? (J|
00001690: 2F 4E 29 22 00 AA 1E 6E 9C A1 58 24 3A 8B 58 24 |/N)"...n..X$:.X$|
000016A0: B2 22 4E 22 A7 34 30 30 35 30 00 C3 1E 6F 9C 8B |."N".40050...o..|
000016B0: 58 24 B2 22 4A 22 A7 8D 34 30 30 30 3A 89 34 30 |X$."J"..4000:.40|
000016C0: 30 35 30 00 CE 1E 70 9C 89 34 30 30 34 36 00 E4 |050...p..40046..|
000016D0: 1E 72 9C 99 22 11 11 54 52 59 4B 20 45 4E 20 54 |.r.."..TRYK EN T|
000016E0: 41 53 54 22 00 F9 1E 7C 9C A1 58 24 3A 8B 58 24 |AST"...|..X$:.X$|
000016F0: B2 22 22 A7 34 30 30 36 30 00 FF 1E 86 9C 8E 00 |."".40060.......|
00001700: 1F 1F 5E BF 8F 20 20 20 2A 2A 20 4D 45 44 4C 45 |..^.. ** MEDLE|
00001710: 4D 53 4C 49 53 54 45 20 56 41 4C 47 20 2A 2A 00 |MSLISTE VALG **.|
00001720: 43 1F 63 BF 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |C.c..-----------|
00001730: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001740: 2D 2D 2D 00 6E 1F 68 BF 99 22 93 1D 1D 1D 1D 1D |---.n.h.."......|
00001750: 1D 1D 1D 1D 11 11 12 53 92 4B 5B 52 4D 20 45 4C |.......S.K[RM EL|
00001760: 4C 45 52 20 12 50 92 52 49 4E 54 45 52 22 00 83 |LER .P.RINTER"..|
00001770: 1F 72 BF A1 58 24 3A 8B 58 24 B2 22 22 A7 34 39 |.r..X$:.X$."".49|
00001780: 30 31 30 00 9D 1F 77 BF 8B 58 24 B2 22 53 22 A7 |010...w..X$."S".|
00001790: 54 54 B2 39 30 30 3A 89 35 30 35 30 30 00 AE 1F |TT.900:.50500...|
000017A0: 7C BF 8B 58 24 B2 22 50 22 A7 50 50 B2 34 00 D0 ||..X$."P".PP.4..|
000017B0: 1F 46 C3 8F 20 2A 2A 20 4D 45 44 4C 45 4D 53 4C |.F.. ** MEDLEMSL|
000017C0: 49 53 54 45 20 50 5D 20 50 52 49 4E 54 20 2A 2A |ISTE P] PRINT **|
000017D0: 00 DC 1F 50 C3 9F 34 2C 34 3A 9D 34 00 F9 1F 55 |...P..4,4:.4...U|
000017E0: C3 99 A3 32 32 29 22 44 41 4E 53 4B 20 52 5C 44 |...22)"DANSK R\D|
000017F0: 45 20 4B 4F 52 53 22 3A 99 00 15 20 5A C3 99 A3 |E KORS":... Z...|
00001800: 32 33 29 22 4C 41 4E 47 45 53 4B 4F 56 20 41 46 |23)"LANGESKOV AF|
00001810: 44 2E 22 3A 99 00 32 20 82 C3 99 A3 32 31 29 22 |D.":..2 ....21)"|
00001820: 4D 45 44 4C 45 4D 53 4C 49 53 54 45 20 31 39 38 |MEDLEMSLISTE 198|
00001830: 34 22 00 55 20 8C C3 99 A3 32 31 29 22 3D 3D 3D |4".U ....21)"===|
00001840: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A |==============":|
00001850: 99 3A 99 3A 99 00 63 20 B4 C3 81 58 B2 31 A4 44 |.:.:..c ...X.1.D|
00001860: 4C AB 31 00 79 20 BE C3 4C B2 C3 28 4E 24 28 58 |L.1.y ..L..(N$(X|
00001870: 29 29 3A 4C B2 33 30 AB 4C 00 8F 20 C8 C3 45 B2 |)):L.30.L.. ..E.|
00001880: C3 28 41 24 28 58 29 29 3A 45 B2 33 30 AB 45 00 |.(A$(X)):E.30.E.|
00001890: B3 20 D2 C3 99 A3 50 50 29 3B 4E 24 28 58 29 3B |. ....PP);N$(X);|
000018A0: A3 4C 29 3B 41 24 28 58 29 3B A3 45 29 3B 50 24 |.L);A$(X);.E);P$|
000018B0: 28 58 29 00 BF 20 F0 C3 8F 20 50 52 49 4E 54 00 |(X).. ... PRINT.|
000018C0: C6 20 18 C4 82 58 00 D0 20 22 C4 98 34 3A A0 34 |. ...X.. "..4:.4|
000018D0: 00 D9 20 36 C4 89 31 30 30 00 F9 20 44 C5 8F 20 |.. 6..100.. D.. |
000018E0: 20 20 20 2A 2A 20 55 44 50 52 49 4E 54 20 50 5D | ** UDPRINT P]|
000018F0: 20 53 4B 5B 52 4D 20 2A 2A 00 1D 21 46 C5 8F 2D | SK[RM **..!F..-|
00001900: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001910: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 43 21 |-------------.C!|
00001920: 49 C5 8B 5A 59 B3 B1 33 33 A7 20 99 A3 50 50 29 |I..ZY..33. ..PP)|
00001930: 22 44 41 4E 53 4B 20 52 5C 44 45 20 4B 4F 52 53 |"DANSK R\DE KORS|
00001940: 22 3A 99 00 6D 21 4A C5 8B 5A 59 B3 B1 33 33 A7 |":..m!J..ZY..33.|
00001950: 20 99 A3 50 50 29 22 20 4C 41 4E 47 45 53 4B 4F | ..PP)" LANGESKO|
00001960: 56 20 41 46 44 20 22 3A 99 3A 99 3A 99 00 7B 21 |V AFD ":.:.:..{!|
00001970: 4C C5 81 58 B2 31 A4 44 4C AB 31 00 92 21 4E C5 |L..X.1.DL.1..!N.|
00001980: 99 A3 33 29 4E 24 28 58 29 3A 8B 5A 59 B2 33 33 |..3)N$(X):.ZY.33|
00001990: A7 99 00 A9 21 58 C5 99 A3 33 29 41 24 28 58 29 |....!X...3)A$(X)|
000019A0: 3A 8B 5A 59 B2 33 33 A7 99 00 E5 21 62 C5 99 A3 |:.ZY.33....!b...|
000019B0: 33 29 50 24 28 58 29 3A 8B 5A 59 B2 33 33 A7 99 |3)P$(X):.ZY.33..|
000019C0: 3A 8F 20 2A 20 46 4F 52 53 5C 47 20 4D 45 44 20 |:. * FORS\G MED |
000019D0: 41 4E 54 41 4C 20 3F 20 49 20 54 48 49 53 20 4C |ANTAL ? I THIS L|
000019E0: 49 4E 45 20 2A 00 FB 21 6C C5 8B 5A 59 B3 B1 33 |INE *..!l..ZY..3|
000019F0: 33 A7 99 A3 33 29 54 24 28 58 29 00 11 22 76 C5 |3...3)T$(X).."v.|
00001A00: 8B 5A 59 B3 B1 33 33 A7 99 A3 33 29 44 24 28 58 |.ZY..33...3)D$(X|
00001A10: 29 00 19 22 80 C5 99 3A 99 00 2D 22 8A C5 81 55 |).."...:..-"...U|
00001A20: 55 B2 31 A4 54 54 3A 82 55 55 3A 82 58 00 3F 22 |U.1.TT:.UU:.X.?"|
00001A30: 8C C5 8B 5A 59 B2 33 33 A7 5A 59 B2 30 3A 8E 00 |...ZY.33.ZY.0:..|
00001A40: 5E 22 8F C5 99 22 11 11 1D 1D 1D 54 52 59 4B 20 |^"...".....TRYK |
00001A50: 27 52 45 54 55 52 4E 27 22 3A 54 54 B2 30 00 77 |'RETURN'":TT.0.w|
00001A60: 22 90 C5 A1 58 24 3A 8B 58 24 B3 B1 C7 28 31 33 |"...X$:.X$...(13|
00001A70: 29 A7 35 30 35 37 36 00 81 22 94 C5 89 20 31 30 |).50576.."... 10|
00001A80: 30 00 9D 22 02 C6 8F 20 20 20 20 20 2A 2A 20 53 |0.."... ** S|
00001A90: 5C 47 20 50 5D 20 44 41 54 41 20 2A 2A 00 C1 22 |\G P] DATA **.."|
00001AA0: 07 C6 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...-------------|
00001AB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001AC0: 2D 00 CA 22 0C C6 99 22 93 22 00 F8 22 20 C6 81 |-.."...".".." ..|
00001AD0: 47 B2 30 A4 44 4C 3A 8B C8 28 44 24 28 47 29 2C |G.0.DL:..(D$(G),|
00001AE0: 31 31 29 B2 22 49 4B 4B 45 20 42 45 54 41 4C 54 |11)."IKKE BETALT|
00001AF0: 22 A7 8D 34 30 30 34 30 00 FF 22 2A C6 82 47 00 |"..40040.."*..G.|
00001B00: 08 23 3E C6 89 31 30 30 00 3C 23 48 C6 99 22 93 |.#>..100.<#H..".|
00001B10: 22 3B 4E 24 28 47 29 3A 99 41 24 28 47 29 3A 99 |";N$(G):.A$(G):.|
00001B20: 50 24 28 47 29 3A 99 54 24 28 47 29 3A 99 22 12 |P$(G):.T$(G):.".|
00001B30: 1C 22 44 24 28 47 29 3B 22 92 05 22 00 62 23 52 |."D$(G);"..".b#R|
00001B40: C6 99 22 53 4B 41 4C 20 44 49 53 53 45 20 44 41 |.."SKAL DISSE DA|
00001B50: 54 41 20 52 45 54 54 45 53 20 3F 20 28 4A 2F 4E |TA RETTES ? (J/N|
00001B60: 29 22 00 78 23 5C C6 A1 58 24 3A 8B 58 24 B2 22 |)".x#\..X$:.X$."|
00001B70: 4E 22 A7 34 30 30 35 30 00 91 23 66 C6 8B 58 24 |N".40050..#f..X$|
00001B80: B2 22 4A 22 A7 8D 34 30 30 30 3A 89 35 30 38 31 |."J"..4000:.5081|
00001B90: 30 00 9C 23 70 C6 89 34 30 30 34 36 00 B2 23 7A |0..#p..40046..#z|
00001BA0: C6 99 22 11 11 54 52 59 4B 20 45 4E 20 54 41 53 |.."..TRYK EN TAS|
00001BB0: 54 22 00 C7 23 84 C6 A1 58 24 3A 8B 58 24 B2 22 |T"..#...X$:.X$."|
00001BC0: 22 A7 35 30 38 32 30 00 CD 23 8E C6 8E 00 00 00 |".50820..#......|
00001BD0: 80 |. |
..)....*********************************
*.Q....*
*.Y....* DATABASE FOR DANSK R\DE KORS
*......* LANGESKOV AFDELING. (C) 1984
*.I....* S.LUND-HANSEN. (09) 95 14 09
*......*
*......*********************************
*.8.... ** TEKST LINIER **.`....--
--------------------------------.R...DL.
1:.650,128...Z..N$(300),A$(300),P$(300),
T$(300),D$(300),Z$(16).Q.[.."...........
..LOADER MEDLEMSREGISTER"...\.."........
...FOR DANSK R\DE KORS"...]..".........
...LANGESKOV AFDELING".D.^.."...........
.MEDLEMS-REGISTERET".K._.."............K
AN INDEHOLDE 2000 "...`.."..........MEDL
EMMER AF R\DE KORS"...A.."...........(C)
1984 S.LUND-HANSEN"...B..--------------
-------------------...C..3000...D..646,1
:.53280,14:.53281,14:.".".B.N.."UCCCCCCC
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCI";.S.X..
"B R\DE KORS KARTOTEK (C) S.LUND-HANSEN
.";......"JCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
CCCCCCCCCK".G...."...........F1. NYE MED
LEMMER"... .."..........F2. SAVE MEDLEMM
ER"......"..........F3. SIDSTE K\RSEL"./
...."..........F4. BREV LABELS".L...."..
........F5. S\GNING".L.H.."..........F6.
AFSLUTNING"...R.."..........F7. IKKE BE
TALT 84"......"..........F8. MEDLEMSLIST
E".X....--------------------------------
......X$......X$."." . 1000......X$."."
. 2000......X$."." . 6000.,....X$."." .
3200.?....X$."." . 5000.R."..X$."." . 60
50.F.,..X$."." . 50700.Z.6..X$."." . 490
00...@..230...... ** NYE DATA **.C
....-------------------------------.M...
.6700......"........ 'I' = IKKE BETALT :
'' = BETALT .".3...N$(DL)."":."NAVN ";N
$(DL):.N$(DL)."".N$(DL)."-".J...A$(DL)."
":."ADRESSE ";A$(DL):.A$(DL)."".A$(DL)."
-".....P$(DL)."":."POSTNR. ";P$(DL):.P$(
DL)."".P$(DL)."-".....T$(DL)."":."TELEFO
NNR. ";T$(DL):.T$(DL)."".T$(DL)."-".....
D$(DL)."":."DATA ";D$(DL):.D$(DL)."".D$(
DL)."BETALT".9....D$(DL)."I".D$(DL)."IKK
E BETALT".Q.$..".DATA OK ? (J/N)".E....X
$:.X$."N".100.{.8..X$:.X$.."J".1070...=.
DL.DL.1:. L$="****":N$(D)=L$:A$(D)=L$:P$
(D)=L$:T$(D)=L$:D$(D)=L$.I.B..100...K..*
* SAVE NYE DATA, SLET GAMLE **...L..----
---------------------------...P..15,8,15
,"S0:DATA": 15.D.Q..2,8,2,"DATA,S,W"...R
.DX.DL.1:L$."****":N$(DX).L$:A$(DX).L$:P
$(DX).L$:T$(DX).L$:D$(DX).L$...U..X.1.DX
.I.Z..2,N$(X):.2,A$(X):.2,P$(X):.2,T$(X)
:.2,D$(X).Q.... X..... 2:SA$."OK"......1
00...... ** L[S DATA IND I TABEL **.2.
...-------------------------------.H....
2,8,2,"DATA,S,R".~.C..2,N$(DL):.2,A$(DL)
:.2,P$(DL):.2,T$(DL):.2,D$(DL)...L..N$(D
L)."****". 2:.100...Q.DL.DL.1...V..3011.
P.... ** PRINT BREV LABELS **......--
-----------------------------......4,4:.
4.....ZY.33......50500. ....4: 4.)....10
0./.....5.....;.....A.J...G.T...M.....S.
....Y.B..._.T...E.<........ ** RET/S
LET DATA **......----------------------
---------... ..".".G...."NAVN ? ";N$(G).
....."ADRESSE ? ";A$(G)......"POSTNR. ?
";P$(G)...H.."TELEFONNR. ? ";T$(G).'.R..
"DATA ? ";D$(G).0....".".C...."NAVN ";N$
(G).Y...."ADRESSE ";A$(G).O...."POSTNR.
";P$(G)......"TELEFONNR. ";T$(G)......"D
ATA ";D$(G).........~.. ** S\GNING
**......-------------------------------
......".UCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
CCCCCCCI";.C...."B S \ G N
I N G .";.S...."JCCCCCCCCCCCCC
CCCCCCCCCCCCCCCCCCCCCCCCCK"......"......
.....F1. S\G P] NAVN"......"..........F3
. S\G P] ADRESSE"......"..........F5. S\
G P] POSTNR."...D.."..........F7. S\G P]
TELEFONNR.".*.I.."..........F8. S\G P]
BES\GSVEN".2.N..X$.D.X..X$.".".10000.V..
..X$.".".20000.H....X$.".".30000.Z....X$
.".".40000......X$.".".6500......5070...
......F.. ** STYRING AF SIDSTE K\RSEL **
...K..-------------------------------...
P..3,8,3,"DATO,S,R"...Z..3,DA$:.3,BN$: 3
.2...."......SIDSTE K\RSEL D.";DA$.P....
"....SIDSTE BRUGER ";BN$.P....".........
TRYK 'RETURN' "......X$:.X$..G(13).6026
......100............-------------------
------------......".":." DAGS DATO ";DA$
:.DA$."".6055......".. BRUGERS NAVN ";BN
$:.BN$."".6057.)....15,8,15,"S0:DATO": 1
5.?....3,8,3,"DATO,S,W".T....3,DA$:.3,BN
$: 3...E..SA$.."OK".."......DU GLEMTE AT
SAVE MEDLEMSREGISTER":.198,1...F..SA$..
"OK".100:.-- GOTO2000 --...J..".........
.......... TAK FOR IDAG "...T.....8.....
D.. ** BES\GSVEN **......---------
----------------------.:....X.0.DL.\.H..
I(D$(X),9)."BES\GSVEN"..6650.C.R..X.L...
.100.R.....X.........."...":.I(D$(X),9):
.:.N$(X):.A$(X):.P$(X).A....".....TRYK '
RETURN'."......RE$:.RE$..G(13).6670.....
....".....,.. ** CHECK PASSWORD **.*.
6..-------------------------------.M.@..
"......":." ADGANGSKODE ";AG$...J..AG$..
"S\REN"..15,8,15,"S:DATO": 15:.3,8,3,"DA
TO,S,W".D.O..AG$.."S\REN".DA$."DATO UKEN
DT":BN$."ULOVLIG INDTR[NGEN"...T..AG$.."
S\REN"..3,DA$:.3,BN$: 3...^..AG$.."S\REN
"..64738...H.....R.....X.....B.....L...$
.....*.F...0.P...6.@...<.J...B.(#..A..'.
** S\GNINGSROUTINE **....'.---------
----------------------....'."."....'."NA
VN ";N$:N.C(N$):.N$."".100.T.$'.G.1.DL:.
H(N$(G),N).N$..10040....'.G...4'.100...8
'.".";N$(G):.A$(G):.P$(G):.T$(G):.D$(G).
5.='."SKAL DISSE DATA RETTES ? (J/N)".K.
>'.X$:.X$."N".10050.D.?'.X$."J"..4000:.1
0050.O.@'.10046...B'."..TRYK EN TAST"...
L'.X$:.X$."".10060. .V'.... N.".".O.*N."
ADRESSE ";A$:A.C(A$):.A$."".100...4N.G.1
.DL:.H(A$(G),A).A$..20040...>N.G...DN.10
0.,.HN.".";N$(G):.A$(G):.P$(G):.T$(G):.D
$(G).R.MN."SKAL DISSE DATA RETTES ? (J/N
)".H.NN.X$:.X$."N".20050...ON.X$."J"..40
00:.20050...PN.20046...RN."..TRYK EN TAS
T"...\N.X$:.X$."".20060...FN..F.0U."."..
.:U."POSTNR. ";P$:P.C(P$):.P$."".100...D
U.G.1.DL:.H(P$(G),P).P$..30040...NU.G...
TU.100.I.XU.".";N$(G):.A$(G):.P$(G):.T$(
G):.D$(G).O.]U."SKAL DISSE DATA RETTES ?
(J/N)"...^U.X$:.X$."N".30050..._U.X$."J
"..4000:.30050...`U.30046...BU."..TRYK E
N TAST".T.LU.X$:.X$."".30060.Z.VU....@..
"."...J.."TELEFONNR. ";T$:T.C(T$):.T$.""
.100...T..G.0.DL:.H(T$(G),T).T$..40040.5
.^..G.>.D..100.I.H..".";N$(G):.A$(G):.P$
(G):.T$(G):.D$(G)...M..:."...SKAL DISSE
DATA RETTES ? (J/N)"...N..X$:.X$."N".400
50.C.O..X$."J"..4000:.40050.N.P..40046..
.R.."..TRYK EN TAST"...|..X$:.X$."".4006
0.........^.. ** MEDLEMSLISTE VALG **.
C.C..------------------------------.N.H.
.".............S.K[RM ELLER .P.RINTER"..
.R..X$:.X$."".49010...W..X$."S".TT.900:.
50500...|..X$."P".PP.4.P.FC. ** MEDLEMSL
ISTE P] PRINT **...PC.4,4:.4...UC..22)"D
ANSK R\DE KORS":... ZC..23)"LANGESKOV AF
D.":..2 .C..21)"MEDLEMSLISTE 1984".U .C.
.21)"=================":.:.:..C .C.X.1.D
L.1.Y .CL.C(N$(X)):L.30.L.. HCE.C(A$(X))
:E.30.E.. RC..PP);N$(X);.L);A$(X);.E);P$
(X).. .C. PRINT.F .D.X.P "D.4: 4.Y 6D.10
0.. DE. ** UDPRINT P] SK[RM **..!FE.-
-----------------------------.C!IE.ZY..3
3. ..PP)"DANSK R\DE KORS":..M!JE.ZY..33.
..PP)" LANGESKOV AFD ":.:.:..{!LE.X.1.D
L.1..!NE..3)N$(X):.ZY.33....!XE..3)A$(X)
:.ZY.33....!BE..3)P$(X):.ZY.33..:. * FOR
S\G MED ANTAL ? I THIS LINE *..!LE.ZY..3
3...3)T$(X).."VE.ZY..33...3)D$(X)..".E.:
..-".E.UU.1.TT:.UU:.X.?".E.ZY.33.ZY.0:..
^".E.".....TRYK 'RETURN'":TT.0.W".E.X$:.
X$..G(13).50576..".E. 100..".F. ** S
\G P] DATA **.A".F.---------------------
---------.J".F.".".." F.G.0.DL:.H(D$(G),
11)."IKKE BETALT"..40040.."*F.G..#>F.100
.<#HF.".";N$(G):.A$(G):.P$(G):.T$(G):.".
."D$(G);"..".B#RF."SKAL DISSE DATA RETTE
S ? (J/N)".X#\F.X$:.X$."N".40050..#FF.X$
."J"..4000:.50810..#PF.40046..#ZF."..TRY
K EN TAST".G#.F.X$:.X$."".50820.M#.F....
.
> CLICK IMAGE PREVIEW FOR FULL MODAL