ADRESSEN
FILE INFORMATION
FILENAME(S): ADRESSEN
FILE TYPE(S): PRG
FILE SIZE: 7.7K
FIRST SEEN: 2025-11-30 21:28:01
APPEARS ON: 1 disk(s)
FILE HASH
bdea4f667178711c4297b0e96d2809e30832072b317c3cf652a1927d46d43f7b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| T D S | ADRESSEN | PRG | DuncanTwain | 29 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 32 00 97 35 33 32 38 30 2C 30 3A 97 |....2..53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 99 C7 28 35 29 00 3F 08 |53281,0:..(5).?.|
00000020: 64 00 46 52 B2 31 3A 49 24 B2 22 2D 46 49 4C 45 |d.FR.1:I$."-FILE|
00000030: 22 3A 54 41 50 45 B2 31 3A 99 C7 28 31 34 29 00 |":TAPE.1:..(14).|
00000040: 7F 08 65 00 99 22 93 12 23 23 23 23 23 20 D2 55 |..e.."..##### .U|
00000050: 4E 20 49 4E 20 54 41 50 45 20 20 C1 C4 CD C9 CE |N IN TAPE .....|
00000060: C9 D3 D4 D2 C1 D4 C9 C5 20 9D 22 3B 54 41 50 45 |........ .";TAPE|
00000070: 3B 22 9D 20 23 23 23 23 23 22 3A 89 31 30 34 00 |;". #####":.104.|
00000080: 94 08 66 00 A1 48 31 24 3A 8B 48 31 24 B2 22 22 |..f..H1$:.H1$.""|
00000090: A7 31 30 32 00 A4 08 67 00 48 31 B2 C5 28 48 31 |.102...g.H1..(H1|
000000A0: 24 29 3A 8E 00 C1 08 68 00 41 31 B2 31 30 30 3A |$):....h.A1.100:|
000000B0: 8F 20 41 41 4E 54 41 4C 20 41 44 52 45 53 53 45 |. AANTAL ADRESSE|
000000C0: 4E 00 09 09 69 00 86 4E 24 28 41 31 29 2C 41 24 |N...i..N$(A1),A$|
000000D0: 28 41 31 29 2C 50 24 28 41 31 29 2C 57 24 28 41 |(A1),P$(A1),W$(A|
000000E0: 31 29 2C 54 24 28 41 31 29 2C 4B 31 24 28 41 31 |1),T$(A1),K1$(A1|
000000F0: 29 2C 4B 32 24 28 41 31 29 2C 48 25 28 41 31 29 |),K2$(A1),H%(A1)|
00000100: 2C 49 25 28 32 AC 41 31 29 00 51 09 6A 00 8F 20 |,I%(2.A1).Q.j.. |
00000110: 49 4E 20 48 25 2D 54 41 42 45 4C 20 53 54 41 41 |IN H%-TABEL STAA|
00000120: 54 20 44 45 20 56 4F 4C 47 4F 52 44 45 2D 2A 44 |T DE VOLGORDE-*D|
00000130: 45 20 49 4E 44 45 58 2A 2D 20 56 41 4E 20 44 45 |E INDEX*- VAN DE|
00000140: 20 44 49 56 45 52 53 45 20 54 41 42 45 4C 4C 45 | DIVERSE TABELLE|
00000150: 4E 00 68 09 6B 00 81 4A B2 30 A4 41 31 3A 48 25 |N.h.k..J.0.A1:H%|
00000160: 28 4A 29 B2 4A 3A 82 4A 00 9A 09 6C 00 99 22 93 |(J).J:.J...l..".|
00000170: C3 C2 CD 2D 36 34 20 C3 CC C1 C9 D2 C5 20 20 20 |...-64 ...... |
00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000190: 20 20 20 20 20 20 20 20 22 3B 00 CC 09 6D 00 99 | ";...m..|
000001A0: 3A 99 22 20 D3 54 45 50 48 41 4E 20 D3 43 48 45 |:." .TEPHAN .CHE|
000001B0: 4C 20 20 20 CE 45 44 45 52 41 53 53 45 4C 54 20 |L .EDERASSELT |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 22 00 FA 09 6E | "...n|
000001D0: 00 99 22 11 12 31 92 2E 20 C9 4E 56 4F 45 52 42 |.."..1.. .NVOERB|
000001E0: 45 53 54 41 4E 44 20 4D 41 4B 45 4E 20 4F 46 20 |ESTAND MAKEN OF |
000001F0: 55 49 54 42 52 45 49 44 45 4E 00 23 0A 6F 00 99 |UITBREIDEN.#.o..|
00000200: 22 11 12 32 92 2E 20 C9 4E 48 4F 55 44 20 54 4F |"..2.. .NHOUD TO|
00000210: 4E 45 4E 20 56 41 4E 20 48 45 54 20 42 45 53 54 |NEN VAN HET BEST|
00000220: 41 4E 44 00 43 0A 70 00 99 22 11 12 33 92 2E 20 |AND.C.p.."..3.. |
00000230: DA 4F 45 4B 20 49 4E 20 48 45 54 20 42 45 53 54 |.OEK IN HET BEST|
00000240: 41 4E 44 00 63 0A 71 00 99 22 11 12 34 92 2E 20 |AND.c.q.."..4.. |
00000250: D3 4F 52 54 45 45 52 20 50 45 52 20 45 4C 45 4D |.ORTEER PER ELEM|
00000260: 45 4E 54 00 83 0A 72 00 99 22 11 12 35 92 2E 20 |ENT...r.."..5.. |
00000270: D6 45 52 41 4E 44 45 52 20 49 4E 20 42 45 53 54 |.ERANDER IN BEST|
00000280: 41 4E 44 00 A1 0A 73 00 99 22 11 12 36 92 2E 20 |AND...s.."..6.. |
00000290: D3 41 56 45 4E 20 56 41 4E 20 42 45 53 54 41 4E |.AVEN VAN BESTAN|
000002A0: 44 00 C4 0A 74 00 99 22 11 12 37 92 2E 20 D3 54 |D...t.."..7.. .T|
000002B0: 4F 50 20 4D 45 54 20 48 45 54 20 50 52 4F 47 52 |OP MET HET PROGR|
000002C0: 41 4D 4D 41 00 DF 0A 75 00 99 22 11 12 38 92 2E |AMMA...u.."..8..|
000002D0: 20 C4 4F 4F 52 4C 41 44 45 4E 20 50 52 47 2E 00 | .OORLADEN PRG..|
000002E0: FB 0A 76 00 99 22 11 12 54 92 2E 20 56 45 52 41 |..v.."..T.. VERA|
000002F0: 4E 44 45 52 20 54 41 50 45 20 23 00 04 0B 77 00 |NDER TAPE #...w.|
00000300: 8D 31 30 32 00 15 0B 78 00 8B 48 31 24 B2 22 54 |.102...x..H1$."T|
00000310: 22 A7 34 32 36 00 34 0B 79 00 8B 28 C6 28 48 31 |".426.4.y..(.(H1|
00000320: 24 29 B3 34 39 B0 C6 28 48 31 24 29 B1 35 36 29 |$).49..(H1$).56)|
00000330: A7 31 31 39 00 61 0B 7A 00 91 48 31 8D 31 32 34 |.119.a.z..H1.124|
00000340: 2C 32 30 33 2C 32 35 34 2C 32 39 33 2C 33 33 34 |,203,254,293,334|
00000350: 2C 20 33 37 38 2C 33 39 39 2C 34 30 38 2C 34 31 |, 378,399,408,41|
00000360: 32 00 6A 0B 7B 00 89 31 30 38 00 86 0B 7C 00 99 |2.j.{..108...|..|
00000370: 22 93 11 11 2A 2A 2A 2A 2A 20 C9 CE D6 CF C5 D2 |"...***** ......|
00000380: 20 2A 2A 2A 2A 2A 00 9F 0B 7D 00 99 22 3D 3D 3D | *****...}.."===|
00000390: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 |===============.|
000003A0: AC 0B 7E 00 8B 4E B1 30 89 31 36 39 00 D0 0B 7F |..~..N.0.169....|
000003B0: 00 99 22 11 11 12 31 92 2E 20 CE 49 45 55 57 20 |.."...1.. .IEUW |
000003C0: 42 45 53 54 41 4E 44 20 4F 50 42 4F 55 57 45 4E |BESTAND OPBOUWEN|
000003D0: 00 F1 0B 80 00 99 22 11 11 12 32 92 2E 20 CF 55 |......"...2.. .U|
000003E0: 44 20 42 45 53 54 41 4E 44 20 4F 50 48 41 4C 45 |D BESTAND OPHALE|
000003F0: 4E 00 FA 0B 81 00 8D 31 30 32 00 13 0C 82 00 8B |N......102......|
00000400: 48 31 24 B2 22 31 22 B0 48 31 24 B2 22 32 22 A7 |H1$."1".H1$."2".|
00000410: 31 33 32 00 1C 0C 83 00 89 31 32 39 00 2D 0C 84 |132......129.-..|
00000420: 00 8B 48 31 24 B2 22 32 22 89 31 38 32 00 35 0C |..H1$."2".182.5.|
00000430: 85 00 4E B2 31 00 3F 0C 86 00 99 22 93 11 22 00 |..N.1.?...."..".|
00000440: 62 0C 87 00 99 22 D5 20 4B 55 4E 54 20 4E 55 20 |b....". KUNT NU |
00000450: 41 44 52 45 53 53 45 4E 20 49 4E 56 4F 45 52 45 |ADRESSEN INVOERE|
00000460: 4E 2E 00 92 0C 88 00 99 22 11 CF 4D 20 4D 45 54 |N......."..M MET|
00000470: 20 49 4E 56 4F 45 52 20 54 45 20 45 49 4E 44 49 | INVOER TE EINDI|
00000480: 47 45 4E 3A 20 54 49 4B 20 2D 53 54 4F 50 2D 20 |GEN: TIK -STOP- |
00000490: 49 4E 00 B9 0C 89 00 99 22 C7 45 42 52 55 49 4B |IN......".EBRUIK|
000004A0: 20 12 C1 CC CC C5 C5 CE 92 20 4B 4C 45 49 4E 45 | ........ KLEINE|
000004B0: 20 4C 45 54 54 45 52 53 11 00 C5 0C 8A 00 81 50 | LETTERS.......P|
000004C0: B2 4E A4 41 31 00 D7 0C 8B 00 99 22 11 12 3C 22 |.N.A1......"..<"|
000004D0: 3B 50 3B 22 9D 20 3E 00 DD 0C 8C 00 99 00 FC 0C |;P;". >.........|
000004E0: 8D 00 85 22 CE 41 41 4D 20 20 20 20 20 20 20 3A |...".AAM :|
000004F0: 20 BF 9D 9D 9D 22 3B 4E 24 28 50 29 00 16 0D 8E | ....";N$(P)....|
00000500: 00 8B 4E 24 28 50 29 B2 22 BF 22 A7 99 22 91 91 |..N$(P).".".."..|
00000510: 22 3A 89 31 34 31 00 2C 0D 8F 00 8B 4E 24 28 50 |":.141.,....N$(P|
00000520: 29 B2 22 53 54 4F 50 22 89 31 36 33 00 4B 0D 90 |)."STOP".163.K..|
00000530: 00 85 22 C1 44 52 45 53 20 20 20 20 20 20 3A 20 |..".DRES : |
00000540: BF 9D 9D 9D 22 3B 41 24 28 50 29 00 65 0D 91 00 |....";A$(P).e...|
00000550: 8B 41 24 28 50 29 B2 22 BF 22 A7 99 22 91 91 22 |.A$(P)."."..".."|
00000560: 3A 89 31 34 34 00 7B 0D 92 00 8B 41 24 28 50 29 |:.144.{....A$(P)|
00000570: B2 22 53 54 4F 50 22 89 31 36 33 00 9A 0D 93 00 |."STOP".163.....|
00000580: 85 22 D0 4F 53 54 43 4F 44 45 20 20 20 3A 20 BF |.".OSTCODE : .|
00000590: 9D 9D 9D 22 3B 50 24 28 50 29 00 B4 0D 94 00 8B |...";P$(P)......|
000005A0: 50 24 28 50 29 B2 22 BF 22 A7 99 22 91 91 22 3A |P$(P).".".."..":|
000005B0: 89 31 34 37 00 CA 0D 95 00 8B 50 24 28 50 29 B2 |.147......P$(P).|
000005C0: 22 53 54 4F 50 22 89 31 36 33 00 E9 0D 96 00 85 |"STOP".163......|
000005D0: 22 D7 4F 4F 4E 50 4C 41 41 54 53 20 3A 20 BF 9D |".OONPLAATS : ..|
000005E0: 9D 9D 22 3B 57 24 28 50 29 00 03 0E 97 00 8B 57 |..";W$(P)......W|
000005F0: 24 28 50 29 B2 22 BF 22 A7 99 22 91 91 22 3A 89 |$(P).".".."..":.|
00000600: 31 35 30 00 19 0E 98 00 8B 57 24 28 50 29 B2 22 |150......W$(P)."|
00000610: 53 54 4F 50 22 89 31 36 33 00 38 0E 99 00 85 22 |STOP".163.8...."|
00000620: D4 45 4C 45 46 4F 4F 4E 4E 52 20 3A 20 BF 9D 9D |.ELEFOONNR : ...|
00000630: 9D 22 3B 54 24 28 50 29 00 52 0E 9A 00 8B 54 24 |.";T$(P).R....T$|
00000640: 28 50 29 B2 22 BF 22 A7 99 22 91 91 22 3A 89 31 |(P).".".."..":.1|
00000650: 35 33 00 68 0E 9B 00 8B 54 24 28 50 29 B2 22 53 |53.h....T$(P)."S|
00000660: 54 4F 50 22 89 31 36 33 00 88 0E 9C 00 85 22 CB |TOP".163......".|
00000670: 45 4E 4D 45 52 4B 20 31 20 20 3A 20 BF 9D 9D 9D |ENMERK 1 : ....|
00000680: 22 3B 4B 31 24 28 50 29 00 9F 0E 9D 00 8B 4B 31 |";K1$(P)......K1|
00000690: 24 28 50 29 B2 22 53 54 4F 50 22 89 31 36 33 00 |$(P)."STOP".163.|
000006A0: BF 0E 9E 00 85 22 CB 45 4E 4D 45 52 4B 20 32 20 |.....".ENMERK 2 |
000006B0: 20 3A 20 BF 9D 9D 9D 22 3B 4B 32 24 28 50 29 00 | : ....";K2$(P).|
000006C0: D6 0E 9F 00 8B 4B 31 24 28 50 29 B2 22 53 54 4F |.....K1$(P)."STO|
000006D0: 50 22 89 31 36 33 00 DC 0E A0 00 99 00 E3 0E A1 |P".163..........|
000006E0: 00 82 50 00 E9 0E A2 00 99 00 FD 0E A3 00 99 22 |..P............"|
000006F0: 11 C5 49 4E 44 45 20 49 4E 56 4F 45 52 00 07 0F |..INDE INVOER...|
00000700: A4 00 4E B2 50 AB 31 00 35 0F A5 00 99 22 11 C5 |..N.P.1.5...."..|
00000710: 52 20 5A 49 4A 4E 20 4E 55 22 3B 4E 3B 22 41 44 |R ZIJN NU";N;"AD|
00000720: 52 45 53 53 45 4E 20 49 4E 20 48 45 54 20 42 45 |RESSEN IN HET BE|
00000730: 53 54 41 4E 44 00 51 0F A6 00 99 22 11 11 12 D2 |STAND.Q...."....|
00000740: 41 41 4B 20 45 45 4E 20 54 4F 45 54 53 20 41 41 |AAK EEN TOETS AA|
00000750: 4E 00 5A 0F A7 00 8D 31 30 32 00 60 0F A8 00 8E |N.Z....102.`....|
00000760: 00 8D 0F A9 00 99 22 11 C5 52 20 5A 49 54 20 41 |......"..R ZIT A|
00000770: 4C 20 45 45 4E 20 42 45 53 54 41 4E 44 20 49 4E |L EEN BESTAND IN|
00000780: 20 48 45 54 20 47 45 48 45 55 47 45 4E 00 AC 0F | HET GEHEUGEN...|
00000790: AA 00 99 22 11 12 31 92 2E 20 CE 49 45 54 20 4F |..."..1.. .IET O|
000007A0: 56 45 52 53 43 48 52 49 4A 56 45 4E 00 CA 0F AB |VERSCHRIJVEN....|
000007B0: 00 99 22 11 12 32 92 2E 20 D7 45 4C 20 4F 56 45 |.."..2.. .EL OVE|
000007C0: 52 53 43 48 52 49 4A 56 45 4E 00 D3 0F AC 00 8D |RSCHRIJVEN......|
000007D0: 31 30 32 00 E6 0F AD 00 8B 48 31 B2 31 B0 48 31 |102......H1.1.H1|
000007E0: B2 32 A7 31 37 35 00 EF 0F AE 00 89 31 36 39 00 |.2.175......169.|
000007F0: FD 0F AF 00 8B 48 31 B2 32 A7 31 33 33 00 1C 10 |.....H1.2.133...|
00000800: B0 00 99 22 11 12 33 92 2E 20 C2 45 53 54 41 4E |..."..3.. .ESTAN|
00000810: 44 20 55 49 54 42 52 45 49 44 45 4E 00 40 10 B1 |D UITBREIDEN.@..|
00000820: 00 99 22 11 12 34 92 2E 20 C2 45 53 54 41 4E 44 |.."..4.. .ESTAND|
00000830: 20 4E 49 45 54 20 55 49 54 42 52 45 49 44 45 4E | NIET UITBREIDEN|
00000840: 00 49 10 B2 00 8D 31 30 32 00 55 10 B3 00 8B 48 |.I....102.U....H|
00000850: 31 B2 34 A7 8E 00 5F 10 B4 00 4E B2 4E AA 31 00 |1.4..._...N.N.1.|
00000860: 68 10 B5 00 89 31 33 34 00 90 10 B6 00 99 22 93 |h....134......".|
00000870: 11 CB 4C 41 41 52 20 4F 4D 20 42 45 53 54 41 4E |..LAAR OM BESTAN|
00000880: 44 20 4F 50 20 54 45 20 48 41 4C 45 4E 2E 2E 2E |D OP TE HALEN...|
00000890: 00 BF 10 B7 00 85 22 11 D7 45 4C 4B 20 42 45 53 |......"..ELK BES|
000008A0: 54 41 4E 44 20 4B 49 45 53 54 20 55 20 3F 20 41 |TAND KIEST U ? A|
000008B0: 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 3B 46 24 00 |DRES.......";F$.|
000008C0: C8 10 B8 00 8D 34 33 31 00 E9 10 B9 00 46 24 B2 |.....431.....F$.|
000008D0: C8 28 46 24 AA 22 20 20 20 20 20 20 20 20 20 20 |.(F$." |
000008E0: 20 22 2C 31 31 29 AA 49 24 00 FF 10 BA 00 9F 46 | ",11).I$......F|
000008F0: 52 2C 54 41 50 45 2C 30 2C 46 24 3A 99 46 24 00 |R,TAPE,0,F$:.F$.|
00000900: 09 11 BB 00 52 24 B2 22 22 00 32 11 BC 00 84 46 |....R$."".2....F|
00000910: 52 2C 52 24 3A 99 52 24 3A 4E B2 C5 28 52 24 29 |R,R$:.R$:N..(R$)|
00000920: 3A 84 46 52 2C 52 24 3A 99 52 24 20 3A 44 24 B2 |:.FR,R$:.R$ :D$.|
00000930: 52 24 00 55 11 BD 00 99 22 11 C4 41 54 55 4D 20 |R$.U...."..ATUM |
00000940: 56 41 4E 20 44 49 54 20 46 49 4C 45 20 49 53 20 |VAN DIT FILE IS |
00000950: 3A 20 22 44 24 00 73 11 BE 00 99 22 11 C1 41 4E |: "D$.s...."..AN|
00000960: 54 41 4C 20 41 44 52 45 53 53 45 4E 20 3A 22 4E |TAL ADRESSEN :"N|
00000970: 22 11 11 00 8B 11 BF 00 81 58 B2 31 A4 4E 3A 99 |"........X.1.N:.|
00000980: 22 91 C1 44 52 45 53 3A 20 22 58 00 A3 11 C0 00 |"..DRES: "X.....|
00000990: 84 46 52 2C 52 24 3A 4E 24 28 58 29 B2 52 24 3A |.FR,R$:N$(X).R$:|
000009A0: 99 52 24 00 BB 11 C1 00 84 46 52 2C 52 24 3A 41 |.R$......FR,R$:A|
000009B0: 24 28 58 29 B2 52 24 3A 99 52 24 00 D3 11 C2 00 |$(X).R$:.R$.....|
000009C0: 84 46 52 2C 52 24 3A 50 24 28 58 29 B2 52 24 3A |.FR,R$:P$(X).R$:|
000009D0: 99 52 24 00 EB 11 C3 00 84 46 52 2C 52 24 3A 57 |.R$......FR,R$:W|
000009E0: 24 28 58 29 B2 52 24 3A 99 52 24 00 03 12 C4 00 |$(X).R$:.R$.....|
000009F0: 84 46 52 2C 52 24 3A 54 24 28 58 29 B2 52 24 3A |.FR,R$:T$(X).R$:|
00000A00: 99 52 24 00 1C 12 C5 00 84 46 52 2C 52 24 3A 4B |.R$......FR,R$:K|
00000A10: 31 24 28 58 29 B2 52 24 3A 99 52 24 00 35 12 C6 |1$(X).R$:.R$.5..|
00000A20: 00 84 46 52 2C 52 24 3A 4B 32 24 28 58 29 B2 52 |..FR,R$:K2$(X).R|
00000A30: 24 3A 99 52 24 00 3C 12 C7 00 82 58 00 49 12 C8 |$:.R$.<....X.I..|
00000A40: 00 A0 46 52 3A 8D 34 33 33 00 60 12 C9 00 81 4A |..FR:.433.`....J|
00000A50: B2 30 A4 41 31 3A 48 25 28 4A 29 B2 4A 3A 82 4A |.0.A1:H%(J).J:.J|
00000A60: 00 66 12 CA 00 8E 00 82 12 CB 00 99 22 93 11 11 |.f.........."...|
00000A70: 2A 2A 2A 2A 2A 20 C9 CE C8 CF D5 C4 20 2A 2A 2A |***** ...... ***|
00000A80: 2A 2A 00 9B 12 CC 00 99 22 3D 3D 3D 3D 3D 3D 3D |**......"=======|
00000A90: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 C0 12 CD 00 |===========.....|
00000AA0: 99 22 11 11 D7 45 4C 4B 45 20 41 44 52 45 53 53 |."...ELKE ADRESS|
00000AB0: 45 4E 20 57 49 4C 54 20 55 20 5A 49 45 4E 20 3F |EN WILT U ZIEN ?|
00000AC0: 00 D3 12 CE 00 99 22 11 11 12 31 92 2E 20 C1 4C |......"...1.. .L|
00000AD0: 4C 45 53 00 E3 12 CF 00 99 22 11 12 32 92 2E 20 |LES......"..2.. |
00000AE0: C5 45 4E 00 F6 12 D0 00 99 22 11 12 33 92 2E 20 |.EN......"..3.. |
00000AF0: C2 45 52 45 49 4B 00 FF 12 D1 00 8D 31 30 32 00 |.EREIK......102.|
00000B00: 12 13 D2 00 8B 48 31 B3 31 B0 48 31 B1 33 89 32 |.....H1.1.H1.3.2|
00000B10: 30 39 00 21 13 D3 00 8B 48 31 B3 B1 31 89 32 31 |09.!....H1..1.21|
00000B20: 34 00 2F 13 D4 00 54 31 B2 31 3A 54 32 B2 4E 00 |4./...T1.1:T2.N.|
00000B30: 38 13 D5 00 89 32 33 39 00 47 13 D6 00 8B 48 31 |8....239.G....H1|
00000B40: B3 B1 32 89 32 32 31 00 6B 13 D7 00 85 22 11 D7 |..2.221.k...."..|
00000B50: 45 4C 4B 20 41 44 52 45 53 4E 55 4D 4D 45 52 20 |ELK ADRESNUMMER |
00000B60: 3F 20 BF 9D 9D 9D 22 3B 54 31 24 00 79 13 D8 00 |? ....";T1$.y...|
00000B70: 54 31 B2 C5 28 54 31 24 29 00 97 13 D9 00 8B 54 |T1..(T1$)......T|
00000B80: 31 24 B2 22 BF 22 B0 54 31 B2 30 A7 99 22 91 91 |1$.".".T1.0.."..|
00000B90: 91 22 3A 89 32 31 35 00 A5 13 DA 00 8B 54 31 B1 |.":.215......T1.|
00000BA0: 4E A7 32 33 35 00 AF 13 DB 00 54 32 B2 54 31 00 |N.235.....T2.T1.|
00000BB0: B8 13 DC 00 89 32 33 39 00 E6 13 DD 00 85 22 11 |.....239......".|
00000BC0: D7 41 54 20 49 53 20 48 45 54 20 45 45 52 53 54 |.AT IS HET EERST|
00000BD0: 45 20 41 44 52 45 53 4E 52 2E 20 3F 20 BF 9D 9D |E ADRESNR. ? ...|
00000BE0: 9D 22 3B 54 31 24 00 F4 13 DE 00 54 31 B2 C5 28 |.";T1$.....T1..(|
00000BF0: 54 31 24 29 00 12 14 DF 00 8B 54 31 24 B2 22 BF |T1$)......T1$.".|
00000C00: 22 B0 54 31 B2 30 A7 99 22 91 91 91 22 3A 89 32 |".T1.0.."...":.2|
00000C10: 32 31 00 21 14 E0 00 8B 54 31 B3 31 A7 54 31 B2 |21.!....T1.1.T1.|
00000C20: 31 00 2F 14 E1 00 8B 54 31 B1 4E A7 32 33 35 00 |1./....T1.N.235.|
00000C30: 5E 14 E2 00 85 22 11 D7 41 54 20 49 53 20 48 45 |^...."..AT IS HE|
00000C40: 54 20 4C 41 41 54 53 54 45 20 41 44 52 45 53 4E |T LAATSTE ADRESN|
00000C50: 52 2E 20 3F 20 BF 9D 9D 9D 22 3B 54 32 24 00 6C |R. ? ....";T2$.l|
00000C60: 14 E3 00 54 32 B2 C5 28 54 32 24 29 00 8A 14 E4 |...T2..(T2$)....|
00000C70: 00 8B 54 32 24 B2 22 BF 22 B0 54 32 B2 30 A7 99 |..T2$.".".T2.0..|
00000C80: 22 91 91 91 22 3A 89 32 32 36 00 98 14 E5 00 8B |"...":.226......|
00000C90: 54 32 B1 4E A7 32 33 35 00 A8 14 E6 00 8B 54 32 |T2.N.235......T2|
00000CA0: B1 B2 54 31 A7 32 33 39 00 D3 14 E7 00 99 22 11 |..T1.239......".|
00000CB0: 12 C6 CF D5 D4 92 20 21 21 20 CC 41 41 54 53 54 |...... !! .AATST|
00000CC0: 45 20 41 44 52 45 53 20 4B 4C 45 49 4E 45 52 20 |E ADRES KLEINER |
00000CD0: 44 41 4E 00 EA 14 E8 00 99 22 11 45 45 52 53 54 |DAN......".EERST|
00000CE0: 45 20 41 44 52 45 53 2E 2E 2E 00 19 15 E9 00 99 |E ADRES.........|
00000CF0: 22 11 11 D2 41 41 4B 20 45 45 4E 20 54 4F 45 54 |"...AAK EEN TOET|
00000D00: 53 20 41 41 4E 20 56 4F 4F 52 20 4E 4F 47 20 45 |S AAN VOOR NOG E|
00000D10: 45 4E 20 50 4F 47 49 4E 47 00 22 15 EA 00 89 32 |EN POGING."....2|
00000D20: 30 33 00 51 15 EB 00 99 22 11 C2 45 53 54 41 4E |03.Q...."..ESTAN|
00000D30: 44 20 48 45 45 46 54 20 53 4C 45 43 48 54 53 20 |D HEEFT SLECHTS |
00000D40: 22 3B 4E 3B 22 20 41 44 52 45 53 53 45 4E 2E 2E |";N;" ADRESSEN..|
00000D50: 2E 00 80 15 EC 00 99 22 11 11 D2 41 41 4B 20 45 |......."...AAK E|
00000D60: 45 4E 20 54 4F 45 54 53 20 41 41 4E 20 56 4F 4F |EN TOETS AAN VOO|
00000D70: 52 20 4E 4F 47 20 45 45 4E 20 50 4F 47 49 4E 47 |R NOG EEN POGING|
00000D80: 00 89 15 ED 00 8D 31 30 32 00 92 15 EE 00 89 32 |......102......2|
00000D90: 30 33 00 9A 15 EF 00 99 22 93 00 A7 15 F0 00 81 |03......".......|
00000DA0: 57 B2 54 31 A4 54 32 00 B4 15 F1 00 48 38 B2 48 |W.T1.T2.....H8.H|
00000DB0: 25 28 57 29 00 C5 15 F2 00 99 22 12 3C 22 3B 57 |%(W)......".<";W|
00000DC0: 3B 22 9D 20 3E 00 CB 15 F3 00 99 00 D7 15 F4 00 |;". >...........|
00000DD0: 99 4E 24 28 48 38 29 00 E3 15 F5 00 99 41 24 28 |.N$(H8)......A$(|
00000DE0: 48 38 29 00 FB 15 F6 00 99 50 24 28 48 38 29 3B |H8)......P$(H8);|
00000DF0: 22 20 20 22 3B 57 24 28 48 38 29 00 07 16 F7 00 |" ";W$(H8).....|
00000E00: 99 54 24 28 48 38 29 00 14 16 F8 00 99 4B 31 24 |.T$(H8)......K1$|
00000E10: 28 48 38 29 00 21 16 F9 00 99 4B 32 24 28 48 38 |(H8).!....K2$(H8|
00000E20: 29 00 27 16 FA 00 99 00 30 16 FB 00 8D 31 30 32 |).'.....0....102|
00000E30: 00 37 16 FC 00 82 57 00 3D 16 FD 00 8E 00 59 16 |.7....W.=.....Y.|
00000E40: FE 00 99 22 93 11 11 2A 2A 2A 2A 2A 20 DA CF C5 |..."...***** ...|
00000E50: CB C5 CE 20 2A 2A 2A 2A 2A 00 72 16 FF 00 99 22 |... *****.r...."|
00000E60: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000E70: 3D 3D 00 99 16 00 01 99 22 11 11 D7 41 41 52 20 |==......"...AAR |
00000E80: 4D 4F 45 54 20 4E 41 41 52 20 47 45 5A 4F 43 48 |MOET NAAR GEZOCH|
00000E90: 54 20 57 4F 52 44 45 4E 2C 00 C3 16 01 01 85 22 |T WORDEN,......"|
00000EA0: 11 4F 46 57 45 4C 20 57 41 54 20 49 53 20 44 45 |.OFWEL WAT IS DE|
00000EB0: 20 53 4C 45 55 54 45 4C 20 3F 20 BF 9D 9D 9D 22 | SLEUTEL ? ...."|
00000EC0: 3B 5A 24 00 DB 16 02 01 8B 5A 24 B2 22 BF 22 A7 |;Z$......Z$.".".|
00000ED0: 99 22 91 91 91 22 3A 89 32 35 37 00 E4 16 03 01 |."...":.257.....|
00000EE0: 46 31 B2 30 00 F0 16 04 01 46 B2 C3 28 5A 24 29 |F1.0.....F..(Z$)|
00000EF0: 00 04 17 05 01 81 5A B2 31 A4 4E 3A 48 38 B2 48 |......Z.1.N:H8.H|
00000F00: 25 28 5A 29 00 1C 17 06 01 8B C8 28 4E 24 28 48 |%(Z).......(N$(H|
00000F10: 38 29 2C 46 29 B2 5A 24 89 32 37 38 00 34 17 07 |8),F).Z$.278.4..|
00000F20: 01 8B C8 28 41 24 28 48 38 29 2C 46 29 B2 5A 24 |...(A$(H8),F).Z$|
00000F30: 89 32 37 38 00 4C 17 08 01 8B C8 28 50 24 28 48 |.278.L.....(P$(H|
00000F40: 38 29 2C 46 29 B2 5A 24 89 32 37 38 00 64 17 09 |8),F).Z$.278.d..|
00000F50: 01 8B C8 28 57 24 28 48 38 29 2C 46 29 B2 5A 24 |...(W$(H8),F).Z$|
00000F60: 89 32 37 38 00 7C 17 0A 01 8B C8 28 54 24 28 48 |.278.|.....(T$(H|
00000F70: 38 29 2C 46 29 B2 5A 24 89 32 37 38 00 95 17 0B |8),F).Z$.278....|
00000F80: 01 8B C8 28 4B 31 24 28 48 38 29 2C 46 29 B2 5A |...(K1$(H8),F).Z|
00000F90: 24 89 32 37 38 00 AE 17 0C 01 8B C8 28 4B 32 24 |$.278.......(K2$|
00000FA0: 28 48 38 29 2C 46 29 B2 5A 24 89 32 37 38 00 B5 |(H8),F).Z$.278..|
00000FB0: 17 0D 01 82 5A 00 C1 17 0E 01 8B 46 31 B2 31 A7 |....Z......F1.1.|
00000FC0: 8E 00 ED 17 0F 01 99 22 11 D3 4C 45 55 54 45 4C |......."..LEUTEL|
00000FD0: 20 4B 4F 4D 54 20 4E 49 45 54 20 49 4E 20 42 45 | KOMT NIET IN BE|
00000FE0: 53 54 41 4E 44 20 56 4F 4F 52 2E 2E 2E 00 1C 18 |STAND VOOR......|
00000FF0: 10 01 99 22 11 12 31 92 2E 20 D7 49 4C 54 20 55 |..."..1.. .ILT U|
00001000: 20 45 45 4E 20 4E 49 45 55 57 45 20 53 4C 45 55 | EEN NIEUWE SLEU|
00001010: 54 45 4C 20 49 4E 56 4F 45 52 45 4E 00 3D 18 11 |TEL INVOEREN.=..|
00001020: 01 99 22 11 12 32 92 2E 20 D4 45 52 55 47 20 4E |.."..2.. .ERUG N|
00001030: 41 41 52 20 48 4F 4F 46 44 4D 45 4E 55 00 46 18 |AAR HOOFDMENU.F.|
00001040: 12 01 8D 31 30 32 00 59 18 13 01 8B 48 31 B3 31 |...102.Y....H1.1|
00001050: B0 48 31 B1 32 89 32 37 34 00 65 18 14 01 8B 48 |.H1.2.274.e....H|
00001060: 31 B2 32 A7 8E 00 6E 18 15 01 89 32 35 34 00 74 |1.2...n....254.t|
00001070: 18 16 01 99 00 7D 18 17 01 46 31 B2 31 00 9C 18 |.....}...F1.1...|
00001080: 18 01 99 22 11 C1 44 52 45 53 20 4D 45 54 20 53 |..."..DRES MET S|
00001090: 4C 45 55 54 45 4C 57 4F 4F 52 44 3A 00 BA 18 19 |LEUTELWOORD:....|
000010A0: 01 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.."-------------|
000010B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 CB 18 1A 01 99 |----------......|
000010C0: 22 12 3C 22 3B 5A 3B 22 9D 20 3E 00 D9 18 1B 01 |".<";Z;". >.....|
000010D0: 99 3A 99 4E 24 28 48 38 29 00 E5 18 1C 01 99 41 |.:.N$(H8)......A|
000010E0: 24 28 48 38 29 00 FD 18 1D 01 99 50 24 28 48 38 |$(H8)......P$(H8|
000010F0: 29 3B 22 20 20 22 3B 57 24 28 48 38 29 00 11 19 |);" ";W$(H8)...|
00001100: 1E 01 99 22 28 22 3B 54 24 28 48 38 29 3B 22 29 |..."(";T$(H8);")|
00001110: 22 00 1E 19 1F 01 99 4B 31 24 28 48 38 29 00 2B |"......K1$(H8).+|
00001120: 19 20 01 99 4B 32 24 28 48 38 29 00 43 19 21 01 |. ..K2$(H8).C.!.|
00001130: 99 3A 99 22 D2 41 41 4B 20 45 45 4E 20 54 4F 45 |.:.".AAK EEN TOE|
00001140: 54 53 22 00 4C 19 22 01 8D 31 30 32 00 57 19 23 |TS".L."..102.W.#|
00001150: 01 8B 5A B2 4E A7 8E 00 60 19 24 01 89 32 36 39 |..Z.N...`.$..269|
00001160: 00 7E 19 25 01 99 22 93 11 11 2A 2A 2A 2A 2A 20 |.~.%.."...***** |
00001170: D3 CF D2 D4 C5 D2 C5 CE 20 2A 2A 2A 2A 2A 00 99 |........ *****..|
00001180: 19 26 01 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.&.."===========|
00001190: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 C1 19 27 01 99 22 |=========...'.."|
000011A0: 11 11 D7 41 41 52 4F 50 20 4D 4F 45 54 20 47 45 |...AAROP MOET GE|
000011B0: 53 4F 52 54 45 45 52 44 20 57 4F 52 44 45 4E 20 |SORTEERD WORDEN |
000011C0: 3F 00 D3 19 28 01 99 22 11 11 12 31 92 2E 20 CE |?...(.."...1.. .|
000011D0: 41 41 4D 00 E5 19 29 01 99 22 11 12 32 92 2E 20 |AAM...).."..2.. |
000011E0: C1 44 52 45 53 00 FA 19 2A 01 99 22 11 12 33 92 |.DRES...*.."..3.|
000011F0: 2E 20 D0 4F 53 54 43 4F 44 45 00 11 1A 2B 01 99 |. .OSTCODE...+..|
00001200: 22 11 12 34 92 2E 20 D7 4F 4F 4E 50 4C 41 41 54 |"..4.. .OONPLAAT|
00001210: 53 00 28 1A 2C 01 99 22 11 12 35 92 2E 20 D4 45 |S.(.,.."..5.. .E|
00001220: 4C 45 46 4F 4F 4E 4E 52 00 3F 1A 2D 01 99 22 11 |LEFOONNR.?.-..".|
00001230: 12 36 92 2E 20 4B 45 4E 4D 45 52 4B 20 31 2E 00 |.6.. KENMERK 1..|
00001240: 56 1A 2E 01 99 22 11 12 37 92 2E 20 4B 45 4E 4D |V...."..7.. KENM|
00001250: 45 52 4B 20 32 2E 00 5F 1A 2F 01 8D 31 30 32 00 |ERK 2.._./..102.|
00001260: 72 1A 30 01 8B 48 31 B3 31 B0 48 31 B1 37 89 33 |r.0..H1.1.H1.7.3|
00001270: 30 33 00 A2 1A 31 01 99 22 11 D3 4F 52 54 45 52 |03...1.."..ORTER|
00001280: 45 4E 20 4B 4F 53 54 20 5A 45 4C 46 53 20 45 45 |EN KOST ZELFS EE|
00001290: 4E 20 43 4F 4D 50 55 54 45 52 20 54 49 4A 44 2E |N COMPUTER TIJD.|
000012A0: 2E 2E 00 AB 1A 32 01 8D 33 31 31 00 C6 1A 33 01 |.....2..311...3.|
000012B0: 99 22 11 12 C2 45 53 54 41 4E 44 20 47 45 53 4F |."...ESTAND GESO|
000012C0: 52 54 45 45 52 44 00 E2 1A 34 01 99 22 11 D2 41 |RTEERD...4.."..A|
000012D0: 41 4B 20 45 45 4E 20 54 4F 45 54 53 22 3A 8D 31 |AK EEN TOETS":.1|
000012E0: 30 32 00 E8 1A 35 01 8E 00 0A 1B 36 01 8F 20 2A |02...5.....6.. *|
000012F0: 2A 2A 2A 2A 20 53 4F 52 54 45 45 52 20 52 4F 55 |**** SORTEER ROU|
00001300: 54 49 4E 45 20 2A 2A 2A 2A 2A 00 1E 1B 37 01 4E |TINE *****...7.N|
00001310: 39 B2 4E AA 31 3A 58 B2 30 3A 48 39 B2 30 00 3B |9.N.1:X.0:H9.0.;|
00001320: 1B 38 01 42 B2 4E 39 AB 31 3A 81 4A B2 30 A4 42 |.8.B.N9.1:.J.0.B|
00001330: 3A 49 25 28 4A 29 B2 4A 3A 82 4A 00 4D 1B 39 01 |:I%(J).J:.J.M.9.|
00001340: 81 4A B2 30 A4 4E 39 AC 32 AB 33 A9 32 00 6B 1B |.J.0.N9.2.3.2.k.|
00001350: 3A 01 42 B2 42 AA 31 3A 49 31 B2 49 25 28 4A 29 |:.B.B.1:I1.I%(J)|
00001360: 3A 49 32 B2 49 25 28 4A AA 31 29 00 74 1B 3B 01 |:I2.I%(J.1).t.;.|
00001370: 8D 33 32 36 00 83 1B 3C 01 49 25 28 42 29 B2 49 |.326...<.I%(B).I|
00001380: 3A 82 4A 00 9C 1B 3D 01 58 B2 58 AB 31 3A 43 B2 |:.J...=.X.X.1:C.|
00001390: 49 25 28 42 29 3A 8B 43 B3 30 A7 8E 00 B1 1B 3E |I%(B):.C.0.....>|
000013A0: 01 48 25 28 48 39 29 B2 43 3A 48 39 B2 48 39 AA |.H%(H9).C:H9.H9.|
000013B0: 31 00 BD 1B 3F 01 49 25 28 43 29 B2 58 00 E0 1B |1...?.I%(C).X...|
000013C0: 40 01 43 25 B2 43 AD 32 3A 4A B2 43 25 AC 32 3A |@.C%.C.2:J.C%.2:|
000013D0: 43 B2 4E 39 AA 43 25 3A 8B 43 B1 42 89 33 31 37 |C.N9.C%:.C.B.317|
000013E0: 00 F8 1B 41 01 49 31 B2 49 25 28 4A 29 3A 49 32 |...A.I1.I%(J):I2|
000013F0: B2 49 25 28 4A AA 31 29 00 0C 1C 42 01 8B 49 31 |.I%(J.1)...B..I1|
00001400: B3 30 A7 49 B2 49 32 3A 89 33 32 35 00 20 1C 43 |.0.I.I2:.325. .C|
00001410: 01 8B 49 32 B3 30 A7 49 B2 49 31 3A 89 33 32 35 |..I2.0.I.I1:.325|
00001420: 00 29 1C 44 01 8D 33 32 36 00 3A 1C 45 01 49 25 |.).D..326.:.E.I%|
00001430: 28 43 29 B2 49 3A 89 33 32 30 00 5D 1C 46 01 8B |(C).I:.320.].F..|
00001440: 48 31 B2 31 A7 49 B2 49 31 3A 8B 4E 24 28 49 32 |H1.1.I.I1:.N$(I2|
00001450: 29 B3 4E 24 28 49 31 29 A7 49 B2 49 32 00 80 1C |).N$(I1).I.I2...|
00001460: 47 01 8B 48 31 B2 32 A7 49 B2 49 31 3A 8B 41 24 |G..H1.2.I.I1:.A$|
00001470: 28 49 32 29 B3 41 24 28 49 31 29 A7 49 B2 49 32 |(I2).A$(I1).I.I2|
00001480: 00 A3 1C 48 01 8B 48 31 B2 33 A7 49 B2 49 31 3A |...H..H1.3.I.I1:|
00001490: 8B 50 24 28 49 32 29 B3 50 24 28 49 31 29 A7 49 |.P$(I2).P$(I1).I|
000014A0: B2 49 32 00 C6 1C 49 01 8B 48 31 B2 34 A7 49 B2 |.I2...I..H1.4.I.|
000014B0: 49 31 3A 8B 57 24 28 49 32 29 B3 57 24 28 49 31 |I1:.W$(I2).W$(I1|
000014C0: 29 A7 49 B2 49 32 00 E9 1C 4A 01 8B 48 31 B2 35 |).I.I2...J..H1.5|
000014D0: A7 49 B2 49 31 3A 8B 54 24 28 49 32 29 B3 54 24 |.I.I1:.T$(I2).T$|
000014E0: 28 49 31 29 A7 49 B2 49 32 00 0E 1D 4B 01 8B 48 |(I1).I.I2...K..H|
000014F0: 31 B2 36 A7 49 B2 49 31 3A 8B 4B 31 24 28 49 32 |1.6.I.I1:.K1$(I2|
00001500: 29 B3 4B 31 24 28 49 31 29 A7 49 B2 49 32 00 33 |).K1$(I1).I.I2.3|
00001510: 1D 4C 01 8B 48 31 B2 37 A7 49 B2 49 31 3A 8B 4B |.L..H1.7.I.I1:.K|
00001520: 32 24 28 49 32 29 B3 4B 32 24 28 49 31 29 A7 49 |2$(I2).K2$(I1).I|
00001530: B2 31 32 00 39 1D 4D 01 8E 00 57 1D 4E 01 99 22 |.12.9.M...W.N.."|
00001540: 93 11 11 2A 2A 2A 2A 2A 20 D6 C5 D2 C1 CE C4 C5 |...***** .......|
00001550: D2 20 2A 2A 2A 2A 2A 00 72 1D 4F 01 99 22 3D 3D |. *****.r.O.."==|
00001560: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001570: 3D 3D 00 7F 1D 50 01 8B 4E B1 30 89 33 34 31 00 |==...P..N.0.341.|
00001580: A6 1D 51 01 99 22 11 C5 52 20 49 53 20 47 45 45 |..Q.."..R IS GEE|
00001590: 4E 20 42 45 53 54 41 4E 44 20 49 4E 20 44 45 20 |N BESTAND IN DE |
000015A0: 43 42 4D 20 36 34 00 C1 1D 52 01 99 22 11 11 D2 |CBM 64...R.."...|
000015B0: 41 41 4B 20 45 45 4E 20 54 4F 45 54 53 20 41 41 |AAK EEN TOETS AA|
000015C0: 4E 00 CA 1D 53 01 8D 31 30 32 00 D0 1D 54 01 8E |N...S..102...T..|
000015D0: 00 03 1E 55 01 85 22 11 D7 45 4C 4B 20 41 44 52 |...U.."..ELK ADR|
000015E0: 45 53 4E 52 2E 20 57 49 4C 54 20 55 20 56 45 52 |ESNR. WILT U VER|
000015F0: 41 4E 44 45 52 45 4E 20 3F 20 BF 9D 9D 9D 22 3B |ANDEREN ? ....";|
00001600: 5A 33 24 00 10 1E 56 01 5A B2 C5 28 5A 33 24 29 |Z3$...V.Z..(Z3$)|
00001610: 00 2D 1E 57 01 8B 5A 33 24 B2 22 BF 22 B0 5A B2 |.-.W..Z3$.".".Z.|
00001620: 30 A7 99 22 91 91 91 22 3A 89 33 34 31 00 42 1E |0.."...":.341.B.|
00001630: 58 01 8B 5A B1 4E A7 99 22 91 91 91 22 3A 89 33 |X..Z.N.."...":.3|
00001640: 34 31 00 4F 1E 59 01 48 38 B2 48 25 28 5A 29 00 |41.O.Y.H8.H%(Z).|
00001650: 55 1E 5A 01 8F 00 7A 1E 5B 01 99 22 11 D7 49 4A |U.Z...z.[.."..IJ|
00001660: 5A 49 47 20 41 4C 20 4F 46 20 4E 49 45 54 20 44 |ZIG AL OF NIET D|
00001670: 45 20 52 45 47 45 4C 20 45 4E 00 9B 1E 5C 01 99 |E REGEL EN...\..|
00001680: 22 11 44 52 55 4B 20 44 41 41 52 4E 41 20 4F 50 |".DRUK DAARNA OP|
00001690: 20 12 D2 C5 D4 D5 D2 CE 92 20 2E 00 B9 1E 5D 01 | ........ ....].|
000016A0: 99 22 11 11 20 20 20 20 20 20 20 20 20 20 20 20 |.".. |
000016B0: 20 22 3B 4E 24 28 48 38 29 00 D4 1E 5E 01 85 22 | ";N$(H8)...^.."|
000016C0: 91 CE 41 41 4D 20 20 20 20 20 20 20 3A 20 9D 9D |..AAM : ..|
000016D0: 22 3B 56 24 00 E2 1E 5F 01 4E 24 28 48 38 29 B2 |";V$..._.N$(H8).|
000016E0: 56 24 00 FE 1E 60 01 99 22 20 20 20 20 20 20 20 |V$...`.." |
000016F0: 20 20 20 20 20 20 22 3B 41 24 28 48 38 29 00 19 | ";A$(H8)..|
00001700: 1F 61 01 85 22 91 C1 44 52 45 53 20 20 20 20 20 |.a.."..DRES |
00001710: 20 3A 20 9D 9D 22 3B 56 24 00 27 1F 62 01 41 24 | : ..";V$.'.b.A$|
00001720: 28 48 38 29 B2 56 24 00 43 1F 63 01 99 22 20 20 |(H8).V$.C.c.." |
00001730: 20 20 20 20 20 20 20 20 20 20 20 22 3B 50 24 28 | ";P$(|
00001740: 48 38 29 00 5E 1F 64 01 85 22 91 D0 4F 53 54 43 |H8).^.d.."..OSTC|
00001750: 4F 44 45 20 20 20 3A 20 9D 9D 22 3B 56 24 00 6C |ODE : ..";V$.l|
00001760: 1F 65 01 50 24 28 48 38 29 B2 56 24 00 88 1F 66 |.e.P$(H8).V$...f|
00001770: 01 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
00001780: 22 3B 57 24 28 48 38 29 00 A3 1F 67 01 85 22 91 |";W$(H8)...g..".|
00001790: D7 4F 4F 4E 50 4C 41 41 54 53 20 3A 20 9D 9D 22 |.OONPLAATS : .."|
000017A0: 3B 56 24 00 B1 1F 68 01 57 24 28 48 38 29 B2 56 |;V$...h.W$(H8).V|
000017B0: 24 00 CD 1F 69 01 99 22 20 20 20 20 20 20 20 20 |$...i.." |
000017C0: 20 20 20 20 20 22 3B 54 24 28 48 38 29 00 E8 1F | ";T$(H8)...|
000017D0: 6A 01 85 22 91 D4 45 4C 45 46 4F 4F 4E 4E 52 20 |j.."..ELEFOONNR |
000017E0: 3A 20 9D 9D 22 3B 56 24 00 F6 1F 6B 01 54 24 28 |: ..";V$...k.T$(|
000017F0: 48 38 29 B2 56 24 00 13 20 6C 01 99 22 20 20 20 |H8).V$.. l.." |
00001800: 20 20 20 20 20 20 20 20 20 20 22 3B 4B 31 24 28 | ";K1$(|
00001810: 48 38 29 00 2E 20 6D 01 85 22 91 CB 45 4E 4D 45 |H8).. m.."..ENME|
00001820: 52 4B 20 31 20 20 3A 20 9D 9D 22 3B 56 24 00 3D |RK 1 : ..";V$.=|
00001830: 20 6E 01 4B 31 24 28 48 38 29 B2 56 24 00 5A 20 | n.K1$(H8).V$.Z |
00001840: 6F 01 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |o.." |
00001850: 20 22 3B 4B 32 24 28 48 38 29 00 75 20 70 01 85 | ";K2$(H8).u p..|
00001860: 22 91 CB 45 4E 4D 45 52 4B 20 32 20 20 3A 20 9D |"..ENMERK 2 : .|
00001870: 9D 22 3B 56 24 00 84 20 71 01 4B 32 24 28 48 38 |.";V$.. q.K2$(H8|
00001880: 29 B2 56 24 00 AA 20 72 01 99 22 11 11 12 31 92 |).V$.. r.."...1.|
00001890: 2E 20 CE 4F 47 20 45 45 4E 20 41 44 52 45 53 20 |. .OG EEN ADRES |
000018A0: 56 45 52 41 4E 44 45 52 45 4E 00 CB 20 73 01 99 |VERANDEREN.. s..|
000018B0: 22 11 12 32 92 2E 20 D4 45 52 55 47 20 4E 41 41 |"..2.. .ERUG NAA|
000018C0: 52 20 48 4F 4F 46 44 4D 45 4E 55 00 D4 20 74 01 |R HOOFDMENU.. t.|
000018D0: 8D 31 30 32 00 E7 20 75 01 8B 48 31 B3 31 B0 48 |.102.. u..H1.1.H|
000018E0: 31 B1 32 89 33 37 32 00 F3 20 76 01 8B 48 31 B2 |1.2.372.. v..H1.|
000018F0: 32 A7 8E 00 FC 20 77 01 89 33 33 34 00 27 21 78 |2.... w..334.'!x|
00001900: 01 97 31 35 38 2C 31 3A 97 36 32 33 2C 39 39 3A |..158,1:.623,99:|
00001910: 99 22 4F 56 45 52 5A 49 43 48 54 20 4E 4F 47 20 |."OVERZICHT NOG |
00001920: 54 45 20 44 4F 45 4E 00 64 21 79 01 99 22 13 11 |TE DOEN.d!y.."..|
00001930: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001940: 11 11 11 11 11 11 11 12 D2 C1 C1 CB A0 C5 C5 CE |................|
00001950: A0 D4 CF C5 D4 D3 13 22 3A 8D 31 30 32 3A 99 22 |.......":.102:."|
00001960: 93 22 3A 8E 00 81 21 7A 01 99 22 93 11 11 2A 2A |.":...!z.."...**|
00001970: 2A 2A 2A 20 C2 C5 D7 C1 D2 C5 CE 20 2A 2A 2A 2A |*** ....... ****|
00001980: 2A 00 9B 21 7B 01 99 22 3D 3D 3D 3D 3D 3D 3D 3D |*..!{.."========|
00001990: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 C4 21 7C 01 |===========..!|.|
000019A0: 99 22 11 11 C7 45 45 46 20 4E 41 41 4D 20 57 41 |."...EEF NAAM WA|
000019B0: 41 52 4F 4E 44 45 52 20 42 45 53 54 41 4E 44 20 |ARONDER BESTAND |
000019C0: 4D 4F 45 54 00 F6 21 7D 01 85 22 11 57 4F 52 44 |MOET..!}..".WORD|
000019D0: 45 4E 20 4F 50 47 45 42 4F 52 47 45 4E 20 3F 20 |EN OPGEBORGEN ? |
000019E0: 41 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 3B 46 24 |ADRES.......";F$|
000019F0: 3A 52 24 B2 22 22 00 17 22 7E 01 46 24 B2 C8 28 |:R$."".."~.F$..(|
00001A00: 46 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 22 |F$." "|
00001A10: 2C 31 31 29 AA 49 24 00 20 22 7F 01 8D 34 33 31 |,11).I$. "...431|
00001A20: 00 42 22 80 01 85 22 11 D7 41 54 20 49 53 20 44 |.B"..."..AT IS D|
00001A30: 45 20 44 41 54 55 4D 20 20 20 2E 9D 9D 9D 22 3B |E DATUM ....";|
00001A40: 44 24 00 59 22 81 01 9F 46 52 2C 54 41 50 45 2C |D$.Y"...FR,TAPE,|
00001A50: 32 20 2C 46 24 3A 99 46 24 00 81 22 82 01 52 24 |2 ,F$:.F$.."..R$|
00001A60: B2 C4 28 4E 29 3A 98 46 52 2C 52 24 3A 99 52 24 |..(N):.FR,R$:.R$|
00001A70: 3A 52 24 B2 44 24 3A 98 46 52 2C 52 24 3A 99 52 |:R$.D$:.FR,R$:.R|
00001A80: 24 00 A2 22 83 01 99 22 11 C1 41 4E 54 41 4C 20 |$.."..."..ANTAL |
00001A90: 41 44 52 45 53 53 45 4E 20 49 53 20 3A 22 4E 22 |ADRESSEN IS :"N"|
00001AA0: 11 11 00 C2 22 84 01 81 4C B2 31 A4 4E 3A 48 38 |...."...L.1.N:H8|
00001AB0: B2 48 25 28 4C 29 3A 99 22 91 C1 44 52 45 53 3A |.H%(L):."..DRES:|
00001AC0: 22 4C 00 D9 22 85 01 98 46 52 2C 4E 24 28 48 38 |"L.."...FR,N$(H8|
00001AD0: 29 3A 99 4E 24 28 48 38 29 00 F0 22 86 01 98 46 |):.N$(H8).."...F|
00001AE0: 52 2C 41 24 28 48 38 29 3A 99 41 24 28 48 38 29 |R,A$(H8):.A$(H8)|
00001AF0: 00 07 23 87 01 98 46 52 2C 50 24 28 48 38 29 3A |..#...FR,P$(H8):|
00001B00: 99 50 24 28 48 38 29 00 1E 23 88 01 98 46 52 2C |.P$(H8)..#...FR,|
00001B10: 57 24 28 48 38 29 3A 99 57 24 28 48 38 29 00 35 |W$(H8):.W$(H8).5|
00001B20: 23 89 01 98 46 52 2C 54 24 28 48 38 29 3A 99 54 |#...FR,T$(H8):.T|
00001B30: 24 28 48 38 29 00 4E 23 8A 01 98 46 52 2C 4B 31 |$(H8).N#...FR,K1|
00001B40: 24 28 48 38 29 3A 99 4B 31 24 28 48 38 29 00 67 |$(H8):.K1$(H8).g|
00001B50: 23 8B 01 98 46 52 2C 4B 32 24 28 48 38 29 3A 99 |#...FR,K2$(H8):.|
00001B60: 4B 32 24 28 48 38 29 00 6E 23 8C 01 82 4C 00 7B |K2$(H8).n#...L.{|
00001B70: 23 8D 01 A0 46 52 3A 8D 34 33 33 00 81 23 8E 01 |#...FR:.433..#..|
00001B80: 8E 00 9C 23 8F 01 99 22 93 11 11 2A 2A 2A 2A 2A |...#..."...*****|
00001B90: 20 C5 C9 CE C4 C5 20 2A 2A 2A 2A 2A 00 B4 23 90 | ..... *****..#.|
00001BA0: 01 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.."=============|
00001BB0: 3D 3D 3D 3D 00 DD 23 91 01 99 22 11 11 12 31 92 |====..#..."...1.|
00001BC0: 2E 20 C2 45 53 54 41 4E 44 20 4E 4F 47 20 4E 49 |. .ESTAND NOG NI|
00001BD0: 45 54 20 4F 50 47 45 42 4F 52 47 45 4E 00 FF 23 |ET OPGEBORGEN..#|
00001BE0: 92 01 99 22 11 12 32 92 2E 20 C2 45 53 54 41 4E |..."..2.. .ESTAN|
00001BF0: 44 20 41 4C 20 4F 50 47 45 42 4F 52 47 45 4E 00 |D AL OPGEBORGEN.|
00001C00: 08 24 93 01 8D 31 30 32 00 1B 24 94 01 8B 48 31 |.$...102..$...H1|
00001C10: B3 31 B0 48 31 B1 32 89 34 30 33 00 28 24 95 01 |.1.H1.2.403.($..|
00001C20: 8B 48 31 B3 B1 32 A7 8E 00 2E 24 96 01 80 00 58 |.H1..2....$....X|
00001C30: 24 97 01 99 22 11 12 C6 49 4C 45 20 4E 49 45 54 |$..."...ILE NIET|
00001C40: 20 4F 50 20 54 41 50 45 20 23 22 54 41 50 45 3A | OP TAPE #"TAPE:|
00001C50: 4E B2 30 3A 89 32 30 30 00 72 24 98 01 99 22 11 |N.0:.200.r$...".|
00001C60: C6 49 4C 45 20 4E 41 41 4D 20 20 20 30 9D 9D 9D |.ILE NAAM 0...|
00001C70: 22 3B 00 97 24 99 01 85 46 24 3A 46 24 B2 C8 28 |";..$...F$:F$..(|
00001C80: 46 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 22 |F$." "|
00001C90: 2C 31 31 29 AA 49 24 00 AD 24 9A 01 9F 46 52 2C |,11).I$..$...FR,|
00001CA0: 54 41 50 45 2C 32 2C 46 24 3A A0 46 52 00 B3 24 |TAPE,2,F$:.FR..$|
00001CB0: 9B 01 8E 00 D7 24 9C 01 99 22 93 11 C4 4F 4F 52 |.....$..."...OOR|
00001CC0: 4C 41 41 44 20 50 52 4F 47 52 41 4D 4D 41 27 53 |LAAD PROGRAMMA'S|
00001CD0: 20 5A 49 4A 4E 20 3A 00 EC 24 9D 01 99 22 11 12 | ZIJN :..$..."..|
00001CE0: 31 92 2E 20 D0 52 49 4E 54 4F 55 54 00 FF 24 9E |1.. .RINTOUT..$.|
00001CF0: 01 99 22 11 12 32 92 2E 20 C3 4C 41 49 52 45 00 |.."..2.. .LAIRE.|
00001D00: 0B 25 9F 01 99 22 11 12 33 92 2E 00 23 25 A0 01 |.%..."..3...#%..|
00001D10: 99 22 11 12 34 92 2E 20 D4 41 50 45 20 4F 55 54 |."..4.. .APE OUT|
00001D20: 2F 49 4E 00 3A 25 A1 01 99 22 11 11 D7 45 4C 4B |/IN.:%..."...ELK|
00001D30: 45 20 57 49 4C 20 4A 45 20 3F 00 61 25 A2 01 99 |E WIL JE ?.a%...|
00001D40: 22 11 28 C4 52 55 4B 20 27 4E 27 20 56 4F 4F 52 |".(.RUK 'N' VOOR|
00001D50: 20 54 45 52 55 47 20 4E 41 41 52 20 4D 45 4E 55 | TERUG NAAR MENU|
00001D60: 29 00 6A 25 A3 01 8D 31 30 32 00 89 25 A4 01 8B |).j%...102..%...|
00001D70: 48 31 B2 31 A7 3A 99 24 58 2C 54 41 50 45 2C 22 |H1.1.:.$X,TAPE,"|
00001D80: 50 52 49 4E 54 4F 55 54 22 00 A6 25 A5 01 8B 48 |PRINTOUT"..%...H|
00001D90: 31 B2 32 A7 3A 99 24 58 2C 54 41 50 45 2C 22 43 |1.2.:.$X,TAPE,"C|
00001DA0: 4C 41 49 52 45 22 00 B1 25 A6 01 8B 48 31 B2 33 |LAIRE"..%...H1.3|
00001DB0: A7 00 CC 25 A7 01 8B 48 31 B2 34 A7 3A 99 24 58 |...%...H1.4.:.$X|
00001DC0: 2C 54 41 50 45 2C 22 54 41 50 45 22 00 DD 25 A8 |,TAPE,"TAPE"..%.|
00001DD0: 01 8B 48 31 24 B2 22 4E 22 A7 31 30 39 00 E6 25 |..H1$."N".109..%|
00001DE0: A9 01 89 34 31 39 00 FF 25 AA 01 99 22 93 11 11 |...419..%..."...|
00001DF0: 12 CE 45 57 20 54 41 50 45 20 23 20 3F 92 22 00 |..EW TAPE # ?.".|
00001E00: 12 26 AB 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 |.&...A$:.A$."".4|
00001E10: 32 37 00 25 26 AC 01 41 B2 C5 28 41 24 29 3A 54 |27.%&..A..(A$):T|
00001E20: 41 50 45 B2 31 00 35 26 AD 01 8B 41 B2 32 A7 54 |APE.1.5&...A.2.T|
00001E30: 41 50 45 B2 32 00 3E 26 AE 01 89 31 30 39 00 68 |APE.2.>&...109.h|
00001E40: 26 AF 01 85 22 11 46 49 4C 45 4E 55 4D 4D 45 52 |&...".FILENUMMER|
00001E50: 20 20 31 9D 9D 9D 22 3B 46 52 3A 99 3A 8B 46 52 | 1...";FR:.:.FR|
00001E60: B1 32 34 30 A7 34 33 31 00 6E 26 B0 01 8E 00 88 |.240.431.n&.....|
00001E70: 26 B1 01 99 22 44 52 55 4B 20 45 45 4E 20 54 4F |&..."DRUK EEN TO|
00001E80: 45 54 53 20 49 4E 2E 22 00 9B 26 B2 01 A1 5A 24 |ETS IN."..&...Z$|
00001E90: 3A 8B 5A 24 B2 22 22 A7 34 33 34 00 A1 26 B3 01 |:.Z$."".434..&..|
00001EA0: 8E 00 00 00 |.... |
....2..53280,0:.53281,0:.G(5).?.D.FR.1:I
$."-FILE":TAPE.1:.G(14)..E.."..##### RU
N IN TAPE ADMINISTRATIE .";TAPE;". ####
#":.104...F..H1$:.H1$."".102...G.H1.E(H1
$):..A.H.A1.100:. AANTAL ADRESSEN...I..N
$(A1),A$(A1),P$(A1),W$(A1),T$(A1),K1$(A1
),K2$(A1),H%(A1),I%(2.A1).Q.J.. IN H%-TA
BEL STAAT DE VOLGORDE-*DE INDEX*- VAN DE
DIVERSE TABELLEN.H.K..J.0.A1:H%(J).J:.J
...L..".CBM-64 CLAIRE
";.L.M..:." STEPHAN SCHEL NEDE
RASSELT "...N.."..1.. INVOERB
ESTAND MAKEN OF UITBREIDEN.#.O.."..2.. I
NHOUD TONEN VAN HET BESTAND.C.P.."..3..
ZOEK IN HET BESTAND.C.Q.."..4.. SORTEER
PER ELEMENT...R.."..5.. VERANDER IN BEST
AND...S.."..6.. SAVEN VAN BESTAND.D.T.."
..7.. STOP MET HET PROGRAMMA...U.."..8..
DOORLADEN PRG....V.."..T.. VERANDER TAP
E #...W..102...X..H1$."T".426.4.Y..(F(H1
$).49.F(H1$).56).119.A.Z..H1.124,203,254
,293,334, 378,399,408,412.J.{..108...|..
"...***** INVOER *****...}.."===========
=======...~..N.0.169.P..."...1.. NIEUW
BESTAND OPBOUWEN......"...2.. OUD BESTAN
D OPHALEN......102......H1$."1".H1$."2".
132......129.-....H1$."2".182.5...N.1.?.
..."..".B...."U KUNT NU ADRESSEN INVOERE
N.......".OM MET INVOER TE EINDIGEN: TIK
-STOP- IN......"GEBRUIK .ALLEEN. KLEINE
LETTERS..E....P.N.A1.W...."..<";P;". >.
..........."NAAM : ....";N$(P)....
..N$(P).".".."..":.141.,....N$(P)."STOP"
.163.K...."ADRES : ....";A$(P).E...
.A$(P).".".."..":.144.{....A$(P)."STOP".
163......"POSTCODE : ....";P$(P)......
P$(P).".".."..":.147.J....P$(P)."STOP".1
63......"WOONPLAATS : ....";W$(P)......W
$(P).".".."..":.150......W$(P)."STOP".16
3.8...."TELEFOONNR : ....";T$(P).R....T$
(P).".".."..":.153.H....T$(P)."STOP".163
......"KENMERK 1 : ....";K1$(P)......K1
$(P)."STOP".163......"KENMERK 2 : ...."
;K2$(P).V....K1$(P)."STOP".163... ......
..P............".EINDE INVOER.....N.P.1.
5....".ER ZIJN NU";N;"ADRESSEN IN HET BE
STAND.Q...."...RAAK EEN TOETS AAN.Z....1
02.`..........".ER ZIT AL EEN BESTAND IN
HET GEHEUGEN......"..1.. NIET OVERSCHRI
JVEN.J...."..2.. WEL OVERSCHRIJVEN.S....
102......H1.1.H1.2.175......169......H1.
2.133......"..3.. BESTAND UITBREIDEN.@..
.."..4.. BESTAND NIET UITBREIDEN.I....10
2.U....H1.4..._...N.N.1.H....134......".
.KLAAR OM BESTAND OP TE HALEN.........".
WELK BESTAND KIEST U ? ADRES.......";F$.
H....431.....F$.H(F$." ",11).I
$......FR,TAPE,0,F$:.F$.....R$."".2....F
R,R$:.R$:N.E(R$):.FR,R$:.R$ :D$.R$.U....
".DATUM VAN DIT FILE IS : "D$.S....".AAN
TAL ADRESSEN :"N"........X.1.N:.".ADRES:
"X......FR,R$:N$(X).R$:.R$...A..FR,R$:A
$(X).R$:.R$.S.B..FR,R$:P$(X).R$:.R$...C.
.FR,R$:W$(X).R$:.R$...D..FR,R$:T$(X).R$:
.R$...E..FR,R$:K1$(X).R$:.R$.5.F..FR,R$:
K2$(X).R$:.R$.<.G..X.I.H. FR:.433.`.I..J
.0.A1:H%(J).J:.J.F.J.....K.."...***** IN
HOUD *****...L.."==================...M.
."..WELKE ADRESSEN WILT U ZIEN ?.S.N..".
..1.. ALLES...O.."..2.. EEN...P.."..3..
BEREIK...Q..102...R..H1.1.H1.3.209.!.S..
H1..1.214./.T.T1.1:T2.N.8.U..239.G.V..H1
..2.221.K.W..".WELK ADRESNUMMER ? ....";
T1$.Y.X.T1.E(T1$)...Y..T1$.".".T1.0.."..
.":.215...Z..T1.N.235.....T2.T1......239
......".WAT IS HET EERSTE ADRESNR. ? ...
.";T1$.....T1.E(T1$)......T1$.".".T1.0..
"...":.221.!....T1.1.T1.1./....T1.N.235.
^....".WAT IS HET LAATSTE ADRESNR. ? ...
.";T2$.L...T2.E(T2$)......T2$.".".T2.0..
"...":.226......T2.N.235......T2..T1.239
.S...."..FOUT. !! LAATSTE ADRES KLEINER
DAN......".EERSTE ADRES........."..RAAK
EEN TOETS AAN VOOR NOG EEN POGING."....2
03.Q....".BESTAND HEEFT SLECHTS ";N;" AD
RESSEN........."..RAAK EEN TOETS AAN VOO
R NOG EEN POGING......102......203......
".......W.T1.T2.....H8.H%(W).E....".<";W
;". >.K.....W....N$(H8)......A$(H8).....
.P$(H8);" ";W$(H8)......T$(H8)......K1$
(H8).!....K2$(H8).'.....0....102.7....W.
=.....Y...."...***** ZOEKEN *****.R...."
==================......"..WAAR MOET NAA
R GEZOCHT WORDEN,.C....".OFWEL WAT IS DE
SLEUTEL ? ....";Z$......Z$.".".."...":.
257.....F1.0.....F.C(Z$)......Z.1.N:H8.H
%(Z)......H(N$(H8),F).Z$.278.4....H(A$(H
8),F).Z$.278.L....H(P$(H8),F).Z$.278.D..
..H(W$(H8),F).Z$.278.|....H(T$(H8),F).Z$
.278......H(K1$(H8),F).Z$.278......H(K2$
(H8),F).Z$.278......Z.A....F1.1........"
.SLEUTEL KOMT NIET IN BESTAND VOOR......
..."..1.. WILT U EEN NIEUWE SLEUTEL INVO
EREN.=...."..2.. TERUG NAAR HOOFDMENU.F.
...102.Y....H1.1.H1.2.274.E....H1.2...N.
...254.T.....}...F1.1......".ADRES MET S
LEUTELWOORD:......"---------------------
--.K....".<";Z;". >.Y....:.N$(H8)......A
$(H8)......P$(H8);" ";W$(H8)......"(";T
$(H8);")"......K1$(H8).+. ..K2$(H8).C.!.
.:."RAAK EEN TOETS".L."..102.W.#..Z.N...
`.$..269.~.%.."...***** SORTEREN *****..
.&.."====================.A.'.."..WAAROP
MOET GESORTEERD WORDEN ?.S.(.."...1.. N
AAM...).."..2.. ADRES...*.."..3.. POSTCO
DE...+.."..4.. WOONPLAATS.(.,.."..5.. TE
LEFOONNR.?.-.."..6.. KENMERK 1..V...."..
7.. KENMERK 2.._./..102.R.0..H1.1.H1.7.3
03...1..".SORTEREN KOST ZELFS EEN COMPUT
ER TIJD......2..311.F.3.."..BESTAND GESO
RTEERD...4..".RAAK EEN TOETS":.102...5..
...6.. ***** SORTEER ROUTINE *****...7.N
9.N.1:X.0:H9.0.;.8.B.N9.1:.J.0.B:I%(J).J
:.J.M.9..J.0.N9.2.3.2.K.:.B.B.1:I1.I%(J)
:I2.I%(J.1).T.;..326...<.I%(B).I:.J...=.
X.X.1:C.I%(B):.C.0.....>.H%(H9).C:H9.H9.
1...?.I%(C).X...@.C%.C.2:J.C%.2:C.N9.C%:
.C.B.317...A.I1.I%(J):I2.I%(J.1)...B..I1
.0.I.I2:.325. .C..I2.0.I.I1:.325.).D..32
6.:.E.I%(C).I:.320.].F..H1.1.I.I1:.N$(I2
).N$(I1).I.I2...G..H1.2.I.I1:.A$(I2).A$(
I1).I.I2...H..H1.3.I.I1:.P$(I2).P$(I1).I
.I2.F.I..H1.4.I.I1:.W$(I2).W$(I1).I.I2..
.J..H1.5.I.I1:.T$(I2).T$(I1).I.I2...K..H
1.6.I.I1:.K1$(I2).K1$(I1).I.I2.3.L..H1.7
.I.I1:.K2$(I2).K2$(I1).I.12.9.M...W.N.."
...***** VERANDER *****.R.O.."==========
==========..P..N.0.341...Q..".ER IS GEE
N BESTAND IN DE CBM 64.A.R.."..RAAK EEN
TOETS AAN.J.S..102.P.T.....U..".WELK ADR
ESNR. WILT U VERANDEREN ? ....";Z3$...V.
Z.E(Z3$).-.W..Z3$.".".Z.0.."...":.341.B.
X..Z.N.."...":.341.O.Y.H8.H%(Z).U.Z...Z.
[..".WIJZIG AL OF NIET DE REGEL EN...\..
".DRUK DAARNA OP .RETURN. ....].."..
";N$(H8).T.^..".NAAM : ..
";V$..._.N$(H8).V$...`.." ";
A$(H8)...A..".ADRES : ..";V$.'.B.A$
(H8).V$.C.C.." ";P$(H8).^.D.
.".POSTCODE : ..";V$.L.E.P$(H8).V$...F
.." ";W$(H8)...G..".WOONPLAA
TS : ..";V$...H.W$(H8).V$.M.I.."
";T$(H8)...J..".TELEFOONNR : ..";V$
...K.T$(H8).V$.. L.." ";K1$(
H8).. M..".KENMERK 1 : ..";V$.= N.K1$(H
8).V$.Z O.." ";K2$(H8).U P..
".KENMERK 2 : ..";V$.. Q.K2$(H8).V$.. R
.."...1.. NOG EEN ADRES VERANDEREN.K S..
"..2.. TERUG NAAR HOOFDMENU.T T..102.. U
..H1.1.H1.2.372.. V..H1.2.... W..334.'!X
..158,1:.623,99:."OVERZICHT NOG TE DOEN.
D!Y.."..........................RAAK EEN
TOETS.":.102:.".":...!Z.."...***** BEWA
REN *****..!{.."===================.D!|.
."..GEEF NAAM WAARONDER BESTAND MOET..!}
..".WORDEN OPGEBORGEN ? ADRES.......";F$
:R$."".."~.F$.H(F$." ",11).I$.
"..431.B"...".WAT IS DE DATUM ....";
D$.Y"...FR,TAPE,2 ,F$:.F$.."..R$.D(N):.F
R,R$:.R$:R$.D$:.FR,R$:.R$.."...".AANTAL
ADRESSEN IS :"N"...B"...L.1.N:H8.H%(L):.
".ADRES:"L.Y"...FR,N$(H8):.N$(H8).."...F
R,A$(H8):.A$(H8)..#...FR,P$(H8):.P$(H8).
.#...FR,W$(H8):.W$(H8).5#...FR,T$(H8):.T
$(H8).N#...FR,K1$(H8):.K1$(H8).G#...FR,K
2$(H8):.K2$(H8).N#...L.{#.. FR:.433..#..
...#..."...***** EINDE *****..#..."=====
============..#..."...1.. BESTAND NOG NI
ET OPGEBORGEN..#..."..2.. BESTAND AL OPG
EBORGEN..$...102..$...H1.1.H1.2.403.($..
.H1..2....$....X$..."..FILE NIET OP TAPE
#"TAPE:N.0:.200.R$...".FILE NAAM 0...
";..$...F$:F$.H(F$." ",11).I$.
.$...FR,TAPE,2,F$: FR..$....W$..."..DOOR
LAAD PROGRAMMA'S ZIJN :..$..."..1.. PRIN
TOUT..$..."..2.. CLAIRE..%..."..3...#% .
."..4.. TAPE OUT/IN.:%..."..WELKE WIL JE
?.A%...".(DRUK 'N' VOOR TERUG NAAR MENU
).J%...102..%...H1.1.:.$X,TAPE,"PRINTOUT
"..%...H1.2.:.$X,TAPE,"CLAIRE"..%...H1.3
..L%...H1.4.:.$X,TAPE,"TAPE"..%...H1$."N
".109..%...419..%..."....NEW TAPE # ?.".
.&...A$:.A$."".427.%&..A.E(A$):TAPE.1.5&
...A.2.TAPE.2.>&...109.H&...".FILENUMMER
1...";FR:.:.FR.240.431.N&.....&..."DRU
K EEN TOETS IN."..&...Z$:.Z$."".434..&..
....
> CLICK IMAGE PREVIEW FOR FULL MODAL