DATABASE

00000000: 01 08 1D 08 05 00 99 C7  28 31 34 29 3A 97 36 35  |........(14):.65|
00000010: 37 2C 31 32 38 3A 97 37  38 38 2C 35 32 00 27 08  |7,128:.788,52.'.|
00000020: 0A 00 89 39 30 30 30 00  36 08 14 00 A1 43 24 3A  |...9000.6....C$:|
00000030: 8B 43 24 89 32 30 00 53  08 19 00 A1 43 24 3A 8B  |.C$.20.S....C$:.|
00000040: 43 24 A7 99 22 20 9D 22  3B 3A 43 B2 C6 28 43 24  |C$.." .";:C..(C$|
00000050: 29 3A 8E 00 62 08 1B 00  99 22 A4 9D 22 3B 3A 89  |):..b...."..";:.|
00000060: 32 35 00 76 08 64 00 A0  31 3A 8F 20 4D 45 4E 55  |25.v.d..1:. MENU|
00000070: 20 45 4E 54 52 59 00 9A  08 6E 00 99 22 93 20 20  | ENTRY...n..".  |
00000080: 20 20 20 20 12 20 C1 44  52 45 53 53 45 4E 42 45  |    . .DRESSENBE|
00000090: 53 54 41 4E 44 20 20 92  11 11 00 AE 08 78 00 99  |STAND  ......x..|
000000A0: 22 CB 49 45 53 20 55 49  54 20 3A 11 11 22 00 D5  |".IES UIT :.."..|
000000B0: 08 7D 00 99 2C 22 12 C9  92 4E 53 43 48 52 49 4A  |.}..,"...NSCHRIJ|
000000C0: 56 45 4E 20 56 41 4E 20  4E 41 41 4D 20 26 20 41  |VEN VAN NAAM & A|
000000D0: 44 52 45 53 22 00 FB 08  82 00 99 2C 22 12 D6 92  |DRES"......,"...|
000000E0: 52 41 47 45 4E 20 56 41  4E 20 4E 41 4D 45 4E 20  |RAGEN VAN NAMEN |
000000F0: 26 20 41 44 52 45 53 53  45 4E 22 00 24 09 8C 00  |& ADRESSEN".$...|
00000100: 99 2C 22 12 C1 92 46 44  52 55 4B 4B 45 4E 20 56  |.,"...FDRUKKEN V|
00000110: 41 4E 20 4E 41 4D 45 4E  20 26 20 41 44 52 45 53  |AN NAMEN & ADRES|
00000120: 53 45 4E 22 00 47 09 96  00 99 2C 22 12 CC 92 49  |SEN".G....,"...I|
00000130: 53 54 49 4E 47 20 56 41  4E 20 44 45 20 41 52 44  |STING VAN DE ARD|
00000140: 45 53 53 45 4E 20 22 00  82 09 A0 00 99 2C 22 12  |ESSEN "......,".|
00000150: D4 92 45 4C 45 46 4F 4F  4E 20 41 46 44 52 55 4B  |..ELEFOON AFDRUK|
00000160: 4B 45 4E 20 4E 41 41 52  20 20 20 20 20 20 20 20  |KEN NAAR        |
00000170: 20 20 20 20 20 20 20 20  20 20 50 52 49 4E 54 45  |          PRINTE|
00000180: 52 22 00 9F 09 AA 00 99  2C 22 12 D3 92 41 56 45  |R"......,"...AVE|
00000190: 4E 20 56 41 4E 20 41 44  52 45 53 53 45 4E 22 00  |N VAN ADRESSEN".|
000001A0: C1 09 B4 00 99 2C 22 12  C5 92 49 4E 44 45 20 56  |.....,"...INDE V|
000001B0: 41 4E 20 48 45 54 20 50  52 4F 47 52 41 4D 4D 41  |AN HET PROGRAMMA|
000001C0: 22 00 E5 09 BE 00 99 22  11 C4 45 57 45 4C 4B 45  |"......"..EWELKE|
000001D0: 22 3B 3A 58 24 B2 22 45  49 56 41 4C 53 54 22 3A  |";:X$."EIVALST":|
000001E0: 8D 38 30 36 30 00 0A 0A  FA 00 91 49 89 34 30 30  |.8060......I.400|
000001F0: 30 2C 35 30 30 30 2C 37  30 30 30 2C 36 30 30 30  |0,5000,7000,6000|
00000200: 2C 33 30 30 30 2C 37 31  30 30 00 43 0A 04 01 99  |,3000,7100.C....|
00000210: 22 93 CE 49 45 55 57 45  20 42 4C 41 44 5A 49 4A  |"..IEUWE BLADZIJ|
00000220: 44 45 22 3B 3A 8D 38 30  35 30 3A 8B 49 B2 30 A7  |DE";:.8050:.I.0.|
00000230: 9F 31 2C 30 34 3A 4C B2  2E 31 3A 8D 37 39 35 30  |.1,04:L..1:.7950|
00000240: 3A A0 31 00 7E 0A 0E 01  8B 4F 46 A7 99 22 11 D6  |:.1.~....OF.."..|
00000250: 52 49 4A 47 45 4C 49 4A  44 45 20 56 41 4E 2A CE  |RIJGELIJDE VAN*.|
00000260: 41 4D 45 4E 20 CC 49 4A  53 54 2A 22 3B 3A 8D 38  |AMEN .IJST*";:.8|
00000270: 30 35 30 3A 8B 49 B2 30  A7 8D 33 30 32 30 00 93  |050:.I.0..3020..|
00000280: 0A 18 01 A0 31 3A 99 22  93 11 D6 41 41 52 57 45  |....1:."...AARWE|
00000290: 4C 21 22 00 A9 0A 2C 01  8F 20 46 4F 52 4D 41 54  |L!"...,.. FORMAT|
000002A0: 20 54 48 45 20 4C 49 4E  45 00 D9 0A 36 01 58 24  | THE LINE...6.X$|
000002B0: B2 54 24 28 54 2C 30 29  3A 59 24 B2 54 24 28 54  |.T$(T,0):Y$.T$(T|
000002C0: 2C 31 29 3A 8B C3 28 59  24 29 B1 31 A7 58 24 B2  |,1):..(Y$).1.X$.|
000002D0: 59 24 AA 22 20 22 AA 58  24 00 FE 0A 40 01 59 24  |Y$." ".X$...@.Y$|
000002E0: B2 54 24 28 54 2C 32 29  3A 8B C3 28 59 24 29 B1  |.T$(T,2):..(Y$).|
000002F0: 31 A7 58 24 B2 59 24 AA  22 20 22 AA 58 24 00 24  |1.X$.Y$." ".X$.$|
00000300: 0B 4A 01 59 24 B2 54 24  28 54 2C 33 29 3A 8B C3  |.J.Y$.T$(T,3):..|
00000310: 28 59 24 29 B1 31 A7 58  24 B2 58 24 AA 22 2C 20  |(Y$).1.X$.X$.", |
00000320: 22 AA 59 24 00 66 0B 5E  01 41 24 28 4A 2C 30 29  |".Y$.f.^.A$(J,0)|
00000330: B2 58 24 3A 81 49 B2 31  A4 33 3A 41 24 28 4A 2C  |.X$:.I.1.3:A$(J,|
00000340: 49 29 B2 22 22 3A 59 24  B2 54 24 28 54 2C 49 AA  |I)."":Y$.T$(T,I.|
00000350: 33 29 3A 8B C3 28 59 24  29 B1 31 A7 41 24 28 4A  |3):..(Y$).1.A$(J|
00000360: 2C 49 29 B2 59 24 00 97  0B 68 01 82 3A 8B C3 28  |,I).Y$...h..:..(|
00000370: 54 24 28 54 2C 37 29 29  B1 31 A7 41 24 28 4A 2C  |T$(T,7)).1.A$(J,|
00000380: 33 29 B2 41 24 28 4A 2C  33 29 AA 22 2C 20 22 AA  |3).A$(J,3).", ".|
00000390: 54 24 28 54 2C 37 29 00  BE 0B 72 01 41 24 28 4A  |T$(T,7)...r.A$(J|
000003A0: 2C 34 29 B2 54 24 28 54  2C 38 29 3A 58 B2 C6 28  |,4).T$(T,8):X..(|
000003B0: 54 24 28 54 2C 39 29 29  AF 31 32 37 3A 8E 00 CD  |T$(T,9)).127:...|
000003C0: 0B 4B 02 42 4C 4F 43 4B  53 20 B8 45 2E 00 DF 0B  |.K.BLOCKS .E....|
000003D0: B8 0B 8F 20 4F 55 54 50  55 54 20 46 49 4C 45 00  |... OUTPUT FILE.|
000003E0: EE 0B C2 0B 8D 33 30 32  30 3A 89 31 30 30 00 0B  |.....3020:.100..|
000003F0: 0C CC 0B 59 24 B2 48 24  3A 8D 33 35 30 30 3A 8B  |...Y$.H$:.3500:.|
00000400: C5 28 58 24 29 89 36 30  30 30 30 00 14 0C D6 0B  |.(X$).60000.....|
00000410: 8B 58 A7 8E 00 25 0C 1C  0C 4F 46 B2 30 3A 98 31  |.X...%...OF.0:.1|
00000420: 2C 44 24 3A 99 00 42 0C  4E 0C 81 49 B2 30 A4 4E  |,D$:..B.N..I.0.N|
00000430: 58 3A 54 B2 54 25 28 49  29 3A 99 54 24 28 54 2C  |X:T.T%(I):.T$(T,|
00000440: 30 29 00 5D 0C 58 0C 81  4A B2 30 A4 39 3A 98 31  |0).].X..J.0.9:.1|
00000450: 2C 54 24 28 54 2C 4A 29  3A 82 4A 2C 49 00 75 0C  |,T$(T,J):.J,I.u.|
00000460: 76 0C 98 31 2C 22 5C 22  3A 8E 3A 8F 20 43 4F 4D  |v..1,"\":.:. COM|
00000470: 50 4C 45 54 45 00 92 0C  AC 0D 8F 20 4F 50 45 4E  |PLETE...... OPEN|
00000480: 20 54 48 45 20 46 49 4C  45 20 54 4F 20 57 52 49  | THE FILE TO WRI|
00000490: 54 45 00 BF 0C C0 0D 44  46 B2 30 3A 58 B2 30 3A  |TE.....DF.0:X.0:|
000004A0: 58 24 B2 22 22 3A 8B 43  46 B1 32 A7 99 22 93 C7  |X$."":.CF.2.."..|
000004B0: 45 47 45 56 45 4E 53 22  3B 3A 8D 38 30 35 30 00  |EGEVENS";:.8050.|
000004C0: E0 0C CA 0D 8B 43 46 B2  32 B0 28 43 46 B2 33 AF  |.....CF.2.(CF.3.|
000004D0: 49 B2 30 29 A7 9F 31 2C  31 2C 31 2C 59 24 3A 8E  |I.0)..1,1,1,Y$:.|
000004E0: 00 10 0D DE 0D 44 46 B2  AB 31 3A 4C 24 B2 22 30  |.....DF..1:L$."0|
000004F0: 3A 22 AA 59 24 3A 9F 31  2C 30 38 2C 32 2C 4C 24  |:".Y$:.1,08,2,L$|
00000500: 3A 84 38 2C 58 3A A0 31  3A 8B 58 89 33 35 38 30  |:.8,X:.1:.X.3580|
00000510: 00 40 0D E8 0D 99 3A 99  22 11 C7 45 47 45 56 45  |.@....:."..EGEVE|
00000520: 4E 53 20 48 45 52 53 43  48 52 49 4A 56 45 4E 22  |NS HERSCHRIJVEN"|
00000530: 3B 3A 8D 38 30 35 30 3A  8B 49 A7 58 B2 31 3A 8E  |;:.8050:.I.X.1:.|
00000540: 00 54 0D F2 0D 98 38 2C  22 53 22 4C 24 3A 98 38  |.T....8,"S"L$:.8|
00000550: 2C 22 49 30 00 74 0D FC  0D 9F 31 2C 30 38 2C 33  |,"I0.t....1,08,3|
00000560: 2C 4C 24 AA 22 2C 53 2C  57 22 3A 84 38 2C 58 2C  |,L$.",S,W":.8,X,|
00000570: 58 24 3A 8E 00 8A 0D A0  0F 8F 20 43 52 45 41 54  |X$:....... CREAT|
00000580: 45 20 41 4E 20 45 4E 54  52 59 00 BF 0D AA 0F 8B  |E AN ENTRY......|
00000590: 4E 58 B1 B2 56 A7 99 22  11 12 20 CA 41 4D 4D 45  |NX..V..".. .AMME|
000005A0: 52 20 47 45 45 4E 20 50  4C 41 41 54 53 20 4D 45  |R GEEN PLAATS ME|
000005B0: 45 52 21 22 3A 8D 38 30  30 30 3A 89 31 30 30 00  |ER!":.8000:.100.|
000005C0: E7 0D B4 0F 4E 58 B2 4E  58 AA 31 3A 4B B2 4E 58  |....NX.NX.1:K.NX|
000005D0: 3A 54 B2 54 25 28 4B 29  3A 54 24 28 54 2C 39 29  |:T.T%(K):T$(T,9)|
000005E0: B2 C7 28 31 32 38 29 00  0C 0E 04 10 4F 46 B2 31  |..(128).....OF.1|
000005F0: 3A 4D B2 33 39 3A 59 B2  30 3A 8F 20 47 45 54 20  |:M.39:Y.0:. GET |
00000600: 4E 41 4D 45 2F 41 44 44  52 45 53 53 00 19 0E 0E  |NAME/ADDRESS....|
00000610: 10 4A B2 30 3A 8D 33 30  30 00 4B 0E 18 10 99 22  |.J.0:.300.K...."|
00000620: 93 20 22 3B 3A 81 49 B2  31 A4 33 30 3A 99 22 A4  |. ";:.I.1.30:.".|
00000630: 22 3B 3A 82 3A 81 49 B2  31 A4 35 3A 99 22 11 A5  |";:.:.I.1.5:."..|
00000640: 9D 22 3B 3A 82 3A 99 22  11 22 3B 00 76 0E 1A 10  |.";:.:.".";.v...|
00000650: 81 49 B2 31 A4 33 30 3A  99 22 9D A3 9D 22 3B 3A  |.I.1.30:."...";:|
00000660: 82 3A 81 49 B2 31 A4 35  3A 99 22 91 9D A7 22 3B  |.:.I.1.5:."...";|
00000670: 3A 82 3A 99 22 13 00 99  0E 22 10 81 49 B2 30 A4  |:.:."...."..I.0.|
00000680: 34 3A 99 22 1D 22 41 24  28 4A 2C 49 29 3A 82 3A  |4:."."A$(J,I):.:|
00000690: 8B 59 B1 38 89 34 32 30  30 00 BF 0E 36 10 99 22  |.Y.8.4200...6.."|
000006A0: 13 11 11 11 11 11 11 11  11 11 22 42 30 24 3A 99  |.........."B0$:.|
000006B0: 22 91 22 46 24 28 59 29  3A 99 42 30 24 22 91 00  |"."F$(Y):.B0$"..|
000006C0: D5 0E 3B 10 8D 38 32 30  30 3A 8B 43 B3 B1 31 33  |..;..8200:.C..13|
000006D0: 89 34 31 32 30 00 FF 0E  3D 10 99 3A 8B C9 28 58  |.4120...=..:..(X|
000006E0: 24 2C 31 29 B2 22 20 22  A7 58 24 B2 C8 28 58 24  |$,1)." ".X$..(X$|
000006F0: 2C C3 28 58 24 29 AB 31  29 3A 89 34 31 35 37 00  |,.(X$).1):.4157.|
00000700: 2E 0F 40 10 8B 58 24 B2  22 22 AF 54 24 28 54 2C  |..@..X$."".T$(T,|
00000710: 59 29 B1 22 22 A7 59 B2  59 AA 31 3A 91 32 AA 28  |Y)."".Y.Y.1:.2.(|
00000720: 59 B3 39 29 89 34 31 35  30 2C 34 31 31 30 00 40  |Y.9).4150,4110.@|
00000730: 0F 4A 10 8B C3 28 58 24  29 B1 31 89 34 31 39 30  |.J...(X$).1.4190|
00000740: 00 74 0F 54 10 58 24 B2  22 2D 22 3A 8B 59 B2 30  |.t.T.X$."-":.Y.0|
00000750: A7 99 22 11 D5 49 54 57  49 53 53 45 4E 22 3B 3A  |.."..ITWISSEN";:|
00000760: 8D 38 30 35 30 3A 91 49  AA 31 89 34 39 30 30 2C  |.8050:.I.1.4900,|
00000770: 34 31 31 30 00 8F 0F 5E  10 54 24 28 54 2C 59 29  |4110...^.T$(T,Y)|
00000780: B2 58 24 3A 59 B2 59 AA  31 3A 89 34 31 31 30 00  |.X$:Y.Y.1:.4110.|
00000790: B4 0F 68 10 58 24 B2 22  31 32 33 34 35 36 37 22  |..h.X$."1234567"|
000007A0: AA 52 24 3A 8F 20 47 45  54 20 43 41 54 45 47 4F  |.R$:. GET CATEGO|
000007B0: 52 49 45 53 00 CB 0F 72  10 99 22 13 11 11 11 11  |RIES...r..".....|
000007C0: 11 11 11 11 D3 4F 4F 52  54 20 3A 00 E6 0F 7C 10  |.....OORT :...|.|
000007D0: 81 49 B2 30 A4 36 3A 99  2C 3A 8B 58 AF 32 AE 49  |.I.0.6:.,:.X.2.I|
000007E0: A7 99 22 12 22 3B 00 F9  0F 86 10 99 49 AA 31 22  |..".";......I.1"|
000007F0: 92 22 4B 24 28 49 29 3A  82 00 2F 10 90 10 99 22  |."K$(I):../...."|
00000800: 11 C8 4F 45 20 54 45 20  53 43 48 49 4B 4B 45 4E  |..OE TE SCHIKKEN|
00000810: 20 2F 20 55 49 54 57 49  53 53 45 4E 3F 20 20 20  | / UITWISSEN?   |
00000820: 9D 22 3B 3A 8D 38 30 37  30 3A 49 B2 32 AE 49 00  |.";:.8070:I.2.I.|
00000830: 4E 10 9A 10 58 B2 28 58  B0 49 29 AF A8 28 58 AF  |N...X.(X.I)..(X.|
00000840: 49 29 3A 8B 58 B3 31 32  38 89 34 32 31 30 00 6F  |I):.X.128.4210.o|
00000850: 10 CC 10 54 24 28 54 2C  39 29 B2 C7 28 58 29 3A  |...T$(T,9)..(X):|
00000860: 8F 20 43 4F 4D 50 4C 45  54 45 20 45 44 49 54 00  |. COMPLETE EDIT.|
00000870: 9A 10 D6 10 99 22 91 91  22 42 30 24 3A 99 22 91  |.....".."B0$:.".|
00000880: C1 41 4E 56 41 41 52 44  20 20 22 3B 3A 8D 38 30  |.ANVAARD  ";:.80|
00000890: 35 30 3A 8B 49 89 34 31  30 30 00 BB 10 E0 10 8B  |50:.I.4100......|
000008A0: 4E 58 B3 31 89 31 30 30  3A 8F 20 4D 55 53 54 20  |NX.1.100:. MUST |
000008B0: 42 45 20 49 4E 20 4F 52  44 45 52 00 F5 10 EA 10  |BE IN ORDER.....|
000008C0: 58 24 B2 54 24 28 54 2C  30 29 3A 8B 4B B3 4E 58  |X$.T$(T,0):.K.NX|
000008D0: A7 81 49 B2 4B A4 4E 58  AB 31 3A 54 25 28 49 29  |..I.K.NX.1:T%(I)|
000008E0: B2 54 25 28 49 AA 31 29  3A 82 3A 8F 20 52 45 4D  |.T%(I.1):.:. REM|
000008F0: 4F 56 45 20 54 00 27 11  F4 10 81 49 B2 30 A4 4E  |OVE T.'....I.0.N|
00000900: 58 AB 31 3A 8B 54 24 28  54 25 28 49 29 2C 30 29  |X.1:.T$(T%(I),0)|
00000910: B3 58 24 A7 82 3A 8F 20  4C 4F 43 41 54 45 20 54  |.X$..:. LOCATE T|
00000920: 27 53 20 53 4C 4F 54 00  64 11 FE 10 8B 49 B3 4E  |'S SLOT.d....I.N|
00000930: 58 A7 4A B2 49 AA 31 3A  81 49 B2 4E 58 A4 4A A9  |X.J.I.1:.I.NX.J.|
00000940: AB 31 3A 54 25 28 49 29  B2 54 25 28 49 AB 31 29  |.1:T%(I).T%(I.1)|
00000950: 3A 82 3A 8F 20 4D 41 4B  45 20 52 4F 4F 4D 20 46  |:.:. MAKE ROOM F|
00000960: 4F 52 20 54 00 86 11 08  11 54 25 28 49 29 B2 54  |OR T.....T%(I).T|
00000970: 3A 89 31 30 30 3A 8F 20  49 4E 53 45 52 54 20 54  |:.100:. INSERT T|
00000980: 2C 20 45 58 49 54 00 9E  11 24 13 8F 20 43 4C 45  |, EXIT...$.. CLE|
00000990: 41 4E 20 55 50 20 44 45  4C 45 54 49 4F 4E 00 B6  |AN UP DELETION..|
000009A0: 11 2E 13 81 49 B2 30 A4  39 3A 54 24 28 54 2C 49  |....I.0.9:T$(T,I|
000009B0: 29 B2 22 22 3A 82 00 E7  11 38 13 4E 58 B2 4E 58  |)."":....8.NX.NX|
000009C0: AB 31 3A 81 49 B2 4B A4  4E 58 3A 54 25 28 49 29  |.1:.I.K.NX:T%(I)|
000009D0: B2 54 25 28 49 AA 31 29  3A 82 3A 54 25 28 49 29  |.T%(I.1):.:T%(I)|
000009E0: B2 54 3A 89 31 30 30 00  02 12 88 13 8F 20 53 45  |.T:.100...... SE|
000009F0: 4C 45 43 54 2F 45 44 49  54 20 41 4E 20 45 4E 54  |LECT/EDIT AN ENT|
00000A00: 52 59 00 26 12 92 13 99  22 93 22 3A 99 22 DA 4F  |RY.&....".":.".O|
00000A10: 45 4B 45 4E 20 4E 41 41  52 20 3A 20 20 20 20 12  |EKEN NAAR :    .|
00000A20: CE 92 41 41 4D 22 00 40  12 9C 13 99 2C 22 20 20  |..AAM".@....,"  |
00000A30: 20 20 20 20 20 12 D6 92  4F 4F 52 4E 41 41 4D 22  |     ...OORNAAM"|
00000A40: 00 61 12 A6 13 99 2C 22  20 20 20 20 20 20 20 12  |.a....,"       .|
00000A50: D3 92 54 41 44 20 2F 20  50 4F 53 54 43 4F 44 45  |..TAD / POSTCODE|
00000A60: 22 00 7A 12 B0 13 99 2C  22 20 20 20 20 20 20 20  |".z....,"       |
00000A70: 12 C7 92 45 42 4F 52 45  4E 22 00 94 12 BA 13 99  |...EBOREN"......|
00000A80: 2C 22 20 20 20 20 20 20  20 12 D4 92 45 4C 45 46  |,"       ...ELEF|
00000A90: 4F 4F 4E 22 00 C0 12 CE  13 99 22 11 C4 45 57 45  |OON"......"..EWE|
00000AA0: 4C 4B 45 3F 20 22 3B 3A  58 24 B2 22 4E 56 4C 4C  |LKE? ";:X$."NVLL|
00000AB0: 4C 53 54 47 4C 22 3A 8D  38 30 36 30 3A 46 B2 49  |LSTGL":.8060:F.I|
00000AC0: 00 FB 12 D8 13 4D B2 34  30 3A 99 22 11 D7 41 54  |.....M.40:."..AT|
00000AD0: 20 5A 49 4A 4E 20 D5 57  20 47 45 47 45 56 45 4E  | ZIJN .W GEGEVEN|
00000AE0: 53 20 20 20 20 22 3B 3A  8D 38 32 30 30 3A 5A 24  |S    ";:.8200:Z$|
00000AF0: B2 58 24 3A 5A B2 C3 28  5A 24 29 00 16 13 EC 13  |.X$:Z..(Z$).....|
00000B00: 4B B2 30 3A 8F 20 53 45  41 52 43 48 20 46 4F 52  |K.0:. SEARCH FOR|
00000B10: 20 46 49 45 4C 44 00 31  13 F6 13 54 B2 54 25 28  | FIELD.1...T.T%(|
00000B20: 4B 29 3A 58 24 B2 54 24  28 54 2C 46 29 3A 59 B2  |K):X$.T$(T,F):Y.|
00000B30: 30 00 63 13 00 14 81 49  B2 31 A4 C3 28 58 24 29  |0.c....I.1..(X$)|
00000B40: AB 5A AA 31 3A 59 B2 28  CA 28 58 24 2C 49 2C 5A  |.Z.1:Y.(.(X$,I,Z|
00000B50: 29 B2 5A 24 29 B0 59 3A  82 3A 8B 59 B2 30 89 35  |).Z$).Y:.:.Y.0.5|
00000B60: 31 35 30 00 87 13 0A 14  4A B2 30 3A 8D 33 30 30  |150.....J.0:.300|
00000B70: 3A 99 22 93 22 3A 81 49  B2 30 A4 34 3A 99 41 24  |:.".":.I.0.4:.A$|
00000B80: 28 30 2C 49 29 3A 82 00  AD 13 14 14 99 22 11 D6  |(0,I):......."..|
00000B90: 45 52 44 45 52 20 5A 4F  45 4B 45 4E 20 22 3B 3A  |ERDER ZOEKEN ";:|
00000BA0: 8D 38 30 35 30 3A 8B 49  89 35 31 38 30 00 C3 13  |.8050:.I.5180...|
00000BB0: 1E 14 4B B2 4B AA 31 3A  8B 4B B3 B2 4E 58 89 35  |..K.K.1:.K..NX.5|
00000BC0: 31 31 30 00 F9 13 28 14  99 3A 99 22 11 C1 4C 4C  |110...(..:."..LL|
00000BD0: 45 20 47 45 47 45 56 45  4E 53 20 5A 49 4A 4E 20  |E GEGEVENS ZIJN |
00000BE0: 55 49 54 47 45 50 52 4F  42 45 45 52 44 22 3A 8D  |UITGEPROBEERD":.|
00000BF0: 38 30 30 30 3A 89 31 30  30 00 1E 14 3C 14 99 22  |8000:.100...<.."|
00000C00: 11 D6 45 52 41 4E 44 45  52 22 3B 3A 8D 38 30 35  |..ERANDER";:.805|
00000C10: 30 3A 91 49 89 31 30 30  3A 89 34 31 30 30 00 3A  |0:.I.100:.4100.:|
00000C20: 14 70 17 8F 20 46 49 4C  45 20 46 4F 52 20 57 4F  |.p.. FILE FOR WO|
00000C30: 52 44 20 4D 41 43 48 49  4E 45 00 6C 14 7A 17 99  |RD MACHINE.l.z..|
00000C40: 22 93 C7 45 45 46 20 D3  CC C5 D5 D4 C5 CC 20 20  |"..EEF .......  |
00000C50: 20 20 20 22 3B 3A 4D B2  31 36 3A 8D 38 32 30 30  |   ";:M.16:.8200|
00000C60: 3A 8B 58 24 B2 22 22 89  36 30 31 30 00 89 14 84  |:.X$."".6010....|
00000C70: 17 59 24 B2 58 24 3A 8D  37 30 30 30 3A 8B C5 28  |.Y$.X$:.7000:..(|
00000C80: 58 24 29 89 36 30 30 30  30 00 94 14 8E 17 8B 58  |X$).60000......X|
00000C90: 89 31 30 30 00 C3 14 A2  17 8D 37 32 30 30 3A 99  |.100......7200:.|
00000CA0: 22 11 C5 49 47 45 4E 20  4B 45 55 53 20 20 22 3B  |"..IGEN KEUS  ";|
00000CB0: 3A 8D 38 30 35 30 3A 53  46 B2 49 3A 4A B2 30 3A  |:.8050:SF.I:J.0:|
00000CC0: 4B B2 30 00 E6 14 AC 17  54 B2 54 25 28 4B 29 3A  |K.0.....T.T%(K):|
00000CD0: 8B 28 46 AF C6 28 54 24  28 54 2C 39 29 29 29 B2  |.(F..(T$(T,9))).|
00000CE0: 30 89 36 31 38 30 00 FD  14 B6 17 8B 53 46 A7 99  |0.6180......SF..|
00000CF0: 54 24 28 54 2C 30 29 3A  89 36 31 30 30 00 1D 15  |T$(T,0):.6100...|
00000D00: C0 17 8D 33 30 30 3A 99  22 93 22 3A 81 49 B2 30  |...300:.".":.I.0|
00000D10: A4 33 3A 99 41 24 28 4A  2C 49 29 3A 82 00 45 15  |.3:.A$(J,I):..E.|
00000D20: CA 17 99 22 11 C1 41 4E  56 41 41 52 44 20 20 20  |..."..ANVAARD   |
00000D30: 20 20 20 20 20 22 3B 3A  8D 38 30 35 30 3A 8B 49  |     ";:.8050:.I|
00000D40: 89 36 31 38 30 00 5B 15  D4 17 8F 20 4F 55 54 50  |.6180.[.... OUTP|
00000D50: 55 54 20 54 48 45 20 46  49 4C 45 00 7C 15 DE 17  |UT THE FILE.|...|
00000D60: 81 49 B2 30 A4 37 3A 98  31 2C 54 24 28 54 2C 49  |.I.0.7:.1,T$(T,I|
00000D70: 29 3A 82 3A 44 46 B2 B6  28 44 46 29 00 92 15 24  |):.:DF..(DF)...$|
00000D80: 18 4B B2 4B AA 31 3A 8B  4B B3 B2 4E 58 89 36 30  |.K.K.1:.K..NX.60|
00000D90: 36 30 00 C8 15 2E 18 98  31 2C 22 5C 22 3A 8B 44  |60......1,"\":.D|
00000DA0: 46 B1 AB 31 A7 91 53 46  AA 31 89 36 32 32 30 2C  |F..1..SF.1.6220,|
00000DB0: 31 30 30 3A 8F 20 20 2D  31 3D 45 4D 50 54 59 20  |100:.  -1=EMPTY |
00000DC0: 44 49 53 43 46 49 4C 45  00 EA 15 38 18 99 22 11  |DISCFILE...8..".|
00000DD0: C7 45 45 4E 20 41 44 52  45 53 20 49 4E 20 44 49  |.EEN ADRES IN DI|
00000DE0: 54 20 42 45 53 54 41 4E  44 22 00 03 16 42 18 A0  |T BESTAND"...B..|
00000DF0: 31 3A 98 38 2C 22 53 30  3A 22 59 24 3A 98 38 2C  |1:.8,"S0:"Y$:.8,|
00000E00: 22 49 30 00 12 16 4C 18  8D 38 30 30 30 3A 89 31  |"I0...L..8000:.1|
00000E10: 30 30 00 25 16 58 1B 8F  20 50 52 49 4E 54 20 4C  |00.%.X.. PRINT L|
00000E20: 41 42 45 4C 53 00 42 16  62 1B 53 46 B2 AB 31 3A  |ABELS.B.b.SF..1:|
00000E30: 4D B2 33 30 3A 9F 31 2C  30 33 3A 4C 4C B2 39 39  |M.30:.1,03:LL.99|
00000E40: 39 39 00 69 16 6C 1B 99  22 11 C7 45 47 45 56 45  |99.i.l.."..EGEVE|
00000E50: 4E 53 20 4F 50 20 45 45  4E 20 52 49 4A 22 3B 3A  |NS OP EEN RIJ";:|
00000E60: 8D 38 30 35 30 3A 59 B2  49 00 8C 16 8A 1B 99 22  |.8050:Y.I......"|
00000E70: 11 D0 52 4F 45 46 41 46  44 52 55 4B 22 3B 3A 8D  |..ROEFAFDRUK";:.|
00000E80: 38 30 35 30 3A 8B 49 89  37 30 39 30 00 B7 16 94  |8050:.I.7090....|
00000E90: 1B 50 24 B2 22 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 45  |.P$."----------E|
00000EA0: 45 52 53 54 45 20 4C 49  4A 4E 2D 2D 2D 2D 2D 2D  |ERSTE LIJN------|
00000EB0: 22 3A 8D 37 39 30 30 00  EE 16 9E 1B 81 49 B2 30  |":.7900......I.0|
00000EC0: A4 31 3A 50 24 B2 22 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.1:P$."---------|
00000ED0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000EE0: 2D 2D 2D 2D 2D 22 3A 8D  37 39 30 30 3A 82 00 29  |-----":.7900:..)|
00000EF0: 17 A8 1B 50 24 B2 22 2D  2D 2D 2D 2D 2D 2D 2D 2D  |...P$."---------|
00000F00: 2D 4C 41 41 54 53 54 45  20 4C 49 4A 4E 2D 2D 2D  |-LAATSTE LIJN---|
00000F10: 2D 2D 2D 22 3A 81 49 B2  31 A4 33 3A 8D 37 39 30  |---":.I.1.3:.790|
00000F20: 30 3A 82 3A 89 37 30 35  30 00 4E 17 B2 1B 8D 37  |0:.:.7050.N....7|
00000F30: 32 30 30 3A 8D 37 33 30  30 3A 89 31 30 30 3A 8F  |200:.7300:.100:.|
00000F40: 20 4F 55 54 50 55 54 20  4C 41 42 45 4C 53 00 65  | OUTPUT LABELS.e|
00000F50: 17 BC 1B 8F 20 50 52 49  4E 54 20 50 48 4F 4E 45  |.... PRINT PHONE|
00000F60: 20 42 4F 4F 4B 00 81 17  C6 1B 53 46 B2 30 3A 4D  | BOOK.....SF.0:M|
00000F70: B2 33 36 3A 59 B2 31 3A  9F 31 2C 30 34 3A 4C B2  |.36:Y.1:.1,04:L.|
00000F80: 30 00 AD 17 D0 1B 99 22  11 CE 41 4D 45 4E 20 50  |0......"..AMEN P|
00000F90: 45 52 20 42 4C 41 44 5A  49 4A 44 45 20 20 22 4C  |ER BLADZIJDE  "L|
00000FA0: 30 22 9D 9D 9D 9D 9D 22  3B 3A 85 4C 4C 00 C8 17  |0".....";:.LL...|
00000FB0: DA 1B 8D 37 32 30 30 3A  8D 37 33 30 30 3A 8D 37  |...7200:.7300:.7|
00000FC0: 39 35 30 3A 89 31 30 30  00 DB 17 20 1C 8F 20 47  |950:.100... .. G|
00000FD0: 45 54 20 43 41 54 45 47  4F 52 59 00 12 18 2A 1C  |ET CATEGORY...*.|
00000FE0: 99 22 93 DA 4F 45 4B 45  4E 20 4E 41 41 52 22 3A  |."..OEKEN NAAR":|
00000FF0: 81 49 B2 30 A4 36 3A 99  2C 22 12 22 CA 28 C4 28  |.I.0.6:.,".".(.(|
00001000: 49 AA 31 29 2C 32 29 22  92 20 22 4B 24 28 49 29  |I.1),2)". "K$(I)|
00001010: 3A 82 00 4C 18 34 1C 99  2C 22 12 38 92 20 C1 4C  |:..L.4..,".8. .L|
00001020: 4C 45 53 22 3A 99 22 11  D5 57 20 4B 45 55 53 20  |LES":."..W KEUS |
00001030: 22 3B 3A 58 24 B2 22 31  32 33 34 35 36 37 38 22  |";:X$."12345678"|
00001040: 3A 8D 38 30 36 30 3A 46  B2 32 AE 49 00 6B 18 3E  |:.8060:F.2.I.k.>|
00001050: 1C 8E 3A 8F 20 41 4C 4C  20 41 52 45 20 4F 52 2D  |..:. ALL ARE OR-|
00001060: 45 44 20 57 49 54 48 20  31 32 38 00 7E 18 84 1C  |ED WITH 128.~...|
00001070: 8F 20 50 52 49 4E 54 20  45 49 54 48 45 52 00 AD  |. PRINT EITHER..|
00001080: 18 8E 1C 4A B2 59 3A 81  4B B2 30 A4 4E 58 3A 54  |...J.Y:.K.0.NX:T|
00001090: B2 54 25 28 4B 29 3A 8B  28 46 AF C6 28 54 24 28  |.T%(K):.(F..(T$(|
000010A0: 54 2C 39 29 29 29 B2 30  89 37 33 38 30 00 CB 18  |T,9))).0.7380...|
000010B0: 98 1C 4A B2 59 AB 4A 3A  8D 33 30 30 3A 8B 53 46  |..J.Y.J:.300:.SF|
000010C0: A7 41 24 28 4A 2C 34 29  B2 22 22 00 D9 18 A2 1C  |.A$(J,4)."".....|
000010D0: 8B 4A B3 59 89 37 33 38  30 00 F4 18 B6 1C 81 49  |.J.Y.7380......I|
000010E0: B2 30 A4 34 3A 50 24 B2  C8 28 41 24 28 30 2C 49  |.0.4:P$..(A$(0,I|
000010F0: 29 2C 4D 29 00 1E 19 C0  1C 8B 4A A7 50 24 B2 50  |),M)......J.P$.P|
00001100: 24 AA C8 28 42 24 2C 4D  AA 36 AB C3 28 50 24 29  |$..(B$,M.6..(P$)|
00001110: 29 AA C8 28 41 24 28 31  2C 49 29 2C 4D 29 00 30  |)..(A$(1,I),M).0|
00001120: 19 CA 1C 8D 37 39 30 30  3A 82 3A 8D 37 39 30 30  |....7900:.:.7900|
00001130: 00 61 19 D4 1C 82 4B 3A  8B 4A B3 59 A7 81 49 B2  |.a....K:.J.Y..I.|
00001140: 30 A4 34 3A 50 24 B2 C8  28 41 24 28 30 2C 49 29  |0.4:P$..(A$(0,I)|
00001150: 2C 4D 29 3A 8D 37 39 30  30 3A 82 3A 8D 37 39 30  |,M):.7900:.:.790|
00001160: 30 00 67 19 DE 1C 8E 00  94 19 DC 1E 4C B2 4C AA  |0.g.........L.L.|
00001170: 31 3A 98 31 2C 22 11 22  AA 50 24 3A 50 24 B2 22  |1:.1,".".P$:P$."|
00001180: 22 3A 8B 4C B3 4C 4C A7  8E 3A 8F 20 4C 49 4E 45  |":.L.LL..:. LINE|
00001190: 20 4F 55 54 00 B6 19 E6  1E 4C B2 4C AA 31 3A 98  | OUT.....L.L.1:.|
000011A0: 31 2C 22 11 22 AA 50 24  3A 50 24 B2 22 22 3A 8B  |1,".".P$:P$."":.|
000011B0: 4C B3 4C 4C A7 8E 00 E4  19 0E 1F 8B 4C A7 81 4C  |L.LL........L..L|
000011C0: B2 4C A4 4C 50 AB 31 3A  98 31 3A 82 3A 4C B2 30  |.L.LP.1:.1:.:L.0|
000011D0: 3A 8E 3A 8F 20 46 49 4E  49 53 48 20 54 48 45 20  |:.:. FINISH THE |
000011E0: 50 41 47 45 00 F4 19 40  1F 8F 20 55 54 49 4C 49  |PAGE...@.. UTILI|
000011F0: 54 49 45 53 00 2E 1A 4A  1F 99 22 11 12 20 C7 41  |TIES...J..".. .A|
00001200: 20 56 45 52 44 45 52 3A  44 52 55 4B 20 47 45 4C  | VERDER:DRUK GEL|
00001210: 49 4A 4B 20 57 45 4C 4B  45 20 54 4F 45 54 53 22  |IJK WELKE TOETS"|
00001220: 3B 3A 8D 32 30 3A 99 3A  99 22 93 22 3A 8E 00 39  |;:.20:.:.".":..9|
00001230: 1A 72 1F 58 24 B2 22 4A  4E 00 44 1A 7C 1F 99 22  |.r.X$."JN.D.|.."|
00001240: 3F 20 22 3B 00 6E 1A 86  1F 8D 32 30 3A 81 49 B2  |? ";.n....20:.I.|
00001250: 31 A4 C3 28 58 24 29 3A  8B 43 24 B3 B1 CA 28 58  |1..(X$):.C$...(X|
00001260: 24 2C 49 2C 31 29 A7 82  3A 89 38 30 37 30 00 87  |$,I,1)..:.8070..|
00001270: 1A 8B 1F 49 B2 49 AB 31  3A 99 43 24 3B 3A 8B 43  |...I.I.1:.C$;:.C|
00001280: B2 31 33 A7 99 3A 8E 00  A3 1A 90 1F A1 57 24 3A  |.13..:.......W$:|
00001290: 8B 57 24 B2 22 22 A7 99  22 A4 9D 22 3B 3A 89 38  |.W$."".."..";:.8|
000012A0: 30 38 30 00 B9 1A 95 1F  99 22 20 9D 22 3B 3A 8B  |080......" .";:.|
000012B0: 57 24 B2 52 24 A7 99 3A  8E 00 D2 1A 9A 1F 8B 57  |W$.R$..:.......W|
000012C0: 24 B2 C7 28 32 30 29 A7  99 57 24 3B 3A 89 38 30  |$..(20)..W$;:.80|
000012D0: 37 30 00 DC 1A 9F 1F 89  38 30 38 30 00 F7 1A 08  |70......8080....|
000012E0: 20 58 24 B2 22 22 3A 8F  20 49 4E 50 55 54 20 41  | X$."":. INPUT A|
000012F0: 20 53 54 52 49 4E 47 00  08 1B 12 20 A1 43 24 3A  | STRING.... .C$:|
00001300: 8B 43 24 89 38 32 31 30  00 18 1B 1C 20 8D 32 35  |.C$.8210.... .25|
00001310: 3A 8B 43 B2 31 33 A7 8E  00 47 1B 26 20 8B 43 B2  |:.C.13...G.& .C.|
00001320: 32 30 AF 58 24 B1 22 22  A7 99 43 24 3B 3A 58 24  |20.X$.""..C$;:X$|
00001330: B2 C8 28 58 24 2C C3 28  58 24 29 AB 31 29 3A 8F  |..(X$,.(X$).1):.|
00001340: 20 44 45 4C 45 54 45 00  70 1B 2B 20 8B 28 31 32  | DELETE.p.+ .(12|
00001350: 37 AF 43 29 B3 33 32 89  38 32 32 30 3A 8F 20 43  |7.C).32.8220:. C|
00001360: 55 52 53 4F 52 20 43 48  41 52 41 43 54 45 52 53  |URSOR CHARACTERS|
00001370: 00 99 1B 30 20 8B 28 4B  25 28 43 29 B0 47 29 A7  |...0 .(K%(C).G).|
00001380: 99 43 24 3B 3A 58 24 B2  58 24 AA 43 24 3A 8B C3  |.C$;:X$.X$.C$:..|
00001390: 28 58 24 29 B1 B2 4D A7  8E 00 A3 1B 3A 20 89 38  |(X$)..M.....: .8|
000013A0: 32 32 30 00 B4 1B 28 23  8F 20 49 4E 49 54 49 41  |220...(#. INITIA|
000013B0: 4C 49 5A 45 00 E1 1B 2D  23 4C 30 B2 36 30 3A 4C  |LIZE...-#L0.60:L|
000013C0: 50 B2 37 32 3A 4E 58 B2  AB 31 3A 52 24 B2 C7 28  |P.72:NX..1:R$..(|
000013D0: 31 33 29 3A 48 24 B2 22  CE 41 4D 45 20 CC 49 53  |13):H$.".AME .IS|
000013E0: 54 00 02 1C 32 23 86 4B  25 28 32 35 35 29 2C 41  |T...2#.K%(255),A|
000013F0: 24 28 31 2C 34 29 2C 4B  24 28 36 29 2C 46 24 28  |$(1,4),K$(6),F$(|
00001400: 38 29 00 43 1C 3C 23 99  22 93 8E 13 13 0F 11 11  |8).C.<#.".......|
00001410: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001420: 11 11 11 11 11 11 11 22  A6 33 39 29 22 8F 05 22  |.......".39)".."|
00001430: 3A 97 35 39 34 36 38 2C  31 34 3A 8F 20 46 4F 52  |:.59468,14:. FOR|
00001440: 4D 41 54 00 76 1C 41 23  97 35 33 32 37 32 2C 32  |MAT.v.A#.53272,2|
00001450: B0 C2 28 35 33 32 37 32  29 3A 99 22 93 20 20 20  |..(53272):.".   |
00001460: 20 20 12 20 C1 44 52 45  53 53 45 4E 42 45 53 54  |  . .DRESSENBEST|
00001470: 41 4E 44 20 20 92 00 91  1C 43 23 8D 36 31 30 30  |AND  ....C#.6100|
00001480: 30 3A 20 8F 20 43 4F 4C  4F 52 20 43 48 41 4E 47  |0: . COLOR CHANG|
00001490: 45 00 CF 1C 46 23 99 22  11 12 C3 92 41 53 53 45  |E...F#."....ASSE|
000014A0: 54 54 45 2C 20 12 C4 92  49 53 51 55 45 2C 4F 46  |TTE, ...ISQUE,OF|
000014B0: 20 44 45 20 12 32 92 22  3B 3A 58 24 B2 22 44 43  | DE .2.";:X$."DC|
000014C0: 32 22 3A 8D 38 30 36 30  3A 43 46 B2 49 AA 31 00  |2":.8060:CF.I.1.|
000014D0: 07 1D 4B 23 81 49 B2 33  32 A4 39 30 3A 87 4B 25  |..K#.I.32.90:.K%|
000014E0: 28 49 29 3A 82 3A 81 49  B2 31 39 33 A4 32 31 38  |(I):.:.I.193.218|
000014F0: 3A 4B 25 28 49 29 B2 31  3A 82 3A 8F 20 43 48 41  |:K%(I).1:.:. CHA|
00001500: 52 20 41 52 52 41 59 00  3E 1D 50 23 42 24 B2 22  |R ARRAY.>.P#B$."|
00001510: 20 20 20 20 20 22 3A 81  49 B2 31 A4 35 3A 42 24  |     ":.I.1.5:B$|
00001520: B2 42 24 AA 42 24 3A 82  3A 42 30 24 B2 C8 28 42  |.B$.B$:.:B0$..(B|
00001530: 24 2C 33 39 29 3A 9F 38  2C 30 38 2C 31 35 00 7C  |$,39):.8,08,15.||
00001540: 1D 55 23 99 22 11 C4 41  54 55 4D 20 56 41 4E 44  |.U#."..ATUM VAND|
00001550: 41 41 47 3A 20 22 3A 4D  B2 36 30 3A 47 B2 31 3A  |AAG: ":M.60:G.1:|
00001560: 8D 38 32 30 30 3A 47 B2  30 3A 44 24 B2 58 24 3A  |.8200:G.0:D$.X$:|
00001570: 8B 44 24 B2 22 22 A7 44  24 B2 22 2D 00 A0 1D 6E  |.D$."".D$."-...n|
00001580: 23 99 3A 81 49 B2 30 A4  38 3A 87 46 24 28 49 29  |#.:.I.0.8:.F$(I)|
00001590: 3A 82 3A 8F 20 46 49 45  4C 44 20 4E 41 4D 45 53  |:.:. FIELD NAMES|
000015A0: 00 C1 1D 78 23 81 49 B2  30 A4 36 3A 87 4B 24 28  |...x#.I.0.6:.K$(|
000015B0: 49 29 3A 82 3A 8F 20 43  41 54 45 47 4F 52 49 45  |I):.:. CATEGORIE|
000015C0: 53 00 FA 1D 82 23 56 B2  B5 28 28 B8 28 30 29 AB  |S....#V..((.(0).|
000015D0: 32 30 30 30 29 AD 31 37  30 29 3A 86 54 24 28 56  |2000).170):.T$(V|
000015E0: 2C 39 29 2C 54 25 28 56  29 3A 81 49 B2 30 A4 56  |,9),T%(V):.I.0.V|
000015F0: 3A 54 25 28 49 29 B2 49  3A 82 00 0B 1E 1C 25 8F  |:T%(I).I:.....%.|
00001600: 20 49 4E 50 55 54 20 46  49 4C 45 00 2D 1E 26 25  | INPUT FILE.-.&%|
00001610: 8B 43 46 B1 32 A7 99 22  11 C4 45 20 44 41 54 41  |.CF.2.."..E DATA|
00001620: 53 45 54 54 45 22 3B 3A  8D 38 30 35 30 00 5F 1E  |SETTE";:.8050._.|
00001630: 30 25 8B 43 46 B2 32 B0  28 43 46 B2 33 AF 49 B2  |0%.CF.2.(CF.3.I.|
00001640: 30 29 A7 8D 39 37 30 30  3A 91 49 89 31 30 30 3A  |0)..9700:.I.100:|
00001650: 9F 31 2C 31 2C 30 2C 48  24 3A 89 39 36 30 30 00  |.1,1,0,H$:.9600.|
00001660: 83 1E 4E 25 A0 31 3A 9F  31 2C 30 38 2C 32 2C 48  |..N%.1:.1,08,2,H|
00001670: 24 3A 84 38 2C 58 2C 58  24 3A 8B 58 B2 30 89 39  |$:.8,X,X$:.X.0.9|
00001680: 36 30 30 00 94 1E 58 25  8D 39 37 30 30 3A 8B 49  |600...X%.9700:.I|
00001690: 89 31 30 30 00 C1 1E 62  25 99 22 11 C2 45 47 45  |.100...b%."..EGE|
000016A0: 4C 45 49 44 20 44 45 20  44 49 53 51 55 45 20 41  |LEID DE DISQUE A|
000016B0: 55 42 2E 20 22 3A 8D 38  30 30 30 3A 89 39 35 35  |UB. ":.8000:.955|
000016C0: 30 00 CB 1E 80 25 58 24  B2 22 22 00 ED 1E 83 25  |0....%X$.""....%|
000016D0: A1 23 31 2C 43 24 3A 8B  43 24 B3 B1 52 24 A7 58  |.#1,C$:.C$..R$.X|
000016E0: 24 B2 58 24 AA 43 24 3A  89 39 36 30 33 00 17 1F  |$.X$.C$:.9603...|
000016F0: 85 25 99 22 93 C2 45 47  49 4E 3A 20 12 22 58 24  |.%."..EGIN: ."X$|
00001700: 3A 99 3A 8F 20 44 41 54  45 4C 49 4E 45 20 46 52  |:.:. DATELINE FR|
00001710: 4F 4D 20 46 49 4C 45 00  4D 1F 8A 25 81 49 B2 30  |OM FILE.M..%.I.0|
00001720: A4 56 3A 84 31 2C 58 24  3A 8B 58 24 B2 22 5C 22  |.V:.1,X$:.X$."\"|
00001730: B0 53 54 B1 30 89 39 36  35 30 3A 8F 20 52 45 41  |.ST.0.9650:. REA|
00001740: 44 49 4E 47 20 43 4F 4D  50 4C 45 54 45 00 7E 1F  |DING COMPLETE.~.|
00001750: 94 25 99 58 24 3A 54 24  28 49 2C 30 29 B2 58 24  |.%.X$:T$(I,0).X$|
00001760: 3A 81 4A B2 31 A4 39 3A  84 31 2C 54 24 28 49 2C  |:.J.1.9:.1,T$(I,|
00001770: 4A 29 3A 82 3A 54 25 28  49 29 B2 49 3A 82 00 99  |J):.:T%(I).I:...|
00001780: 1F B2 25 4E 58 B2 49 AB  31 3A 89 31 30 30 3A 8F  |..%NX.I.1:.100:.|
00001790: 20 43 4F 4D 50 4C 45 54  45 00 C0 1F E4 25 99 22  | COMPLETE....%."|
000017A0: 11 CE 49 45 55 57 45 20  47 45 47 45 56 45 4E 53  |..IEUWE GEGEVENS|
000017B0: 22 3B 3A 8D 38 30 35 30  3A 49 B2 31 AB 49 3A 8E  |";:.8050:I.1.I:.|
000017C0: 00 E2 1F AC 26 8F 20 41  43 43 45 50 54 41 42 4C  |....&. ACCEPTABL|
000017D0: 45 20 43 48 41 52 41 43  54 45 52 53 20 33 32 2D  |E CHARACTERS 32-|
000017E0: 39 30 00 27 20 B6 26 83  31 2C 31 2C 30 2C 31 2C  |90.' .&.1,1,0,1,|
000017F0: 31 2C 31 2C 31 2C 31 2C  31 2C 31 2C 31 2C 31 2C  |1,1,1,1,1,1,1,1,|
00001800: 30 2C 31 2C 31 2C 31 2C  31 2C 31 2C 31 2C 31 2C  |0,1,1,1,1,1,1,1,|
00001810: 31 2C 31 2C 31 2C 31 2C  31 2C 31 2C 30 2C 30 2C  |1,1,1,1,1,1,0,0,|
00001820: 31 2C 31 2C 31 2C 31 00  62 20 C0 26 83 31 2C 31  |1,1,1,1.b .&.1,1|
00001830: 2C 31 2C 31 2C 31 2C 31  2C 31 2C 31 2C 31 2C 31  |,1,1,1,1,1,1,1,1|
00001840: 2C 31 2C 31 2C 31 2C 31  2C 31 2C 31 2C 31 2C 31  |,1,1,1,1,1,1,1,1|
00001850: 2C 31 2C 31 2C 31 2C 31  2C 31 2C 31 2C 31 2C 31  |,1,1,1,1,1,1,1,1|
00001860: 2C 31 00 A6 20 CA 26 83  22 CE 41 41 4D 22 2C 22  |,1.. .&.".AAM","|
00001870: D6 4F 4F 52 4E 41 41 4D  22 2C 22 D4 49 54 45 4C  |.OORNAAM",".ITEL|
00001880: 28 CD 52 2E 2C CD 56 2E  2C CA 55 46 2E 2C C6 41  |(.R.,.V.,.UF.,.A|
00001890: 4D 49 4C 49 45 2C C6 49  52 4D 41 29 22 2C 22 C2  |MILIE,.IRMA)",".|
000018A0: 45 52 4F 45 50 22 00 F2  20 D4 26 83 22 D3 54 52  |EROEP".. .&.".TR|
000018B0: 41 41 54 20 26 20 CE 52  2E 22 2C 22 D3 54 41 44  |AAT & .R.",".TAD|
000018C0: 20 26 20 50 4F 53 54 43  4F 44 45 22 2C 22 D4 45  | & POSTCODE",".E|
000018D0: 4C 45 46 4F 4F 4E 2D D4  45 4C 2E 22 2C 22 C7 45  |LEFOON-.EL.",".E|
000018E0: 42 4F 52 45 4E 2D C7 45  42 2E 22 2C 22 C2 41 4E  |BOREN-.EB.",".AN|
000018F0: 4B 22 00 09 21 10 27 8F  20 53 45 56 45 4E 20 43  |K"..!.'. SEVEN C|
00001900: 41 54 45 47 4F 52 49 45  53 00 18 21 1A 27 83 20  |ATEGORIES..!.'. |
00001910: 22 C6 41 4D 49 4C 49 45  00 28 21 24 27 83 20 22  |".AMILIE.(!$'. "|
00001920: D6 52 49 45 4E 44 45 4E  00 44 21 2E 27 83 20 22  |.RIENDEN.D!.'. "|
00001930: D6 45 52 5A 45 4B 45 52  49 4E 47 45 4E 20 26 20  |.ERZEKERINGEN & |
00001940: 41 55 54 4F 00 57 21 38  27 83 20 22 C7 45 4E 45  |AUTO.W!8'. ".ENE|
00001950: 45 53 4B 55 4E 44 45 00  6B 21 42 27 83 20 22 C9  |ESKUNDE.k!B'. ".|
00001960: 4E 53 54 45 4C 4C 49 4E  47 45 4E 00 79 21 4C 27  |NSTELLINGEN.y!L'|
00001970: 83 20 22 C6 49 52 4D 41  53 00 87 21 56 27 83 20  |. ".IRMAS..!V'. |
00001980: 22 C4 49 56 45 52 53 00  9A 21 60 EA 99 58 24 3A  |".IVERS..!`..X$:|
00001990: 8D 38 30 30 30 3A 89 31  30 30 00 B5 21 48 EE 8F  |.8000:.100..!H..|
000019A0: 20 43 4F 4C 4F 52 20 43  48 41 4E 47 45 20 52 4F  | COLOR CHANGE RO|
000019B0: 55 54 49 4E 45 00 D9 21  49 EE 96 A5 43 28 58 29  |UTINE..!I...C(X)|
000019C0: B2 C2 28 58 29 AA 31 AA  31 36 AC 28 28 C2 28 58  |..(X).1.16.((.(X|
000019D0: 29 AF 31 35 29 B2 31 35  29 00 FC 21 4A EE 99 22  |).15).15)..!J.."|
000019E0: 13 11 11 11 12 C6 31 92  3D 20 CB 4C 45 55 52 20  |......1.= .LEUR |
000019F0: 56 41 4E 20 44 45 20 52  41 4E 44 22 00 1E 22 4B  |VAN DE RAND".."K|
00001A00: EE 99 22 11 11 12 C6 33  92 3D 20 CB 4C 45 55 52  |.."....3.= .LEUR|
00001A10: 20 56 41 4E 20 48 45 54  20 42 4F 52 44 22 00 40  | VAN HET BORD".@|
00001A20: 22 4C EE 99 22 11 11 12  C6 35 92 3D 20 CB 4C 45  |"L.."....5.= .LE|
00001A30: 55 52 20 56 41 4E 20 44  45 20 54 45 4B 53 54 22  |UR VAN DE TEKST"|
00001A40: 00 5D 22 4D EE 99 22 11  11 12 D2 C5 D4 D5 D2 CE  |.]"M..".........|
00001A50: 92 3D 20 C7 41 20 56 45  52 44 45 52 22 00 6F 22  |.= .A VERDER".o"|
00001A60: 52 EE A1 43 24 3A 8B 43  24 89 36 31 30 31 30 00  |R..C$:.C$.61010.|
00001A70: 84 22 5C EE A1 43 24 3A  8B 43 24 B2 22 22 89 36  |."\..C$:.C$."".6|
00001A80: 31 30 32 30 00 AB 22 66  EE 43 B2 C6 28 43 24 29  |1020.."f.C..(C$)|
00001A90: 3A 8B 43 B2 31 33 35 A7  97 36 34 36 2C A5 43 28  |:.C.135..646,.C(|
00001AA0: 36 34 36 29 3A 89 36 31  30 30 32 00 D7 22 7A EE  |646):.61002.."z.|
00001AB0: 43 B2 C6 28 43 24 29 3A  8B 43 B2 31 33 33 B0 43  |C..(C$):.C.133.C|
00001AC0: B2 31 33 34 A7 58 B2 35  33 31 34 37 AA 43 3A 97  |.134.X.53147.C:.|
00001AD0: 58 2C A5 43 28 58 29 00  E8 22 84 EE 8B 43 B3 B1  |X,.C(X).."...C..|
00001AE0: 31 33 89 36 31 30 31 30  00 EE 22 8E EE 8E 00 00  |13.61010..".....|
00001AF0: 00 F6 85                                          |...             |

.......G(14):.657,128:.788,52.'....9000.
6....C$:.C$.20.S....C$:.C$.." .";:C.F(C$
):..B...."..";:.25.V.D. 1:. MENU ENTRY..
.N..".      . ADRESSENBESTAND  ......X..
"KIES UIT :..".U.}..,".I.NSCHRIJVEN VAN 
NAAM & ADRES"......,".V.RAGEN VAN NAMEN 
& ADRESSEN".$....,".A.FDRUKKEN VAN NAMEN
 & ADRESSEN".G....,".L.ISTING VAN DE ARD
ESSEN "... ..,".T.ELEFOON AFDRUKKEN NAAR
                  PRINTER"......,".S.AVE
N VAN ADRESSEN".A....,".E.INDE VAN HET P
ROGRAMMA"......".DEWELKE";:X$."EIVALST":
.8060......I.4000,5000,7000,6000,3000,71
00.C....".NIEUWE BLADZIJDE";:.8050:.I.0.
.1,04:L..1:.7950: 1.~....OF..".VRIJGELIJ
DE VAN*NAMEN LIJST*";:.8050:.I.0..3020..
... 1:."..VAARWEL!"...,.. FORMAT THE LIN
E.Y.6.X$.T$(T,0):Y$.T$(T,1):.C(Y$).1.X$.
Y$." ".X$...@.Y$.T$(T,2):.C(Y$).1.X$.Y$.
" ".X$.$.J.Y$.T$(T,3):.C(Y$).1.X$.X$.", 
".Y$.F.^.A$(J,0).X$:.I.1.3:A$(J,I)."":Y$
.T$(T,I.3):.C(Y$).1.A$(J,I).Y$...H..:.C(
T$(T,7)).1.A$(J,3).A$(J,3).", ".T$(T,7).
..R.A$(J,4).T$(T,8):X.F(T$(T,9)).127:..M
.K.BLOCKS .E....... OUTPUT FILE...B..302
0:.100...L.Y$.H$:.3500:.E(X$).60000...V.
.X...%...OF.0:.1,D$:..B.N..I.0.NX:T.T%(I
):.T$(T,0).].X..J.0.9:.1,T$(T,J):.J,I.U.
V..1,"\":.:. COMPLETE...... OPEN THE FIL
E TO WRITE.....DF.0:X.0:X$."":.CF.2..".G
EGEVENS";:.8050...J..CF.2.(CF.3.I.0)..1,
1,1,Y$:......DF..1:L$."0:".Y$:.1,08,2,L$
:.8,X: 1:.X.3580.@....:.".GEGEVENS HERSC
HRIJVEN";:.8050:.I.X.1:..T....8,"S"L$:.8
,"I0.T....1,08,3,L$.",S,W":.8,X,X$:.... 
.. CREATE AN ENTRY......NX..V..".. JAMME
R GEEN PLAATS MEER!":.8000:.100.....NX.N
X.1:K.NX:T.T%(K):T$(T,9).G(128).....OF.1
:M.39:Y.0:. GET NAME/ADDRESS.....J.0:.30
0.K....". ";:.I.1.30:.".";:.:.I.1.5:."..
.";:.:.".";.V....I.1.30:."...";:.:.I.1.5
:."...";:.:."...."..I.0.4:."."A$(J,I):.:
.Y.8.4200...6..".........."B0$:."."F$(Y)
:.B0$"..U.;..8200:.C..13.4120...=..:.I(X
$,1)." ".X$.H(X$,C(X$).1):.4157...@..X$.
"".T$(T,Y)."".Y.Y.1:.2.(Y.9).4150,4110.@
.J..C(X$).1.4190.T.T.X$."-":.Y.0..".UITW
ISSEN";:.8050:.I.1.4900,4110...^.T$(T,Y)
.X$:Y.Y.1:.4110...H.X$."1234567".R$:. GE
T CATEGORIES.K.R..".........SOORT :...|.
.I.0.6:.,:.X.2.I..".";......I.1"."K$(I):
../....".HOE TE SCHIKKEN / UITWISSEN?   
.";:.8070:I.2.I.N...X.(X.I)..(X.I):.X.12
8.4210.O.L.T$(T,9).G(X):. COMPLETE EDIT.
..V..".."B0$:.".AANVAARD  ";:.8050:.I.41
00......NX.1.100:. MUST BE IN ORDER.....
X$.T$(T,0):.K.NX..I.K.NX.1:T%(I).T%(I.1)
:.:. REMOVE T.'....I.0.NX.1:.T$(T%(I),0)
.X$..:. LOCATE T'S SLOT.D....I.NX.J.I.1:
.I.NX.J..1:T%(I).T%(I.1):.:. MAKE ROOM F
OR T.....T%(I).T:.100:. INSERT T, EXIT..
.$.. CLEAN UP DELETION......I.0.9:T$(T,I
)."":....8.NX.NX.1:.I.K.NX:T%(I).T%(I.1)
:.:T%(I).T:.100...... SELECT/EDIT AN ENT
RY.&....".":."ZOEKEN NAAR :    .N.AAM".@
....,"       .V.OORNAAM".A....,"       .
S.TAD / POSTCODE".Z....,"       .G.EBORE
N"......,"       .T.ELEFOON"...N..".DEWE
LKE? ";:X$."NVLLLSTGL":.8060:F.I...X.M.4
0:.".WAT ZIJN UW GEGEVENS    ";:.8200:Z$
.X$:Z.C(Z$).....K.0:. SEARCH FOR FIELD.1
...T.T%(K):X$.T$(T,F):Y.0.C....I.1.C(X$)
.Z.1:Y.(J(X$,I,Z).Z$).Y:.:.Y.0.5150.....
J.0:.300:.".":.I.0.4:.A$(0,I):.......".V
ERDER ZOEKEN ";:.8050:.I.5180.C...K.K.1:
.K..NX.5110...(..:.".ALLE GEGEVENS ZIJN 
UITGEPROBEERD":.8000:.100...<..".VERANDE
R";:.8050:.I.100:.4100.:.P.. FILE FOR WO
RD MACHINE.L.Z..".GEEF SLEUTEL     ";:M.
16:.8200:.X$."".6010.....Y$.X$:.7000:.E(
X$).60000......X.100.C....7200:.".EIGEN 
KEUS  ";:.8050:SF.I:J.0:K.0.....T.T%(K):
.(F.F(T$(T,9))).0.6180......SF..T$(T,0):
.6100......300:.".":.I.0.3:.A$(J,I):..E.
J..".AANVAARD        ";:.8050:.I.6180.[.
T.. OUTPUT THE FILE.|....I.0.7:.1,T$(T,I
):.:DF..(DF)...$.K.K.1:.K..NX.6060.H....
1,"\":.DF..1..SF.1.6220,100:.  -1=EMPTY 
DISCFILE...8..".GEEN ADRES IN DIT BESTAN
D"...B. 1:.8,"S0:"Y$:.8,"I0...L..8000:.1
00.%.X.. PRINT LABELS.B.B.SF..1:M.30:.1,
03:LL.9999.I.L..".GEGEVENS OP EEN RIJ";:
.8050:Y.I......".PROEFAFDRUK";:.8050:.I.
7090.....P$."----------EERSTE LIJN------
":.7900......I.0.1:P$."-----------------
-------------":.7900:..)...P$."---------
-LAATSTE LIJN------":.I.1.3:.7900:.:.705
0.N....7200:.7300:.100:. OUTPUT LABELS.E
.... PRINT PHONE BOOK...F.SF.0:M.36:Y.1:
.1,04:L.0...P..".NAMEN PER BLADZIJDE  "L
0".....";:.LL.H.Z..7200:.7300:.7950:.100
... .. GET CATEGORY...*..".ZOEKEN NAAR":
.I.0.6:.,"."J(D(I.1),2)". "K$(I):..L.4..
,".8. ALLES":.".UW KEUS ";:X$."12345678"
:.8060:F.2.I.K.>..:. ALL ARE OR-ED WITH 
128.~.... PRINT EITHER.....J.Y:.K.0.NX:T
.T%(K):.(F.F(T$(T,9))).0.7380.K...J.Y.J:
.300:.SF.A$(J,4)."".Y....J.Y.7380......I
.0.4:P$.H(A$(0,I),M)......J.P$.P$.H(B$,M
.6.C(P$)).H(A$(1,I),M).0.J..7900:.:.7900
.A.T..K:.J.Y..I.0.4:P$.H(A$(0,I),M):.790
0:.:.7900.G.........L.L.1:.1,".".P$:P$."
":.L.LL..:. LINE OUT.....L.L.1:.1,".".P$
:P$."":.L.LL........L..L.L.LP.1:.1:.:L.0
:.:. FINISH THE PAGE...@.. UTILITIES...J
..".. GA VERDER:DRUK GELIJK WELKE TOETS"
;:.20:.:.".":..9.R.X$."JN.D.|.."? ";.N..
..20:.I.1.C(X$):.C$..J(X$,I,1)..:.8070..
...I.I.1:.C$;:.C.13..:.......W$:.W$.""..
"..";:.8080......" .";:.W$.R$..:..R....W
$.G(20)..W$;:.8070......8080.... X$."":.
 INPUT A STRING.... .C$:.C$.8210.... .25
:.C.13...G.& .C.20.X$.""..C$;:X$.H(X$,C(
X$).1):. DELETE.P.+ .(127.C).32.8220:. C
URSOR CHARACTERS...0 .(K%(C).G)..C$;:X$.
X$.C$:.C(X$)..M.....: .8220...(#. INITIA
LIZE...-#L0.60:LP.72:NX..1:R$.G(13):H$."
NAME LIST...2#.K%(255),A$(1,4),K$(6),F$(
8).C.<#.".............................."
.39)"..":.59468,14:. FORMAT.V.A#.53272,2
.B(53272):.".     . ADRESSENBESTAND  ...
.C#.61000: . COLOR CHANGE.O.F#."..C.ASSE
TTE, .D.ISQUE,OF DE .2.";:X$."DC2":.8060
:CF.I.1...K#.I.32.90:.K%(I):.:.I.193.218
:K%(I).1:.:. CHAR ARRAY.>.P#B$."     ":.
I.1.5:B$.B$.B$:.:B0$.H(B$,39):.8,08,15.|
.U#.".DATUM VANDAAG: ":M.60:G.1:.8200:G.
0:D$.X$:.D$."".D$."-. .N#.:.I.0.8:.F$(I)
:.:. FIELD NAMES.A.X#.I.0.6:.K$(I):.:. C
ATEGORIES....#V..((.(0).2000).170):.T$(V
,9),T%(V):.I.0.V:T%(I).I:.....%. INPUT F
ILE.-.&%.CF.2..".DE DATASETTE";:.8050._.
0%.CF.2.(CF.3.I.0)..9700:.I.100:.1,1,0,H
$:.9600...N% 1:.1,08,2,H$:.8,X,X$:.X.0.9
600...X%.9700:.I.100.A.B%.".BEGELEID DE 
DISQUE AUB. ":.8000:.9550.K..%X$.""....%
.#1,C$:.C$..R$.X$.X$.C$:.9603....%.".BEG
IN: ."X$:.:. DATELINE FROM FILE.M..%.I.0
.V:.1,X$:.X$."\".ST.0.9650:. READING COM
PLETE.~..%.X$:T$(I,0).X$:.J.1.9:.1,T$(I,
J):.:T%(I).I:.....%NX.I.1:.100:. COMPLET
E....%.".NIEUWE GEGEVENS";:.8050:I.1.I:.
....&. ACCEPTABLE CHARACTERS 32-90.' .&.
1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,
1,1,1,1,1,1,0,0,1,1,1,1.B .&.1,1,1,1,1,1
,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
,1.. J&."NAAM","VOORNAAM","TITEL(MR.,MV.
,JUF.,FAMILIE,FIRMA)","BEROEP".. T&."STR
AAT & NR.","STAD & POSTCODE","TELEFOON-T
EL.","GEBOREN-GEB.","BANK"..!.'. SEVEN C
ATEGORIES..!.'. "FAMILIE.(!$'. "VRIENDEN
.D!.'. "VERZEKERINGEN & AUTO.W!8'. "GENE
ESKUNDE.K!B'. "INSTELLINGEN.Y!L'. "FIRMA
S..!V'. "DIVERS..!`..X$:.8000:.100..!H..
 COLOR CHANGE ROUTINE.Y!I...C(X).B(X).1.
16.((B(X).15).15)..!J..".....F1.= KLEUR 
VAN DE RAND".."K.."...F3.= KLEUR VAN HET
 BORD".@"L.."...F5.= KLEUR VAN DE TEKST"
.]"M.."...RETURN.= GA VERDER".O"R..C$:.C
$.61010.."\..C$:.C$."".61020.."F.C.F(C$)
:.C.135..646,.C(646):.61002.W"Z.C.F(C$):
.C.133.C.134.X.53147.C:.X,.C(X).."...C..
13.61010.."........

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL