ADRESSENBESTAND
FILE INFORMATION
FILENAME(S): ADRESSENBESTAND
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-12-01 02:26:39
APPEARS ON: 1 disk(s)
FILE HASH
295c3ce27ba21532a54dfaa0c89de208f898e5ac520d3881ded1f8ac69bbac27
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TONSOFT | ADRESSENBESTAND | PRG | hedning, shine | 17 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 97 35 33 32 38 30 2C 30 3A 97 |....d..53280,0:.|
00000010: 35 33 32 38 31 2C 30 00 39 08 69 00 46 52 B2 31 |53281,0.9.i.FR.1|
00000020: 3A 49 24 B2 22 2D 46 49 4C 45 22 3A 54 41 50 45 |:I$."-FILE":TAPE|
00000030: B2 31 3A 99 C7 28 31 34 29 00 42 08 6E 00 89 31 |.1:..(14).B.n..1|
00000040: 32 35 00 57 08 73 00 A1 48 31 24 3A 8B 48 31 24 |25.W.s..H1$:.H1$|
00000050: B2 22 22 A7 31 31 35 00 67 08 78 00 48 31 B2 C5 |."".115.g.x.H1..|
00000060: 28 48 31 24 29 3A 8E 00 84 08 7D 00 41 31 B2 31 |(H1$):....}.A1.1|
00000070: 30 30 3A 8F 20 41 41 4E 54 41 4C 20 41 44 52 45 |00:. AANTAL ADRE|
00000080: 53 53 45 4E 00 CC 08 82 00 86 4E 24 28 41 31 29 |SSEN......N$(A1)|
00000090: 2C 41 24 28 41 31 29 2C 50 24 28 41 31 29 2C 57 |,A$(A1),P$(A1),W|
000000A0: 24 28 41 31 29 2C 54 24 28 41 31 29 2C 4B 31 24 |$(A1),T$(A1),K1$|
000000B0: 28 41 31 29 2C 4B 32 24 28 41 31 29 2C 48 25 28 |(A1),K2$(A1),H%(|
000000C0: 41 31 29 2C 49 25 28 32 AC 41 31 29 00 14 09 87 |A1),I%(2.A1)....|
000000D0: 00 8F 20 49 4E 20 48 25 2D 54 41 42 45 4C 20 53 |.. IN H%-TABEL S|
000000E0: 54 41 41 54 20 44 45 20 56 4F 4C 47 4F 52 44 45 |TAAT DE VOLGORDE|
000000F0: 2D 2A 44 45 20 49 4E 44 45 58 2A 2D 20 56 41 4E |-*DE INDEX*- VAN|
00000100: 20 44 45 20 44 49 56 45 52 53 45 20 54 41 42 45 | DE DIVERSE TABE|
00000110: 4C 4C 45 4E 00 2B 09 8C 00 81 4A B2 30 A4 41 31 |LLEN.+....J.0.A1|
00000120: 3A 48 25 28 4A 29 B2 4A 3A 82 4A 00 5E 09 91 00 |:H%(J).J:.J.^...|
00000130: 99 22 93 05 C3 C2 CD 2D 36 34 20 C3 CC C1 C9 D2 |.".....-64 .....|
00000140: C5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000150: 20 20 28 C3 29 20 D4 C5 CC C5 C1 C3 22 3B 00 8E | (.) ......";..|
00000160: 09 96 00 99 22 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 |...."...........|
00000170: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 |................|
00000180: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 22 00 BD |............."..|
00000190: 09 9B 00 99 22 9A 11 12 31 92 2E 20 C9 4E 56 4F |...."...1.. .NVO|
000001A0: 45 52 42 45 53 54 41 4E 44 20 4D 41 4B 45 4E 20 |ERBESTAND MAKEN |
000001B0: 4F 46 20 55 49 54 42 52 45 49 44 45 4E 00 E6 09 |OF UITBREIDEN...|
000001C0: A0 00 99 22 11 12 32 92 2E 20 C9 4E 48 4F 55 44 |..."..2.. .NHOUD|
000001D0: 20 54 4F 4E 45 4E 20 56 41 4E 20 48 45 54 20 42 | TONEN VAN HET B|
000001E0: 45 53 54 41 4E 44 00 23 0A A5 00 99 22 11 12 33 |ESTAND.#...."..3|
000001F0: 92 2E 20 DA 4F 45 4B 20 49 4E 20 48 45 54 20 42 |.. .OEK IN HET B|
00000200: 45 53 54 41 4E 44 22 3A 99 22 11 12 34 92 2E 20 |ESTAND":."..4.. |
00000210: D3 4F 52 54 45 45 52 20 50 45 52 20 45 4C 45 4D |.ORTEER PER ELEM|
00000220: 45 4E 54 00 43 0A AA 00 99 22 11 12 35 92 2E 20 |ENT.C...."..5.. |
00000230: D6 45 52 41 4E 44 45 52 20 49 4E 20 42 45 53 54 |.ERANDER IN BEST|
00000240: 41 4E 44 00 61 0A AF 00 99 22 11 12 36 92 2E 20 |AND.a...."..6.. |
00000250: D3 41 56 45 4E 20 56 41 4E 20 42 45 53 54 41 4E |.AVEN VAN BESTAN|
00000260: 44 00 84 0A B4 00 99 22 11 12 37 92 2E 20 D3 54 |D......"..7.. .T|
00000270: 4F 50 20 4D 45 54 20 48 45 54 20 50 52 4F 47 52 |OP MET HET PROGR|
00000280: 41 4D 4D 41 00 8D 0A B9 00 8D 31 31 35 00 AC 0A |AMMA......115...|
00000290: BE 00 8B 28 C6 28 48 31 24 29 B3 34 39 B0 C6 28 |...(.(H1$).49..(|
000002A0: 48 31 24 29 B1 35 35 29 A7 31 38 35 00 D5 0A C3 |H1$).55).185....|
000002B0: 00 91 48 31 8D 32 30 35 2C 36 30 30 2C 38 35 35 |..H1.205,600,855|
000002C0: 2C 31 30 35 30 2C 31 32 35 35 2C 20 31 34 37 35 |,1050,1255, 1475|
000002D0: 2C 31 35 38 30 00 DE 0A C8 00 89 31 34 35 00 FA |,1580......145..|
000002E0: 0A CD 00 99 22 93 11 11 2A 2A 2A 2A 2A 20 C9 CE |...."...***** ..|
000002F0: D6 CF C5 D2 20 2A 2A 2A 2A 2A 00 13 0B D2 00 99 |.... *****......|
00000300: 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |"===============|
00000310: 3D 3D 3D 00 20 0B D7 00 8B 4E B1 30 89 34 33 30 |===. ....N.0.430|
00000320: 00 44 0B DC 00 99 22 11 11 12 31 92 2E 20 CE 49 |.D...."...1.. .I|
00000330: 45 55 57 20 42 45 53 54 41 4E 44 20 4F 50 42 4F |EUW BESTAND OPBO|
00000340: 55 57 45 4E 00 65 0B E1 00 99 22 11 11 12 32 92 |UWEN.e...."...2.|
00000350: 2E 20 CF 55 44 20 42 45 53 54 41 4E 44 20 4F 50 |. .UD BESTAND OP|
00000360: 48 41 4C 45 4E 00 6E 0B E6 00 8D 31 31 35 00 87 |HALEN.n....115..|
00000370: 0B EB 00 8B 48 31 24 B2 22 31 22 B0 48 31 24 B2 |....H1$."1".H1$.|
00000380: 22 32 22 A7 32 34 35 00 90 0B F0 00 89 32 33 30 |"2".245......230|
00000390: 00 A1 0B F5 00 8B 48 31 24 B2 22 32 22 89 34 39 |......H1$."2".49|
000003A0: 35 00 A9 0B FA 00 4E B2 31 00 B3 0B FF 00 99 22 |5.....N.1......"|
000003B0: 93 11 22 00 D6 0B 04 01 99 22 D5 20 4B 55 4E 54 |.."......". KUNT|
000003C0: 20 4E 55 20 41 44 52 45 53 53 45 4E 20 49 4E 56 | NU ADRESSEN INV|
000003D0: 4F 45 52 45 4E 2E 00 06 0C 09 01 99 22 11 CF 4D |OEREN......."..M|
000003E0: 20 4D 45 54 20 49 4E 56 4F 45 52 20 54 45 20 45 | MET INVOER TE E|
000003F0: 49 4E 44 49 47 45 4E 3A 20 54 49 4B 20 2D 53 54 |INDIGEN: TIK -ST|
00000400: 4F 50 2D 20 49 4E 00 2D 0C 0E 01 99 22 C7 45 42 |OP- IN.-....".EB|
00000410: 52 55 49 4B 20 12 C1 CC CC C5 C5 CE 92 20 4B 4C |RUIK ........ KL|
00000420: 45 49 4E 45 20 4C 45 54 54 45 52 53 11 00 39 0C |EINE LETTERS..9.|
00000430: 13 01 81 50 B2 4E A4 41 31 00 4B 0C 18 01 99 22 |...P.N.A1.K...."|
00000440: 11 12 3C 22 3B 50 3B 22 9D 20 3E 00 51 0C 1D 01 |..<";P;". >.Q...|
00000450: 99 00 70 0C 22 01 85 22 CE 41 41 4D 20 20 20 20 |..p."..".AAM |
00000460: 20 20 20 3A 20 BF 9D 9D 9D 22 3B 4E 24 28 50 29 | : ....";N$(P)|
00000470: 00 8A 0C 27 01 8B 4E 24 28 50 29 B2 22 BF 22 A7 |...'..N$(P).".".|
00000480: 99 22 91 91 22 3A 89 32 39 30 00 A0 0C 2C 01 8B |."..":.290...,..|
00000490: 4E 24 28 50 29 B2 22 53 54 4F 50 22 89 34 30 30 |N$(P)."STOP".400|
000004A0: 00 BF 0C 31 01 85 22 C1 44 52 45 53 20 20 20 20 |...1..".DRES |
000004B0: 20 20 3A 20 BF 9D 9D 9D 22 3B 41 24 28 50 29 00 | : ....";A$(P).|
000004C0: D9 0C 36 01 8B 41 24 28 50 29 B2 22 BF 22 A7 99 |..6..A$(P)."."..|
000004D0: 22 91 91 22 3A 89 33 30 35 00 EF 0C 3B 01 8B 41 |"..":.305...;..A|
000004E0: 24 28 50 29 B2 22 53 54 4F 50 22 89 34 30 30 00 |$(P)."STOP".400.|
000004F0: 0E 0D 40 01 85 22 D0 4F 53 54 43 4F 44 45 20 20 |..@..".OSTCODE |
00000500: 20 3A 20 BF 9D 9D 9D 22 3B 50 24 28 50 29 00 28 | : ....";P$(P).(|
00000510: 0D 45 01 8B 50 24 28 50 29 B2 22 BF 22 A7 99 22 |.E..P$(P).".".."|
00000520: 91 91 22 3A 89 33 32 30 00 3E 0D 4A 01 8B 50 24 |..":.320.>.J..P$|
00000530: 28 50 29 B2 22 53 54 4F 50 22 89 34 30 30 00 5D |(P)."STOP".400.]|
00000540: 0D 4F 01 85 22 D7 4F 4F 4E 50 4C 41 41 54 53 20 |.O..".OONPLAATS |
00000550: 3A 20 BF 9D 9D 9D 22 3B 57 24 28 50 29 00 77 0D |: ....";W$(P).w.|
00000560: 54 01 8B 57 24 28 50 29 B2 22 BF 22 A7 99 22 91 |T..W$(P)."."..".|
00000570: 91 22 3A 89 33 33 35 00 8D 0D 59 01 8B 57 24 28 |.":.335...Y..W$(|
00000580: 50 29 B2 22 53 54 4F 50 22 89 34 30 30 00 AC 0D |P)."STOP".400...|
00000590: 5E 01 85 22 D4 45 4C 45 46 4F 4F 4E 4E 52 20 3A |^..".ELEFOONNR :|
000005A0: 20 BF 9D 9D 9D 22 3B 54 24 28 50 29 00 C6 0D 63 | ....";T$(P)...c|
000005B0: 01 8B 54 24 28 50 29 B2 22 BF 22 A7 99 22 91 91 |..T$(P).".".."..|
000005C0: 22 3A 89 33 35 30 00 DC 0D 68 01 8B 54 24 28 50 |":.350...h..T$(P|
000005D0: 29 B2 22 53 54 4F 50 22 89 34 30 30 00 FC 0D 6D |)."STOP".400...m|
000005E0: 01 85 22 CB 45 4E 4D 45 52 4B 20 31 20 20 3A 20 |..".ENMERK 1 : |
000005F0: BF 9D 9D 9D 22 3B 4B 31 24 28 50 29 00 13 0E 72 |....";K1$(P)...r|
00000600: 01 8B 4B 31 24 28 50 29 B2 22 53 54 4F 50 22 89 |..K1$(P)."STOP".|
00000610: 34 30 30 00 33 0E 77 01 85 22 CB 45 4E 4D 45 52 |400.3.w..".ENMER|
00000620: 4B 20 32 20 20 3A 20 BF 9D 9D 9D 22 3B 4B 32 24 |K 2 : ....";K2$|
00000630: 28 50 29 00 4A 0E 7C 01 8B 4B 31 24 28 50 29 B2 |(P).J.|..K1$(P).|
00000640: 22 53 54 4F 50 22 89 34 30 30 00 50 0E 81 01 99 |"STOP".400.P....|
00000650: 00 57 0E 86 01 82 50 00 5D 0E 8B 01 99 00 71 0E |.W....P.].....q.|
00000660: 90 01 99 22 11 C5 49 4E 44 45 20 49 4E 56 4F 45 |..."..INDE INVOE|
00000670: 52 00 7B 0E 95 01 4E B2 50 AB 31 00 A9 0E 9A 01 |R.{...N.P.1.....|
00000680: 99 22 11 C5 52 20 5A 49 4A 4E 20 4E 55 22 3B 4E |."..R ZIJN NU";N|
00000690: 3B 22 41 44 52 45 53 53 45 4E 20 49 4E 20 48 45 |;"ADRESSEN IN HE|
000006A0: 54 20 42 45 53 54 41 4E 44 00 C5 0E 9F 01 99 22 |T BESTAND......"|
000006B0: 11 11 12 D2 41 41 4B 20 45 45 4E 20 54 4F 45 54 |....AAK EEN TOET|
000006C0: 53 20 41 41 4E 00 CE 0E A4 01 8D 31 31 35 00 D4 |S AAN......115..|
000006D0: 0E A9 01 8E 00 01 0F AE 01 99 22 11 C5 52 20 5A |.........."..R Z|
000006E0: 49 54 20 41 4C 20 45 45 4E 20 42 45 53 54 41 4E |IT AL EEN BESTAN|
000006F0: 44 20 49 4E 20 48 45 54 20 47 45 48 45 55 47 45 |D IN HET GEHEUGE|
00000700: 4E 00 20 0F B3 01 99 22 11 12 31 92 2E 20 CE 49 |N. ...."..1.. .I|
00000710: 45 54 20 4F 56 45 52 53 43 48 52 49 4A 56 45 4E |ET OVERSCHRIJVEN|
00000720: 00 3E 0F B8 01 99 22 11 12 32 92 2E 20 D7 45 4C |.>...."..2.. .EL|
00000730: 20 4F 56 45 52 53 43 48 52 49 4A 56 45 4E 00 47 | OVERSCHRIJVEN.G|
00000740: 0F BD 01 8D 31 31 35 00 5A 0F C2 01 8B 48 31 B2 |....115.Z....H1.|
00000750: 31 B0 48 31 B2 32 A7 34 36 30 00 63 0F C7 01 89 |1.H1.2.460.c....|
00000760: 34 33 30 00 71 0F CC 01 8B 48 31 B2 32 A7 32 35 |430.q....H1.2.25|
00000770: 30 00 90 0F D1 01 99 22 11 12 33 92 2E 20 C2 45 |0......"..3.. .E|
00000780: 53 54 41 4E 44 20 55 49 54 42 52 45 49 44 45 4E |STAND UITBREIDEN|
00000790: 00 B4 0F D6 01 99 22 11 12 34 92 2E 20 C2 45 53 |......"..4.. .ES|
000007A0: 54 41 4E 44 20 4E 49 45 54 20 55 49 54 42 52 45 |TAND NIET UITBRE|
000007B0: 49 44 45 4E 00 BD 0F DB 01 8D 31 31 35 00 C9 0F |IDEN......115...|
000007C0: E0 01 8B 48 31 B2 34 A7 8E 00 D3 0F E5 01 4E B2 |...H1.4.......N.|
000007D0: 4E AA 31 00 DC 0F EA 01 89 32 35 35 00 04 10 EF |N.1......255....|
000007E0: 01 99 22 93 11 CB 4C 41 41 52 20 4F 4D 20 42 45 |.."...LAAR OM BE|
000007F0: 53 54 41 4E 44 20 4F 50 20 54 45 20 48 41 4C 45 |STAND OP TE HALE|
00000800: 4E 2E 2E 2E 00 33 10 F4 01 85 22 11 D7 45 4C 4B |N....3...."..ELK|
00000810: 20 42 45 53 54 41 4E 44 20 4B 49 45 53 54 20 55 | BESTAND KIEST U|
00000820: 20 3F 20 41 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 | ? ADRES......."|
00000830: 3B 46 24 00 3D 10 F9 01 8D 31 36 32 30 00 5E 10 |;F$.=....1620.^.|
00000840: FE 01 46 24 B2 C8 28 46 24 AA 22 20 20 20 20 20 |..F$..(F$." |
00000850: 20 20 20 20 20 20 22 2C 31 31 29 AA 49 24 00 74 | ",11).I$.t|
00000860: 10 03 02 9F 46 52 2C 54 41 50 45 2C 30 2C 46 24 |....FR,TAPE,0,F$|
00000870: 3A 99 46 24 00 7E 10 08 02 52 24 B2 22 22 00 A7 |:.F$.~...R$.""..|
00000880: 10 0D 02 84 46 52 2C 52 24 3A 99 52 24 3A 4E B2 |....FR,R$:.R$:N.|
00000890: C5 28 52 24 29 3A 84 46 52 2C 52 24 3A 99 52 24 |.(R$):.FR,R$:.R$|
000008A0: 20 3A 44 24 B2 52 24 00 CA 10 12 02 99 22 11 C4 | :D$.R$......"..|
000008B0: 41 54 55 4D 20 56 41 4E 20 44 49 54 20 46 49 4C |ATUM VAN DIT FIL|
000008C0: 45 20 49 53 20 3A 20 22 44 24 00 E8 10 17 02 99 |E IS : "D$......|
000008D0: 22 11 C1 41 4E 54 41 4C 20 41 44 52 45 53 53 45 |"..ANTAL ADRESSE|
000008E0: 4E 20 3A 22 4E 22 11 11 00 00 11 1C 02 81 58 B2 |N :"N"........X.|
000008F0: 31 A4 4E 3A 99 22 91 C1 44 52 45 53 3A 20 22 58 |1.N:."..DRES: "X|
00000900: 00 18 11 21 02 84 46 52 2C 52 24 3A 4E 24 28 58 |...!..FR,R$:N$(X|
00000910: 29 B2 52 24 3A 99 52 24 00 30 11 26 02 84 46 52 |).R$:.R$.0.&..FR|
00000920: 2C 52 24 3A 41 24 28 58 29 B2 52 24 3A 99 52 24 |,R$:A$(X).R$:.R$|
00000930: 00 48 11 2B 02 84 46 52 2C 52 24 3A 50 24 28 58 |.H.+..FR,R$:P$(X|
00000940: 29 B2 52 24 3A 99 52 24 00 60 11 30 02 84 46 52 |).R$:.R$.`.0..FR|
00000950: 2C 52 24 3A 57 24 28 58 29 B2 52 24 3A 99 52 24 |,R$:W$(X).R$:.R$|
00000960: 00 78 11 35 02 84 46 52 2C 52 24 3A 54 24 28 58 |.x.5..FR,R$:T$(X|
00000970: 29 B2 52 24 3A 99 52 24 00 91 11 3A 02 84 46 52 |).R$:.R$...:..FR|
00000980: 2C 52 24 3A 4B 31 24 28 58 29 B2 52 24 3A 99 52 |,R$:K1$(X).R$:.R|
00000990: 24 00 AA 11 3F 02 84 46 52 2C 52 24 3A 4B 32 24 |$...?..FR,R$:K2$|
000009A0: 28 58 29 B2 52 24 3A 99 52 24 00 B1 11 44 02 82 |(X).R$:.R$...D..|
000009B0: 58 00 BF 11 49 02 A0 46 52 3A 8D 31 36 33 30 00 |X...I..FR:.1630.|
000009C0: D6 11 4E 02 81 4A B2 30 A4 41 31 3A 48 25 28 4A |..N..J.0.A1:H%(J|
000009D0: 29 B2 4A 3A 82 4A 00 DC 11 53 02 8E 00 F8 11 58 |).J:.J...S.....X|
000009E0: 02 99 22 93 11 11 2A 2A 2A 2A 2A 20 C9 CE C8 CF |.."...***** ....|
000009F0: D5 C4 20 2A 2A 2A 2A 2A 00 11 12 5D 02 99 22 3D |.. *****...].."=|
00000A00: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000A10: 3D 00 36 12 62 02 99 22 11 11 D7 45 4C 4B 45 20 |=.6.b.."...ELKE |
00000A20: 41 44 52 45 53 53 45 4E 20 57 49 4C 54 20 55 20 |ADRESSEN WILT U |
00000A30: 5A 49 45 4E 20 3F 00 49 12 67 02 99 22 11 11 12 |ZIEN ?.I.g.."...|
00000A40: 31 92 2E 20 C1 4C 4C 45 53 00 59 12 6C 02 99 22 |1.. .LLES.Y.l.."|
00000A50: 11 12 32 92 2E 20 C5 45 4E 00 6C 12 71 02 99 22 |..2.. .EN.l.q.."|
00000A60: 11 12 33 92 2E 20 C2 45 52 45 49 4B 00 75 12 76 |..3.. .EREIK.u.v|
00000A70: 02 8D 31 31 35 00 88 12 7B 02 8B 48 31 B3 31 B0 |..115...{..H1.1.|
00000A80: 48 31 B1 33 89 36 33 30 00 97 12 80 02 8B 48 31 |H1.3.630......H1|
00000A90: B3 B1 31 89 36 35 35 00 A5 12 85 02 54 31 B2 31 |..1.655.....T1.1|
00000AA0: 3A 54 32 B2 4E 00 AE 12 8A 02 89 37 38 30 00 BD |:T2.N......780..|
00000AB0: 12 8F 02 8B 48 31 B3 B1 32 89 36 39 30 00 E1 12 |....H1..2.690...|
00000AC0: 94 02 85 22 11 D7 45 4C 4B 20 41 44 52 45 53 4E |..."..ELK ADRESN|
00000AD0: 55 4D 4D 45 52 20 3F 20 BF 9D 9D 9D 22 3B 54 31 |UMMER ? ....";T1|
00000AE0: 24 00 EF 12 99 02 54 31 B2 C5 28 54 31 24 29 00 |$.....T1..(T1$).|
00000AF0: 0D 13 9E 02 8B 54 31 24 B2 22 BF 22 B0 54 31 B2 |.....T1$.".".T1.|
00000B00: 30 A7 99 22 91 91 91 22 3A 89 36 36 30 00 1B 13 |0.."...":.660...|
00000B10: A3 02 8B 54 31 B1 4E A7 37 36 30 00 25 13 A8 02 |...T1.N.760.%...|
00000B20: 54 32 B2 54 31 00 2E 13 AD 02 89 37 38 30 00 5C |T2.T1......780.\|
00000B30: 13 B2 02 85 22 11 D7 41 54 20 49 53 20 48 45 54 |...."..AT IS HET|
00000B40: 20 45 45 52 53 54 45 20 41 44 52 45 53 4E 52 2E | EERSTE ADRESNR.|
00000B50: 20 3F 20 BF 9D 9D 9D 22 3B 54 31 24 00 6A 13 B7 | ? ....";T1$.j..|
00000B60: 02 54 31 B2 C5 28 54 31 24 29 00 88 13 BC 02 8B |.T1..(T1$)......|
00000B70: 54 31 24 B2 22 BF 22 B0 54 31 B2 30 A7 99 22 91 |T1$.".".T1.0..".|
00000B80: 91 91 22 3A 89 36 39 30 00 97 13 C1 02 8B 54 31 |..":.690......T1|
00000B90: B3 31 A7 54 31 B2 31 00 A5 13 C6 02 8B 54 31 B1 |.1.T1.1......T1.|
00000BA0: 4E A7 37 36 30 00 D4 13 CB 02 85 22 11 D7 41 54 |N.760......"..AT|
00000BB0: 20 49 53 20 48 45 54 20 4C 41 41 54 53 54 45 20 | IS HET LAATSTE |
00000BC0: 41 44 52 45 53 4E 52 2E 20 3F 20 BF 9D 9D 9D 22 |ADRESNR. ? ...."|
00000BD0: 3B 54 32 24 00 E2 13 D0 02 54 32 B2 C5 28 54 32 |;T2$.....T2..(T2|
00000BE0: 24 29 00 00 14 D5 02 8B 54 32 24 B2 22 BF 22 B0 |$)......T2$.".".|
00000BF0: 54 32 B2 30 A7 99 22 91 91 91 22 3A 89 37 31 35 |T2.0.."...":.715|
00000C00: 00 0E 14 DA 02 8B 54 32 B1 4E A7 37 36 30 00 1E |......T2.N.760..|
00000C10: 14 DF 02 8B 54 32 B1 B2 54 31 A7 37 38 30 00 49 |....T2..T1.780.I|
00000C20: 14 E4 02 99 22 11 12 C6 CF D5 D4 92 20 21 21 20 |...."....... !! |
00000C30: CC 41 41 54 53 54 45 20 41 44 52 45 53 20 4B 4C |.AATSTE ADRES KL|
00000C40: 45 49 4E 45 52 20 44 41 4E 00 60 14 E9 02 99 22 |EINER DAN.`...."|
00000C50: 11 45 45 52 53 54 45 20 41 44 52 45 53 2E 2E 2E |.EERSTE ADRES...|
00000C60: 00 8F 14 EE 02 99 22 11 11 D2 41 41 4B 20 45 45 |......"...AAK EE|
00000C70: 4E 20 54 4F 45 54 53 20 41 41 4E 20 56 4F 4F 52 |N TOETS AAN VOOR|
00000C80: 20 4E 4F 47 20 45 45 4E 20 50 4F 47 49 4E 47 00 | NOG EEN POGING.|
00000C90: 98 14 F3 02 89 36 30 30 00 C7 14 F8 02 99 22 11 |.....600......".|
00000CA0: C2 45 53 54 41 4E 44 20 48 45 45 46 54 20 53 4C |.ESTAND HEEFT SL|
00000CB0: 45 43 48 54 53 20 22 3B 4E 3B 22 20 41 44 52 45 |ECHTS ";N;" ADRE|
00000CC0: 53 53 45 4E 2E 2E 2E 00 F6 14 FD 02 99 22 11 11 |SSEN........."..|
00000CD0: D2 41 41 4B 20 45 45 4E 20 54 4F 45 54 53 20 41 |.AAK EEN TOETS A|
00000CE0: 41 4E 20 56 4F 4F 52 20 4E 4F 47 20 45 45 4E 20 |AN VOOR NOG EEN |
00000CF0: 50 4F 47 49 4E 47 00 FF 14 02 03 8D 31 31 35 00 |POGING......115.|
00000D00: 08 15 07 03 89 36 30 30 00 10 15 0C 03 99 22 93 |.....600......".|
00000D10: 00 1D 15 11 03 81 57 B2 54 31 A4 54 32 00 2A 15 |......W.T1.T2.*.|
00000D20: 16 03 48 38 B2 48 25 28 57 29 00 3B 15 1B 03 99 |..H8.H%(W).;....|
00000D30: 22 12 3C 22 3B 57 3B 22 9D 20 3E 00 41 15 20 03 |".<";W;". >.A. .|
00000D40: 99 00 4D 15 25 03 99 4E 24 28 48 38 29 00 59 15 |..M.%..N$(H8).Y.|
00000D50: 2A 03 99 41 24 28 48 38 29 00 71 15 2F 03 99 50 |*..A$(H8).q./..P|
00000D60: 24 28 48 38 29 3B 22 20 20 22 3B 57 24 28 48 38 |$(H8);" ";W$(H8|
00000D70: 29 00 7D 15 34 03 99 54 24 28 48 38 29 00 8A 15 |).}.4..T$(H8)...|
00000D80: 39 03 99 4B 31 24 28 48 38 29 00 97 15 3E 03 99 |9..K1$(H8)...>..|
00000D90: 4B 32 24 28 48 38 29 00 9D 15 43 03 99 00 A6 15 |K2$(H8)...C.....|
00000DA0: 48 03 8D 31 31 35 00 AD 15 4D 03 82 57 00 B3 15 |H..115...M..W...|
00000DB0: 52 03 8E 00 CF 15 57 03 99 22 93 11 11 2A 2A 2A |R.....W.."...***|
00000DC0: 2A 2A 20 DA CF C5 CB C5 CE 20 2A 2A 2A 2A 2A 00 |** ...... *****.|
00000DD0: E8 15 5C 03 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |..\.."==========|
00000DE0: 3D 3D 3D 3D 3D 3D 3D 3D 00 0F 16 61 03 99 22 11 |========...a..".|
00000DF0: 11 D7 41 41 52 20 4D 4F 45 54 20 4E 41 41 52 20 |..AAR MOET NAAR |
00000E00: 47 45 5A 4F 43 48 54 20 57 4F 52 44 45 4E 2C 00 |GEZOCHT WORDEN,.|
00000E10: 39 16 66 03 85 22 11 4F 46 57 45 4C 20 57 41 54 |9.f..".OFWEL WAT|
00000E20: 20 49 53 20 44 45 20 53 4C 45 55 54 45 4C 20 3F | IS DE SLEUTEL ?|
00000E30: 20 BF 9D 9D 9D 22 3B 5A 24 00 51 16 6B 03 8B 5A | ....";Z$.Q.k..Z|
00000E40: 24 B2 22 BF 22 A7 99 22 91 91 91 22 3A 89 38 37 |$.".".."...":.87|
00000E50: 30 00 5A 16 70 03 46 31 B2 30 00 66 16 75 03 46 |0.Z.p.F1.0.f.u.F|
00000E60: B2 C3 28 5A 24 29 00 7A 16 7A 03 81 5A B2 31 A4 |..(Z$).z.z..Z.1.|
00000E70: 4E 3A 48 38 B2 48 25 28 5A 29 00 92 16 7F 03 8B |N:H8.H%(Z)......|
00000E80: C8 28 4E 24 28 48 38 29 2C 46 29 B2 5A 24 89 39 |.(N$(H8),F).Z$.9|
00000E90: 37 35 00 AA 16 84 03 8B C8 28 41 24 28 48 38 29 |75.......(A$(H8)|
00000EA0: 2C 46 29 B2 5A 24 89 39 37 35 00 C2 16 89 03 8B |,F).Z$.975......|
00000EB0: C8 28 50 24 28 48 38 29 2C 46 29 B2 5A 24 89 39 |.(P$(H8),F).Z$.9|
00000EC0: 37 35 00 DA 16 8E 03 8B C8 28 57 24 28 48 38 29 |75.......(W$(H8)|
00000ED0: 2C 46 29 B2 5A 24 89 39 37 35 00 F2 16 93 03 8B |,F).Z$.975......|
00000EE0: C8 28 54 24 28 48 38 29 2C 46 29 B2 5A 24 89 39 |.(T$(H8),F).Z$.9|
00000EF0: 37 35 00 0B 17 98 03 8B C8 28 4B 31 24 28 48 38 |75.......(K1$(H8|
00000F00: 29 2C 46 29 B2 5A 24 89 39 37 35 00 24 17 9D 03 |),F).Z$.975.$...|
00000F10: 8B C8 28 4B 32 24 28 48 38 29 2C 46 29 B2 5A 24 |..(K2$(H8),F).Z$|
00000F20: 89 39 37 35 00 2B 17 A2 03 82 5A 00 37 17 A7 03 |.975.+....Z.7...|
00000F30: 8B 46 31 B2 31 A7 8E 00 63 17 AC 03 99 22 11 D3 |.F1.1...c...."..|
00000F40: 4C 45 55 54 45 4C 20 4B 4F 4D 54 20 4E 49 45 54 |LEUTEL KOMT NIET|
00000F50: 20 49 4E 20 42 45 53 54 41 4E 44 20 56 4F 4F 52 | IN BESTAND VOOR|
00000F60: 2E 2E 2E 00 92 17 B1 03 99 22 11 12 31 92 2E 20 |........."..1.. |
00000F70: D7 49 4C 54 20 55 20 45 45 4E 20 4E 49 45 55 57 |.ILT U EEN NIEUW|
00000F80: 45 20 53 4C 45 55 54 45 4C 20 49 4E 56 4F 45 52 |E SLEUTEL INVOER|
00000F90: 45 4E 00 B3 17 B6 03 99 22 11 12 32 92 2E 20 D4 |EN......"..2.. .|
00000FA0: 45 52 55 47 20 4E 41 41 52 20 48 4F 4F 46 44 4D |ERUG NAAR HOOFDM|
00000FB0: 45 4E 55 00 BC 17 BB 03 8D 31 31 35 00 CF 17 C0 |ENU......115....|
00000FC0: 03 8B 48 31 B3 31 B0 48 31 B1 32 89 39 35 35 00 |..H1.1.H1.2.955.|
00000FD0: DB 17 C5 03 8B 48 31 B2 32 A7 8E 00 E4 17 CA 03 |.....H1.2.......|
00000FE0: 89 38 35 35 00 EA 17 CF 03 99 00 F3 17 D4 03 46 |.855...........F|
00000FF0: 31 B2 31 00 12 18 D9 03 99 22 11 C1 44 52 45 53 |1.1......"..DRES|
00001000: 20 4D 45 54 20 53 4C 45 55 54 45 4C 57 4F 4F 52 | MET SLEUTELWOOR|
00001010: 44 3A 00 30 18 DE 03 99 22 2D 2D 2D 2D 2D 2D 2D |D:.0...."-------|
00001020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001030: 00 41 18 E3 03 99 22 12 3C 22 3B 5A 3B 22 9D 20 |.A....".<";Z;". |
00001040: 3E 00 4F 18 E8 03 99 3A 99 4E 24 28 48 38 29 00 |>.O....:.N$(H8).|
00001050: 5B 18 ED 03 99 41 24 28 48 38 29 00 73 18 F2 03 |[....A$(H8).s...|
00001060: 99 50 24 28 48 38 29 3B 22 20 20 22 3B 57 24 28 |.P$(H8);" ";W$(|
00001070: 48 38 29 00 87 18 F7 03 99 22 28 22 3B 54 24 28 |H8)......"(";T$(|
00001080: 48 38 29 3B 22 29 22 00 94 18 FC 03 99 4B 31 24 |H8);")"......K1$|
00001090: 28 48 38 29 00 A1 18 01 04 99 4B 32 24 28 48 38 |(H8)......K2$(H8|
000010A0: 29 00 B9 18 06 04 99 3A 99 22 D2 41 41 4B 20 45 |)......:.".AAK E|
000010B0: 45 4E 20 54 4F 45 54 53 22 00 C2 18 0B 04 8D 31 |EN TOETS"......1|
000010C0: 31 35 00 CD 18 10 04 8B 5A B2 4E A7 8E 00 D6 18 |15......Z.N.....|
000010D0: 15 04 89 39 33 30 00 F4 18 1A 04 99 22 93 11 11 |...930......"...|
000010E0: 2A 2A 2A 2A 2A 20 D3 CF D2 D4 C5 D2 C5 CE 20 2A |***** ........ *|
000010F0: 2A 2A 2A 2A 00 0F 19 1F 04 99 22 3D 3D 3D 3D 3D |****......"=====|
00001100: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 |===============.|
00001110: 37 19 24 04 99 22 11 11 D7 41 41 52 4F 50 20 4D |7.$.."...AAROP M|
00001120: 4F 45 54 20 47 45 53 4F 52 54 45 45 52 44 20 57 |OET GESORTEERD W|
00001130: 4F 52 44 45 4E 20 3F 00 49 19 29 04 99 22 11 11 |ORDEN ?.I.).."..|
00001140: 12 31 92 2E 20 CE 41 41 4D 00 5B 19 2E 04 99 22 |.1.. .AAM.[...."|
00001150: 11 12 32 92 2E 20 C1 44 52 45 53 00 70 19 33 04 |..2.. .DRES.p.3.|
00001160: 99 22 11 12 33 92 2E 20 D0 4F 53 54 43 4F 44 45 |."..3.. .OSTCODE|
00001170: 00 87 19 38 04 99 22 11 12 34 92 2E 20 D7 4F 4F |...8.."..4.. .OO|
00001180: 4E 50 4C 41 41 54 53 00 9E 19 3D 04 99 22 11 12 |NPLAATS...=.."..|
00001190: 35 92 2E 20 D4 45 4C 45 46 4F 4F 4E 4E 52 00 B5 |5.. .ELEFOONNR..|
000011A0: 19 42 04 99 22 11 12 36 92 2E 20 4B 45 4E 4D 45 |.B.."..6.. KENME|
000011B0: 52 4B 20 31 2E 00 CC 19 47 04 99 22 11 12 37 92 |RK 1....G.."..7.|
000011C0: 2E 20 4B 45 4E 4D 45 52 4B 20 32 2E 00 D5 19 4C |. KENMERK 2....L|
000011D0: 04 8D 31 31 35 00 E9 19 51 04 8B 48 31 B3 31 B0 |..115...Q..H1.1.|
000011E0: 48 31 B1 37 89 31 31 30 30 00 19 1A 56 04 99 22 |H1.7.1100...V.."|
000011F0: 11 D3 4F 52 54 45 52 45 4E 20 4B 4F 53 54 20 5A |..ORTEREN KOST Z|
00001200: 45 4C 46 53 20 45 45 4E 20 43 4F 4D 50 55 54 45 |ELFS EEN COMPUTE|
00001210: 52 20 54 49 4A 44 2E 2E 2E 00 23 1A 5B 04 8D 31 |R TIJD....#.[..1|
00001220: 31 34 30 00 3E 1A 60 04 99 22 11 12 C2 45 53 54 |140.>.`.."...EST|
00001230: 41 4E 44 20 47 45 53 4F 52 54 45 45 52 44 00 5A |AND GESORTEERD.Z|
00001240: 1A 65 04 99 22 11 D2 41 41 4B 20 45 45 4E 20 54 |.e.."..AAK EEN T|
00001250: 4F 45 54 53 22 3A 8D 31 31 35 00 60 1A 6A 04 8E |OETS":.115.`.j..|
00001260: 00 82 1A 6F 04 8F 20 2A 2A 2A 2A 2A 20 53 4F 52 |...o.. ***** SOR|
00001270: 54 45 45 52 20 52 4F 55 54 49 4E 45 20 2A 2A 2A |TEER ROUTINE ***|
00001280: 2A 2A 00 96 1A 74 04 4E 39 B2 4E AA 31 3A 58 B2 |**...t.N9.N.1:X.|
00001290: 30 3A 48 39 B2 30 00 B3 1A 79 04 42 B2 4E 39 AB |0:H9.0...y.B.N9.|
000012A0: 31 3A 81 4A B2 30 A4 42 3A 49 25 28 4A 29 B2 4A |1:.J.0.B:I%(J).J|
000012B0: 3A 82 4A 00 C5 1A 7E 04 81 4A B2 30 A4 4E 39 AC |:.J...~..J.0.N9.|
000012C0: 32 AB 33 A9 32 00 E3 1A 83 04 42 B2 42 AA 31 3A |2.3.2.....B.B.1:|
000012D0: 49 31 B2 49 25 28 4A 29 3A 49 32 B2 49 25 28 4A |I1.I%(J):I2.I%(J|
000012E0: AA 31 29 00 ED 1A 88 04 8D 31 32 31 35 00 FC 1A |.1)......1215...|
000012F0: 8D 04 49 25 28 42 29 B2 49 3A 82 4A 00 15 1B 92 |..I%(B).I:.J....|
00001300: 04 58 B2 58 AB 31 3A 43 B2 49 25 28 42 29 3A 8B |.X.X.1:C.I%(B):.|
00001310: 43 B3 30 A7 8E 00 2A 1B 97 04 48 25 28 48 39 29 |C.0...*...H%(H9)|
00001320: B2 43 3A 48 39 B2 48 39 AA 31 00 36 1B 9C 04 49 |.C:H9.H9.1.6...I|
00001330: 25 28 43 29 B2 58 00 5A 1B A1 04 43 25 B2 43 AD |%(C).X.Z...C%.C.|
00001340: 32 3A 4A B2 43 25 AC 32 3A 43 B2 4E 39 AA 43 25 |2:J.C%.2:C.N9.C%|
00001350: 3A 8B 43 B1 42 89 31 31 37 30 00 72 1B A6 04 49 |:.C.B.1170.r...I|
00001360: 31 B2 49 25 28 4A 29 3A 49 32 B2 49 25 28 4A AA |1.I%(J):I2.I%(J.|
00001370: 31 29 00 87 1B AB 04 8B 49 31 B3 30 A7 49 B2 49 |1)......I1.0.I.I|
00001380: 32 3A 89 31 32 31 30 00 9C 1B B0 04 8B 49 32 B3 |2:.1210......I2.|
00001390: 30 A7 49 B2 49 31 3A 89 31 32 31 30 00 A6 1B B5 |0.I.I1:.1210....|
000013A0: 04 8D 31 32 31 35 00 B8 1B BA 04 49 25 28 43 29 |..1215.....I%(C)|
000013B0: B2 49 3A 89 31 31 38 35 00 DB 1B BF 04 8B 48 31 |.I:.1185......H1|
000013C0: B2 31 A7 49 B2 49 31 3A 8B 4E 24 28 49 32 29 B3 |.1.I.I1:.N$(I2).|
000013D0: 4E 24 28 49 31 29 A7 49 B2 49 32 00 FE 1B C4 04 |N$(I1).I.I2.....|
000013E0: 8B 48 31 B2 32 A7 49 B2 49 31 3A 8B 41 24 28 49 |.H1.2.I.I1:.A$(I|
000013F0: 32 29 B3 41 24 28 49 31 29 A7 49 B2 49 32 00 21 |2).A$(I1).I.I2.!|
00001400: 1C C9 04 8B 48 31 B2 33 A7 49 B2 49 31 3A 8B 50 |....H1.3.I.I1:.P|
00001410: 24 28 49 32 29 B3 50 24 28 49 31 29 A7 49 B2 49 |$(I2).P$(I1).I.I|
00001420: 32 00 44 1C CE 04 8B 48 31 B2 34 A7 49 B2 49 31 |2.D....H1.4.I.I1|
00001430: 3A 8B 57 24 28 49 32 29 B3 57 24 28 49 31 29 A7 |:.W$(I2).W$(I1).|
00001440: 49 B2 49 32 00 67 1C D3 04 8B 48 31 B2 35 A7 49 |I.I2.g....H1.5.I|
00001450: B2 49 31 3A 8B 54 24 28 49 32 29 B3 54 24 28 49 |.I1:.T$(I2).T$(I|
00001460: 31 29 A7 49 B2 49 32 00 8C 1C D8 04 8B 48 31 B2 |1).I.I2......H1.|
00001470: 36 A7 49 B2 49 31 3A 8B 4B 31 24 28 49 32 29 B3 |6.I.I1:.K1$(I2).|
00001480: 4B 31 24 28 49 31 29 A7 49 B2 49 32 00 B1 1C DD |K1$(I1).I.I2....|
00001490: 04 8B 48 31 B2 37 A7 49 B2 49 31 3A 8B 4B 32 24 |..H1.7.I.I1:.K2$|
000014A0: 28 49 32 29 B3 4B 32 24 28 49 31 29 A7 49 B2 31 |(I2).K2$(I1).I.1|
000014B0: 32 00 B7 1C E2 04 8E 00 D5 1C E7 04 99 22 93 11 |2............"..|
000014C0: 11 2A 2A 2A 2A 2A 20 D6 C5 D2 C1 CE C4 C5 D2 20 |.***** ........ |
000014D0: 2A 2A 2A 2A 2A 00 F0 1C EC 04 99 22 3D 3D 3D 3D |*****......"====|
000014E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000014F0: 00 FE 1C F1 04 8B 4E B1 30 89 31 32 39 30 00 25 |......N.0.1290.%|
00001500: 1D F6 04 99 22 11 C5 52 20 49 53 20 47 45 45 4E |...."..R IS GEEN|
00001510: 20 42 45 53 54 41 4E 44 20 49 4E 20 44 45 20 50 | BESTAND IN DE P|
00001520: 45 54 2E 2E 2E 00 40 1D FB 04 99 22 11 11 D2 41 |ET....@...."...A|
00001530: 41 4B 20 45 45 4E 20 54 4F 45 54 53 20 41 41 4E |AK EEN TOETS AAN|
00001540: 00 49 1D 00 05 8D 31 31 35 00 4F 1D 05 05 8E 00 |.I....115.O.....|
00001550: 82 1D 0A 05 85 22 11 D7 45 4C 4B 20 41 44 52 45 |....."..ELK ADRE|
00001560: 53 4E 52 2E 20 57 49 4C 54 20 55 20 56 45 52 41 |SNR. WILT U VERA|
00001570: 4E 44 45 52 45 4E 20 3F 20 BF 9D 9D 9D 22 3B 5A |NDEREN ? ....";Z|
00001580: 33 24 00 8F 1D 0F 05 5A B2 C5 28 5A 33 24 29 00 |3$.....Z..(Z3$).|
00001590: AD 1D 14 05 8B 5A 33 24 B2 22 BF 22 B0 5A B2 30 |.....Z3$.".".Z.0|
000015A0: A7 99 22 91 91 91 22 3A 89 31 32 39 30 00 C3 1D |.."...":.1290...|
000015B0: 19 05 8B 5A B1 4E A7 99 22 91 91 91 22 3A 89 31 |...Z.N.."...":.1|
000015C0: 32 39 30 00 D0 1D 1E 05 48 38 B2 48 25 28 5A 29 |290.....H8.H%(Z)|
000015D0: 00 D6 1D 23 05 8F 00 FB 1D 28 05 99 22 11 D7 49 |...#.....(.."..I|
000015E0: 4A 5A 49 47 20 41 4C 20 4F 46 20 4E 49 45 54 20 |JZIG AL OF NIET |
000015F0: 44 45 20 52 45 47 45 4C 20 45 4E 00 1C 1E 2D 05 |DE REGEL EN...-.|
00001600: 99 22 11 44 52 55 4B 20 44 41 41 52 4E 41 20 4F |.".DRUK DAARNA O|
00001610: 50 20 12 D2 C5 D4 D5 D2 CE 92 20 2E 00 3A 1E 32 |P ........ ..:.2|
00001620: 05 99 22 11 11 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00001630: 20 20 22 3B 4E 24 28 48 38 29 00 55 1E 37 05 85 | ";N$(H8).U.7..|
00001640: 22 91 CE 41 41 4D 20 20 20 20 20 20 20 3A 20 9D |"..AAM : .|
00001650: 9D 22 3B 56 24 00 63 1E 3C 05 4E 24 28 48 38 29 |.";V$.c.<.N$(H8)|
00001660: B2 56 24 00 7F 1E 41 05 99 22 20 20 20 20 20 20 |.V$...A.." |
00001670: 20 20 20 20 20 20 20 22 3B 41 24 28 48 38 29 00 | ";A$(H8).|
00001680: 9A 1E 46 05 85 22 91 C1 44 52 45 53 20 20 20 20 |..F.."..DRES |
00001690: 20 20 3A 20 9D 9D 22 3B 56 24 00 A8 1E 4B 05 41 | : ..";V$...K.A|
000016A0: 24 28 48 38 29 B2 56 24 00 C4 1E 50 05 99 22 20 |$(H8).V$...P.." |
000016B0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 50 24 | ";P$|
000016C0: 28 48 38 29 00 DF 1E 55 05 85 22 91 D0 4F 53 54 |(H8)...U.."..OST|
000016D0: 43 4F 44 45 20 20 20 3A 20 9D 9D 22 3B 56 24 00 |CODE : ..";V$.|
000016E0: ED 1E 5A 05 50 24 28 48 38 29 B2 56 24 00 09 1F |..Z.P$(H8).V$...|
000016F0: 5F 05 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |_.." |
00001700: 20 22 3B 57 24 28 48 38 29 00 24 1F 64 05 85 22 | ";W$(H8).$.d.."|
00001710: 91 D7 4F 4F 4E 50 4C 41 41 54 53 20 3A 20 9D 9D |..OONPLAATS : ..|
00001720: 22 3B 56 24 00 32 1F 69 05 57 24 28 48 38 29 B2 |";V$.2.i.W$(H8).|
00001730: 56 24 00 4E 1F 6E 05 99 22 20 20 20 20 20 20 20 |V$.N.n.." |
00001740: 20 20 20 20 20 20 22 3B 54 24 28 48 38 29 00 69 | ";T$(H8).i|
00001750: 1F 73 05 85 22 91 D4 45 4C 45 46 4F 4F 4E 4E 52 |.s.."..ELEFOONNR|
00001760: 20 3A 20 9D 9D 22 3B 56 24 00 77 1F 78 05 54 24 | : ..";V$.w.x.T$|
00001770: 28 48 38 29 B2 56 24 00 94 1F 7D 05 99 22 20 20 |(H8).V$...}.." |
00001780: 20 20 20 20 20 20 20 20 20 20 20 22 3B 4B 31 24 | ";K1$|
00001790: 28 48 38 29 00 AF 1F 82 05 85 22 91 CB 45 4E 4D |(H8)......"..ENM|
000017A0: 45 52 4B 20 31 20 20 3A 20 9D 9D 22 3B 56 24 00 |ERK 1 : ..";V$.|
000017B0: BE 1F 87 05 4B 31 24 28 48 38 29 B2 56 24 00 DB |....K1$(H8).V$..|
000017C0: 1F 8C 05 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
000017D0: 20 20 22 3B 4B 32 24 28 48 38 29 00 F6 1F 91 05 | ";K2$(H8).....|
000017E0: 85 22 91 CB 45 4E 4D 45 52 4B 20 32 20 20 3A 20 |."..ENMERK 2 : |
000017F0: 9D 9D 22 3B 56 24 00 05 20 96 05 4B 32 24 28 48 |..";V$.. ..K2$(H|
00001800: 38 29 B2 56 24 00 2B 20 9B 05 99 22 11 11 12 31 |8).V$.+ ..."...1|
00001810: 92 2E 20 CE 4F 47 20 45 45 4E 20 41 44 52 45 53 |.. .OG EEN ADRES|
00001820: 20 56 45 52 41 4E 44 45 52 45 4E 00 4C 20 A0 05 | VERANDEREN.L ..|
00001830: 99 22 11 12 32 92 2E 20 D4 45 52 55 47 20 4E 41 |."..2.. .ERUG NA|
00001840: 41 52 20 48 4F 4F 46 44 4D 45 4E 55 00 55 20 A5 |AR HOOFDMENU.U .|
00001850: 05 8D 31 31 35 00 69 20 AA 05 8B 48 31 B3 31 B0 |..115.i ...H1.1.|
00001860: 48 31 B1 32 89 31 34 34 35 00 75 20 AF 05 8B 48 |H1.2.1445.u ...H|
00001870: 31 B2 32 A7 8E 00 7F 20 B4 05 89 31 32 35 35 00 |1.2.... ...1255.|
00001880: AA 20 B9 05 97 31 35 38 2C 31 3A 97 36 32 33 2C |. ...158,1:.623,|
00001890: 39 39 3A 99 22 4F 56 45 52 5A 49 43 48 54 20 4E |99:."OVERZICHT N|
000018A0: 4F 47 20 54 45 20 44 4F 45 4E 00 E7 20 BE 05 99 |OG TE DOEN.. ...|
000018B0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
000018C0: 11 11 11 11 11 11 11 11 11 11 12 D2 C1 C1 CB A0 |................|
000018D0: C5 C5 CE A0 D4 CF C5 D4 D3 13 22 3A 8D 31 31 35 |..........":.115|
000018E0: 3A 99 22 93 22 3A 8E 00 04 21 C3 05 99 22 93 11 |:.".":...!..."..|
000018F0: 11 2A 2A 2A 2A 2A 20 C2 C5 D7 C1 D2 C5 CE 20 2A |.***** ....... *|
00001900: 2A 2A 2A 2A 00 1E 21 C8 05 99 22 3D 3D 3D 3D 3D |****..!..."=====|
00001910: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 47 |==============.G|
00001920: 21 CD 05 99 22 11 11 C7 45 45 46 20 4E 41 41 4D |!..."...EEF NAAM|
00001930: 20 57 41 41 52 4F 4E 44 45 52 20 42 45 53 54 41 | WAARONDER BESTA|
00001940: 4E 44 20 4D 4F 45 54 00 79 21 D2 05 85 22 11 57 |ND MOET.y!...".W|
00001950: 4F 52 44 45 4E 20 4F 50 47 45 42 4F 52 47 45 4E |ORDEN OPGEBORGEN|
00001960: 20 3F 20 41 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 | ? ADRES......."|
00001970: 3B 46 24 3A 52 24 B2 22 22 00 9A 21 D7 05 46 24 |;F$:R$.""..!..F$|
00001980: B2 C8 28 46 24 AA 22 20 20 20 20 20 20 20 20 20 |..(F$." |
00001990: 20 20 22 2C 31 31 29 AA 49 24 00 A4 21 DC 05 8D | ",11).I$..!...|
000019A0: 31 36 32 30 00 C6 21 E1 05 85 22 11 D7 41 54 20 |1620..!..."..AT |
000019B0: 49 53 20 44 45 20 44 41 54 55 4D 20 20 20 2E 9D |IS DE DATUM ..|
000019C0: 9D 9D 22 3B 44 24 00 DD 21 E6 05 9F 46 52 2C 54 |..";D$..!...FR,T|
000019D0: 41 50 45 2C 32 20 2C 46 24 3A 99 46 24 00 05 22 |APE,2 ,F$:.F$.."|
000019E0: EB 05 52 24 B2 C4 28 4E 29 3A 98 46 52 2C 52 24 |..R$..(N):.FR,R$|
000019F0: 3A 99 52 24 3A 52 24 B2 44 24 3A 98 46 52 2C 52 |:.R$:R$.D$:.FR,R|
00001A00: 24 3A 99 52 24 00 26 22 F0 05 99 22 11 C1 41 4E |$:.R$.&"..."..AN|
00001A10: 54 41 4C 20 41 44 52 45 53 53 45 4E 20 49 53 20 |TAL ADRESSEN IS |
00001A20: 3A 22 4E 22 11 11 00 46 22 F5 05 81 4C B2 31 A4 |:"N"...F"...L.1.|
00001A30: 4E 3A 48 38 B2 48 25 28 4C 29 3A 99 22 91 C1 44 |N:H8.H%(L):."..D|
00001A40: 52 45 53 3A 22 4C 00 5D 22 FA 05 98 46 52 2C 4E |RES:"L.]"...FR,N|
00001A50: 24 28 48 38 29 3A 99 4E 24 28 48 38 29 00 74 22 |$(H8):.N$(H8).t"|
00001A60: FF 05 98 46 52 2C 41 24 28 48 38 29 3A 99 41 24 |...FR,A$(H8):.A$|
00001A70: 28 48 38 29 00 8B 22 04 06 98 46 52 2C 50 24 28 |(H8).."...FR,P$(|
00001A80: 48 38 29 3A 99 50 24 28 48 38 29 00 A2 22 09 06 |H8):.P$(H8).."..|
00001A90: 98 46 52 2C 57 24 28 48 38 29 3A 99 57 24 28 48 |.FR,W$(H8):.W$(H|
00001AA0: 38 29 00 B9 22 0E 06 98 46 52 2C 54 24 28 48 38 |8).."...FR,T$(H8|
00001AB0: 29 3A 99 54 24 28 48 38 29 00 D2 22 13 06 98 46 |):.T$(H8).."...F|
00001AC0: 52 2C 4B 31 24 28 48 38 29 3A 99 4B 31 24 28 48 |R,K1$(H8):.K1$(H|
00001AD0: 38 29 00 EB 22 18 06 98 46 52 2C 4B 32 24 28 48 |8).."...FR,K2$(H|
00001AE0: 38 29 3A 99 4B 32 24 28 48 38 29 00 F2 22 1D 06 |8):.K2$(H8).."..|
00001AF0: 82 4C 00 00 23 22 06 A0 46 52 3A 8D 31 36 33 30 |.L..#"..FR:.1630|
00001B00: 00 06 23 27 06 8E 00 21 23 2C 06 99 22 93 11 11 |..#'...!#,.."...|
00001B10: 2A 2A 2A 2A 2A 20 C5 C9 CE C4 C5 20 2A 2A 2A 2A |***** ..... ****|
00001B20: 2A 00 39 23 31 06 99 22 3D 3D 3D 3D 3D 3D 3D 3D |*.9#1.."========|
00001B30: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 62 23 36 06 99 22 |=========.b#6.."|
00001B40: 11 11 12 31 92 2E 20 C2 45 53 54 41 4E 44 20 4E |...1.. .ESTAND N|
00001B50: 4F 47 20 4E 49 45 54 20 4F 50 47 45 42 4F 52 47 |OG NIET OPGEBORG|
00001B60: 45 4E 00 84 23 3B 06 99 22 11 12 32 92 2E 20 C2 |EN..#;.."..2.. .|
00001B70: 45 53 54 41 4E 44 20 41 4C 20 4F 50 47 45 42 4F |ESTAND AL OPGEBO|
00001B80: 52 47 45 4E 00 8D 23 40 06 8D 31 31 35 00 A1 23 |RGEN..#@..115..#|
00001B90: 45 06 8B 48 31 B3 31 B0 48 31 B1 32 89 31 36 30 |E..H1.1.H1.2.160|
00001BA0: 30 00 AE 23 4A 06 8B 48 31 B3 B1 32 A7 8E 00 B4 |0..#J..H1..2....|
00001BB0: 23 4F 06 80 00 DF 23 54 06 85 22 11 46 49 4C 45 |#O....#T..".FILE|
00001BC0: 4E 55 4D 4D 45 52 20 20 31 9D 9D 9D 22 3B 46 52 |NUMMER 1...";FR|
00001BD0: 3A 99 3A 8B 46 52 B1 32 34 30 A7 31 36 32 30 00 |:.:.FR.240.1620.|
00001BE0: E5 23 59 06 8E 00 FF 23 5E 06 99 22 44 52 55 4B |.#Y....#^.."DRUK|
00001BF0: 20 45 45 4E 20 54 4F 45 54 53 20 49 4E 2E 22 00 | EEN TOETS IN.".|
00001C00: 13 24 63 06 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 31 |.$c..Z$:.Z$."".1|
00001C10: 36 33 35 00 19 24 68 06 8E 00 00 00 |635..$h..... |
....D..53280,0:.53281,0.9.I.FR.1:I$."-FI
LE":TAPE.1:.G(14).B.N..125.W.S..H1$:.H1$
."".115.G.X.H1.E(H1$):....}.A1.100:. AAN
TAL ADRESSEN.L....N$(A1),A$(A1),P$(A1),W
$(A1),T$(A1),K1$(A1),K2$(A1),H%(A1),I%(2
.A1)...... IN H%-TABEL STAAT DE VOLGORDE
-*DE INDEX*- VAN DE DIVERSE TABELLEN.+..
..J.0.A1:H%(J).J:.J.^...."..CBM-64 CLAIR
E (C) TELEAC";......"...
....................................."..
...."...1.. INVOERBESTAND MAKEN OF UITBR
EIDEN... .."..2.. INHOUD TONEN VAN HET B
ESTAND.#...."..3.. ZOEK IN HET BESTAND":
."..4.. SORTEER PER ELEMENT.C...."..5..
VERANDER IN BESTAND.A...."..6.. SAVEN VA
N BESTAND......"..7.. STOP MET HET PROGR
AMMA......115......(F(H1$).49.F(H1$).55)
.185.U.C..H1.205,600,855,1050,1255, 1475
,1580...H..145...M.."...***** INVOER ***
**...R.."==================. .W..N.0.430
.D...."...1.. NIEUW BESTAND OPBOUWEN.E..
.."...2.. OUD BESTAND OPHALEN.N....115..
....H1$."1".H1$."2".245......230......H1
$."2".495.....N.1......"..".V...."U KUNT
NU ADRESSEN INVOEREN.......".OM MET INV
OER TE EINDIGEN: TIK -STOP- IN.-...."GEB
RUIK .ALLEEN. KLEINE LETTERS..9....P.N.A
1.K...."..<";P;". >.Q.....P.".."NAAM
: ....";N$(P)...'..N$(P).".".."..":.2
90. .,..N$(P)."STOP".400...1.."ADRES
: ....";A$(P).Y.6..A$(P).".".."..":.30
5...;..A$(P)."STOP".400...@.."POSTCODE
: ....";P$(P).(.E..P$(P).".".."..":.320
.>.J..P$(P)."STOP".400.].O.."WOONPLAATS
: ....";W$(P).W.T..W$(P).".".."..":.335.
..Y..W$(P)."STOP".400...^.."TELEFOONNR :
....";T$(P).F.C..T$(P).".".."..":.350..
.H..T$(P)."STOP".400...M.."KENMERK 1 :
....";K1$(P)...R..K1$(P)."STOP".400.3.W.
."KENMERK 2 : ....";K2$(P).J.|..K1$(P).
"STOP".400.P.....W....P.].....Q....".EIN
DE INVOER.{...N.P.1......".ER ZIJN NU";N
;"ADRESSEN IN HET BESTAND.E...."...RAAK
EEN TOETS AAN.N....115.T..........".ER Z
IT AL EEN BESTAND IN HET GEHEUGEN. ...."
..1.. NIET OVERSCHRIJVEN.>...."..2.. WEL
OVERSCHRIJVEN.G....115.Z.B..H1.1.H1.2.4
60.C.G..430.Q.L..H1.2.250...Q.."..3.. BE
STAND UITBREIDEN...V.."..4.. BESTAND NIE
T UITBREIDEN......115.I....H1.4...S...N.
N.1......255......"..KLAAR OM BESTAND OP
TE HALEN....3....".WELK BESTAND KIEST U
? ADRES.......";F$.=....1620.^...F$.H(F
$." ",11).I$.T....FR,TAPE,0,F$
:.F$.~...R$.""......FR,R$:.R$:N.E(R$):.F
R,R$:.R$ :D$.R$.J....".DATUM VAN DIT FIL
E IS : "D$......".AANTAL ADRESSEN :"N"..
......X.1.N:.".ADRES: "X...!..FR,R$:N$(X
).R$:.R$.0.&..FR,R$:A$(X).R$:.R$.H.+..FR
,R$:P$(X).R$:.R$.`.0..FR,R$:W$(X).R$:.R$
.X.5..FR,R$:T$(X).R$:.R$...:..FR,R$:K1$(
X).R$:.R$...?..FR,R$:K2$(X).R$:.R$...D..
X...I. FR:.1630.V.N..J.0.A1:H%(J).J:.J..
.S.....X.."...***** INHOUD *****...].."=
=================.6.B.."..WELKE ADRESSEN
WILT U ZIEN ?.I.G.."...1.. ALLES.Y.L.."
..2.. EEN.L.Q.."..3.. BEREIK.U.V..115...
{..H1.1.H1.3.630......H1..1.655.....T1.1
:T2.N......780......H1..2.690......".WEL
K ADRESNUMMER ? ....";T1$.....T1.E(T1$).
.....T1$.".".T1.0.."...":.660......T1.N.
760.%...T2.T1......780.\....".WAT IS HET
EERSTE ADRESNR. ? ....";T1$.J...T1.E(T1
$)......T1$.".".T1.0.."...":.690...A..T1
.1.T1.1...F..T1.N.760.T.K..".WAT IS HET
LAATSTE ADRESNR. ? ....";T2$...P.T2.E(T2
$)...U..T2$.".".T2.0.."...":.715...Z..T2
.N.760......T2..T1.780.I...."..FOUT. !!
LAATSTE ADRES KLEINER DAN.`....".EERSTE
ADRES........."..RAAK EEN TOETS AAN VOOR
NOG EEN POGING......600.G....".BESTAND
HEEFT SLECHTS ";N;" ADRESSEN........."..
RAAK EEN TOETS AAN VOOR NOG EEN POGING..
....115......600......".......W.T1.T2.*.
..H8.H%(W).;....".<";W;". >.A. ...M.%..N
$(H8).Y.*..A$(H8).Q./..P$(H8);" ";W$(H8
).}.4..T$(H8)...9..K1$(H8)...>..K2$(H8).
..C.....H..115...M..W...R...O.W.."...***
** ZOEKEN *****...\.."==================
...A.."..WAAR MOET NAAR GEZOCHT WORDEN,.
9.F..".OFWEL WAT IS DE SLEUTEL ? ....";Z
$.Q.K..Z$.".".."...":.870.Z.P.F1.0.F.U.F
.C(Z$).Z.Z..Z.1.N:H8.H%(Z).....H(N$(H8)
,F).Z$.975......H(A$(H8),F).Z$.975.B....
H(P$(H8),F).Z$.975.Z....H(W$(H8),F).Z$.9
75......H(T$(H8),F).Z$.975......H(K1$(H8
),F).Z$.975.$....H(K2$(H8),F).Z$.975.+..
..Z.7....F1.1...C....".SLEUTEL KOMT NIET
IN BESTAND VOOR........."..1.. WILT U E
EN NIEUWE SLEUTEL INVOEREN......"..2.. T
ERUG NAAR HOOFDMENU......115.O....H1.1.H
1.2.955...E..H1.2.....J..855...O.....T.F
1.1...Y..".ADRES MET SLEUTELWOORD:.0....
"-----------------------.A....".<";Z;".
>.O....:.N$(H8).[....A$(H8).S....P$(H8);
" ";W$(H8)......"(";T$(H8);")"......K1$
(H8)......K2$(H8)......:."RAAK EEN TOETS
".B....115.M....Z.N...V....930......"...
***** SORTEREN *****......"=============
=======.7.$.."..WAAROP MOET GESORTEERD W
ORDEN ?.I.).."...1.. NAAM.[...."..2.. AD
RES.P.3.."..3.. POSTCODE...8.."..4.. WOO
NPLAATS...=.."..5.. TELEFOONNR...B.."..6
.. KENMERK 1..L.G.."..7.. KENMERK 2..U.L
..115...Q..H1.1.H1.7.1100...V..".SORTERE
N KOST ZELFS EEN COMPUTER TIJD....#.[..1
140.>.`.."..BESTAND GESORTEERD.Z.E..".RA
AK EEN TOETS":.115.`.J.....O.. ***** SOR
TEER ROUTINE *****...T.N9.N.1:X.0:H9.0..
.Y.B.N9.1:.J.0.B:I%(J).J:.J.E.~..J.0.N9.
2.3.2.....B.B.1:I1.I%(J):I2.I%(J.1).....
.1215.....I%(B).I:.J.....X.X.1:C.I%(B):.
C.0...*...H%(H9).C:H9.H9.1.6...I%(C).X.Z
...C%.C.2:J.C%.2:C.N9.C%:.C.B.1170.R...I
1.I%(J):I2.I%(J.1)......I1.0.I.I2:.1210.
.....I2.0.I.I1:.1210......1215.....I%(C)
.I:.1185......H1.1.I.I1:.N$(I2).N$(I1).I
.I2...D..H1.2.I.I1:.A$(I2).A$(I1).I.I2.!
.I..H1.3.I.I1:.P$(I2).P$(I1).I.I2.D.N..H
1.4.I.I1:.W$(I2).W$(I1).I.I2.G.S..H1.5.I
.I1:.T$(I2).T$(I1).I.I2...X..H1.6.I.I1:.
K1$(I2).K1$(I1).I.I2......H1.7.I.I1:.K2$
(I2).K2$(I1).I.12.......U...."...***** V
ERANDER *****......"====================
......N.0.1290.%....".ER IS GEEN BESTAND
IN DE PET....@...."..RAAK EEN TOETS AAN
.I....115.O..........".WELK ADRESNR. WIL
T U VERANDEREN ? ....";Z3$.....Z.E(Z3$).
.....Z3$.".".Z.0.."...":.1290.C....Z.N..
"...":.1290.P...H8.H%(Z).V.#.....(..".WI
JZIG AL OF NIET DE REGEL EN...-..".DRUK
DAARNA OP .RETURN. ..:.2.."..
";N$(H8).U.7..".NAAM : ..";V$.C.
<.N$(H8).V$..A.." ";A$(H8).
..F..".ADRES : ..";V$...K.A$(H8).V$
.D.P.." ";P$(H8)...U..".POST
CODE : ..";V$...Z.P$(H8).V$..._.."
";W$(H8).$.D..".WOONPLAATS : ..
";V$.2.I.W$(H8).V$.N.N.." ";
T$(H8).I.S..".TELEFOONNR : ..";V$.W.X.T$
(H8).V$...}.." ";K1$(H8)....
..".KENMERK 1 : ..";V$.....K1$(H8).V$..
...." ";K2$(H8)......".KENME
RK 2 : ..";V$.. ..K2$(H8).V$.+ ..."...1
.. NOG EEN ADRES VERANDEREN.L .."..2..
TERUG NAAR HOOFDMENU.U ...115.I ...H1.1.
H1.2.1445.U ...H1.2... ...1255.. ...158
,1:.623,99:."OVERZICHT NOG TE DOEN.. ...
"..........................RAAK EEN TOET
S.":.115:.".":...!C.."...***** BEWAREN *
****..!H.."===================.G!M.."..G
EEF NAAM WAARONDER BESTAND MOET.Y!R..".W
ORDEN OPGEBORGEN ? ADRES.......";F$:R$."
"..!W.F$.H(F$." ",11).I$..!...
1620.F!...".WAT IS DE DATUM ....";D$..
!...FR,TAPE,2 ,F$:.F$.."..R$.D(N):.FR,R$
:.R$:R$.D$:.FR,R$:.R$.&"...".AANTAL ADRE
SSEN IS :"N"...F"...L.1.N:H8.H%(L):.".AD
RES:"L.]"...FR,N$(H8):.N$(H8).T"...FR,A$
(H8):.A$(H8).."...FR,P$(H8):.P$(H8).."..
.FR,W$(H8):.W$(H8).."...FR,T$(H8):.T$(H8
).R"...FR,K1$(H8):.K1$(H8).."...FR,K2$(H
8):.K2$(H8).."...L..#". FR:.1630..#'...!
#,.."...***** EINDE *****.9#1.."========
=========.B#6.."...1.. BESTAND NOG NIET
OPGEBORGEN..#;.."..2.. BESTAND AL OPGEBO
RGEN..#@..115..#E..H1.1.H1.2.1600..#J..H
1..2....#O....#T..".FILENUMMER 1...";FR
:.:.FR.240.1620..#Y....#^.."DRUK EEN TOE
TS IN."..$C..Z$:.Z$."".1635..$H.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL