NOS ADRESSEN
FILE INFORMATION
FILENAME(S): NOS ADRESSEN
FILE TYPE(S): PRG
FILE SIZE: 6.5K
FIRST SEEN: 2025-12-02 02:08:03
APPEARS ON: 1 disk(s)
FILE HASH
ef88530d395fd1bfda608b17dec621f045bc93649beffb0f60a85a654f072fa1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PATRICK | NOS ADRESSEN | PRG | Shocktrooper | 12 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 05 00 99 22 93 05 22 3A 97 35 33 32 |......."..":.532|
00000010: 38 30 2C 35 3A 97 35 33 32 38 31 2C 36 00 27 08 |80,5:.53281,6.'.|
00000020: 0A 00 89 31 30 30 30 00 31 08 14 00 89 31 30 31 |...1000.1....101|
00000030: 30 00 3D 08 64 00 99 22 93 22 3B 3A 8E 00 6D 08 |0.=.d..".";:..m.|
00000040: 6E 00 99 C8 28 22 13 11 11 11 11 11 11 11 11 11 |n...("..........|
00000050: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
00000060: 2C B6 28 B5 28 56 45 AA 31 29 29 29 3B 00 7D 08 |,.(.(VE.1)));.}.|
00000070: 70 00 99 A6 B6 28 48 4F 29 29 3B 3A 8E 00 A2 08 |p....(HO));:....|
00000080: 78 00 48 4F B2 C2 28 32 30 39 29 AA 32 35 36 AC |x.HO..(209).256.|
00000090: C2 28 32 31 30 29 AB 31 30 32 34 AA C2 28 32 31 |.(210).1024..(21|
000000A0: 31 29 00 C0 08 79 00 56 45 B2 B5 28 48 4F AD 34 |1)...y.VE..(HO.4|
000000B0: 30 29 3A 48 4F B2 48 4F AB 34 30 AC 56 45 3A 8E |0):HO.HO.40.VE:.|
000000C0: 00 CB 08 C8 00 A1 49 4E 24 3A 8E 00 E0 08 D2 00 |......IN$:......|
000000D0: A1 49 4E 24 3A 8B 49 4E 24 B2 22 22 89 32 31 30 |.IN$:.IN$."".210|
000000E0: 00 E6 08 DC 00 8E 00 13 09 FA 00 97 35 34 32 39 |............5429|
000000F0: 36 2C 31 35 3A 97 35 34 32 37 38 2C 32 35 35 3A |6,15:.54278,255:|
00000100: 97 35 34 32 37 33 2C 39 35 3A 97 35 34 32 37 36 |.54273,95:.54276|
00000110: 2C 31 37 00 25 09 FB 00 81 4F 4F B2 31 A4 32 30 |,17.%....OO.1.20|
00000120: 30 3A 82 4F 4F 00 46 09 FC 00 97 35 34 32 37 36 |0:.OO.F....54276|
00000130: 2C 30 3A 97 35 34 32 37 37 2C 30 3A 97 35 34 32 |,0:.54277,0:.542|
00000140: 37 38 2C 30 3A 8E 00 54 09 04 01 52 56 B2 BB 28 |78,0:..T...RV..(|
00000150: 31 29 3A 8E 00 62 09 0E 01 46 52 B2 B8 28 30 29 |1):..b...FR..(0)|
00000160: 3A 8E 00 8B 09 2C 01 53 52 24 B2 C4 28 53 52 29 |:....,.SR$..(SR)|
00000170: 3A 8B C8 28 53 52 24 2C 31 29 B2 22 20 22 A7 53 |:..(SR$,1)." ".S|
00000180: 52 24 B2 CA 28 53 52 24 2C 32 29 00 91 09 2D 01 |R$..(SR$,2)...-.|
00000190: 8E 00 B6 09 36 01 53 52 24 B2 22 22 3A 8B 53 52 |....6.SR$."":.SR|
000001A0: B1 B2 31 30 AE 28 43 54 AB 43 4E AB B4 28 43 4E |..10.(CT.CN..(CN|
000001B0: 29 29 A7 33 31 38 00 D1 09 37 01 8B 53 52 B3 AB |)).318...7..SR..|
000001C0: 2E 35 AC 31 30 AE AB 43 4E A7 53 52 24 B2 22 2D |.5.10..CN.SR$."-|
000001D0: 22 00 F8 09 38 01 53 52 24 B2 53 52 24 AA CA 28 |"...8.SR$.SR$..(|
000001E0: C4 28 B5 28 B6 28 53 52 29 AA 2E 35 AC 31 30 AE |.(.(.(SR)..5.10.|
000001F0: AB 43 4E 29 29 2C 32 29 00 23 0A 39 01 8B C3 28 |.CN)),2).#.9...(|
00000200: 53 52 24 29 B3 43 54 AB 43 4E AA 28 43 4E B3 B1 |SR$).CT.CN.(CN..|
00000210: 30 29 A7 53 52 24 B2 22 20 22 AA 53 52 24 3A 89 |0).SR$." ".SR$:.|
00000220: 33 31 33 00 3D 0A 3A 01 8B 43 4E B2 30 B0 B6 28 |313.=.:..CN.0..(|
00000230: 53 52 29 B1 B2 31 45 31 30 89 33 31 36 00 71 0A |SR)..1E10.316.q.|
00000240: 3B 01 53 52 24 B2 53 52 24 AA CA 28 C4 28 31 AA |;.SR$.SR$..(.(1.|
00000250: B6 28 53 52 29 AB B5 28 B6 28 53 52 29 29 AA 2E |.(SR)..(.(SR))..|
00000260: 35 AC 31 30 AE AB 43 4E 29 2C 33 2C 43 4E AA 31 |5.10..CN),3,CN.1|
00000270: 29 00 91 0A 3C 01 8B C3 28 53 52 24 29 B3 43 54 |)...<...(SR$).CT|
00000280: A7 53 52 24 B2 53 52 24 AA 22 20 22 3A 89 33 31 |.SR$.SR$." ":.31|
00000290: 36 00 A7 0A 3D 01 8B C3 28 53 52 24 29 B1 43 54 |6...=...(SR$).CT|
000002A0: A7 53 52 24 B2 22 22 00 C7 0A 3E 01 8B C3 28 53 |.SR$.""...>...(S|
000002B0: 52 24 29 B3 43 54 A7 53 52 24 B2 53 52 24 AA 22 |R$).CT.SR$.SR$."|
000002C0: 2A 22 3A 89 33 31 38 00 CD 0A 3F 01 8E 00 E3 0A |*":.318...?.....|
000002D0: 5E 01 9F 34 2C 34 3A 98 34 2C 53 52 24 3B 3A A0 |^..4,4:.4,SR$;:.|
000002E0: 34 3A 8E 00 F4 0A 68 01 9F 34 2C 34 3A 98 34 3A |4:....h..4,4:.4:|
000002F0: A0 34 3A 8E 00 1C 0B E8 03 41 B2 31 30 30 30 3A |.4:......A.1000:|
00000300: 89 32 30 3A 8F 20 20 2A 2A 20 41 44 52 45 53 53 |.20:. ** ADRESS|
00000310: 45 4E 42 45 53 54 41 4E 44 20 2A 2A 00 24 0B F2 |ENBESTAND **.$..|
00000320: 03 49 B2 30 00 4D 0B F7 03 8D 31 30 30 3A 99 22 |.I.0.M....100:."|
00000330: 57 49 4C 54 20 55 20 49 4E 46 4F 52 4D 41 54 49 |WILT U INFORMATI|
00000340: 45 20 3C 4A 2F 4E 3E 22 3A 8D 32 31 30 00 6D 0B |E <J/N>":.210.m.|
00000350: FC 03 8B 28 49 4E 24 B2 22 4A 22 29 20 B0 28 49 |...(IN$."J") .(I|
00000360: 4E 24 B2 22 4A 22 29 20 A7 36 30 30 30 00 8D 0B |N$."J") .6000...|
00000370: 06 04 8B 28 49 4E 24 B2 22 4E 22 29 20 B0 28 49 |...(IN$."N") .(I|
00000380: 4E 24 B2 22 4E 22 29 20 A7 31 30 35 30 00 97 0B |N$."N") .1050...|
00000390: 10 04 89 31 30 31 30 00 AD 0B 1A 04 86 42 24 28 |...1010......B$(|
000003A0: 33 35 30 2C 35 29 2C 43 28 33 35 30 29 00 B6 0B |350,5),C(350)...|
000003B0: 2E 04 8D 31 30 30 00 E2 0B 42 04 99 22 2A 2A 2A |...100...B.."***|
000003C0: 20 4F 56 45 52 5A 49 43 48 54 20 41 44 52 45 53 | OVERZICHT ADRES|
000003D0: 53 45 4E 20 42 45 53 54 41 4E 44 20 2A 2A 2A 22 |SEN BESTAND ***"|
000003E0: 3A 99 00 02 0C 56 04 99 22 28 31 29 20 20 49 4E |:....V.."(1) IN|
000003F0: 56 4F 45 52 45 4E 20 47 45 47 45 56 45 4E 53 22 |VOEREN GEGEVENS"|
00000400: 3A 99 00 21 0C 6A 04 99 22 28 32 29 20 20 4F 50 |:..!.j.."(2) OP|
00000410: 56 52 41 47 45 4E 20 42 45 53 54 41 4E 44 22 3A |VRAGEN BESTAND":|
00000420: 99 00 49 0C 7E 04 99 22 28 33 29 20 20 4F 50 56 |..I.~.."(3) OPV|
00000430: 52 41 47 45 4E 20 49 4E 44 49 56 49 44 55 45 4C |RAGEN INDIVIDUEL|
00000440: 45 20 4E 41 41 4D 22 3A 99 00 68 0C 92 04 99 22 |E NAAM":..h...."|
00000450: 28 34 29 20 20 53 4F 52 54 45 52 45 4E 20 20 20 |(4) SORTEREN |
00000460: 20 20 20 20 20 22 3A 99 00 8E 0C A6 04 99 22 28 | ":......."(|
00000470: 35 29 20 20 4F 50 56 52 41 47 45 4E 20 47 45 48 |5) OPVRAGEN GEH|
00000480: 45 55 47 45 4E 52 55 49 4D 54 45 22 3A 99 00 B0 |EUGENRUIMTE":...|
00000490: 0C BA 04 99 22 28 36 29 20 20 43 4F 52 52 49 47 |...."(6) CORRIG|
000004A0: 45 52 45 4E 20 47 45 47 45 56 45 4E 53 22 3A 99 |EREN GEGEVENS":.|
000004B0: 00 CF 0C CE 04 99 22 28 37 29 20 20 44 41 54 41 |......"(7) DATA|
000004C0: 20 53 41 56 45 4E 20 20 20 20 20 20 22 3A 99 00 | SAVEN ":..|
000004D0: EE 0C E2 04 99 22 28 38 29 20 20 44 41 54 41 20 |....."(8) DATA |
000004E0: 49 4E 4C 45 5A 45 4E 20 20 20 20 22 3A 99 00 08 |INLEZEN ":...|
000004F0: 0D F6 04 99 22 20 20 20 20 20 57 41 54 20 4B 49 |...." WAT KI|
00000500: 45 53 54 20 55 20 3F 22 00 2E 0D 0A 05 8D 32 31 |EST U ?"......21|
00000510: 30 3A 41 B2 C5 28 49 4E 24 29 3A 8B 28 41 B3 31 |0:A..(IN$):.(A.1|
00000520: 29 20 B0 28 41 B1 38 29 20 A7 31 32 39 30 00 5E |) .(A.8) .1290.^|
00000530: 0D 1E 05 91 41 20 89 31 33 33 30 2C 31 38 31 30 |....A .1330,1810|
00000540: 2C 32 31 35 30 2C 32 34 37 30 2C 32 36 39 30 2C |,2150,2470,2690,|
00000550: 32 37 37 30 2C 33 33 37 30 2C 33 37 31 30 00 67 |2770,3370,3710.g|
00000560: 0D 32 05 8D 31 30 30 00 86 0D 46 05 99 22 2A 2A |.2..100...F.."**|
00000570: 2A 20 49 4E 56 4F 45 52 20 47 45 47 45 56 45 4E |* INVOER GEGEVEN|
00000580: 53 20 2A 2A 2A 22 00 A7 0D 50 05 99 3A 99 22 42 |S ***"...P..:."B|
00000590: 45 53 54 41 4E 44 20 53 4C 55 49 54 45 4E 20 4D |ESTAND SLUITEN M|
000005A0: 45 54 20 30 30 30 22 00 C0 0D 5A 05 99 22 43 4F |ET 000"...Z.."CO|
000005B0: 52 52 45 43 54 49 45 20 4D 45 54 20 39 39 39 22 |RRECTIE MET 999"|
000005C0: 00 DE 0D 6E 05 8B 49 B1 32 20 A7 49 B2 4B 3A 81 |...n..I.2 .I.K:.|
000005D0: 49 B2 4B 20 A4 33 35 30 3A 89 31 34 33 30 00 EC |I.K .350:.1430..|
000005E0: 0D 82 05 81 49 B2 31 20 A4 33 35 30 00 02 0E 96 |....I.1 .350....|
000005F0: 05 48 4F B2 34 3A 56 45 B2 35 3A 8D 31 31 30 3A |.HO.4:VE.5:.110:|
00000600: 99 49 00 0E 0E AA 05 81 4A B2 31 20 A4 35 00 23 |.I......J.1 .5.#|
00000610: 0E D2 05 48 4F B2 34 3A 56 45 B2 37 AA 4A 3A 8D |...HO.4:VE.7.J:.|
00000620: 31 31 30 00 44 0E E6 05 91 4A 20 89 31 35 33 30 |110.D....J .1530|
00000630: 2C 31 35 35 30 2C 31 35 37 30 2C 31 35 39 30 2C |,1550,1570,1590,|
00000640: 31 36 31 30 00 67 0E FA 05 99 22 4E 41 41 4D 3A |1610.g...."NAAM:|
00000650: 20 20 20 20 20 20 22 3B 3A 85 42 24 28 49 2C 4A | ";:.B$(I,J|
00000660: 29 3A 89 31 36 33 30 00 8A 0E 0E 06 99 22 41 44 |):.1630......"AD|
00000670: 52 45 53 3A 20 20 20 20 20 22 3B 3A 85 42 24 28 |RES: ";:.B$(|
00000680: 49 2C 4A 29 3A 89 31 36 33 30 00 AD 0E 22 06 99 |I,J):.1630..."..|
00000690: 22 50 4F 53 54 43 4F 44 45 3A 20 20 22 3B 3A 85 |"POSTCODE: ";:.|
000006A0: 42 24 28 49 2C 4A 29 3A 89 31 36 33 30 00 D0 0E |B$(I,J):.1630...|
000006B0: 36 06 99 22 57 4F 4F 4E 50 4C 41 41 54 53 3A 22 |6.."WOONPLAATS:"|
000006C0: 3B 3A 85 42 24 28 49 2C 4A 29 3A 89 31 36 33 30 |;:.B$(I,J):.1630|
000006D0: 00 F3 0E 4A 06 99 22 54 45 4C 45 46 4F 4F 4E 3A |...J.."TELEFOON:|
000006E0: 20 20 22 3B 3A 85 42 24 28 49 2C 4A 29 3A 89 31 | ";:.B$(I,J):.1|
000006F0: 36 33 30 00 11 0F 5E 06 8B 42 24 28 49 2C 4A 29 |630...^..B$(I,J)|
00000700: B2 22 30 30 30 22 20 A7 4B B2 49 3A 89 31 37 33 |."000" .K.I:.173|
00000710: 30 00 2A 0F 72 06 8B 42 24 28 49 2C 4A 29 B2 22 |0.*.r..B$(I,J)."|
00000720: 39 39 39 22 20 A7 31 37 37 30 00 31 0F 86 06 82 |999" .1770.1....|
00000730: 4A 00 4E 0F 9A 06 81 58 B2 31 20 A4 35 3A 48 4F |J.N....X.1 .5:HO|
00000740: B2 30 3A 56 45 B2 37 AA 58 3A 8D 31 31 30 00 80 |.0:VE.7.X:.110..|
00000750: 0F A4 06 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
00000760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000770: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 58 | ":.X|
00000780: 00 87 0F AE 06 82 49 00 AA 0F C2 06 99 3A 99 22 |......I......:."|
00000790: 48 45 54 20 42 45 53 54 41 4E 44 20 49 53 20 47 |HET BESTAND IS G|
000007A0: 45 53 4C 4F 54 45 4E 20 21 22 00 CD 0F D6 06 99 |ESLOTEN !"......|
000007B0: 22 44 52 55 4B 20 4F 50 20 3C 52 45 54 55 52 4E |"DRUK OP <RETURN|
000007C0: 3E 22 3A 8D 32 31 30 3A 89 31 30 37 30 00 F7 0F |>":.210:.1070...|
000007D0: EA 06 48 4F B2 39 3A 56 45 B2 31 39 3A 8D 31 31 |..HO.9:VE.19:.11|
000007E0: 30 3A 99 22 44 49 54 20 44 4F 45 4E 20 57 45 20 |0:."DIT DOEN WE |
000007F0: 4F 56 45 52 20 21 22 00 08 10 F4 06 81 58 B2 31 |OVER !"......X.1|
00000800: 20 A4 34 30 30 3A 82 58 00 33 10 FE 06 48 4F B2 | .400:.X.3...HO.|
00000810: 39 3A 56 45 B2 31 39 3A 8D 31 31 30 3A 99 22 20 |9:VE.19:.110:." |
00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000830: 20 20 22 00 3D 10 08 07 89 31 34 35 30 00 4A 10 | ".=....1450.J.|
00000840: 12 07 8D 31 30 30 3A 54 B2 30 00 6C 10 26 07 99 |...100:T.0.l.&..|
00000850: 22 49 4E 20 48 45 54 20 42 45 53 54 41 4E 44 20 |"IN HET BESTAND |
00000860: 53 54 41 41 54 20 4E 55 3A 22 3A 99 00 84 10 3A |STAAT NU:":....:|
00000870: 07 81 49 B2 31 20 A4 4B 3A 99 49 3B 22 2E 2E 2E |..I.1 .K:.I;"...|
00000880: 2E 2E 22 3B 00 90 10 4E 07 81 4A B2 31 20 A4 35 |..";...N..J.1 .5|
00000890: 00 A1 10 62 07 99 A3 38 29 3B 42 24 28 49 2C 4A |...b...8);B$(I,J|
000008A0: 29 00 A8 10 76 07 82 4A 00 AE 10 8A 07 99 00 C3 |)...v..J........|
000008B0: 10 9E 07 54 B2 54 AA 31 3A 8B 54 B2 33 20 A7 31 |...T.T.1:.T.3 .1|
000008C0: 39 39 30 00 CA 10 B2 07 82 49 00 F1 10 C6 07 54 |990......I.....T|
000008D0: B2 30 3A 99 22 28 31 29 20 56 45 52 56 4F 4C 47 |.0:."(1) VERVOLG|
000008E0: 20 2D 20 28 32 29 20 4F 56 45 52 5A 49 43 48 54 | - (2) OVERZICHT|
000008F0: 22 00 03 11 DA 07 8D 32 31 30 3A 41 B2 C5 28 49 |"......210:A..(I|
00000900: 4E 24 29 00 1B 11 EE 07 8B 28 41 B3 31 29 20 B0 |N$)......(A.1) .|
00000910: 28 41 B1 32 29 20 A7 32 30 31 30 00 35 11 02 08 |(A.2) .2010.5...|
00000920: 8B 28 41 B2 31 29 20 AF 28 49 B2 4B AA 31 29 20 |.(A.1) .(I.K.1) |
00000930: A7 31 30 37 30 00 61 11 16 08 8D 31 30 30 3A 99 |.1070.a....100:.|
00000940: 22 2A 2A 2A 20 56 45 52 56 4F 4C 47 20 41 44 52 |"*** VERVOLG ADR|
00000950: 45 53 53 45 4E 42 45 53 54 41 4E 44 20 2A 2A 2A |ESSENBESTAND ***|
00000960: 22 00 67 11 2A 08 99 00 7F 11 3E 08 8B 28 41 B2 |".g.*.....>..(A.|
00000970: 31 29 20 AF 28 49 B3 4B 29 20 A7 31 39 37 30 00 |1) .(I.K) .1970.|
00000980: 89 11 52 08 89 31 30 37 30 00 92 11 66 08 8D 31 |..R..1070...f..1|
00000990: 30 30 00 BB 11 7A 08 99 22 2A 2A 2A 20 4F 50 56 |00...z.."*** OPV|
000009A0: 52 41 47 45 4E 20 49 4E 44 49 56 49 44 55 45 4C |RAGEN INDIVIDUEL|
000009B0: 45 20 4E 41 41 4D 20 2A 2A 2A 22 00 D6 11 84 08 |E NAAM ***".....|
000009C0: 99 3A 99 22 56 4F 45 52 20 44 45 20 4E 41 41 4D |.:."VOER DE NAAM|
000009D0: 20 49 4E 3A 22 3B 00 DE 11 8E 08 85 42 24 00 EC | IN:";......B$..|
000009E0: 11 A2 08 99 3A 81 49 B2 31 20 A4 4B 00 01 12 B6 |....:.I.1 .K....|
000009F0: 08 8B 42 24 B3 B1 42 24 28 49 2C 31 29 20 A7 82 |..B$..B$(I,1) ..|
00000A00: 49 00 17 12 CA 08 8B 42 24 B2 42 24 28 49 2C 31 |I......B$.B$(I,1|
00000A10: 29 20 A7 32 32 37 30 00 23 12 DE 08 81 4A B2 31 |) .2270.#....J.1|
00000A20: 20 A4 35 00 30 12 F2 08 99 42 24 28 49 2C 4A 29 | .5.0....B$(I,J)|
00000A30: 00 37 12 06 09 82 4A 00 59 12 1A 09 99 3A 99 3A |.7....J.Y....:.:|
00000A40: 99 22 5A 4F 45 4B 54 20 55 20 4E 4F 47 20 45 45 |."ZOEKT U NOG EE|
00000A50: 4E 20 4E 41 41 4D 20 3F 22 00 5F 12 2E 09 99 00 |N NAAM ?"._.....|
00000A60: 7F 12 42 09 99 22 3C 4A 41 20 3D 20 31 20 3E 20 |..B.."<JA = 1 > |
00000A70: 2D 2D 20 3C 20 4E 45 45 20 3D 20 32 20 3E 22 00 |-- < NEE = 2 >".|
00000A80: 91 12 56 09 8D 32 31 30 3A 41 B2 C5 28 49 4E 24 |..V..210:A..(IN$|
00000A90: 29 00 A9 12 6A 09 8B 28 41 B3 31 29 20 B0 28 41 |)...j..(A.1) .(A|
00000AA0: B1 32 29 20 A7 32 33 37 30 00 B8 12 7E 09 8B 41 |.2) .2370...~..A|
00000AB0: B2 31 20 A7 32 31 35 30 00 C7 12 92 09 8B 41 B2 |.1 .2150......A.|
00000AC0: 32 20 A7 31 30 37 30 00 D0 12 A6 09 8D 31 30 30 |2 .1070......100|
00000AD0: 00 F4 12 BA 09 99 22 20 20 20 20 20 2A 2A 2A 20 |......" *** |
00000AE0: 41 44 52 45 53 53 45 4E 42 45 53 54 41 4E 44 20 |ADRESSENBESTAND |
00000AF0: 2A 2A 2A 22 00 0C 13 CE 09 99 22 4B 45 55 5A 45 |***"......"KEUZE|
00000B00: 20 53 4F 52 54 45 52 45 4E 22 3A 99 00 1F 13 E2 | SORTEREN":.....|
00000B10: 09 99 22 28 31 29 20 20 4E 41 41 4D 22 3A 99 00 |.."(1) NAAM":..|
00000B20: 33 13 F6 09 99 22 28 32 29 20 20 41 44 52 45 53 |3...."(2) ADRES|
00000B30: 22 3A 99 00 4A 13 0A 0A 99 22 28 33 29 20 20 50 |":..J...."(3) P|
00000B40: 4F 53 54 43 4F 44 45 22 3A 99 00 63 13 1E 0A 99 |OSTCODE":..c....|
00000B50: 22 28 34 29 20 20 57 4F 4F 4E 50 4C 41 41 54 53 |"(4) WOONPLAATS|
00000B60: 22 3A 99 00 7A 13 32 0A 99 22 28 35 29 20 20 54 |":..z.2.."(5) T|
00000B70: 45 4C 45 46 4F 4F 4E 22 3A 99 00 9E 13 46 0A 99 |ELEFOON":....F..|
00000B80: 22 57 41 54 20 4B 49 45 53 54 20 55 20 3F 22 3B |"WAT KIEST U ?";|
00000B90: 3A 8D 32 31 30 3A 4A B2 C5 28 49 4E 24 29 00 B6 |:.210:J..(IN$)..|
00000BA0: 13 5A 0A 8B 28 4A B3 31 29 20 B0 28 4A B1 35 29 |.Z..(J.1) .(J.5)|
00000BB0: 20 A7 32 36 33 30 00 C0 13 6E 0A 89 34 30 31 30 | .2630...n..4010|
00000BC0: 00 C9 13 82 0A 8D 31 30 30 00 D6 13 96 0A 8D 32 |......100......2|
00000BD0: 37 30 3A 99 46 52 00 F0 13 AA 0A 99 3A 99 22 44 |70:.FR......:."D|
00000BE0: 52 55 4B 20 4F 50 20 3C 52 45 54 55 52 4E 3E 22 |RUK OP <RETURN>"|
00000BF0: 00 FF 13 BE 0A 8D 32 31 30 3A 89 31 30 37 30 00 |......210:.1070.|
00000C00: 08 14 D2 0A 8D 31 30 30 00 2D 14 E6 0A 99 22 2A |.....100.-...."*|
00000C10: 2A 2A 20 43 4F 52 52 49 47 45 52 45 4E 20 47 45 |** CORRIGEREN GE|
00000C20: 47 45 56 45 4E 53 20 2A 2A 2A 22 3A 99 00 4A 14 |GEVENS ***":..J.|
00000C30: FA 0A 99 22 56 4F 45 52 20 44 45 20 4E 41 41 4D |..."VOER DE NAAM|
00000C40: 20 49 4E 3A 22 3B 3A 85 42 24 00 56 14 0E 0B 81 | IN:";:.B$.V....|
00000C50: 49 B2 31 20 A4 4B 00 6B 14 22 0B 8B 42 24 B3 B1 |I.1 .K.k."..B$..|
00000C60: 42 24 28 49 2C 31 29 20 A7 82 49 00 81 14 36 0B |B$(I,1) ..I...6.|
00000C70: 8B 42 24 B2 42 24 28 49 2C 31 29 20 A7 32 39 31 |.B$.B$(I,1) .291|
00000C80: 30 00 A9 14 4A 0B 99 22 4E 41 41 4D 20 4E 49 45 |0...J.."NAAM NIE|
00000C90: 54 20 49 4E 20 48 45 54 20 42 45 53 54 41 4E 44 |T IN HET BESTAND|
00000CA0: 20 21 22 3A 89 32 38 31 30 00 BC 14 5E 0B 48 4F | !":.2810...^.HO|
00000CB0: B2 32 3A 56 45 B2 35 3A 8D 31 31 30 00 D7 14 72 |.2:VE.5:.110...r|
00000CC0: 0B 99 22 42 49 4A 20 22 3B 42 24 3B 22 20 53 54 |.."BIJ ";B$;" ST|
00000CD0: 41 41 54 3A 22 3A 99 00 E3 14 86 0B 81 4A B2 31 |AAT:":.......J.1|
00000CE0: 20 A4 35 00 F9 14 9A 0B 48 4F B2 31 33 3A 56 45 | .5.....HO.13:VE|
00000CF0: B2 38 AA 4A 3A 8D 31 31 30 00 06 15 AE 0B 99 42 |.8.J:.110......B|
00000D00: 24 28 49 2C 4A 29 00 0D 15 C2 0B 82 4A 00 21 15 |$(I,J)......J.!.|
00000D10: D6 0B 48 4F B2 30 3A 56 45 B2 31 35 3A 8D 31 31 |..HO.0:VE.15:.11|
00000D20: 30 00 4F 15 EA 0B 99 22 57 41 54 20 57 49 4C 54 |0.O...."WAT WILT|
00000D30: 20 55 20 43 4F 52 52 49 47 45 52 45 4E 20 3F 22 | U CORRIGEREN ?"|
00000D40: 3A 99 3A 99 22 28 31 29 20 20 4E 41 41 4D 22 00 |:.:."(1) NAAM".|
00000D50: 72 15 F4 0B 99 22 28 32 29 20 20 41 44 52 45 53 |r...."(2) ADRES|
00000D60: 22 3A 99 22 28 33 29 20 20 50 4F 53 54 43 4F 44 |":."(3) POSTCOD|
00000D70: 45 22 00 9A 15 F9 0B 99 22 28 34 29 20 20 57 4F |E"......"(4) WO|
00000D80: 4F 4E 50 4C 41 41 54 53 22 3A 99 22 28 35 29 20 |ONPLAATS":."(5) |
00000D90: 20 54 45 4C 45 46 4F 4F 4E 22 00 AC 15 FE 0B 8D | TELEFOON"......|
00000DA0: 32 31 30 3A 4A B2 C5 28 49 4E 24 29 00 C4 15 12 |210:J..(IN$)....|
00000DB0: 0C 8B 28 4A B3 31 29 20 B0 28 4A B1 35 29 20 A7 |..(J.1) .(J.5) .|
00000DC0: 33 30 33 30 00 E2 15 26 0C 81 58 B2 31 20 A4 37 |3030...&..X.1 .7|
00000DD0: 3A 48 4F B2 4F 3A 56 45 B2 31 34 AA 58 3A 8D 31 |:HO.O:VE.14.X:.1|
00000DE0: 31 30 00 14 16 30 0C 99 22 20 20 20 20 20 20 20 |10...0.." |
00000DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E10: 22 3A 82 58 00 29 16 3A 0C 48 4F B2 32 3A 56 45 |":.X.).:.HO.2:VE|
00000E20: B2 38 AA 4A 3A 8D 31 31 30 00 4A 16 4E 0C 91 4A |.8.J:.110.J.N..J|
00000E30: 20 89 33 31 37 30 2C 33 31 39 30 2C 33 32 31 30 | .3170,3190,3210|
00000E40: 2C 33 32 33 30 2C 33 32 35 30 00 6D 16 62 0C 99 |,3230,3250.m.b..|
00000E50: 22 4E 41 41 4D 2E 2E 2E 2E 2E 2E 3A 22 3B 3A 85 |"NAAM......:";:.|
00000E60: 42 24 28 49 2C 4A 29 3A 89 33 32 37 30 00 90 16 |B$(I,J):.3270...|
00000E70: 76 0C 99 22 41 44 52 45 53 2E 2E 2E 2E 2E 3A 22 |v.."ADRES.....:"|
00000E80: 3B 3A 85 42 24 28 49 2C 4A 29 3A 89 33 32 37 30 |;:.B$(I,J):.3270|
00000E90: 00 B3 16 8A 0C 99 22 50 4F 53 54 43 4F 44 45 2E |......"POSTCODE.|
00000EA0: 2E 3A 22 3B 3A 85 42 24 28 49 2C 4A 29 3A 89 33 |.:";:.B$(I,J):.3|
00000EB0: 32 37 30 00 D6 16 9E 0C 99 22 57 4F 4F 4E 50 4C |270......"WOONPL|
00000EC0: 41 41 54 53 3A 22 3B 3A 85 42 24 28 49 2C 4A 29 |AATS:";:.B$(I,J)|
00000ED0: 3A 89 33 32 37 30 00 F9 16 B2 0C 99 22 54 45 4C |:.3270......"TEL|
00000EE0: 45 46 4F 4F 4E 2E 2E 3A 22 3B 3A 85 42 24 28 49 |EFOON..:";:.B$(I|
00000EF0: 2C 4A 29 3A 89 33 32 37 30 00 20 17 C6 0C 48 4F |,J):.3270. ...HO|
00000F00: B2 30 3A 56 45 B2 31 35 3A 8D 31 31 30 3A 99 22 |.0:VE.15:.110:."|
00000F10: 20 43 4F 52 52 45 43 54 49 45 20 42 49 4A 3A 22 | CORRECTIE BIJ:"|
00000F20: 00 4D 17 DA 0C 99 22 28 31 29 20 20 44 45 5A 45 |.M...."(1) DEZE|
00000F30: 4C 46 45 20 4E 41 41 4D 22 3A 99 22 28 32 29 20 |LFE NAAM":."(2) |
00000F40: 20 41 4E 44 45 52 45 20 4E 41 41 4D 22 00 66 17 | ANDERE NAAM".f.|
00000F50: E4 0C 99 22 28 33 29 20 20 4E 49 45 4D 41 4E 44 |..."(3) NIEMAND|
00000F60: 20 4D 45 45 52 22 00 8C 17 EE 0C 8D 32 31 30 3A | MEER"......210:|
00000F70: 41 B2 C5 28 49 4E 24 29 3A 8B 28 41 B3 31 29 20 |A..(IN$):.(A.1) |
00000F80: B0 28 41 B1 33 29 20 A7 33 32 39 30 00 AA 17 02 |.(A.3) .3290....|
00000F90: 0D 81 58 B2 31 20 A4 36 3A 48 4F B2 30 3A 56 45 |..X.1 .6:HO.0:VE|
00000FA0: B2 31 35 AA 58 3A 8D 31 31 30 00 DC 17 0C 0D 99 |.15.X:.110......|
00000FB0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FD0: 20 20 20 20 20 20 20 20 22 3A 82 58 00 F3 17 16 | ":.X....|
00000FE0: 0D 91 41 20 89 33 30 33 30 2C 32 37 37 30 2C 31 |..A .3030,2770,1|
00000FF0: 30 37 30 00 FC 17 2A 0D 8D 31 30 30 00 06 18 3E |070...*..100...>|
00001000: 0D 8D 34 39 33 30 00 1C 18 52 0D 99 3A 99 22 57 |..4930...R..:."W|
00001010: 41 43 48 54 20 45 56 45 4E 20 21 22 00 3E 18 5C |ACHT EVEN !".>.\|
00001020: 0D 99 3A 99 22 44 41 54 41 20 57 4F 52 44 54 20 |..:."DATA WORDT |
00001030: 57 45 47 47 45 53 43 48 52 45 56 45 4E 22 00 4A |WEGGESCHREVEN".J|
00001040: 18 66 0D 44 24 B2 C7 28 34 29 00 5C 18 7A 0D 99 |.f.D$..(4).\.z..|
00001050: 44 24 3B 22 4F 50 45 4E 22 3B 5A 24 00 70 18 8E |D$;"OPEN";Z$.p..|
00001060: 0D 99 44 24 3B 22 44 45 4C 45 54 45 22 3B 5A 24 |..D$;"DELETE";Z$|
00001070: 00 89 18 A2 0D 99 44 24 3B 22 4F 50 45 4E 22 3B |......D$;"OPEN";|
00001080: 5A 24 3B 22 2C 4C 38 30 22 00 95 18 B6 0D 81 49 |Z$;",L80"......I|
00001090: B2 31 20 A4 4B 00 AF 18 CA 0D 99 44 24 3B 22 57 |.1 .K......D$;"W|
000010A0: 52 49 54 45 22 3B 5A 24 3B 22 2C 52 22 3B 49 00 |RITE";Z$;",R";I.|
000010B0: BB 18 DE 0D 81 4A B2 31 20 A4 35 00 C8 18 F2 0D |.....J.1 .5.....|
000010C0: 99 42 24 28 49 2C 4A 29 00 CF 18 06 0E 82 4A 00 |.B$(I,J)......J.|
000010D0: D6 18 1A 0E 82 49 00 EF 18 2E 0E 99 44 24 3B 22 |.....I......D$;"|
000010E0: 57 52 49 54 45 22 3B 5A 24 3B 22 2C 52 30 22 00 |WRITE";Z$;",R0".|
000010F0: F6 18 42 0E 99 4B 00 09 19 56 0E 99 44 24 3B 22 |..B..K...V..D$;"|
00001100: 43 4C 4F 53 45 22 3B 5A 24 00 13 19 6A 0E 89 31 |CLOSE";Z$...j..1|
00001110: 30 37 30 00 1C 19 7E 0E 8D 31 30 30 00 26 19 92 |070...~..100.&..|
00001120: 0E 8D 34 39 33 30 00 3C 19 A6 0E 99 3A 99 22 57 |..4930.<....:."W|
00001130: 41 43 48 54 20 45 56 45 4E 20 21 22 00 5A 19 B0 |ACHT EVEN !".Z..|
00001140: 0E 99 3A 99 22 44 41 54 41 20 57 4F 52 44 54 20 |..:."DATA WORDT |
00001150: 4F 50 47 45 5A 4F 43 48 54 22 00 66 19 BA 0E 44 |OPGEZOCHT".f...D|
00001160: 24 B2 C7 28 34 29 00 7F 19 CE 0E 99 44 24 3B 22 |$..(4)......D$;"|
00001170: 4F 50 45 4E 22 3B 5A 24 3B 22 2C 4C 38 30 22 00 |OPEN";Z$;",L80".|
00001180: 97 19 E2 0E 99 44 24 3B 22 52 45 41 44 22 3B 5A |.....D$;"READ";Z|
00001190: 24 3B 22 2C 52 30 22 00 9E 19 F6 0E 85 4B 00 AA |$;",R0"......K..|
000011A0: 19 0A 0F 81 49 B2 31 20 A4 4B 00 C3 19 1E 0F 99 |....I.1 .K......|
000011B0: 44 24 3B 22 52 45 41 44 22 3B 5A 24 3B 22 2C 52 |D$;"READ";Z$;",R|
000011C0: 22 3B 49 00 CF 19 32 0F 81 4A B2 31 20 A4 35 00 |";I...2..J.1 .5.|
000011D0: DC 19 46 0F 85 42 24 28 49 2C 4A 29 00 E6 19 5A |..F..B$(I,J)...Z|
000011E0: 0F 82 4A 3A 82 49 00 F9 19 6E 0F 99 44 24 3B 22 |..J:.I...n..D$;"|
000011F0: 43 4C 4F 53 45 22 3B 5A 24 00 03 1A 82 0F 89 31 |CLOSE";Z$......1|
00001200: 30 37 30 00 22 1A 96 0F 8F 20 20 2A 2A 2A 20 53 |070.".... *** S|
00001210: 4F 52 54 45 45 52 2D 52 4F 55 54 49 4E 45 20 2A |ORTEER-ROUTINE *|
00001220: 2A 2A 00 2E 1A AA 0F 81 49 B2 31 20 A4 4B 00 39 |**......I.1 .K.9|
00001230: 1A BE 0F 43 28 49 29 B2 49 00 40 1A D2 0F 82 49 |...C(I).I.@....I|
00001240: 00 4C 1A E6 0F 81 49 B2 32 20 A4 4B 00 55 1A FA |.L....I.2 .K.U..|
00001250: 0F 58 31 B2 31 00 5E 1A 0E 10 58 32 B2 49 00 69 |.X1.1.^...X2.I.i|
00001260: 1A 22 10 50 B2 43 28 49 29 00 80 1A 36 10 58 33 |.".P.C(I)...6.X3|
00001270: B2 58 31 AA B5 28 28 58 32 AB 58 31 29 AD 32 29 |.X1..((X2.X1).2)|
00001280: 00 8D 1A 4A 10 50 31 B2 43 28 58 33 29 00 A9 1A |...J.P1.C(X3)...|
00001290: 5E 10 8B 42 24 28 50 2C 4A 29 B3 42 24 28 50 31 |^..B$(P,J).B$(P1|
000012A0: 2C 4A 29 20 A7 34 32 37 30 00 C5 1A 72 10 8B 42 |,J) .4270...r..B|
000012B0: 24 28 50 2C 4A 29 B1 42 24 28 50 31 2C 4A 29 20 |$(P,J).B$(P1,J) |
000012C0: A7 34 33 33 30 00 CF 1A 86 10 58 32 B2 58 33 00 |.4330.....X2.X3.|
000012D0: D9 1A 9A 10 89 34 33 39 30 00 EA 1A AE 10 8B 58 |.....4390......X|
000012E0: 32 B2 58 33 20 A7 34 33 39 30 00 F4 1A C2 10 58 |2.X3 .4390.....X|
000012F0: 32 B2 58 33 00 FE 1A D6 10 89 34 31 35 30 00 0F |2.X3......4150..|
00001300: 1B EA 10 8B 58 31 B2 58 33 20 A7 34 33 39 30 00 |....X1.X3 .4390.|
00001310: 19 1B FE 10 58 31 B2 58 33 00 23 1B 12 11 89 34 |....X1.X3.#....4|
00001320: 31 35 30 00 33 1B 26 11 8B 49 B2 58 32 20 A7 34 |150.3.&..I.X2 .4|
00001330: 34 37 30 00 46 1B 3A 11 81 58 B2 49 20 A4 58 32 |470.F.:..X.I .X2|
00001340: AA 31 20 A9 AB 31 00 56 1B 4E 11 43 28 58 29 B2 |.1 ..1.V.N.C(X).|
00001350: 43 28 58 AB 31 29 00 5D 1B 62 11 82 58 00 69 1B |C(X.1).].b..X.i.|
00001360: 76 11 43 28 58 32 29 B2 50 00 70 1B 8A 11 82 49 |v.C(X2).P.p....I|
00001370: 00 78 1B 9E 11 54 B2 30 00 84 1B B2 11 81 49 B2 |.x...T.0......I.|
00001380: 31 20 A4 4B 00 8E 1B C6 11 54 B2 54 AA 31 00 9E |1 .K.....T.T.1..|
00001390: 1B DA 11 8B 54 B3 B1 31 20 A7 34 36 35 30 00 A7 |....T..1 .4650..|
000013A0: 1B EE 11 8D 31 30 30 00 C7 1B 02 12 99 22 2A 2A |....100......"**|
000013B0: 2A 20 41 44 52 45 53 53 45 4E 20 42 45 53 54 41 |* ADRESSEN BESTA|
000013C0: 4E 44 20 2A 2A 2A 22 00 CD 1B 16 12 99 00 D8 1B |ND ***".........|
000013D0: 2A 12 50 B2 43 28 49 29 00 E9 1B 3E 12 99 49 3B |*.P.C(I)...>..I;|
000013E0: 22 2E 2E 2E 2E 2E 2E 22 3B 00 F5 1B 52 12 81 58 |"......";...R..X|
000013F0: B2 31 20 A4 35 00 0B 1C 66 12 8B 42 24 28 50 2C |.1 .5...f..B$(P,|
00001400: 58 29 B2 22 22 20 A7 34 37 35 30 00 1C 1C 7A 12 |X)."" .4750...z.|
00001410: 99 A3 39 29 3B 42 24 28 50 2C 58 29 00 23 1C 8E |..9);B$(P,X).#..|
00001420: 12 82 58 00 29 1C A2 12 99 00 39 1C B6 12 8B 54 |..X.).....9....T|
00001430: B3 B1 33 20 A7 34 38 39 30 00 66 1C CA 12 99 22 |..3 .4890.f...."|
00001440: 57 49 4C 54 20 55 20 44 45 20 52 45 53 54 20 56 |WILT U DE REST V|
00001450: 41 4E 20 44 45 20 47 45 47 45 56 45 4E 53 20 4A |AN DE GEGEVENS J|
00001460: 41 2F 4E 45 45 22 00 76 1C DE 12 8D 32 31 30 3A |A/NEE".v....210:|
00001470: 41 24 B2 49 4E 24 00 96 1C F2 12 8B 28 49 4E 24 |A$.IN$......(IN$|
00001480: B2 22 4E 22 29 20 B0 28 49 4E 24 B2 22 4E 22 29 |."N") .(IN$."N")|
00001490: 20 A7 31 30 37 30 00 9E 1C 06 13 54 B2 30 00 A5 | .1070.....T.0..|
000014A0: 1C 1A 13 82 49 00 C3 1C 2E 13 99 22 44 52 55 4B |....I......"DRUK|
000014B0: 20 4F 50 20 3C 52 45 54 55 52 4E 3E 22 3A 49 B2 | OP <RETURN>":I.|
000014C0: 49 AB 31 00 D2 1C 38 13 8D 32 31 30 3A 89 31 30 |I.1...8..210:.10|
000014D0: 37 30 00 EA 1C 42 13 99 22 42 45 53 54 41 41 4E |70...B.."BESTAAN|
000014E0: 44 45 20 46 49 4C 45 53 3A 22 00 00 1D 56 13 99 |DE FILES:"...V..|
000014F0: 3A 99 22 28 31 29 20 20 46 41 4D 49 4C 49 45 22 |:."(1) FAMILIE"|
00001500: 00 18 1D 6A 13 99 3A 99 22 28 32 29 20 20 42 45 |...j..:."(2) BE|
00001510: 44 52 2F 49 4E 53 54 22 00 32 1D 7E 13 99 3A 99 |DR/INST".2.~..:.|
00001520: 22 28 33 29 20 20 56 52 49 45 4E 44 2F 4B 45 4E |"(3) VRIEND/KEN|
00001530: 4E 22 00 4A 1D 92 13 99 3A 99 22 28 34 29 20 20 |N".J....:."(4) |
00001540: 4B 4F 4C 4C 45 47 41 27 53 22 00 63 1D A6 13 99 |KOLLEGA'S".c....|
00001550: 3A 99 22 28 35 29 20 20 53 50 4F 52 54 43 4C 55 |:."(5) SPORTCLU|
00001560: 42 53 22 00 7C 1D BA 13 99 3A 99 22 28 36 29 20 |BS".|....:."(6) |
00001570: 20 56 52 49 4A 45 20 4B 45 55 53 22 00 94 1D CE | VRIJE KEUS"....|
00001580: 13 99 3A 99 22 20 20 20 20 20 55 20 4B 49 45 53 |..:." U KIES|
00001590: 54 20 3F 22 00 9D 1D E2 13 8D 32 31 30 00 AA 1D |T ?"......210...|
000015A0: F6 13 41 B2 C5 28 49 4E 24 29 00 C2 1D 0A 14 8B |..A..(IN$)......|
000015B0: 28 41 B3 31 29 20 B0 28 41 B1 36 29 20 A7 35 30 |(A.1) .(A.6) .50|
000015C0: 39 30 00 E8 1D 1E 14 91 41 20 89 35 31 37 30 2C |90......A .5170,|
000015D0: 35 31 39 30 2C 35 32 31 30 2C 35 32 33 30 2C 35 |5190,5210,5230,5|
000015E0: 32 35 30 2C 35 32 37 30 00 FF 1D 32 14 5A 24 B2 |250,5270...2.Z$.|
000015F0: 22 46 41 4D 49 4C 49 45 22 3A 89 35 32 39 30 00 |"FAMILIE":.5290.|
00001600: 18 1E 46 14 5A 24 B2 22 42 45 44 52 2F 49 4E 53 |..F.Z$."BEDR/INS|
00001610: 54 22 3A 89 35 32 39 30 00 33 1E 5A 14 5A 24 B2 |T":.5290.3.Z.Z$.|
00001620: 22 56 52 49 45 4E 44 2F 4B 45 4E 4E 22 3A 89 35 |"VRIEND/KENN":.5|
00001630: 32 39 30 00 4C 1E 6E 14 5A 24 B2 22 4B 4F 4C 4C |290.L.n.Z$."KOLL|
00001640: 45 47 41 27 53 22 3A 89 35 32 39 30 00 60 1E 82 |EGA'S":.5290.`..|
00001650: 14 5A 24 B2 22 53 50 4F 52 54 43 4C 55 42 53 22 |.Z$."SPORTCLUBS"|
00001660: 00 79 1E 96 14 99 3A 99 22 44 41 54 41 20 4E 41 |.y....:."DATA NA|
00001670: 41 4D 3A 22 3B 3A 85 5A 24 00 7F 1E AA 14 8E 00 |AM:";:.Z$.......|
00001680: 88 1E 70 17 8D 31 30 30 00 B8 1E 7A 17 99 22 20 |..p..100...z.." |
00001690: 4D 45 54 20 44 49 54 20 50 52 4F 47 52 41 4D 4D |MET DIT PROGRAMM|
000016A0: 41 20 4B 55 4E 54 20 55 20 45 45 4E 20 41 44 52 |A KUNT U EEN ADR|
000016B0: 45 53 53 45 4E 22 3A 99 00 D4 1E 7F 17 99 22 20 |ESSEN":......." |
000016C0: 42 45 53 54 41 4E 44 20 4F 50 42 4F 55 57 45 4E |BESTAND OPBOUWEN|
000016D0: 2E 22 3A 99 00 F9 1E 84 17 99 22 20 48 45 54 20 |.":......." HET |
000016E0: 50 52 4F 47 52 41 4D 4D 41 20 49 53 20 56 4F 4F |PROGRAMMA IS VOO|
000016F0: 52 5A 49 45 4E 20 22 3A 99 00 2A 1F 8E 17 99 22 |RZIEN ":..*...."|
00001700: 20 56 41 4E 20 45 45 4E 20 53 4F 52 54 45 45 52 | VAN EEN SORTEER|
00001710: 2D 52 4F 55 54 49 4E 45 20 45 4E 20 4B 41 4E 20 |-ROUTINE EN KAN |
00001720: 44 45 20 44 41 54 41 22 3A 99 00 59 1F 98 17 99 |DE DATA":..Y....|
00001730: 22 20 53 41 56 45 4E 20 45 4E 20 49 4E 4C 45 5A |" SAVEN EN INLEZ|
00001740: 45 4E 20 4F 50 2F 56 41 4E 20 44 49 53 4B 45 54 |EN OP/VAN DISKET|
00001750: 54 45 20 49 4E 2D 22 3A 99 00 89 1F A2 17 99 22 |TE IN-":......."|
00001760: 20 44 49 45 4E 20 55 57 20 53 59 53 54 45 45 4D | DIEN UW SYSTEEM|
00001770: 20 43 4F 4D 50 41 54 49 42 4C 45 20 49 53 20 4D | COMPATIBLE IS M|
00001780: 45 54 20 41 50 50 4C 45 22 00 B9 1F AC 17 99 22 |ET APPLE"......"|
00001790: 20 49 4E 20 41 4E 44 45 52 45 20 47 45 56 41 4C | IN ANDERE GEVAL|
000017A0: 4C 45 4E 20 4D 4F 45 54 20 55 20 44 45 20 52 4F |LEN MOET U DE RO|
000017B0: 55 54 49 4E 45 53 22 3A 99 00 E4 1F B6 17 99 22 |UTINES":......."|
000017C0: 20 4F 50 20 44 45 20 52 45 47 45 4C 53 20 33 33 | OP DE REGELS 33|
000017D0: 37 30 2D 33 39 37 30 20 41 41 4E 50 41 53 53 45 |70-3970 AANPASSE|
000017E0: 4E 22 3A 99 00 0E 20 C0 17 99 22 20 56 45 45 4C |N":... ..." VEEL|
000017F0: 20 53 55 43 43 45 53 20 4D 45 54 20 48 45 54 20 | SUCCES MET HET |
00001800: 50 52 4F 47 52 41 4D 4D 41 20 21 22 3A 99 00 2F |PROGRAMMA !":../|
00001810: 20 CA 17 99 22 20 20 20 20 20 20 20 3C 54 4F 45 | ..." <TOE|
00001820: 54 53 3E 22 3A 8D 32 31 30 3A 89 31 30 35 30 00 |TS>":.210:.1050.|
00001830: 4D 20 30 75 8F 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |M 0u. *********|
00001840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 6B 20 |*************.k |
00001850: 3A 75 8F 20 20 2A 20 41 44 52 45 53 53 45 4E 42 |:u. * ADRESSENB|
00001860: 45 53 54 41 4E 44 20 20 20 20 2A 00 89 20 44 75 |ESTAND *.. Du|
00001870: 8F 20 20 2A 20 47 45 53 43 48 52 45 56 45 4E 20 |. * GESCHREVEN |
00001880: 4F 50 20 45 45 4E 20 20 2A 00 A7 20 4E 75 8F 20 |OP EEN *.. Nu. |
00001890: 20 2A 20 4D 49 43 52 4F 50 52 4F 46 45 53 53 4F | * MICROPROFESSO|
000018A0: 52 20 49 49 20 20 2A 00 C5 20 58 75 8F 20 20 2A |R II *.. Xu. *|
000018B0: 20 44 4F 4F 52 20 46 2E 44 4F 4F 4C 41 45 47 45 | DOOR F.DOOLAEGE|
000018C0: 20 20 20 20 2A 00 E3 20 62 75 8F 20 20 2A 20 47 | *.. bu. * G|
000018D0: 52 41 41 46 4A 41 4E 53 44 49 4A 4B 20 42 31 39 |RAAFJANSDIJK B19|
000018E0: 35 20 2A 00 01 21 6C 75 8F 20 20 2A 20 34 35 35 |5 *..!lu. * 455|
000018F0: 34 20 4C 47 20 57 45 53 54 44 4F 52 50 45 20 20 |4 LG WESTDORPE |
00001900: 2A 00 1F 21 76 75 8F 20 20 2A 20 5A 45 45 4C 41 |*..!vu. * ZEELA|
00001910: 4E 44 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 2A 00 |ND .......... *.|
00001920: 3D 21 7B 75 8F 20 20 2A 20 20 20 20 20 20 20 20 |=!{u. * |
00001930: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 5B 21 | *.[!|
00001940: 80 75 8F 20 20 2A 20 42 41 53 49 43 4F 44 45 20 |.u. * BASICODE |
00001950: 32 20 20 4E 2E 4F 2E 53 2E 20 2A 00 79 21 8A 75 |2 N.O.S. *.y!.u|
00001960: 8F 20 20 2A 20 50 4F 53 54 42 55 53 20 31 32 30 |. * POSTBUS 120|
00001970: 30 20 20 20 20 20 20 20 2A 00 97 21 94 75 8F 20 |0 *..!.u. |
00001980: 20 2A 20 31 32 30 30 20 4A 42 20 20 48 49 4C 56 | * 1200 JB HILV|
00001990: 45 52 53 55 4D 20 2A 00 B5 21 9E 75 8F 20 20 2A |ERSUM *..!.u. *|
000019A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000019B0: 2A 2A 2A 2A 2A 00 BC 21 A8 75 8F 20 00 DA 21 B2 |*****..!.u. ..!.|
000019C0: 75 8F 20 43 4F 50 59 52 49 47 48 54 20 4E 4F 53 |u. COPYRIGHT NOS|
000019D0: 20 48 49 4C 56 45 52 53 55 4D 00 00 00 | HILVERSUM... |
......."..":.53280,5:.53281,6.'....1000.
1....1010.=.D..".";:..M.N..H("..........
...............",.(.(VE.1)));.}.P....(HO
));:....X.HO.B(209).256.B(210).1024.B(21
1)...Y.VE..(HO.40):HO.HO.40.VE:..K.H..IN
$:....R..IN$:.IN$."".210............5429
6,15:.54278,255:.54273,95:.54276,17.%...
.OO.1.200:.OO.F....54276,0:.54277,0:.542
78,0:..T...RV..(1):..B...FR..(0):....,.S
R$.D(SR):.H(SR$,1)." ".SR$.J(SR$,2)...-.
....6.SR$."":.SR..10.(CT.CN..(CN)).318.Q
.7..SR...5.10..CN.SR$."-"...8.SR$.SR$.J(
D(.(.(SR)..5.10..CN)),2).#.9..C(SR$).CT.
CN.(CN..0).SR$." ".SR$:.313.=.:..CN.0..(
SR)..1E10.316.Q.;.SR$.SR$.J(D(1..(SR)..(
.(SR))..5.10..CN),3,CN.1)...<..C(SR$).CT
.SR$.SR$." ":.316...=..C(SR$).CT.SR$."".
G.>..C(SR$).CT.SR$.SR$."*":.318.M.?.....
^..4,4:.4,SR$;: 4:....H..4,4:.4: 4:.....
.A.1000:.20:. ** ADRESSENBESTAND **.$..
.I.0.M....100:."WILT U INFORMATIE <J/N>"
:.210.M....(IN$."J") .(IN$."J") .6000...
...(IN$."N") .(IN$."N") .1050......1010.
.....B$(350,5),C(350)......100...B.."***
OVERZICHT ADRESSEN BESTAND ***":....V..
"(1) INVOEREN GEGEVENS":..!.J.."(2) OP
VRAGEN BESTAND":..I.~.."(3) OPVRAGEN IN
DIVIDUELE NAAM":..H...."(4) SORTEREN
":......."(5) OPVRAGEN GEHEUGENRUI
MTE":......."(6) CORRIGEREN GEGEVENS":.
.O.N.."(7) DATA SAVEN ":......."(8
) DATA INLEZEN ":......." WAT KI
EST U ?"......210:A.E(IN$):.(A.1) .(A.8)
.1290.^....A .1330,1810,2150,2470,2690,
2770,3370,3710.G.2..100...F.."*** INVOER
GEGEVENS ***"...P..:."BESTAND SLUITEN M
ET 000"...Z.."CORRECTIE MET 999"...N..I.
2 .I.K:.I.K .350:.1430......I.1 .350....
.HO.4:VE.5:.110:.I......J.1 .5.#.R.HO.4:
VE.7.J:.110.D....J .1530,1550,1570,1590,
1610.G...."NAAM: ";:.B$(I,J):.1630.
....."ADRES: ";:.B$(I,J):.1630..."..
"POSTCODE: ";:.B$(I,J):.1630.P.6.."WOON
PLAATS:";:.B$(I,J):.1630...J.."TELEFOON:
";:.B$(I,J):.1630...^..B$(I,J)."000" .
K.I:.1730.*.R..B$(I,J)."999" .1770.1....
J.N....X.1 .5:HO.0:VE.7.X:.110......"
":.X
......I...B..:."HET BESTAND IS GESLOTEN
!".M.V.."DRUK OP <RETURN>":.210:.1070...
..HO.9:VE.19:.110:."DIT DOEN WE OVER !".
.....X.1 .400:.X.3...HO.9:VE.19:.110:."
".=....1450.J....100:T
.0.L.&.."IN HET BESTAND STAAT NU:":....:
..I.1 .K:.I;".....";...N..J.1 .5...B...8
);B$(I,J)...V..J.......C...T.T.1:.T.3 .1
990.J....I...F.T.0:."(1) VERVOLG - (2) O
VERZICHT"...Z..210:A.E(IN$)......(A.1) .
(A.2) .2010.5....(A.1) .(I.K.1) .1070.A.
...100:."*** VERVOLG ADRESSENBESTAND ***
".G.*....>..(A.1) .(I.K) .1970...R..107
0...F..100...Z.."*** OPVRAGEN INDIVIDUEL
E NAAM ***".V....:."VOER DE NAAM IN:";..
....B$......:.I.1 .K......B$..B$(I,1) ..
I...J..B$.B$(I,1) .2270.#....J.1 .5.0...
.B$(I,J).7....J.Y....:.:."ZOEKT U NOG EE
N NAAM ?"._......B.."<JA = 1 > -- < NEE
= 2 >"...V..210:A.E(IN$)...J..(A.1) .(A
.2) .2370...~..A.1 .2150.G....A.2 .1070.
P....100......" *** ADRESSENBESTAND
***"...N.."KEUZE SORTEREN":......."(1)
NAAM":..3...."(2) ADRES":..J...."(3) P
OSTCODE":..C...."(4) WOONPLAATS":..Z.2.
."(5) TELEFOON":....F.."WAT KIEST U ?";
:.210:J.E(IN$)...Z..(J.1) .(J.5) .2630..
.N..4010.I....100.V....270:.FR......:."D
RUK OP <RETURN>"......210:.1070...R..100
.-...."*** CORRIGEREN GEGEVENS ***":..J.
..."VOER DE NAAM IN:";:.B$.V....I.1 .K.K
."..B$..B$(I,1) ..I...6..B$.B$(I,1) .291
0...J.."NAAM NIET IN HET BESTAND !":.281
0...^.HO.2:VE.5:.110.W.R.."BIJ ";B$;" ST
AAT:":.......J.1 .5.....HO.13:VE.8.J:.11
0......B$(I,J)...B..J.!.V.HO.0:VE.15:.11
0.O...."WAT WILT U CORRIGEREN ?":.:."(1)
NAAM".R...."(2) ADRES":."(3) POSTCOD
E"......"(4) WOONPLAATS":."(5) TELEFOO
N"......210:J.E(IN$).D....(J.1) .(J.5) .
3030...&..X.1 .7:HO.O:VE.14.X:.110...0..
"
":.X.).:.HO.2:VE.8.J:.110.J.N..J .3170,3
190,3210,3230,3250.M.B.."NAAM......:";:.
B$(I,J):.3270...V.."ADRES.....:";:.B$(I,
J):.3270......"POSTCODE..:";:.B$(I,J):.3
270.V...."WOONPLAATS:";:.B$(I,J):.3270..
...."TELEFOON..:";:.B$(I,J):.3270. .F.HO
.0:VE.15:.110:." CORRECTIE BIJ:".M.Z.."(
1) DEZELFE NAAM":."(2) ANDERE NAAM".F.
..."(3) NIEMAND MEER"......210:A.E(IN$)
:.(A.1) .(A.3) .3290......X.1 .6:HO.0:VE
.15.X:.110......"
":.X......A .3030,2770,1
070...*..100...>..4930...R..:."WACHT EVE
N !".>.\..:."DATA WORDT WEGGESCHREVEN".J
.F.D$.G(4).\.Z..D$;"OPEN";Z$.P....D$;"DE
LETE";Z$......D$;"OPEN";Z$;",L80"......I
.1 .K...J..D$;"WRITE";Z$;",R";I......J.1
.5.H....B$(I,J).O....J.V....I......D$;"
WRITE";Z$;",R0"...B..K...V..D$;"CLOSE";Z
$...J..1070...~..100.&....4930.<....:."W
ACHT EVEN !".Z....:."DATA WORDT OPGEZOCH
T".F...D$.G(4)..N..D$;"OPEN";Z$;",L80".
.....D$;"READ";Z$;",R0"......K......I.1
.K.C....D$;"READ";Z$;",R";I.O.2..J.1 .5.
..F..B$(I,J)...Z..J:.I...N..D$;"CLOSE";Z
$......1070.".... *** SORTEER-ROUTINE *
**......I.1 .K.9...C(I).I.@.R..I.L....I.
2 .K.U...X1.1.^...X2.I.I.".P.C(I)...6.X3
.X1..((X2.X1).2)...J.P1.C(X3)...^..B$(P,
J).B$(P1,J) .4270.E.R..B$(P,J).B$(P1,J)
.4330.O...X2.X3.Y....4390......X2.X3 .43
90...B.X2.X3...V..4150......X1.X3 .4390.
....X1.X3.#....4150.3.&..I.X2 .4470.F.:.
.X.I .X2.1 ..1.V.N.C(X).C(X.1).].B..X.I.
V.C(X2).P.P....I.X...T.0......I.1 .K...F
.T.T.1...Z..T..1 .4650......100.G...."**
* ADRESSEN BESTAND ***".M.....X.*.P.C(I)
...>..I;"......";...R..X.1 .5...F..B$(P,
X)."" .4750...Z...9);B$(P,X).#....X.)...
..9....T..3 .4890.F.J.."WILT U DE REST V
AN DE GEGEVENS JA/NEE".V....210:A$.IN$..
....(IN$."N") .(IN$."N") .1070.....T.0..
....I.C...."DRUK OP <RETURN>":I.I.1.R.8.
.210:.1070...B.."BESTAANDE FILES:"...V..
:."(1) FAMILIE"...J..:."(2) BEDR/INST"
.2.~..:."(3) VRIEND/KENN".J....:."(4)
KOLLEGA'S".C....:."(5) SPORTCLUBS".|...
.:."(6) VRIJE KEUS"...N..:." U KIES
T ?"......210.....A.E(IN$).B....(A.1) .(
A.6) .5090......A .5170,5190,5210,5230,5
250,5270...2.Z$."FAMILIE":.5290...F.Z$."
BEDR/INST":.5290.3.Z.Z$."VRIEND/KENN":.5
290.L.N.Z$."KOLLEGA'S":.5290.`...Z$."SPO
RTCLUBS".Y....:."DATA NAAM:";:.Z$......
..P..100...Z.." MET DIT PROGRAMMA KUNT U
EEN ADRESSEN":..T..." BESTAND OPBOUWEN
.":......." HET PROGRAMMA IS VOORZIEN ":
..*...." VAN EEN SORTEER-ROUTINE EN KAN
DE DATA":..Y...." SAVEN EN INLEZEN OP/VA
N DISKETTE IN-":......." DIEN UW SYSTEEM
COMPATIBLE IS MET APPLE"......" IN ANDE
RE GEVALLEN MOET U DE ROUTINES":......."
OP DE REGELS 3370-3970 AANPASSEN":... .
.." VEEL SUCCES MET HET PROGRAMMA !":../
J.." <TOETS>":.210:.1050.M 0U. *
*********************.K :U. * ADRESSENB
ESTAND *.. DU. * GESCHREVEN OP EEN
*.. NU. * MICROPROFESSOR II *.E XU. *
DOOR F.DOOLAEGE *.. BU. * GRAAFJANS
DIJK B195 *..!LU. * 4554 LG WESTDORPE
*..!VU. * ZEELAND .......... *.=!{U. *
*.[!.U. * BASICODE
2 N.O.S. *.Y!.U. * POSTBUS 1200
*..!.U. * 1200 JB HILVERSUM *..!.U. *
*********************..!.U. .Z!.U. COPYR
IGHT NOS HILVERSUM...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL