CLAIRE1.
FILE INFORMATION
FILENAME(S): CLAIRE1.
FILE TYPE(S): PRG
FILE SIZE: 7.8K
FIRST SEEN: 2025-11-30 21:23:24
APPEARS ON: 1 disk(s)
FILE HASH
c5a1a7adc59a1407827bec030fa8e874faee1c651d295aaa620d4a4ab5a50dd8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 9 2 | CLAIRE1. | PRG | DuncanTwain | 11 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 11 08 00 00 8B 45 58 49 54 B2 31 89 31 36 |.......EXIT.1.16|
00000010: 30 00 1C 08 01 00 45 58 49 54 B2 31 00 36 08 64 |0.....EXIT.1.6.d|
00000020: 00 99 22 93 11 11 11 11 93 22 3A 8B 54 B2 36 34 |.."......":.T.64|
00000030: 42 B0 44 45 52 33 00 47 08 6E 00 8F 20 2A 2A 2A |B.DER3.G.n.. ***|
00000040: 2A 20 43 4C 41 49 52 00 75 08 78 00 41 31 B2 32 |* CLAIR.u.x.A1.2|
00000050: 35 3A 5A 49 24 B2 22 5A 49 45 4E 20 3F 22 3A 53 |5:ZI$."ZIEN ?":S|
00000060: B2 34 32 3A 50 54 24 B2 22 4B 45 55 5A 45 20 12 |.42:PT$."KEUZE .|
00000070: 3E 3E 92 20 22 00 AE 08 82 00 86 20 4E 24 28 41 |>>. "...... N$(A|
00000080: 31 29 2C 41 24 28 41 31 29 2C 50 24 28 41 31 29 |1),A$(A1),P$(A1)|
00000090: 2C 57 24 28 41 31 29 2C 54 24 28 41 31 29 2C 48 |,W$(A1),T$(A1),H|
000000A0: 25 28 41 31 29 2C 49 25 28 32 AC 41 31 29 00 F6 |%(A1),I%(2.A1)..|
000000B0: 08 8C 00 8F 20 49 4E 20 48 25 2D 54 41 42 45 4C |.... IN H%-TABEL|
000000C0: 20 53 54 41 41 54 20 44 45 20 56 4F 4C 47 4F 52 | STAAT DE VOLGOR|
000000D0: 44 45 2D 2A 44 45 20 49 4E 44 45 58 2A 2D 20 56 |DE-*DE INDEX*- V|
000000E0: 41 4E 20 44 45 20 44 49 56 45 52 53 45 20 54 41 |AN DE DIVERSE TA|
000000F0: 42 45 4C 4C 45 4E 00 0D 09 96 00 81 4A B2 30 A4 |BELLEN......J.0.|
00000100: 41 31 3A 48 25 28 4A 29 B2 4A 3A 82 4A 00 48 09 |A1:H%(J).J:.J.H.|
00000110: A0 00 99 22 93 22 3A 0E 30 2C 30 2C 33 39 2C 30 |...".":.0,0,39,0|
00000120: 2C 32 33 39 3A 0E 30 2C 34 2C 33 39 2C 34 2C 53 |,239:.0,4,39,4,S|
00000130: 3A 0E 30 2C 30 2C 30 2C 34 2C 53 3A 0E 33 39 2C |:.0,0,0,4,S:.39,|
00000140: 30 2C 33 39 2C 34 2C 53 00 5E 09 B4 00 E7 38 32 |0,39,4,S.^....82|
00000150: 22 12 43 4C 41 49 52 45 92 20 4D 45 4E 55 00 89 |".CLAIRE. MENU..|
00000160: 09 E6 00 99 22 11 11 11 31 2E 20 42 45 53 54 41 |...."...1. BESTA|
00000170: 4E 44 20 4F 50 5A 45 54 54 45 4E 20 4F 46 20 55 |ND OPZETTEN OF U|
00000180: 49 54 42 52 45 49 44 45 4E 00 B0 09 F0 00 99 22 |ITBREIDEN......"|
00000190: 11 32 2E 20 49 4E 48 4F 55 44 20 54 4F 4E 45 4E |.2. INHOUD TONEN|
000001A0: 20 56 41 4E 20 48 45 54 20 42 45 53 54 41 4E 44 | VAN HET BESTAND|
000001B0: 00 D0 09 FA 00 99 22 11 33 2E 20 5A 4F 45 4B 45 |......".3. ZOEKE|
000001C0: 4E 20 49 4E 20 48 45 54 20 42 45 53 54 41 4E 44 |N IN HET BESTAND|
000001D0: 00 EF 09 04 01 99 22 11 34 2E 20 53 4F 52 54 45 |......".4. SORTE|
000001E0: 52 45 4E 20 50 45 52 20 45 4C 45 4D 45 4E 54 00 |REN PER ELEMENT.|
000001F0: 0F 0A 0E 01 99 22 11 35 2E 20 56 45 52 41 4E 44 |.....".5. VERAND|
00000200: 45 52 45 4E 20 49 4E 20 42 45 53 54 41 4E 44 00 |EREN IN BESTAND.|
00000210: 42 0A 18 01 99 22 11 36 2E 20 4C 45 44 45 4E 4C |B....".6. LEDENL|
00000220: 49 4A 53 54 20 50 52 49 4E 54 45 4E 20 20 20 20 |IJST PRINTEN |
00000230: 11 2A 91 9D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.*..************|
00000240: 2A 2A 00 75 0A 22 01 99 22 11 37 2E 20 4C 41 42 |**.u."..".7. LAB|
00000250: 45 4C 53 20 50 52 49 4E 54 45 4E 20 20 20 20 20 |ELS PRINTEN |
00000260: 20 20 20 11 2A 91 9D 2A 20 20 44 4F 4F 52 47 41 | .*..* DOORGA|
00000270: 41 4E 20 4E 41 00 A8 0A 2C 01 99 22 11 38 2E 20 |AN NA...,..".8. |
00000280: 42 45 53 54 41 4E 44 20 57 45 47 53 43 48 52 49 |BESTAND WEGSCHRI|
00000290: 4A 56 45 4E 20 20 11 2A 91 9D 2A 20 20 20 27 52 |JVEN .*..* 'R|
000002A0: 45 41 44 59 2E 27 20 3A 00 DC 0A 36 01 99 22 11 |EADY.' :...6..".|
000002B0: 39 2E 20 53 54 4F 50 20 50 52 4F 47 52 41 4D 4D |9. STOP PROGRAMM|
000002C0: 41 20 20 20 20 20 20 20 20 11 2A 91 9D 2A 20 20 |A .*..* |
000002D0: 20 20 20 20 12 47 4F 54 4F 20 30 92 00 EC 0A 3B | .GOTO 0....;|
000002E0: 01 99 F3 28 34 30 2C 31 38 35 29 3B 00 12 0B 40 |...(40,185);...@|
000002F0: 01 97 31 35 38 2C 30 3A 8D 33 35 34 31 3A 8B 48 |..158,0:.3541:.H|
00000300: 31 24 B2 22 30 22 A7 2E EF 48 31 B2 C5 28 48 31 |1$."0"...H1..(H1|
00000310: 24 29 00 49 0B 54 01 91 20 48 31 20 8D 20 33 36 |$).I.T.. H1 . 36|
00000320: 30 2C 31 30 38 30 2C 31 36 30 30 2C 31 39 34 30 |0,1080,1600,1940|
00000330: 2C 32 33 31 30 2C 33 35 36 30 2C 32 37 31 30 2C |,2310,3560,2710,|
00000340: 33 33 30 30 2C 33 34 36 30 00 53 0B 5E 01 89 20 |3300,3460.S.^.. |
00000350: 31 36 30 00 70 0B 68 01 99 22 93 11 11 2A 2A 2A |160.p.h.."...***|
00000360: 2A 2A 20 49 4E 56 4F 45 52 20 2A 2A 2A 2A 2A 22 |** INVOER *****"|
00000370: 00 8A 0B 72 01 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D |...r.."=========|
00000380: 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 97 0B 7C 01 8B |========="...|..|
00000390: 4E B1 30 89 38 31 30 00 BA 0B 86 01 99 22 11 11 |N.0.810......"..|
000003A0: 31 2E 20 4E 49 45 55 57 20 42 45 53 54 41 4E 44 |1. NIEUW BESTAND|
000003B0: 20 4F 50 42 4F 55 57 45 4E 22 00 E1 0B 90 01 99 | OPBOUWEN"......|
000003C0: 22 11 11 32 2E 20 4F 55 44 20 42 45 53 54 41 4E |"..2. OUD BESTAN|
000003D0: 44 20 4F 50 48 41 4C 45 4E 11 22 3A 8D 33 35 34 |D OPHALEN.":.354|
000003E0: 31 00 04 0C A4 01 8B 48 31 24 B2 22 31 22 89 34 |1......H1$."1".4|
000003F0: 35 30 EF 8B 48 31 24 B2 22 32 22 89 39 34 30 EF |50..H1$."2".940.|
00000400: 89 33 36 30 00 0C 0C C2 01 4E B2 31 00 16 0C CC |.360.....N.1....|
00000410: 01 99 22 93 11 22 00 39 0C D6 01 99 22 55 20 4B |.."..".9...."U K|
00000420: 55 4E 54 20 4E 55 20 41 44 52 45 53 53 45 4E 20 |UNT NU ADRESSEN |
00000430: 49 4E 56 4F 45 52 45 4E 22 00 68 0C E0 01 99 22 |INVOEREN".h...."|
00000440: 11 4F 4D 20 4D 45 54 20 49 4E 56 4F 45 52 20 54 |.OM MET INVOER T|
00000450: 45 20 45 49 4E 44 49 47 45 4E 3A 20 54 59 50 45 |E EINDIGEN: TYPE|
00000460: 20 2D 53 54 4F 50 2D 22 00 70 0C EA 01 99 22 22 | -STOP-".p....""|
00000470: 00 81 0C F4 01 81 20 50 20 B2 20 4E 20 A4 20 41 |...... P . N . A|
00000480: 31 00 91 0C FE 01 99 22 11 3C 22 3B 50 3B 22 3E |1......".<";P;">|
00000490: 22 00 A0 0C 08 02 99 22 3D 3D 3D 3D 3D 3D 3D 22 |"......"======="|
000004A0: 00 CA 0C 12 02 49 4E 24 B2 22 20 22 3A EA 22 4E |.....IN$." ":."N|
000004B0: 41 41 4D 20 20 20 20 20 20 20 3A 20 22 3B 49 4E |AAM : ";IN|
000004C0: 24 2C 31 35 3A 8D 34 30 30 30 00 E8 0C 30 02 8B |$,15:.4000...0..|
000004D0: 49 4E 24 B2 22 53 54 4F 50 22 89 37 35 30 EF 4E |IN$."STOP".750.N|
000004E0: 24 28 50 29 B2 49 4E 24 00 12 0D 3A 02 49 4E 24 |$(P).IN$...:.IN$|
000004F0: B2 22 20 22 3A EA 22 41 44 52 45 53 20 20 20 20 |." ":."ADRES |
00000500: 20 20 3A 20 22 3B 49 4E 24 2C 31 38 3A 8D 34 30 | : ";IN$,18:.40|
00000510: 30 30 00 30 0D 58 02 8B 49 4E 24 B2 22 53 54 4F |00.0.X..IN$."STO|
00000520: 50 22 89 37 35 30 EF 41 24 28 50 29 B2 49 4E 24 |P".750.A$(P).IN$|
00000530: 00 59 0D 62 02 49 4E 24 B2 22 20 22 3A EA 22 50 |.Y.b.IN$." ":."P|
00000540: 4F 53 54 43 4F 44 45 20 20 20 3A 20 22 3B 49 4E |OSTCODE : ";IN|
00000550: 24 2C 37 3A 8D 34 30 30 30 00 77 0D 80 02 8B 49 |$,7:.4000.w....I|
00000560: 4E 24 B2 22 53 54 4F 50 22 89 37 35 30 EF 50 24 |N$."STOP".750.P$|
00000570: 28 50 29 B2 49 4E 24 00 AB 0D 8A 02 49 4E 24 B2 |(P).IN$.....IN$.|
00000580: 22 20 22 3A 99 22 91 57 4F 4F 4E 50 4C 41 41 54 |" ":.".WOONPLAAT|
00000590: 53 3A 22 3B F3 28 31 30 2C 32 39 29 3B 3A EA 49 |S:";.(10,29);:.I|
000005A0: 4E 24 2C 31 35 3A 8D 34 30 30 30 00 C9 0D A8 02 |N$,15:.4000.....|
000005B0: 8B 49 4E 24 B2 22 53 54 4F 50 22 89 37 35 30 EF |.IN$."STOP".750.|
000005C0: 57 24 28 50 29 B2 49 4E 24 00 ED 0D B2 02 49 4E |W$(P).IN$.....IN|
000005D0: 24 B2 22 20 22 3A EA 22 11 49 4E 46 4F 20 3A 22 |$." ":.".INFO :"|
000005E0: 3B 49 4E 24 2C 37 39 3A 8D 34 30 30 30 00 0B 0E |;IN$,79:.4000...|
000005F0: C6 02 8B 49 4E 24 B2 22 53 54 4F 50 22 89 37 35 |...IN$."STOP".75|
00000600: 30 EF 54 24 28 50 29 B2 49 4E 24 00 13 0E D0 02 |0.T$(P).IN$.....|
00000610: 99 22 22 00 1B 0E DA 02 82 20 50 00 23 0E E4 02 |.""...... P.#...|
00000620: 99 22 22 00 38 0E EE 02 99 22 11 45 49 4E 44 45 |."".8....".EINDE|
00000630: 20 49 4E 56 4F 45 52 22 00 46 0E F8 02 4E 20 B2 | INVOER".F...N .|
00000640: 20 50 20 AB 20 31 00 74 0E 02 03 99 22 11 45 52 | P . 1.t....".ER|
00000650: 20 5A 49 54 54 45 4E 22 3B 4E 3B 22 41 44 52 45 | ZITTEN";N;"ADRE|
00000660: 53 53 45 4E 20 49 4E 20 48 45 54 20 42 45 53 54 |SSEN IN HET BEST|
00000670: 41 4E 44 22 00 90 0E 0C 03 99 22 11 11 52 41 41 |AND"......"..RAA|
00000680: 4B 20 45 45 4E 20 54 4F 45 54 53 20 41 41 4E 22 |K EEN TOETS AAN"|
00000690: 00 9B 0E 16 03 8D 20 33 35 34 30 00 A1 0E 20 03 |...... 3540... .|
000006A0: 8E 00 CF 0E 2A 03 99 22 11 45 52 20 5A 49 54 20 |....*..".ER ZIT |
000006B0: 41 4C 20 45 45 4E 20 42 45 53 54 41 4E 44 20 49 |AL EEN BESTAND I|
000006C0: 4E 20 48 45 54 20 47 45 48 45 55 47 45 4E 22 00 |N HET GEHEUGEN".|
000006D0: ED 0E 34 03 99 22 11 31 2E 20 4E 49 45 54 20 4F |..4..".1. NIET O|
000006E0: 56 45 52 53 43 48 52 49 4A 56 45 4E 22 00 0A 0F |VERSCHRIJVEN"...|
000006F0: 3E 03 99 22 11 32 2E 20 57 45 4C 20 4F 56 45 52 |>..".2. WEL OVER|
00000700: 53 43 48 52 49 4A 56 45 4E 22 00 14 0F 48 03 8D |SCHRIJVEN"...H..|
00000710: 33 35 34 31 00 2C 0F 52 03 8B 20 48 31 B2 31 20 |3541.,.R.. H1.1 |
00000720: B0 20 48 31 B2 32 20 A7 20 38 37 30 00 36 0F 5C |. H1.2 . 870.6.\|
00000730: 03 89 20 38 31 30 00 47 0F 66 03 8B 20 48 31 B2 |.. 810.G.f.. H1.|
00000740: 32 20 A7 20 34 35 30 00 65 0F 70 03 99 22 11 33 |2 . 450.e.p..".3|
00000750: 2E 20 42 45 53 54 41 4E 44 20 55 49 54 42 52 45 |. BESTAND UITBRE|
00000760: 49 44 45 4E 22 00 88 0F 7A 03 99 22 11 34 2E 20 |IDEN"...z..".4. |
00000770: 42 45 53 54 41 4E 44 20 4E 49 45 54 20 55 49 54 |BESTAND NIET UIT|
00000780: 42 52 45 49 44 45 4E 22 00 92 0F 84 03 8D 33 35 |BREIDEN"......35|
00000790: 34 31 00 9D 0F 8E 03 8B 48 31 B2 34 8E 00 A7 0F |41......H1.4....|
000007A0: 98 03 4E B2 4E AA 31 00 B1 0F A2 03 89 20 34 36 |..N.N.1...... 46|
000007B0: 30 00 E0 0F AC 03 85 22 11 57 45 4C 4B 20 42 45 |0......".WELK BE|
000007C0: 53 54 41 4E 44 20 4B 49 45 53 54 20 55 20 3F 20 |STAND KIEST U ? |
000007D0: 41 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 3B 46 24 |ADRES.......";F$|
000007E0: 00 FC 0F B6 03 46 4C 24 B2 22 30 3A 22 AA 46 24 |.....FL$."0:".F$|
000007F0: AA 22 2C 53 45 51 2C 52 45 41 44 22 00 0B 10 C0 |.",SEQ,READ"....|
00000800: 03 9F 35 2C 38 2C 32 2C 46 4C 24 00 14 10 CA 03 |..5,8,2,FL$.....|
00000810: 84 35 2C 4E 00 1F 10 D4 03 81 58 B2 31 A4 4E 00 |.5,N......X.1.N.|
00000820: 2C 10 DE 03 84 35 2C 4E 24 28 58 29 00 39 10 E8 |,....5,N$(X).9..|
00000830: 03 84 35 2C 41 24 28 58 29 00 46 10 F2 03 84 35 |..5,A$(X).F....5|
00000840: 2C 50 24 28 58 29 00 53 10 FC 03 84 35 2C 57 24 |,P$(X).S....5,W$|
00000850: 28 58 29 00 60 10 06 04 84 35 2C 54 24 28 58 29 |(X).`....5,T$(X)|
00000860: 00 68 10 10 04 82 20 58 00 6F 10 1A 04 A0 35 00 |.h.... X.o....5.|
00000870: 86 10 24 04 81 4A B2 30 A4 41 31 3A 48 25 28 4A |..$..J.0.A1:H%(J|
00000880: 29 B2 4A 3A 82 4A 00 8C 10 2E 04 8E 00 A9 10 38 |).J:.J.........8|
00000890: 04 99 22 93 11 11 2A 2A 2A 2A 2A 20 49 4E 48 4F |.."...***** INHO|
000008A0: 55 44 20 2A 2A 2A 2A 2A 22 00 C3 10 42 04 99 22 |UD *****"...B.."|
000008B0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000008C0: 3D 3D 22 00 E6 10 4C 04 99 22 11 11 57 45 4C 4B |=="...L.."..WELK|
000008D0: 45 20 41 44 52 45 53 53 45 4E 20 57 49 4C 54 20 |E ADRESSEN WILT |
000008E0: 55 20 22 5A 49 24 00 F6 10 56 04 99 22 11 31 2E |U "ZI$...V..".1.|
000008F0: 20 41 4C 4C 45 53 00 13 11 60 04 99 22 11 11 32 | ALLES...`.."..2|
00000900: 2E 20 45 45 4E 20 42 45 50 41 41 4C 44 20 41 44 |. EEN BEPAALD AD|
00000910: 52 45 53 00 25 11 6A 04 99 22 11 33 2E 20 42 45 |RES.%.j..".3. BE|
00000920: 52 45 49 4B 22 00 2F 11 74 04 8D 33 35 34 30 00 |REIK"./.t..3540.|
00000930: 43 11 7E 04 8B 48 31 B3 31 B0 48 31 B1 33 89 31 |C.~..H1.1.H1.3.1|
00000940: 30 38 30 00 58 11 88 04 8B 20 48 31 20 B3 B1 20 |080.X.... H1 .. |
00000950: 31 20 89 20 31 31 39 30 00 66 11 92 04 54 31 B2 |1 . 1190.f...T1.|
00000960: 31 3A 54 32 B2 4E 00 71 11 9C 04 89 20 31 34 34 |1:T2.N.q.... 144|
00000970: 30 00 86 11 A6 04 8B 20 48 31 20 B3 B1 20 32 20 |0...... H1 .. 2 |
00000980: 89 20 31 32 36 30 00 A5 11 B0 04 EA 22 11 57 45 |. 1260......".WE|
00000990: 4C 4B 20 4E 55 4D 4D 45 52 20 3F 20 BF 9D 9D 9D |LK NUMMER ? ....|
000009A0: 22 3B 54 31 24 00 B3 11 BA 04 54 31 B2 C5 28 54 |";T1$.....T1..(T|
000009B0: 31 24 29 00 C7 11 CE 04 8B 20 54 31 20 B1 20 4E |1$)...... T1 . N|
000009C0: 20 A7 20 31 34 30 30 00 D1 11 D8 04 54 32 B2 54 | . 1400.....T2.T|
000009D0: 31 00 DC 11 E2 04 89 20 31 34 34 30 00 02 12 EC |1...... 1440....|
000009E0: 04 85 22 11 45 45 52 53 54 45 20 41 44 52 45 53 |..".EERSTE ADRES|
000009F0: 4E 4E 55 4D 4D 45 52 3F 20 BF 9D 9D 9D 22 3B 54 |NNUMMER? ....";T|
00000A00: 31 24 00 10 12 F6 04 54 31 B2 C5 28 54 31 24 29 |1$.....T1..(T1$)|
00000A10: 00 24 12 0A 05 8B 20 54 31 20 B3 20 31 20 A7 20 |.$.... T1 . 1 . |
00000A20: 54 31 B2 31 00 38 12 14 05 8B 20 54 31 20 B1 20 |T1.1.8.... T1 . |
00000A30: 4E 20 A7 20 31 34 30 30 00 5F 12 1E 05 85 22 11 |N . 1400._....".|
00000A40: 4C 41 41 54 53 54 45 20 41 44 52 45 53 4E 4E 55 |LAATSTE ADRESNNU|
00000A50: 4D 4D 45 52 3F 20 BF 9D 9D 9D 22 3B 54 32 24 00 |MMER? ....";T2$.|
00000A60: 6D 12 28 05 54 32 B2 C5 28 54 32 24 29 00 81 12 |m.(.T2..(T2$)...|
00000A70: 3C 05 8B 20 54 32 20 B1 20 4E 20 A7 20 31 34 30 |<.. T2 . N . 140|
00000A80: 30 00 98 12 46 05 8B 20 54 32 20 B1 B2 20 54 31 |0...F.. T2 .. T1|
00000A90: 20 20 A7 20 31 34 34 30 00 C1 12 50 05 99 22 11 | . 1440...P..".|
00000AA0: 46 4F 55 54 2D 2D 41 44 52 45 53 20 31 20 3E 20 |FOUT--ADRES 1 > |
00000AB0: 41 44 52 45 53 20 32 22 3A EE 34 3A 89 31 30 38 |ADRES 2":.4:.108|
00000AC0: 30 00 03 13 78 05 99 22 11 42 45 53 54 41 4E 44 |0...x..".BESTAND|
00000AD0: 20 48 45 45 46 54 20 47 45 45 4E 22 54 32 22 4D | HEEFT GEEN"T2"M|
00000AE0: 41 41 52 20 53 4C 45 43 48 54 53 22 3B 4E 3B 22 |AAR SLECHTS";N;"|
00000AF0: 20 41 44 52 45 53 53 45 4E 22 3A EE 34 3A 89 31 | ADRESSEN":.4:.1|
00000B00: 30 38 30 00 12 13 A0 05 8B 50 52 B2 31 A7 33 35 |080......PR.1.35|
00000B10: 37 30 00 1B 13 AA 05 99 22 93 22 00 2D 13 B4 05 |70......".".-...|
00000B20: 81 20 57 20 B2 20 54 31 20 A4 20 54 32 00 3A 13 |. W . T1 . T2.:.|
00000B30: BE 05 48 38 B2 48 25 28 57 29 00 49 13 C8 05 99 |..H8.H%(W).I....|
00000B40: 22 3C 22 3B 57 3B 22 3E 22 00 58 13 D2 05 99 22 |"<";W;">".X...."|
00000B50: 3D 3D 3D 3D 3D 3D 3D 22 00 60 13 DC 05 99 22 22 |=======".`....""|
00000B60: 00 6D 13 E6 05 99 20 4E 24 28 48 38 29 00 7A 13 |.m.... N$(H8).z.|
00000B70: F0 05 99 20 41 24 28 48 38 29 00 93 13 FA 05 99 |... A$(H8)......|
00000B80: 20 50 24 28 48 38 29 3B 22 20 20 22 3B 57 24 28 | P$(H8);" ";W$(|
00000B90: 48 38 29 00 A0 13 04 06 99 20 54 24 28 48 38 29 |H8)...... T$(H8)|
00000BA0: 00 A8 13 0E 06 99 22 22 00 BD 13 18 06 8B C2 28 |......"".......(|
00000BB0: 31 35 31 29 B2 32 35 35 A7 31 35 36 30 00 C5 13 |151).255.1560...|
00000BC0: 22 06 82 3A 8E 00 E2 13 40 06 99 22 93 11 11 2A |"..:....@.."...*|
00000BD0: 2A 2A 2A 2A 20 5A 4F 45 4B 45 4E 20 2A 2A 2A 2A |**** ZOEKEN ****|
00000BE0: 2A 22 00 FC 13 4A 06 99 22 3D 3D 3D 3D 3D 3D 3D |*"...J.."=======|
00000BF0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 28 14 5E |===========".(.^|
00000C00: 06 EA 22 11 54 45 20 5A 4F 45 4B 45 4E 20 57 4F |..".TE ZOEKEN WO|
00000C10: 4F 52 44 20 4F 46 20 44 45 45 4C 20 44 41 41 52 |ORD OF DEEL DAAR|
00000C20: 56 41 4E 20 22 3B 5A 24 00 31 14 72 06 46 31 B2 |VAN ";Z$.1.r.F1.|
00000C30: 30 00 45 14 86 06 81 5A B2 31 A4 4E 3A 48 38 B2 |0.E....Z.1.N:H8.|
00000C40: 48 25 28 5A 29 00 62 14 90 06 46 B2 F5 28 4E 24 |H%(Z).b...F..(N$|
00000C50: 28 48 38 29 2C 5A 24 29 3A 8B 46 B1 30 89 31 38 |(H8),Z$):.F.0.18|
00000C60: 32 30 00 7F 14 9A 06 46 B2 F5 28 41 24 28 48 38 |20.....F..(A$(H8|
00000C70: 29 2C 5A 24 29 3A 8B 46 B1 30 89 31 38 32 30 00 |),Z$):.F.0.1820.|
00000C80: 9C 14 A4 06 46 B2 F5 28 50 24 28 48 38 29 2C 5A |....F..(P$(H8),Z|
00000C90: 24 29 3A 8B 46 B1 30 89 31 38 32 30 00 B9 14 AE |$):.F.0.1820....|
00000CA0: 06 46 B2 F5 28 57 24 28 48 38 29 2C 5A 24 29 3A |.F..(W$(H8),Z$):|
00000CB0: 8B 46 B1 30 89 31 38 32 30 00 D6 14 B8 06 46 B2 |.F.0.1820.....F.|
00000CC0: F5 28 54 24 28 48 38 29 2C 5A 24 29 3A 8B 46 B1 |.(T$(H8),Z$):.F.|
00000CD0: 30 89 31 38 32 30 00 DE 14 C2 06 82 20 5A 00 EF |0.1820...... Z..|
00000CE0: 14 CC 06 8B 20 46 31 20 B2 20 31 20 A7 20 8E 00 |.... F1 . 1 . ..|
00000CF0: 1E 15 D6 06 99 22 11 44 45 5A 45 20 4C 45 54 54 |.....".DEZE LETT|
00000D00: 45 52 43 4F 4D 42 49 4E 41 54 49 45 20 49 53 20 |ERCOMBINATIE IS |
00000D10: 4E 49 45 54 20 41 41 4E 57 45 5A 49 47 22 00 38 |NIET AANWEZIG".8|
00000D20: 15 E0 06 99 22 11 11 11 31 2E 20 56 45 52 44 45 |...."...1. VERDE|
00000D30: 52 20 5A 4F 45 4B 45 4E 00 47 15 EA 06 99 22 11 |R ZOEKEN.G....".|
00000D40: 32 2E 20 4D 45 4E 55 00 52 15 F4 06 8D 20 33 35 |2. MENU.R.... 35|
00000D50: 34 30 00 6F 15 FE 06 8B 20 48 31 20 B3 20 31 20 |40.o.... H1 . 1 |
00000D60: B0 20 48 31 20 B1 20 32 20 89 20 31 37 38 30 00 |. H1 . 2 . 1780.|
00000D70: 7F 15 08 07 8B 48 31 B2 32 8E EF 31 36 30 30 00 |.....H1.2..1600.|
00000D80: 87 15 1C 07 99 22 22 00 90 15 26 07 46 31 B2 31 |.....""...&.F1.1|
00000D90: 00 B0 15 30 07 99 22 11 43 4F 4D 42 49 4E 41 54 |...0..".COMBINAT|
00000DA0: 49 45 20 41 41 4E 57 45 5A 49 47 20 49 4E 3A 22 |IE AANWEZIG IN:"|
00000DB0: 00 CF 15 3A 07 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D |...:.."---------|
00000DC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00000DD0: DE 15 44 07 99 22 3C 22 3B 5A 3B 22 3E 22 00 EA |..D.."<";Z;">"..|
00000DE0: 15 4E 07 99 4E 24 28 48 38 29 00 F6 15 58 07 99 |.N..N$(H8)...X..|
00000DF0: 41 24 28 48 38 29 00 0E 16 62 07 99 50 24 28 48 |A$(H8)...b..P$(H|
00000E00: 38 29 3B 22 20 20 22 3B 57 24 28 48 38 29 00 1A |8);" ";W$(H8)..|
00000E10: 16 6C 07 99 54 24 28 48 38 29 00 25 16 76 07 8D |.l..T$(H8).%.v..|
00000E20: 20 33 35 34 30 00 35 16 80 07 8B 20 5A 20 B2 20 | 3540.5.... Z . |
00000E30: 4E 20 A7 20 8E 00 40 16 8A 07 89 20 31 37 33 30 |N . ..@.... 1730|
00000E40: 00 5B 16 94 07 99 22 93 2A 2A 2A 2A 20 53 4F 52 |.[....".**** SOR|
00000E50: 54 45 52 45 4E 20 2A 2A 2A 2A 22 00 77 16 9E 07 |TEREN ****".w...|
00000E60: 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |."==============|
00000E70: 3D 3D 3D 3D 3D 3D 22 00 8B 16 A8 07 99 22 11 11 |======"......"..|
00000E80: 53 4F 52 54 45 52 45 4E 20 4F 50 00 9B 16 B2 07 |SORTEREN OP.....|
00000E90: 99 22 11 11 31 2E 20 4E 41 41 4D 00 AB 16 BC 07 |."..1. NAAM.....|
00000EA0: 99 22 11 32 2E 20 41 44 52 45 53 00 BE 16 C6 07 |.".2. ADRES.....|
00000EB0: 99 22 11 33 2E 20 50 4F 53 54 43 4F 44 45 00 D3 |.".3. POSTCODE..|
00000EC0: 16 D0 07 99 22 11 34 2E 20 57 4F 4F 4E 50 4C 41 |....".4. WOONPLA|
00000ED0: 41 54 53 00 E2 16 DA 07 99 22 11 35 2E 20 49 4E |ATS......".5. IN|
00000EE0: 46 4F 00 EC 16 E4 07 8D 33 35 34 30 00 09 17 EE |FO......3540....|
00000EF0: 07 8B 20 48 31 20 B3 20 31 20 B0 20 48 31 20 B1 |.. H1 . 1 . H1 .|
00000F00: 20 35 20 89 20 32 30 32 30 00 3A 17 F8 07 99 22 | 5 . 2020.:...."|
00000F10: 11 53 4F 52 54 45 52 45 4E 20 4B 4F 53 54 20 5A |.SORTEREN KOST Z|
00000F20: 45 4C 46 53 20 45 45 4E 20 43 4F 4D 50 55 54 45 |ELFS EEN COMPUTE|
00000F30: 52 20 54 49 4A 44 2E 2E 2E 22 00 45 17 02 08 8D |R TIJD...".E....|
00000F40: 20 32 31 30 30 00 61 17 0C 08 99 22 11 42 45 53 | 2100.a....".BES|
00000F50: 54 41 4E 44 20 47 45 53 4F 52 54 45 45 52 44 20 |TAND GESORTEERD |
00000F60: 22 00 6C 17 16 08 8D 20 33 35 34 30 00 72 17 20 |".l.... 3540.r. |
00000F70: 08 8E 00 82 17 2A 08 8F 20 2A 53 4F 52 54 45 45 |.....*.. *SORTEE|
00000F80: 52 2A 00 96 17 34 08 4E 39 B2 4E AA 31 3A 58 B2 |R*...4.N9.N.1:X.|
00000F90: 30 3A 48 39 B2 30 00 B3 17 3E 08 42 B2 4E 39 AB |0:H9.0...>.B.N9.|
00000FA0: 31 3A 81 4A B2 30 A4 42 3A 49 25 28 4A 29 B2 4A |1:.J.0.B:I%(J).J|
00000FB0: 3A 82 4A 00 C5 17 48 08 81 4A B2 30 A4 4E 39 AC |:.J...H..J.0.N9.|
00000FC0: 32 AB 33 A9 32 00 E3 17 52 08 42 B2 42 AA 31 3A |2.3.2...R.B.B.1:|
00000FD0: 49 31 B2 49 25 28 4A 29 3A 49 32 B2 49 25 28 4A |I1.I%(J):I2.I%(J|
00000FE0: AA 31 29 00 ED 17 5C 08 8D 32 32 35 30 00 FC 17 |.1)...\..2250...|
00000FF0: 66 08 49 25 28 42 29 B2 49 3A 82 4A 00 15 18 70 |f.I%(B).I:.J...p|
00001000: 08 58 B2 58 AB 31 3A 43 B2 49 25 28 42 29 3A 8B |.X.X.1:C.I%(B):.|
00001010: 43 B3 30 A7 8E 00 2A 18 7A 08 48 25 28 48 39 29 |C.0...*.z.H%(H9)|
00001020: B2 43 3A 48 39 B2 48 39 AA 31 00 36 18 84 08 49 |.C:H9.H9.1.6...I|
00001030: 25 28 43 29 B2 58 00 5A 18 8E 08 43 25 B2 43 AD |%(C).X.Z...C%.C.|
00001040: 32 3A 4A B2 43 25 AC 32 3A 43 B2 4E 39 AA 43 25 |2:J.C%.2:C.N9.C%|
00001050: 3A 8B 43 B1 42 89 32 31 36 30 00 72 18 98 08 49 |:.C.B.2160.r...I|
00001060: 31 B2 49 25 28 4A 29 3A 49 32 B2 49 25 28 4A AA |1.I%(J):I2.I%(J.|
00001070: 31 29 00 87 18 A2 08 8B 49 31 B3 30 A7 49 B2 49 |1)......I1.0.I.I|
00001080: 32 3A 89 32 32 34 30 00 9C 18 AC 08 8B 49 32 B3 |2:.2240......I2.|
00001090: 30 A7 49 B2 49 31 3A 89 32 32 34 30 00 A6 18 B6 |0.I.I1:.2240....|
000010A0: 08 8D 32 32 35 30 00 B8 18 C0 08 49 25 28 43 29 |..2250.....I%(C)|
000010B0: B2 49 3A 89 32 31 39 30 00 D9 18 CA 08 8B 48 31 |.I:.2190......H1|
000010C0: B2 31 49 B2 49 31 3A 8B 4E 24 28 49 32 29 B3 4E |.1I.I1:.N$(I2).N|
000010D0: 24 28 49 31 29 49 B2 49 32 00 FA 18 D4 08 8B 48 |$(I1)I.I2......H|
000010E0: 31 B2 32 49 B2 49 31 3A 8B 41 24 28 49 32 29 B3 |1.2I.I1:.A$(I2).|
000010F0: 41 24 28 49 31 29 49 B2 49 32 00 1B 19 DE 08 8B |A$(I1)I.I2......|
00001100: 48 31 B2 33 49 B2 49 31 3A 8B 50 24 28 49 32 29 |H1.3I.I1:.P$(I2)|
00001110: B3 50 24 28 49 31 29 49 B2 49 32 00 3C 19 E8 08 |.P$(I1)I.I2.<...|
00001120: 8B 48 31 B2 34 49 B2 49 31 3A 8B 57 24 28 49 32 |.H1.4I.I1:.W$(I2|
00001130: 29 B3 57 24 28 49 31 29 49 B2 49 32 00 5D 19 F2 |).W$(I1)I.I2.]..|
00001140: 08 8B 48 31 B2 35 49 B2 49 31 3A 8B 54 24 28 49 |..H1.5I.I1:.T$(I|
00001150: 32 29 B3 54 24 28 49 31 29 49 B2 49 32 00 63 19 |2).T$(I1)I.I2.c.|
00001160: FC 08 8E 00 82 19 06 09 99 22 93 11 11 2A 2A 2A |........."...***|
00001170: 2A 2A 20 56 45 52 41 4E 44 45 52 20 2A 2A 2A 2A |** VERANDER ****|
00001180: 2A 22 00 9E 19 10 09 99 22 3D 3D 3D 3D 3D 3D 3D |*"......"=======|
00001190: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 B1 |============="..|
000011A0: 19 1A 09 8B 20 4E 20 B1 20 30 20 89 20 32 33 38 |.... N . 0 . 238|
000011B0: 30 00 DE 19 24 09 99 22 11 45 52 20 49 53 20 47 |0...$..".ER IS G|
000011C0: 45 45 4E 20 42 45 53 54 41 4E 44 20 49 4E 20 44 |EEN BESTAND IN D|
000011D0: 45 20 43 4F 4D 50 55 54 45 52 2E 2E 2E 22 00 FA |E COMPUTER..."..|
000011E0: 19 2E 09 99 22 11 11 52 41 41 4B 20 45 45 4E 20 |...."..RAAK EEN |
000011F0: 54 4F 45 54 53 20 41 41 4E 22 00 04 1A 38 09 8D |TOETS AAN"...8..|
00001200: 33 35 34 30 00 0A 1A 42 09 8E 00 3D 1A 4C 09 85 |3540...B...=.L..|
00001210: 22 11 57 45 4C 4B 20 41 44 52 45 53 4E 52 2E 20 |".WELK ADRESNR. |
00001220: 57 49 4C 54 20 55 20 56 45 52 41 4E 44 45 52 45 |WILT U VERANDERE|
00001230: 4E 20 3F 20 BF 9D 9D 9D 22 3B 5A 33 24 00 4A 1A |N ? ....";Z3$.J.|
00001240: 56 09 5A B2 C5 28 5A 33 24 29 00 68 1A 60 09 8B |V.Z..(Z3$).h.`..|
00001250: 5A 33 24 B2 22 BF 22 B0 5A B2 30 A7 99 22 91 91 |Z3$.".".Z.0.."..|
00001260: 91 22 3A 89 32 33 38 30 00 7E 1A 6A 09 8B 5A B1 |.":.2380.~.j..Z.|
00001270: 4E A7 99 22 91 91 91 22 3A 89 32 33 38 30 00 8B |N.."...":.2380..|
00001280: 1A 74 09 48 38 B2 48 25 28 5A 29 00 BC 1A 7E 09 |.t.H8.H%(Z)...~.|
00001290: 8F 20 50 52 49 4E 54 22 93 48 45 54 20 47 45 56 |. PRINT".HET GEV|
000012A0: 52 41 41 47 44 45 20 41 44 52 45 53 20 57 4F 52 |RAAGDE ADRES WOR|
000012B0: 44 54 20 4E 55 20 52 45 47 45 4C 22 00 F1 1A 88 |DT NU REGEL"....|
000012C0: 09 8F 20 50 52 49 4E 54 22 11 4E 41 20 52 45 47 |.. PRINT".NA REG|
000012D0: 45 4C 20 47 45 54 4F 4F 4E 44 2E 20 41 4C 53 20 |EL GETOOND. ALS |
000012E0: 45 45 4E 20 52 45 47 45 4C 20 4F 50 20 48 45 54 |EEN REGEL OP HET|
000012F0: 22 00 28 1B 92 09 8F 20 50 52 49 4E 54 22 11 53 |".(.... PRINT".S|
00001300: 43 48 45 52 4D 20 56 45 52 53 43 48 49 4A 4E 54 |CHERM VERSCHIJNT|
00001310: 20 4B 55 4E 54 20 55 20 44 45 20 52 45 47 45 4C | KUNT U DE REGEL|
00001320: 20 43 4F 52 52 49 2D 22 00 56 1B 9C 09 8F 20 50 | CORRI-".V.... P|
00001330: 52 49 4E 54 22 47 45 52 45 4E 2E 20 44 52 55 4B |RINT"GEREN. DRUK|
00001340: 20 44 41 41 52 4E 41 20 4F 50 20 12 52 45 54 55 | DAARNA OP .RETU|
00001350: 52 4E 92 20 2E 22 00 7C 1B A6 09 99 22 11 57 49 |RN. .".|....".WI|
00001360: 4A 5A 49 47 20 41 4C 20 4F 46 20 4E 49 45 54 20 |JZIG AL OF NIET |
00001370: 44 45 20 52 45 47 45 4C 20 45 4E 22 00 9E 1B B0 |DE REGEL EN"....|
00001380: 09 99 22 11 44 52 55 4B 20 44 41 41 52 4E 41 20 |..".DRUK DAARNA |
00001390: 4F 50 20 12 52 45 54 55 52 4E 92 20 2E 22 00 BE |OP .RETURN. ."..|
000013A0: 1B BA 09 99 20 22 11 11 20 20 20 20 20 20 20 20 |.... ".. |
000013B0: 20 20 20 20 20 20 22 3B 4E 24 28 48 38 29 00 D8 | ";N$(H8)..|
000013C0: 1B C4 09 0F 22 91 4E 41 41 4D 20 20 20 20 20 20 |....".NAAM |
000013D0: 20 20 3A 20 22 3B 56 24 00 E6 1B CE 09 4E 24 28 | : ";V$.....N$(|
000013E0: 48 38 29 B2 56 24 00 04 1C D8 09 99 20 22 20 20 |H8).V$...... " |
000013F0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 41 24 | ";A$|
00001400: 28 48 38 29 00 1E 1C E2 09 0F 22 91 41 44 52 45 |(H8)......".ADRE|
00001410: 53 20 20 20 20 20 20 20 3A 20 22 3B 56 24 00 2C |S : ";V$.,|
00001420: 1C EC 09 41 24 28 48 38 29 B2 56 24 00 4A 1C F6 |...A$(H8).V$.J..|
00001430: 09 99 20 22 20 20 20 20 20 20 20 20 20 20 20 20 |.. " |
00001440: 20 20 22 3B 50 24 28 48 38 29 00 64 1C 00 0A 85 | ";P$(H8).d....|
00001450: 22 91 50 4F 53 54 43 4F 44 45 20 20 20 20 3A 20 |".POSTCODE : |
00001460: 22 3B 56 24 00 72 1C 0A 0A 50 24 28 48 38 29 B2 |";V$.r...P$(H8).|
00001470: 56 24 00 90 1C 14 0A 99 20 22 20 20 20 20 20 20 |V$...... " |
00001480: 20 20 20 20 20 20 20 20 22 3B 57 24 28 48 38 29 | ";W$(H8)|
00001490: 00 AD 1C 1E 0A 85 20 22 91 57 4F 4F 4E 50 4C 41 |...... ".WOONPLA|
000014A0: 41 54 53 20 20 3A 20 9D 9D 22 3B 56 24 00 BB 1C |ATS : ..";V$...|
000014B0: 28 0A 57 24 28 48 38 29 B2 56 24 00 D9 1C 32 0A |(.W$(H8).V$...2.|
000014C0: 99 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |. " |
000014D0: 20 22 3B 54 24 28 48 38 29 00 F6 1C 3C 0A 85 20 | ";T$(H8)...<.. |
000014E0: 22 91 47 45 42 4F 4F 52 54 45 44 41 54 41 3A 20 |".GEBOORTEDATA: |
000014F0: 9D 9D 22 3B 56 24 00 13 1D 46 0A 8B 20 C8 20 28 |..";V$...F.. . (|
00001500: 56 24 2C 32 29 20 B2 20 22 24 24 22 20 89 20 32 |V$,2) . "$$" . 2|
00001510: 36 35 30 00 21 1D 50 0A 54 24 28 48 38 29 B2 56 |650.!.P.T$(H8).V|
00001520: 24 00 46 1D 5A 0A 99 22 11 11 31 2E 20 4E 4F 47 |$.F.Z.."..1. NOG|
00001530: 20 45 45 4E 20 41 44 52 45 53 20 56 45 52 41 4E | EEN ADRES VERAN|
00001540: 44 45 52 45 4E 22 00 66 1D 64 0A 99 22 11 32 2E |DEREN".f.d..".2.|
00001550: 20 54 45 52 55 47 20 4E 41 41 52 20 48 4F 4F 46 | TERUG NAAR HOOF|
00001560: 44 4D 45 4E 55 22 00 71 1D 6E 0A 8D 20 33 35 34 |DMENU".q.n.. 354|
00001570: 30 00 8E 1D 78 0A 8B 20 48 31 20 B3 20 31 20 B0 |0...x.. H1 . 1 .|
00001580: 20 48 31 20 B1 20 32 20 89 20 32 36 37 30 00 9F | H1 . 2 . 2670..|
00001590: 1D 82 0A 8B 20 48 31 20 B2 20 32 20 A7 20 8E 00 |.... H1 . 2 . ..|
000015A0: AA 1D 8C 0A 89 20 32 33 31 30 00 C7 1D 96 0A 99 |..... 2310......|
000015B0: 22 93 11 11 2A 2A 2A 2A 2A 20 4C 41 42 45 4C 53 |"...***** LABELS|
000015C0: 20 2A 2A 2A 2A 2A 22 00 E2 1D A0 0A 99 22 3D 3D | *****"......"==|
000015D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000015E0: 3D 22 00 FD 1D AA 0A 99 22 11 31 2E 20 41 4C 4C |="......".1. ALL|
000015F0: 45 53 20 41 46 44 52 55 4B 4B 45 4E 22 00 1F 1E |ES AFDRUKKEN"...|
00001600: B4 0A 99 22 11 32 2E 20 53 45 4C 45 4B 54 49 45 |...".2. SELEKTIE|
00001610: 20 4F 50 20 50 4F 53 54 4B 4F 44 45 20 20 22 00 | OP POSTKODE ".|
00001620: 2A 1E BE 0A 8D 20 33 35 34 30 00 47 1E C8 0A 8B |*.... 3540.G....|
00001630: 20 48 31 20 B3 20 31 20 B0 20 48 31 20 B1 20 32 | H1 . 1 . H1 . 2|
00001640: 20 89 20 32 37 35 30 00 5B 1E D2 0A 8B 20 48 31 | . 2750.[.... H1|
00001650: 20 B2 20 32 20 89 20 32 39 35 30 00 66 1E DC 0A | . 2 . 2950.f...|
00001660: 8D 20 33 31 33 30 00 7A 1E E6 0A 8F 20 50 54 52 |. 3130.z.... PTR|
00001670: 20 41 41 4E 52 4F 45 50 45 4E 00 85 1E F0 0A 9F | AANROEPEN......|
00001680: 31 30 32 2C 34 00 99 1E FA 0A 81 45 B2 31 A4 4E |102,4......E.1.N|
00001690: 3A 48 38 B2 48 25 28 45 29 00 C1 1E 04 0B 99 22 |:H8.H%(E)......"|
000016A0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000016B0: 12 44 49 54 20 49 53 20 41 44 52 45 53 20 22 3B |.DIT IS ADRES ";|
000016C0: 45 00 D1 1E 0E 0B 98 31 30 32 2C 4E 24 28 48 38 |E......102,N$(H8|
000016D0: 29 00 E1 1E 18 0B 98 31 30 32 2C 41 24 28 48 38 |)......102,A$(H8|
000016E0: 29 00 FD 1E 22 0B 98 31 30 32 2C 50 24 28 48 38 |)..."..102,P$(H8|
000016F0: 29 3B 22 20 20 22 3B 57 24 28 48 38 29 00 06 1F |);" ";W$(H8)...|
00001700: 2C 0B 98 31 30 32 00 0F 1F 36 0B 98 31 30 32 00 |,..102...6..102.|
00001710: 18 1F 40 0B 98 31 30 32 00 20 1F 4A 0B 82 20 45 |..@..102. .J.. E|
00001720: 00 42 1F 54 0B 99 22 44 49 54 20 57 41 52 45 4E |.B.T.."DIT WAREN|
00001730: 20 22 3B 45 AB 31 3B 22 20 41 44 52 45 53 53 45 | ";E.1;" ADRESSE|
00001740: 4E 22 00 4D 1F 5E 0B 8D 20 33 35 34 30 00 5B 1F |N".M.^.. 3540.[.|
00001750: 68 0B 8F 20 50 54 52 20 55 49 54 00 64 1F 72 0B |h.. PTR UIT.d.r.|
00001760: A0 31 30 32 00 6A 1F 7C 0B 8E 00 90 1F 86 0B 85 |.102.j.|........|
00001770: 22 11 11 57 41 54 20 49 53 20 44 45 20 50 4F 53 |"..WAT IS DE POS|
00001780: 54 4B 4F 44 45 20 3F 20 BF 9D 9D 9D 22 3B 48 24 |TKODE ? ....";H$|
00001790: 00 9E 1F 90 0B 8F 20 50 54 52 20 41 41 4E 00 A9 |...... PTR AAN..|
000017A0: 1F 9A 0B 9F 31 30 32 2C 34 00 B1 1F A4 0B 45 B2 |....102,4.....E.|
000017B0: 30 00 C5 1F AE 0B 81 4B B2 31 A4 4E 3A 48 38 B2 |0......K.1.N:H8.|
000017C0: 48 25 28 4B 29 00 E4 1F B8 0B 8B 20 C8 28 50 24 |H%(K)...... .(P$|
000017D0: 28 48 38 29 2C 34 29 20 B3 B1 20 48 24 20 89 20 |(H8),4) .. H$ . |
000017E0: 33 30 38 30 00 EE 1F C2 0B 45 B2 45 AA 31 00 FE |3080.....E.E.1..|
000017F0: 1F CC 0B 98 31 30 32 2C 4E 24 28 48 38 29 00 0E |....102,N$(H8)..|
00001800: 20 D6 0B 98 31 30 32 2C 41 24 28 48 38 29 00 2A | ...102,A$(H8).*|
00001810: 20 E0 0B 98 31 30 32 2C 50 24 28 48 38 29 3B 22 | ...102,P$(H8);"|
00001820: 20 20 22 3B 57 24 28 48 38 29 00 33 20 EA 0B 98 | ";W$(H8).3 ...|
00001830: 31 30 32 00 3C 20 F4 0B 98 31 30 32 00 45 20 FE |102.< ...102.E .|
00001840: 0B 98 31 30 32 00 4D 20 08 0C 82 20 4B 00 6D 20 |..102.M ... K.m |
00001850: 12 0C 99 22 44 49 54 20 57 41 52 45 4E 20 22 3B |..."DIT WAREN ";|
00001860: 45 3B 22 20 41 44 52 45 53 53 45 4E 22 00 7B 20 |E;" ADRESSEN".{ |
00001870: 1C 0C 8F 20 50 54 52 20 55 49 54 00 84 20 26 0C |... PTR UIT.. &.|
00001880: A0 31 30 32 00 8A 20 30 0C 8E 00 B3 20 3A 0C 99 |.102.. 0.... :..|
00001890: 22 93 11 11 45 52 20 57 4F 52 44 45 4E 20 45 45 |"...ER WORDEN EE|
000018A0: 52 53 54 20 54 45 53 54 2D 45 54 49 4B 45 54 54 |RST TEST-ETIKETT|
000018B0: 45 4E 22 00 DD 20 44 0C 99 22 11 41 46 47 45 44 |EN".. D..".AFGED|
000018C0: 52 55 4B 54 20 4F 4D 20 44 45 20 49 4E 53 54 45 |RUKT OM DE INSTE|
000018D0: 4C 4C 49 4E 47 20 56 41 4E 20 44 45 22 00 FC 20 |LLING VAN DE".. |
000018E0: 4E 0C 99 22 11 50 52 49 4E 54 45 52 20 54 45 20 |N..".PRINTER TE |
000018F0: 43 4F 4E 54 52 4F 4C 45 52 45 4E 22 00 07 21 58 |CONTROLEREN"..!X|
00001900: 0C 9F 31 30 32 2C 34 00 17 21 62 0C 81 20 44 20 |..102,4..!b.. D |
00001910: B2 20 31 20 A4 20 33 00 38 21 6C 0C 98 31 30 32 |. 1 . 3.8!l..102|
00001920: 2C 22 58 58 58 58 58 58 58 58 58 58 58 58 58 58 |,"XXXXXXXXXXXXXX|
00001930: 58 58 58 58 58 58 58 22 00 40 21 76 0C 82 20 44 |XXXXXXX".@!v.. D|
00001940: 00 49 21 80 0C 98 31 30 32 00 52 21 8A 0C 98 31 |.I!...102.R!...1|
00001950: 30 32 00 5B 21 94 0C 98 31 30 32 00 64 21 9E 0C |02.[!...102.d!..|
00001960: A0 31 30 32 00 84 21 A8 0C 99 22 11 11 31 2E 20 |.102..!..."..1. |
00001970: 49 4E 53 54 45 4C 4C 49 4E 47 20 56 45 52 4B 45 |INSTELLING VERKE|
00001980: 45 52 44 22 00 9F 21 B2 0C 99 22 11 32 2E 20 49 |ERD"..!...".2. I|
00001990: 4E 53 54 45 4C 4C 49 4E 47 20 4F 2E 4B 2E 22 00 |NSTELLING O.K.".|
000019A0: AA 21 BC 0C 8D 20 33 35 34 30 00 C7 21 C6 0C 8B |.!... 3540..!...|
000019B0: 20 48 31 20 B3 20 31 20 B0 20 48 31 20 B1 20 32 | H1 . 1 . H1 . 2|
000019C0: 20 89 20 33 32 36 30 00 DB 21 D0 0C 8B 20 48 31 | . 3260..!... H1|
000019D0: 20 B2 20 31 20 89 20 33 31 36 30 00 E1 21 DA 0C | . 1 . 3160..!..|
000019E0: 8E 00 FF 21 E4 0C 99 22 93 11 11 2A 2A 2A 2A 2A |...!..."...*****|
000019F0: 20 42 45 57 41 52 45 4E 20 2A 2A 2A 2A 2A 22 00 | BEWAREN *****".|
00001A00: 1A 22 EE 0C 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |."..."==========|
00001A10: 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 45 22 F8 0C 99 |=========".E"...|
00001A20: 22 11 11 47 45 45 46 20 4E 41 41 4D 20 57 41 41 |"..GEEF NAAM WAA|
00001A30: 52 4F 4E 44 45 52 20 42 45 53 54 41 4E 44 20 4D |RONDER BESTAND M|
00001A40: 4F 45 54 20 22 00 77 22 02 0D 85 22 11 57 4F 52 |OET ".w"...".WOR|
00001A50: 44 45 4E 20 4F 50 47 45 42 4F 52 47 45 4E 20 3F |DEN OPGEBORGEN ?|
00001A60: 20 41 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 3B 46 | ADRES.......";F|
00001A70: 24 3A 52 24 B2 22 22 00 94 22 0C 0D 46 4C 24 B2 |$:R$."".."..FL$.|
00001A80: 22 40 30 3A 22 AA 46 24 AA 22 2C 53 45 51 2C 57 |"@0:".F$.",SEQ,W|
00001A90: 52 49 54 45 00 A3 22 16 0D 9F 35 2C 38 2C 32 2C |RITE.."...5,8,2,|
00001AA0: 46 4C 24 00 B3 22 20 0D 98 35 2C 4E 3B C7 28 31 |FL$.." ..5,N;.(1|
00001AB0: 33 29 3B 00 C7 22 2A 0D 81 4C B2 31 A4 4E 3A 48 |3);.."*..L.1.N:H|
00001AC0: 38 B2 48 25 28 4C 29 00 DC 22 34 0D 98 35 2C 4E |8.H%(L).."4..5,N|
00001AD0: 24 28 48 38 29 3B C7 28 31 33 29 3B 00 F1 22 3E |$(H8);.(13);..">|
00001AE0: 0D 98 35 2C 41 24 28 48 38 29 3B C7 28 31 33 29 |..5,A$(H8);.(13)|
00001AF0: 3B 00 06 23 48 0D 98 35 2C 50 24 28 48 38 29 3B |;..#H..5,P$(H8);|
00001B00: C7 28 31 33 29 3B 00 1B 23 52 0D 98 35 2C 57 24 |.(13);..#R..5,W$|
00001B10: 28 48 38 29 3B C7 28 31 33 29 3B 00 30 23 5C 0D |(H8);.(13);.0#\.|
00001B20: 98 35 2C 54 24 28 48 38 29 3B C7 28 31 33 29 3B |.5,T$(H8);.(13);|
00001B30: 00 37 23 66 0D 82 4C 00 3E 23 70 0D A0 35 00 44 |.7#f..L.>#p..5.D|
00001B40: 23 7A 0D 8E 00 60 23 84 0D 99 22 93 11 11 2A 2A |#z...`#..."...**|
00001B50: 2A 2A 2A 20 45 49 4E 44 45 20 2A 2A 2A 2A 2A 22 |*** EINDE *****"|
00001B60: 00 79 23 8E 0D 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D |.y#..."=========|
00001B70: 3D 3D 3D 3D 3D 3D 3D 3D 22 00 A1 23 98 0D 99 22 |========"..#..."|
00001B80: 11 11 31 2E 20 42 45 53 54 41 4E 44 20 4E 4F 47 |..1. BESTAND NOG|
00001B90: 20 4E 49 45 54 20 4F 50 47 45 42 4F 52 47 45 4E | NIET OPGEBORGEN|
00001BA0: 22 00 C2 23 A2 0D 99 22 11 32 2E 20 42 45 53 54 |"..#...".2. BEST|
00001BB0: 41 4E 44 20 41 4C 20 4F 50 47 45 42 4F 52 47 45 |AND AL OPGEBORGE|
00001BC0: 4E 22 00 CD 23 AC 0D 8D 20 33 35 34 30 00 EA 23 |N"..#... 3540..#|
00001BD0: B6 0D 8B 20 48 31 20 B3 20 31 20 B0 20 48 31 20 |... H1 . 1 . H1 |
00001BE0: B1 20 32 20 89 20 33 35 30 30 00 FC 23 C0 0D 8B |. 2 . 3500..#...|
00001BF0: 20 48 31 20 B3 B1 20 32 20 A7 20 8E 00 02 24 CA | H1 .. 2 . ...$.|
00001C00: 0D 80 00 24 24 D4 0D A1 48 31 24 3A 8B 48 31 24 |...$$...H1$:.H1$|
00001C10: B2 22 22 89 33 35 34 30 EF 48 31 B2 C5 28 48 31 |."".3540.H1..(H1|
00001C20: 24 29 3A 8E 00 45 24 D5 0D E7 31 30 38 2C 50 54 |$):..E$...108,PT|
00001C30: 24 3B 3A EA 48 31 24 2C 31 3A 48 31 B2 C5 28 48 |$;:.H1$,1:H1..(H|
00001C40: 31 24 29 3A 8E 00 64 24 E8 0D 50 52 B2 31 3A 5A |1$):..d$..PR.1:Z|
00001C50: 49 24 B2 22 50 52 49 4E 54 45 4E 20 3F 22 3A 89 |I$."PRINTEN ?":.|
00001C60: 31 30 38 30 00 81 24 F2 0D 50 52 B2 30 3A 9F 31 |1080..$..PR.0:.1|
00001C70: 30 34 2C 32 30 3A 98 31 30 34 2C C7 28 32 34 29 |04,20:.104,.(24)|
00001C80: 3B 00 B3 24 FC 0D 99 22 12 11 11 11 11 11 20 20 |;..$..."...... |
00001C90: 20 20 20 20 20 20 20 20 20 50 52 49 4E 54 45 52 | PRINTER|
00001CA0: 20 53 54 41 4E 44 42 59 20 20 20 20 20 20 20 20 | STANDBY |
00001CB0: 20 20 22 00 C0 24 06 0E 81 57 B2 54 31 A4 54 32 | "..$...W.T1.T2|
00001CC0: 00 CC 24 10 0E 46 50 B2 46 50 AA 31 00 D9 24 1A |..$..FP.FP.1..$.|
00001CD0: 0E 48 38 B2 48 25 28 57 29 00 06 25 24 0E 98 31 |.H8.H%(W)..%$..1|
00001CE0: 30 34 2C C7 28 32 37 29 AA C7 28 36 38 29 AA C7 |04,.(27)..(68)..|
00001CF0: 28 36 29 AA C7 28 32 32 29 AA C7 28 34 32 29 AA |(6)..(22)..(42).|
00001D00: C7 28 35 32 29 3B 00 1B 25 2E 0E 98 31 30 34 2C |.(52);..%...104,|
00001D10: C7 28 36 37 29 AA C7 28 30 29 3B 00 54 25 38 0E |.(67)..(0);.T%8.|
00001D20: 98 31 30 34 2C 46 50 24 3B 57 3B C7 28 39 29 3B |.104,FP$;W;.(9);|
00001D30: 4E 24 28 48 38 29 3B C7 28 39 29 3B 41 24 28 48 |N$(H8);.(9);A$(H|
00001D40: 38 29 3B C7 28 39 29 3B 50 24 28 48 38 29 3B C7 |8);.(9);P$(H8);.|
00001D50: 28 39 29 3B 00 70 25 42 0E 98 31 30 34 2C 57 24 |(9);.p%B..104,W$|
00001D60: 28 48 38 29 3B C7 28 39 29 3B 54 24 28 48 38 29 |(H8);.(9);T$(H8)|
00001D70: 00 8C 25 4C 0E 8B 46 50 B2 36 30 A7 98 31 30 34 |..%L..FP.60..104|
00001D80: 2C C7 28 31 32 29 3B 3A 46 50 B2 30 00 B0 25 56 |,.(12);:FP.0..%V|
00001D90: 0E 8B C2 28 31 35 31 29 B2 36 A7 57 B2 54 32 3A |...(151).6.W.T2:|
00001DA0: 98 31 30 34 2C C7 28 32 34 29 3A 89 33 37 30 30 |.104,.(24):.3700|
00001DB0: 00 B7 25 60 0E 82 57 00 C6 25 6A 0E 98 31 30 34 |..%`..W..%j..104|
00001DC0: 2C C7 28 31 32 29 00 DC 25 74 0E A0 31 30 34 3A |,.(12)..%t..104:|
00001DD0: 5A 49 24 B2 22 5A 49 45 4E 20 3F 22 00 EA 25 7E |ZI$."ZIEN ?"..%~|
00001DE0: 0E 99 22 93 22 3A 89 31 36 30 00 F3 25 88 0E 9F |..".":.160..%...|
00001DF0: 31 2C 34 00 FA 25 92 0E 9D 31 00 09 26 9C 0E 9B |1,4..%...1..&...|
00001E00: 31 39 34 30 AB 32 33 30 30 00 10 26 A6 0E 98 31 |1940.2300..&...1|
00001E10: 00 17 26 B0 0E A0 31 00 52 26 A0 0F 4C B2 C3 28 |..&...1.R&..L..(|
00001E20: 49 4E 24 29 3A 81 4A B2 31 A4 4C 3A 41 53 24 B2 |IN$):.J.1.L:AS$.|
00001E30: CA 28 49 4E 24 2C 4A 2C 31 29 3A 41 53 B2 C6 28 |.(IN$,J,1):AS..(|
00001E40: 41 53 24 29 3A 8B 41 53 B3 36 30 89 34 30 31 30 |AS$):.AS.60.4010|
00001E50: EF 82 00 5F 26 A4 0F 4C B2 C3 28 49 4E 24 29 00 |..._&..L..(IN$).|
00001E60: 83 26 A5 0F 81 4A B2 31 A4 4C 3A 41 53 24 B2 CA |.&...J.1.L:AS$..|
00001E70: 28 49 4E 24 2C 4A 2C 31 29 3A 41 53 B2 C6 28 41 |(IN$,J,1):AS..(A|
00001E80: 53 24 29 00 B6 26 AA 0F 8B 41 53 B2 33 34 49 4E |S$)..&...AS.34IN|
00001E90: 24 B2 C8 28 49 4E 24 2C 4A AB 31 29 AA C7 28 39 |$..(IN$,J.1)..(9|
00001EA0: 38 29 AA C9 28 49 4E 24 2C 4C AB 4A 29 3A E6 82 |8)..(IN$,L.J):..|
00001EB0: 3A 89 34 30 30 35 00 EA 26 AB 0F 8B 41 53 B2 34 |:.4005..&...AS.4|
00001EC0: 34 49 4E 24 B2 C8 28 49 4E 24 2C 4A AB 31 29 AA |4IN$..(IN$,J.1).|
00001ED0: C7 28 31 30 38 29 AA C9 28 49 4E 24 2C 4C AB 4A |.(108)..(IN$,L.J|
00001EE0: 29 3A E6 82 3A 89 34 30 30 35 00 1E 27 AC 0F 8B |):..:.4005..'...|
00001EF0: 41 53 B2 35 39 49 4E 24 B2 C8 28 49 4E 24 2C 4A |AS.59IN$..(IN$,J|
00001F00: AB 31 29 AA C7 28 31 32 33 29 AA C9 28 49 4E 24 |.1)..(123)..(IN$|
00001F10: 2C 4C AB 4A 29 3A E6 82 3A 89 34 30 30 35 00 52 |,L.J):..:.4005.R|
00001F20: 27 AD 0F 8B 41 53 B2 35 38 49 4E 24 B2 C8 28 49 |'...AS.58IN$..(I|
00001F30: 4E 24 2C 4A AB 31 29 AA C7 28 31 32 32 29 AA C9 |N$,J.1)..(122)..|
00001F40: 28 49 4E 24 2C 4C AB 4A 29 3A E6 82 3A 89 34 30 |(IN$,L.J):..:.40|
00001F50: 30 35 00 58 27 B4 0F 82 00 5E 27 BE 0F 8E 00 00 |05.X'....^'.....|
00001F60: 00 00 |.. |
.......EXIT.1.160.....EXIT.1.6.D..".....
.":.T.64B.DER3.G.N.. **** CLAIR.U.X.A1.2
5:ZI$."ZIEN ?":S.42:PT$."KEUZE .>>. "...
... N$(A1),A$(A1),P$(A1),W$(A1),T$(A1),H
%(A1),I%(2.A1)...... IN H%-TABEL STAAT D
E VOLGORDE-*DE INDEX*- VAN DE DIVERSE TA
BELLEN......J.0.A1:H%(J).J:.J.H. ..".":.
0,0,39,0,239:.0,4,39,4,S:.0,0,0,4,S:.39,
0,39,4,S.^....82".CLAIRE. MENU......"...
1. BESTAND OPZETTEN OF UITBREIDEN......"
.2. INHOUD TONEN VAN HET BESTAND.P....".
3. ZOEKEN IN HET BESTAND......".4. SORTE
REN PER ELEMENT......".5. VERANDEREN IN
BESTAND.B....".6. LEDENLIJST PRINTEN
.*..**************.U."..".7. LABELS PRIN
TEN .*..* DOORGAAN NA...,..".8.
BESTAND WEGSCHRIJVEN .*..* 'READY.' :
...6..".9. STOP PROGRAMMA .*..*
.GOTO 0....;...(40,185);...@..158,0:
.3541:.H1$."0"...H1.E(H1$).I.T.. H1 . 36
0,1080,1600,1940,2310,3560,2710,3300,346
0.S.^.. 160.P.H.."...***** INVOER *****"
...R.."=================="...|..N.0.810.
....."..1. NIEUW BESTAND OPBOUWEN"......
"..2. OUD BESTAND OPHALEN.":.3541......H
1$."1".450..H1$."2".940..360...B.N.1...L
.."..".9.V.."U KUNT NU ADRESSEN INVOEREN
".H....".OM MET INVOER TE EINDIGEN: TYPE
-STOP-".P....""...... P . N . A1......"
.<";P;">". ...."=======".J...IN$." ":."N
AAM : ";IN$,15:.4000...0..IN$."STO
P".750.N$(P).IN$...:.IN$." ":."ADRES
: ";IN$,18:.4000.0.X..IN$."STOP".750.A
$(P).IN$.Y.B.IN$." ":."POSTCODE : ";IN
$,7:.4000.W....IN$."STOP".750.P$(P).IN$.
....IN$." ":.".WOONPLAATS:";.(10,29);:.I
N$,15:.4000.I....IN$."STOP".750.W$(P).IN
$.....IN$." ":.".INFO :";IN$,79:.4000...
F..IN$."STOP".750.T$(P).IN$...P..""...Z.
. P.#...."".8....".EINDE INVOER".F...N .
P . 1.T....".ER ZITTEN";N;"ADRESSEN IN
HET BESTAND"......"..RAAK EEN TOETS AAN"
...... 3540... ...O.*..".ER ZIT AL EEN B
ESTAND IN HET GEHEUGEN"...4..".1. NIET O
VERSCHRIJVEN"...>..".2. WEL OVERSCHRIJVE
N"...H..3541.,.R.. H1.1 . H1.2 . 870.6.\
.. 810.G.F.. H1.2 . 450.E.P..".3. BESTAN
D UITBREIDEN"...Z..".4. BESTAND NIET UIT
BREIDEN"......3541......H1.4......N.N.1.
..... 460......".WELK BESTAND KIEST U ?
ADRES.......";F$.....FL$."0:".F$.",SEQ,R
EAD"......5,8,2,FL$...J..5,N...T..X.1.N.
,....5,N$(X).9....5,A$(X).F....5,P$(X).S
....5,W$(X).`....5,T$(X).H.... X.O... 5.
..$..J.0.A1:H%(J).J:.J.........8.."...**
*** INHOUD *****".C.B.."================
=="...L.."..WELKE ADRESSEN WILT U "ZI$..
.V..".1. ALLES...`.."..2. EEN BEPAALD AD
RES.%.J..".3. BEREIK"./.T..3540.C.~..H1.
1.H1.3.1080.X.... H1 .. 1 . 1190.F...T1.
1:T2.N.Q.... 1440...... H1 .. 2 . 1260..
....".WELK NUMMER ? ....";T1$.....T1.E(T
1$).G.N.. T1 . N . 1400.Q.X.T2.T1......
1440......".EERSTE ADRESNNUMMER? ....";T
1$.....T1.E(T1$).$.... T1 . 1 . T1.1.8..
.. T1 . N . 1400._....".LAATSTE ADRESNNU
MMER? ....";T2$.M.(.T2.E(T2$)...<.. T2 .
N . 1400...F.. T2 .. T1 . 1440.A.P..".
FOUT--ADRES 1 > ADRES 2":.4:.1080...X.."
.BESTAND HEEFT GEEN"T2"MAAR SLECHTS";N;"
ADRESSEN":.4:.1080... ..PR.1.3570......
".".-.... W . T1 . T2.:...H8.H%(W).I.H..
"<";W;">".X.R.."=======".`...."".M.... N
$(H8).Z.... A$(H8)...... P$(H8);" ";W$(
H8). .... T$(H8)......""......B(151).255
.1560.E."..:....@.."...***** ZOEKEN ****
*"...J.."==================".(.^..".TE Z
OEKEN WOORD OF DEEL DAARVAN ";Z$.1.R.F1.
0.E....Z.1.N:H8.H%(Z).B...F..(N$(H8),Z$)
:.F.0.1820....F..(A$(H8),Z$):.F.0.1820.
....F..(P$(H8),Z$):.F.0.1820.....F..(W$(
H8),Z$):.F.0.1820.V...F..(T$(H8),Z$):.F.
0.1820...B.. Z...L.. F1 . 1 . ....V..".D
EZE LETTERCOMBINATIE IS NIET AANWEZIG".8
...."...1. VERDER ZOEKEN.G....".2. MENU.
R.... 3540.O.... H1 . 1 . H1 . 2 . 1780.
....H1.2..1600......""...&.F1.1...0..".
COMBINATIE AANWEZIG IN:".O.:.."---------
--------------"...D.."<";Z;">"...N..N$(H
8)...X..A$(H8)...B..P$(H8);" ";W$(H8)..
.L..T$(H8).%.V.. 3540.5.... Z . N . ..@.
... 1730.[....".**** SORTEREN ****".W...
."===================="......"..SORTEREN
OP......"..1. NAAM......".2. ADRES...F.
.".3. POSTCODE.S.P..".4. WOONPLAATS...Z.
.".5. INFO......3540...... H1 . 1 . H1 .
5 . 2020.:....".SORTEREN KOST ZELFS EEN
COMPUTER TIJD...".E.... 2100.A....".BES
TAND GESORTEERD ".L.... 3540.R. .....*..
*SORTEER*...4.N9.N.1:X.0:H9.0...>.B.N9.
1:.J.0.B:I%(J).J:.J.E.H..J.0.N9.2.3.2...
R.B.B.1:I1.I%(J):I2.I%(J.1)...\..2250...
F.I%(B).I:.J...P.X.X.1:C.I%(B):.C.0...*.
Z.H%(H9).C:H9.H9.1.6...I%(C).X.Z...C%.C.
2:J.C%.2:C.N9.C%:.C.B.2160.R...I1.I%(J):
I2.I%(J.1)......I1.0.I.I2:.2240......I2.
0.I.I1:.2240......2250.....I%(C).I:.2190
.Y.J..H1.1I.I1:.N$(I2).N$(I1)I.I2...T..H
1.2I.I1:.A$(I2).A$(I1)I.I2......H1.3I.I1
:.P$(I2).P$(I1)I.I2.<....H1.4I.I1:.W$(I2
).W$(I1)I.I2.]....H1.5I.I1:.T$(I2).T$(I1
)I.I2.C.........."...***** VERANDER ****
*"......"===================="...... N .
0 . 2380...$..".ER IS GEEN BESTAND IN D
E COMPUTER..."......"..RAAK EEN TOETS AA
N"...8..3540...B...=.L..".WELK ADRESNR.
WILT U VERANDEREN ? ....";Z3$.J.V.Z.E(Z3
$).H.`..Z3$.".".Z.0.."...":.2380.~.J..Z.
N.."...":.2380...T.H8.H%(Z)...~.. PRINT"
.HET GEVRAAGDE ADRES WORDT NU REGEL"....
.. PRINT".NA REGEL GETOOND. ALS EEN REGE
L OP HET".(.... PRINT".SCHERM VERSCHIJNT
KUNT U DE REGEL CORRI-".V.... PRINT"GER
EN. DRUK DAARNA OP .RETURN. .".|....".WI
JZIG AL OF NIET DE REGEL EN"......".DRUK
DAARNA OP .RETURN. ."...... "..
";N$(H8).X.D..".NAAM : ";V$
...N.N$(H8).V$...X.. " ";A$
(H8)......".ADRES : ";V$.,...A$(H8
).V$.J.... " ";P$(H8).D....
".POSTCODE : ";V$.R...P$(H8).V$......
" ";W$(H8)...... ".WOONPLA
ATS : ..";V$...(.W$(H8).V$.Y.2.. "
";T$(H8)...<.. ".GEBOORTEDATA:
..";V$...F.. H (V$,2) . "$$" . 2650.!.P.
T$(H8).V$.F.Z.."..1. NOG EEN ADRES VERAN
DEREN".F.D..".2. TERUG NAAR HOOFDMENU".Q
.N.. 3540...X.. H1 . 1 . H1 . 2 . 2670..
.... H1 . 2 . ....... 2310.G...."...****
* LABELS *****"... .."==================
="......".1. ALLES AFDRUKKEN"......".2.
SELEKTIE OP POSTKODE ".*.... 3540.G.H..
H1 . 1 . H1 . 2 . 2750.[.R.. H1 . 2 . 2
950.F.... 3130.Z.... PTR AANROEPEN......
102,4......E.1.N:H8.H%(E).A...."........
.........DIT IS ADRES ";E.Q....102,N$(H8
)......102,A$(H8)..."..102,P$(H8);" ";W
$(H8)...,..102...6..102...@..102. .J.. E
.B.T.."DIT WAREN ";E.1;" ADRESSEN".M.^..
3540.[.H.. PTR UIT.D.R. 102.J.|........
"..WAT IS DE POSTKODE ? ....";H$...... P
TR AAN......102,4.....E.0.E....K.1.N:H8.
H%(K)...... H(P$(H8),4) .. H$ . 3080...B
.E.E.1...L..102,N$(H8).. V..102,A$(H8).*
...102,P$(H8);" ";W$(H8).3 ...102.< ..
.102.E ...102.M ... K.M ..."DIT WAREN ";
E;" ADRESSEN".{ ... PTR UIT.. &. 102.. 0
.... :.."...ER WORDEN EERST TEST-ETIKETT
EN".. D..".AFGEDRUKT OM DE INSTELLING VA
N DE".. N..".PRINTER TE CONTROLEREN"..!X
..102,4..!B.. D . 1 . 3.8!L..102,"XXXXXX
XXXXXXXXXXXXXXX".@!V.. D.I!...102.R!...1
02.[!...102.D!.. 102..!..."..1. INSTELLI
NG VERKEERD"..!...".2. INSTELLING O.K.".
.!... 3540.G!F.. H1 . 1 . H1 . 2 . 3260.
.!P.. H1 . 1 . 3160..!Z....!..."...*****
BEWAREN *****".."..."==================
=".E"..."..GEEF NAAM WAARONDER BESTAND M
OET ".W"...".WORDEN OPGEBORGEN ? ADRES..
.....";F$:R$."".."..FL$."@0:".F$.",SEQ,W
RITE.."...5,8,2,FL$.." ..5,N;G(13);.G"*.
.L.1.N:H8.H%(L).."4..5,N$(H8);G(13);..">
..5,A$(H8);G(13);..#H..5,P$(H8);G(13);..
#R..5,W$(H8);G(13);.0#\..5,T$(H8);G(13);
.7#F..L.>#P. 5.D#Z...`#..."...***** EIND
E *****".Y#..."================="..#..."
..1. BESTAND NOG NIET OPGEBORGEN".B#..."
.2. BESTAND AL OPGEBORGEN".M#... 3540..#
... H1 . 1 . H1 . 2 . 3500..#... H1 .. 2
. ...$J...$$T..H1$:.H1$."".3540.H1.E(H1
$):..E$U..108,PT$;:.H1$,1:H1.E(H1$):..D$
..PR.1:ZI$."PRINTEN ?":.1080..$..PR.0:.1
04,20:.104,G(24);..$..."......
PRINTER STANDBY "..$...W.T1.T2
.L$..FP.FP.1.Y$..H8.H%(W)..%$..104,G(27)
.G(68).G(6).G(22).G(42).G(52);..%...104,
G(67).G(0);.T%8..104,FP$;W;G(9);N$(H8);G
(9);A$(H8);G(9);P$(H8);G(9);.P%B..104,W$
(H8);G(9);T$(H8)..%L..FP.60..104,G(12);:
FP.0..%V..B(151).6.W.T2:.104,G(24):.3700
..%`..W.F%J..104,G(12)..%T. 104:ZI$."ZIE
N ?"..%~..".":.160..%...1,4..%...1..&...
1940.2300..&...1..&.. 1.R& .L.C(IN$):.J.
1.L:AS$.J(IN$,J,1):AS.F(AS$):.AS.60.4010
..._&..L.C(IN$)..&...J.1.L:AS$.J(IN$,J,1
):AS.F(AS$)..&...AS.34IN$.H(IN$,J.1).G(9
8).I(IN$,L.J):..:.4005..&...AS.44IN$.H(I
N$,J.1).G(108).I(IN$,L.J):..:.4005..'...
AS.59IN$.H(IN$,J.1).G(123).I(IN$,L.J):..
:.4005.R'...AS.58IN$.H(IN$,J.1).G(122).I
(IN$,L.J):..:.4005.X'....^'.......
> CLICK IMAGE PREVIEW FOR FULL MODAL