ADRESS 64

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 3A 08  |7,128:.788,52.:.|
00000020: 0A 00 89 39 30 30 30 3A  8F 20 28 43 29 20 42 59  |...9000:. (C) BY|
00000030: 20 48 45 49 54 52 4F 4E  49 43 00 49 08 14 00 A1  | HEITRONIC.I....|
00000040: 43 24 3A 8B 43 24 89 32  30 00 66 08 19 00 A1 43  |C$:.C$.20.f....C|
00000050: 24 3A 8B 43 24 A7 99 22  20 9D 22 3B 3A 43 B2 C6  |$:.C$.." .";:C..|
00000060: 28 43 24 29 3A 8E 00 75  08 1B 00 99 22 A4 9D 22  |(C$):..u....".."|
00000070: 3B 3A 89 32 35 00 89 08  64 00 A0 31 3A 8F 20 4D  |;:.25...d..1:. M|
00000080: 45 4E 55 20 45 4E 54 52  59 00 BE 08 6E 00 99 22  |ENU ENTRY...n.."|
00000090: 93 12 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |..              |
000000A0: 20 C1 44 52 45 53 53 20  36 34 20 20 20 20 20 20  | .DRESS 64      |
000000B0: 20 20 20 20 20 20 20 20  20 20 92 11 11 22 00 D1  |          ..."..|
000000C0: 08 78 00 99 22 C6 55 4E  43 54 49 45 53 3A 11 11  |.x..".UNCTIES:..|
000000D0: 22 00 F6 08 7D 00 99 2C  22 12 C9 92 4E 56 4F 45  |"...}..,"...NVOE|
000000E0: 52 45 4E 20 56 41 4E 20  CE 41 41 4D 20 45 4E 20  |REN VAN .AAM EN |
000000F0: C1 44 52 45 53 22 00 1A  09 82 00 99 2C 22 12 DA  |.DRES"......,"..|
00000100: 92 4F 45 4B 45 4E 20 56  41 4E 20 45 45 4E 20 CE  |.OEKEN VAN EEN .|
00000110: 41 41 4D 2F C1 44 52 45  53 22 00 41 09 8C 00 99  |AAM/.DRES".A....|
00000120: 2C 22 12 C1 92 46 44 52  55 4B 4B 45 4E 20 56 41  |,"...FDRUKKEN VA|
00000130: 4E 20 45 45 4E 20 CE 41  41 4D 2F C1 44 52 45 53  |N EEN .AAM/.DRES|
00000140: 22 00 5C 09 96 00 99 2C  22 12 CD 92 41 49 4C 49  |".\....,"...AILI|
00000150: 4E 47 20 41 44 52 45 53  53 45 4E 22 00 7D 09 A0  |NG ADRESSEN".}..|
00000160: 00 99 2C 22 12 D4 92 45  4C 45 46 4F 4F 4E 42 4F  |..,"...ELEFOONBO|
00000170: 45 4B 20 41 46 44 52 55  4B 4B 45 4E 22 00 A5 09  |EK AFDRUKKEN"...|
00000180: AA 00 99 2C 22 12 CF 92  50 53 4C 41 41 4E 20 56  |...,"...PSLAAN V|
00000190: 41 4E 20 44 45 20 CE 41  4D 45 4E 2F 41 44 52 45  |AN DE .AMEN/ADRE|
000001A0: 53 53 45 4E 22 00 BF 09  B4 00 99 2C 22 12 C5 92  |SSEN"......,"...|
000001B0: 49 4E 44 45 20 50 52 4F  47 52 41 4D 4D 41 22 00  |INDE PROGRAMMA".|
000001C0: E5 09 BE 00 99 22 11 CB  45 55 5A 45 20 20 20 20  |....."..EUZE    |
000001D0: 22 3B 3A 58 24 B2 22 45  49 5A 41 4D 4F 54 22 3A  |";:X$."EIZAMOT":|
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 44 0A 04 01 99  |,3000,7100.D....|
00000210: 22 93 11 C2 4C 41 44 20  55 49 54 20 50 52 49 4E  |"...LAD UIT PRIN|
00000220: 54 45 52 22 3B 3A 8D 38  30 35 30 3A 8B 49 B2 30  |TER";:.8050:.I.0|
00000230: A7 9F 31 2C 30 34 3A 4C  B2 2E 31 3A 8D 37 39 35  |..1,04:L..1:.795|
00000240: 30 3A A0 31 00 7D 0A 0E  01 8B 4F 46 A7 99 22 11  |0:.1.}....OF..".|
00000250: CF 50 53 4C 41 41 4E 20  56 41 4E 20 44 45 20 2A  |.PSLAAN VAN DE *|
00000260: CE 41 4D 45 20 CC 49 53  54 2A 22 3B 3A 8D 38 30  |.AME .IST*";:.80|
00000270: 35 30 3A 8B 49 B2 30 A7  8D 33 30 32 30 00 95 0A  |50:.I.0..3020...|
00000280: 18 01 A0 31 3A 99 22 93  11 C4 41 41 41 41 41 41  |...1:."...AAAAAA|
00000290: 47 21 22 3A 80 00 AB 0A  2C 01 8F 20 46 4F 52 4D  |G!":....,.. FORM|
000002A0: 41 54 20 54 48 45 20 4C  49 4E 45 00 DB 0A 36 01  |AT THE LINE...6.|
000002B0: 58 24 B2 54 24 28 54 2C  30 29 3A 59 24 B2 54 24  |X$.T$(T,0):Y$.T$|
000002C0: 28 54 2C 31 29 3A 8B C3  28 59 24 29 B1 31 A7 58  |(T,1):..(Y$).1.X|
000002D0: 24 B2 59 24 AA 22 20 22  AA 58 24 00 00 0B 40 01  |$.Y$." ".X$...@.|
000002E0: 59 24 B2 54 24 28 54 2C  32 29 3A 8B C3 28 59 24  |Y$.T$(T,2):..(Y$|
000002F0: 29 B1 31 A7 58 24 B2 59  24 AA 22 20 22 AA 58 24  |).1.X$.Y$." ".X$|
00000300: 00 26 0B 4A 01 59 24 B2  54 24 28 54 2C 33 29 3A  |.&.J.Y$.T$(T,3):|
00000310: 8B C3 28 59 24 29 B1 31  A7 58 24 B2 58 24 AA 22  |..(Y$).1.X$.X$."|
00000320: 2C 20 22 AA 59 24 00 68  0B 5E 01 41 24 28 4A 2C  |, ".Y$.h.^.A$(J,|
00000330: 30 29 B2 58 24 3A 81 49  B2 31 A4 33 3A 41 24 28  |0).X$:.I.1.3:A$(|
00000340: 4A 2C 49 29 B2 22 22 3A  59 24 B2 54 24 28 54 2C  |J,I)."":Y$.T$(T,|
00000350: 49 AA 33 29 3A 8B C3 28  59 24 29 B1 31 A7 41 24  |I.3):..(Y$).1.A$|
00000360: 28 4A 2C 49 29 B2 59 24  00 99 0B 68 01 82 3A 8B  |(J,I).Y$...h..:.|
00000370: C3 28 54 24 28 54 2C 37  29 29 B1 31 A7 41 24 28  |.(T$(T,7)).1.A$(|
00000380: 4A 2C 33 29 B2 41 24 28  4A 2C 33 29 AA 22 2C 20  |J,3).A$(J,3).", |
00000390: 22 AA 54 24 28 54 2C 37  29 00 C0 0B 72 01 41 24  |".T$(T,7)...r.A$|
000003A0: 28 4A 2C 34 29 B2 54 24  28 54 2C 38 29 3A 58 B2  |(J,4).T$(T,8):X.|
000003B0: C6 28 54 24 28 54 2C 39  29 29 AF 31 32 37 3A 8E  |.(T$(T,9)).127:.|
000003C0: 00 CF 0B 4B 02 42 4C 4F  43 4B 53 20 B8 45 2E 00  |...K.BLOCKS .E..|
000003D0: E1 0B B8 0B 8F 20 4F 55  54 50 55 54 20 46 49 4C  |..... OUTPUT FIL|
000003E0: 45 00 F0 0B C2 0B 8D 33  30 32 30 3A 89 31 30 30  |E......3020:.100|
000003F0: 00 0D 0C CC 0B 59 24 B2  48 24 3A 8D 33 35 30 30  |.....Y$.H$:.3500|
00000400: 3A 8B C5 28 58 24 29 89  36 30 30 30 30 00 16 0C  |:..(X$).60000...|
00000410: D6 0B 8B 58 A7 8E 00 27  0C 1C 0C 4F 46 B2 30 3A  |...X...'...OF.0:|
00000420: 98 31 2C 44 24 3A 99 00  44 0C 4E 0C 81 49 B2 30  |.1,D$:..D.N..I.0|
00000430: A4 4E 58 3A 54 B2 54 25  28 49 29 3A 99 54 24 28  |.NX:T.T%(I):.T$(|
00000440: 54 2C 30 29 00 5F 0C 58  0C 81 4A B2 30 A4 39 3A  |T,0)._.X..J.0.9:|
00000450: 98 31 2C 54 24 28 54 2C  4A 29 3A 82 4A 2C 49 00  |.1,T$(T,J):.J,I.|
00000460: 77 0C 76 0C 98 31 2C 22  5C 22 3A 8E 3A 8F 20 43  |w.v..1,"\":.:. C|
00000470: 4F 4D 50 4C 45 54 45 00  94 0C AC 0D 8F 20 4F 50  |OMPLETE...... OP|
00000480: 45 4E 20 54 48 45 20 46  49 4C 45 20 54 4F 20 57  |EN THE FILE TO W|
00000490: 52 49 54 45 00 C6 0C C0  0D 44 46 B2 30 3A 58 B2  |RITE.....DF.0:X.|
000004A0: 30 3A 58 24 B2 22 22 3A  8B 43 46 B1 32 A7 99 22  |0:X$."":.CF.2.."|
000004B0: 93 CF 50 20 43 41 53 53  45 54 54 45 20 20 22 3B  |..P CASSETTE  ";|
000004C0: 3A 8D 38 30 35 30 00 E7  0C CA 0D 8B 43 46 B2 32  |:.8050......CF.2|
000004D0: B0 28 43 46 B2 33 AF 49  B2 30 29 A7 9F 31 2C 31  |.(CF.3.I.0)..1,1|
000004E0: 2C 31 2C 59 24 3A 8E 00  19 0D DE 0D 44 46 B2 AB  |,1,Y$:......DF..|
000004F0: 31 3A 4C 24 B2 22 30 3A  22 AA 59 24 3A 9F 31 2C  |1:L$."0:".Y$:.1,|
00000500: 30 38 2C 32 2C 4C 24 3A  84 38 2C 58 3A 20 20 A0  |08,2,L$:.8,X:  .|
00000510: 31 3A 8B 58 89 33 35 38  30 00 55 0D E8 0D 99 3A  |1:.X.3580.U....:|
00000520: 99 22 11 C2 45 53 54 41  4E 44 20 42 45 53 54 41  |."..ESTAND BESTA|
00000530: 41 54 20 41 4C 2D 20 4F  56 45 52 53 43 48 52 49  |AT AL- OVERSCHRI|
00000540: 4A 56 45 4E 22 3B 3A 8D  38 30 35 30 3A 8B 49 A7  |JVEN";:.8050:.I.|
00000550: 58 B2 31 3A 8E 00 69 0D  F2 0D 98 38 2C 22 53 22  |X.1:..i....8,"S"|
00000560: 4C 24 3A 98 38 2C 22 49  30 00 89 0D FC 0D 9F 31  |L$:.8,"I0......1|
00000570: 2C 30 38 2C 33 2C 4C 24  AA 22 2C 53 2C 57 22 3A  |,08,3,L$.",S,W":|
00000580: 84 38 2C 58 2C 58 24 3A  8E 00 9F 0D A0 0F 8F 20  |.8,X,X$:....... |
00000590: 43 52 45 41 54 45 20 41  4E 20 45 4E 54 52 59 00  |CREATE AN ENTRY.|
000005A0: CF 0D AA 0F 8B 4E 58 B1  B2 56 A7 99 22 11 12 20  |.....NX..V..".. |
000005B0: C7 45 45 4E 20 52 55 49  4D 54 45 20 4D 45 45 52  |.EEN RUIMTE MEER|
000005C0: 20 20 21 22 3A 8D 38 30  30 30 3A 89 31 30 30 00  |  !":.8000:.100.|
000005D0: F7 0D B4 0F 4E 58 B2 4E  58 AA 31 3A 4B B2 4E 58  |....NX.NX.1:K.NX|
000005E0: 3A 54 B2 54 25 28 4B 29  3A 54 24 28 54 2C 39 29  |:T.T%(K):T$(T,9)|
000005F0: B2 C7 28 31 32 38 29 00  1C 0E 04 10 4F 46 B2 31  |..(128).....OF.1|
00000600: 3A 4D B2 33 39 3A 59 B2  30 3A 8F 20 47 45 54 20  |:M.39:Y.0:. GET |
00000610: 4E 41 4D 45 2F 41 44 44  52 45 53 53 00 29 0E 0E  |NAME/ADDRESS.)..|
00000620: 10 4A B2 30 3A 8D 33 30  30 00 5B 0E 18 10 99 22  |.J.0:.300.[...."|
00000630: 93 20 22 3B 3A 81 49 B2  31 A4 33 30 3A 99 22 A4  |. ";:.I.1.30:.".|
00000640: 22 3B 3A 82 3A 81 49 B2  31 A4 35 3A 99 22 11 A5  |";:.:.I.1.5:."..|
00000650: 9D 22 3B 3A 82 3A 99 22  11 22 3B 00 86 0E 1A 10  |.";:.:.".";.....|
00000660: 81 49 B2 31 A4 33 30 3A  99 22 9D A3 9D 22 3B 3A  |.I.1.30:."...";:|
00000670: 82 3A 81 49 B2 31 A4 35  3A 99 22 91 9D A7 22 3B  |.:.I.1.5:."...";|
00000680: 3A 82 3A 99 22 13 00 A9  0E 22 10 81 49 B2 30 A4  |:.:."...."..I.0.|
00000690: 34 3A 99 22 1D 22 41 24  28 4A 2C 49 29 3A 82 3A  |4:."."A$(J,I):.:|
000006A0: 8B 59 B1 38 89 34 32 30  30 00 CF 0E 36 10 99 22  |.Y.8.4200...6.."|
000006B0: 13 11 11 11 11 11 11 11  11 11 22 42 30 24 3A 99  |.........."B0$:.|
000006C0: 22 91 22 46 24 28 59 29  3A 99 42 30 24 22 91 00  |"."F$(Y):.B0$"..|
000006D0: E5 0E 3B 10 8D 38 32 30  30 3A 8B 43 B3 B1 31 33  |..;..8200:.C..13|
000006E0: 89 34 31 32 30 00 0F 0F  3D 10 99 3A 8B C9 28 58  |.4120...=..:..(X|
000006F0: 24 2C 31 29 B2 22 20 22  A7 58 24 B2 C8 28 58 24  |$,1)." ".X$..(X$|
00000700: 2C C3 28 58 24 29 AB 31  29 3A 89 34 31 35 37 00  |,.(X$).1):.4157.|
00000710: 3E 0F 40 10 8B 58 24 B2  22 22 AF 54 24 28 54 2C  |>.@..X$."".T$(T,|
00000720: 59 29 B1 22 22 A7 59 B2  59 AA 31 3A 91 32 AA 28  |Y)."".Y.Y.1:.2.(|
00000730: 59 B3 39 29 89 34 31 35  30 2C 34 31 31 30 00 50  |Y.9).4150,4110.P|
00000740: 0F 4A 10 8B C3 28 58 24  29 B1 31 89 34 31 39 30  |.J...(X$).1.4190|
00000750: 00 83 0F 54 10 58 24 B2  22 2D 22 3A 8B 59 B2 30  |...T.X$."-":.Y.0|
00000760: A7 99 22 11 D7 49 53 53  45 4E 20 20 22 3B 3A 8D  |.."..ISSEN  ";:.|
00000770: 38 30 35 30 3A 91 49 AA  31 89 34 39 30 30 2C 34  |8050:.I.1.4900,4|
00000780: 31 31 30 00 9E 0F 5E 10  54 24 28 54 2C 59 29 B2  |110...^.T$(T,Y).|
00000790: 58 24 3A 59 B2 59 AA 31  3A 89 34 31 31 30 00 C3  |X$:Y.Y.1:.4110..|
000007A0: 0F 68 10 58 24 B2 22 31  32 33 34 35 36 37 22 AA  |.h.X$."1234567".|
000007B0: 52 24 3A 8F 20 47 45 54  20 43 41 54 45 47 4F 52  |R$:. GET CATEGOR|
000007C0: 49 45 53 00 E0 0F 72 10  99 22 13 11 11 11 11 11  |IES...r.."......|
000007D0: 11 11 11 C3 41 54 45 47  4F 52 49 45 45 4E 3A 22  |....ATEGORIEEN:"|
000007E0: 00 FB 0F 7C 10 81 49 B2  30 A4 36 3A 99 2C 3A 8B  |...|..I.0.6:.,:.|
000007F0: 58 AF 32 AE 49 A7 99 22  12 22 3B 00 0E 10 86 10  |X.2.I..".";.....|
00000800: 99 49 AA 31 22 92 22 4B  24 28 49 29 3A 82 00 3E  |.I.1"."K$(I):..>|
00000810: 10 90 10 99 22 11 C8 4F  45 20 54 4F 45 57 49 4A  |...."..OE TOEWIJ|
00000820: 5A 45 4E 2F 57 49 53 53  45 4E 20 3F 20 20 20 9D  |ZEN/WISSEN ?   .|
00000830: 22 3B 3A 8D 38 30 37 30  3A 49 B2 32 AE 49 00 5D  |";:.8070:I.2.I.]|
00000840: 10 9A 10 58 B2 28 58 B0  49 29 AF A8 28 58 AF 49  |...X.(X.I)..(X.I|
00000850: 29 3A 8B 58 B3 31 32 38  89 34 32 31 30 00 7E 10  |):.X.128.4210.~.|
00000860: CC 10 54 24 28 54 2C 39  29 B2 C7 28 58 29 3A 8F  |..T$(T,9)..(X):.|
00000870: 20 43 4F 4D 50 4C 45 54  45 20 45 44 49 54 00 A9  | COMPLETE EDIT..|
00000880: 10 D6 10 99 22 91 91 22  42 30 24 3A 99 22 91 C1  |....".."B0$:."..|
00000890: 4C 4C 45 53 20 4F 4B 20  20 22 3B 3A 8D 38 30 35  |LLES OK  ";:.805|
000008A0: 30 3A 8B 49 89 34 31 30  30 00 CA 10 E0 10 8B 4E  |0:.I.4100......N|
000008B0: 58 B3 31 89 31 30 30 3A  8F 20 4D 55 53 54 20 42  |X.1.100:. MUST B|
000008C0: 45 20 49 4E 20 4F 52 44  45 52 00 04 11 EA 10 58  |E IN ORDER.....X|
000008D0: 24 B2 54 24 28 54 2C 30  29 3A 8B 4B B3 4E 58 A7  |$.T$(T,0):.K.NX.|
000008E0: 81 49 B2 4B A4 4E 58 AB  31 3A 54 25 28 49 29 B2  |.I.K.NX.1:T%(I).|
000008F0: 54 25 28 49 AA 31 29 3A  82 3A 8F 20 52 45 4D 4F  |T%(I.1):.:. REMO|
00000900: 56 45 20 54 00 36 11 F4  10 81 49 B2 30 A4 4E 58  |VE T.6....I.0.NX|
00000910: AB 31 3A 8B 54 24 28 54  25 28 49 29 2C 30 29 B3  |.1:.T$(T%(I),0).|
00000920: 58 24 A7 82 3A 8F 20 4C  4F 43 41 54 45 20 54 27  |X$..:. LOCATE T'|
00000930: 53 20 53 4C 4F 54 00 73  11 FE 10 8B 49 B3 4E 58  |S SLOT.s....I.NX|
00000940: A7 4A B2 49 AA 31 3A 81  49 B2 4E 58 A4 4A A9 AB  |.J.I.1:.I.NX.J..|
00000950: 31 3A 54 25 28 49 29 B2  54 25 28 49 AB 31 29 3A  |1:T%(I).T%(I.1):|
00000960: 82 3A 8F 20 4D 41 4B 45  20 52 4F 4F 4D 20 46 4F  |.:. MAKE ROOM FO|
00000970: 52 20 54 00 95 11 08 11  54 25 28 49 29 B2 54 3A  |R T.....T%(I).T:|
00000980: 89 31 30 30 3A 8F 20 49  4E 53 45 52 54 20 54 2C  |.100:. INSERT T,|
00000990: 20 45 58 49 54 00 AD 11  24 13 8F 20 43 4C 45 41  | EXIT...$.. CLEA|
000009A0: 4E 20 55 50 20 44 45 4C  45 54 49 4F 4E 00 C5 11  |N UP DELETION...|
000009B0: 2E 13 81 49 B2 30 A4 39  3A 54 24 28 54 2C 49 29  |...I.0.9:T$(T,I)|
000009C0: B2 22 22 3A 82 00 F6 11  38 13 4E 58 B2 4E 58 AB  |."":....8.NX.NX.|
000009D0: 31 3A 81 49 B2 4B A4 4E  58 3A 54 25 28 49 29 B2  |1:.I.K.NX:T%(I).|
000009E0: 54 25 28 49 AA 31 29 3A  82 3A 54 25 28 49 29 B2  |T%(I.1):.:T%(I).|
000009F0: 54 3A 89 31 30 30 00 11  12 88 13 8F 20 53 45 4C  |T:.100...... SEL|
00000A00: 45 43 54 2F 45 44 49 54  20 41 4E 20 45 4E 54 52  |ECT/EDIT AN ENTR|
00000A10: 59 00 38 12 92 13 99 22  93 22 3A 99 22 DA 4F 45  |Y.8....".":.".OE|
00000A20: 4B 45 4E 20 4E 41 41 52  3A 20 20 12 C1 92 43 48  |KEN NAAR:  ...CH|
00000A30: 54 45 52 4E 41 41 4D 22  00 4F 12 9C 13 99 2C 22  |TERNAAM".O....,"|
00000A40: 20 20 20 20 12 D6 92 4F  4F 52 4E 41 41 4D 22 00  |    ...OORNAAM".|
00000A50: 6A 12 A6 13 99 2C 22 20  20 20 20 12 D0 92 4C 41  |j....,"    ...LA|
00000A60: 41 54 53 2F 41 44 52 45  53 22 00 7D 12 B0 13 99  |ATS/ADRES".}....|
00000A70: 2C 22 20 20 20 20 12 CC  92 41 4E 44 22 00 94 12  |,"    ...AND"...|
00000A80: BA 13 99 2C 22 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 CB 45 55 5A  |OON"......"..EUZ|
00000AA0: 45 20 20 20 20 22 3B 3A  58 24 B2 22 41 56 58 58  |E    ";:X$."AVXX|
00000AB0: 58 58 50 4C 54 22 3A 8D  38 30 36 30 3A 46 B2 49  |XXPLT":.8060:F.I|
00000AC0: 00 EF 12 D8 13 4D B2 34  30 3A 99 22 11 DA 4F 45  |.....M.40:."..OE|
00000AD0: 4B 45 4E 20 4E 41 41 52  3A 22 3B 3A 8D 38 32 30  |KEN NAAR:";:.820|
00000AE0: 30 3A 5A 24 B2 58 24 3A  5A B2 C3 28 5A 24 29 00  |0:Z$.X$:Z..(Z$).|
00000AF0: 0A 13 EC 13 4B B2 30 3A  8F 20 53 45 41 52 43 48  |....K.0:. SEARCH|
00000B00: 20 46 4F 52 20 46 49 45  4C 44 00 25 13 F6 13 54  | FOR FIELD.%...T|
00000B10: B2 54 25 28 4B 29 3A 58  24 B2 54 24 28 54 2C 46  |.T%(K):X$.T$(T,F|
00000B20: 29 3A 59 B2 30 00 57 13  00 14 81 49 B2 31 A4 C3  |):Y.0.W....I.1..|
00000B30: 28 58 24 29 AB 5A AA 31  3A 59 B2 28 CA 28 58 24  |(X$).Z.1:Y.(.(X$|
00000B40: 2C 49 2C 5A 29 B2 5A 24  29 B0 59 3A 82 3A 8B 59  |,I,Z).Z$).Y:.:.Y|
00000B50: B2 30 89 35 31 35 30 00  7B 13 0A 14 4A B2 30 3A  |.0.5150.{...J.0:|
00000B60: 8D 33 30 30 3A 99 22 93  22 3A 81 49 B2 30 A4 34  |.300:.".":.I.0.4|
00000B70: 3A 99 41 24 28 30 2C 49  29 3A 82 00 A3 13 14 14  |:.A$(0,I):......|
00000B80: 99 22 11 D6 45 52 44 45  52 20 5A 4F 45 4B 45 4E  |."..ERDER ZOEKEN|
00000B90: 20 20 20 22 3B 3A 8D 38  30 35 30 3A 8B 49 89 35  |   ";:.8050:.I.5|
00000BA0: 31 38 30 00 B9 13 1E 14  4B B2 4B AA 31 3A 8B 4B  |180.....K.K.1:.K|
00000BB0: B3 B2 4E 58 89 35 31 31  30 00 DC 13 28 14 99 3A  |..NX.5110...(..:|
00000BC0: 99 22 11 C1 4C 4C 45 53  20 47 45 54 45 53 54 20  |."..LLES GETEST |
00000BD0: 22 3A 8D 38 30 30 30 3A  89 31 30 30 00 01 14 3C  |":.8000:.100...<|
00000BE0: 14 99 22 11 D7 49 4A 5A  49 47 45 4E 22 3B 3A 8D  |.."..IJZIGEN";:.|
00000BF0: 38 30 35 30 3A 91 49 89  31 30 30 3A 89 34 31 30  |8050:.I.100:.410|
00000C00: 30 00 1D 14 70 17 8F 20  46 49 4C 45 20 46 4F 52  |0...p.. FILE FOR|
00000C10: 20 57 4F 52 44 20 4D 41  43 48 49 4E 45 00 53 14  | WORD MACHINE.S.|
00000C20: 7A 17 99 22 93 CE 41 41  4D 20 56 41 4E 20 48 45  |z.."..AAM VAN HE|
00000C30: 54 20 42 45 53 54 41 4E  44 3A 22 3B 3A 4D B2 31  |T BESTAND:";:M.1|
00000C40: 36 3A 8D 38 32 30 30 3A  8B 58 24 B2 22 22 89 36  |6:.8200:.X$."".6|
00000C50: 30 31 30 00 70 14 84 17  59 24 B2 58 24 3A 8D 33  |010.p...Y$.X$:.3|
00000C60: 35 30 30 3A 8B C5 28 58  24 29 89 36 30 30 30 30  |500:..(X$).60000|
00000C70: 00 7B 14 8E 17 8B 58 89  31 30 30 00 AD 14 A2 17  |.{....X.100.....|
00000C80: 8D 37 32 30 30 3A 99 22  11 D3 50 45 43 49 41 4C  |.7200:."..PECIAL|
00000C90: 45 20 4B 45 55 5A 45 20  22 3B 3A 8D 38 30 35 30  |E KEUZE ";:.8050|
00000CA0: 3A 53 46 B2 49 3A 4A B2  30 3A 4B B2 30 00 D0 14  |:SF.I:J.0:K.0...|
00000CB0: AC 17 54 B2 54 25 28 4B  29 3A 8B 28 46 AF C6 28  |..T.T%(K):.(F..(|
00000CC0: 54 24 28 54 2C 39 29 29  29 B2 30 89 36 31 38 30  |T$(T,9))).0.6180|
00000CD0: 00 E7 14 B6 17 8B 53 46  A7 99 54 24 28 54 2C 30  |......SF..T$(T,0|
00000CE0: 29 3A 89 36 31 30 30 00  07 15 C0 17 8D 33 30 30  |):.6100......300|
00000CF0: 3A 99 22 93 22 3A 81 49  B2 30 A4 33 3A 99 41 24  |:.".":.I.0.3:.A$|
00000D00: 28 4A 2C 49 29 3A 82 00  2F 15 CA 17 99 22 11 CF  |(J,I):../...."..|
00000D10: 56 45 52 4E 45 4D 45 20  20 20 20 20 20 20 20 22  |VERNEME        "|
00000D20: 3B 3A 8D 38 30 35 30 3A  8B 49 89 36 31 38 30 00  |;:.8050:.I.6180.|
00000D30: 45 15 D4 17 8F 20 4F 55  54 50 55 54 20 54 48 45  |E.... OUTPUT THE|
00000D40: 20 46 49 4C 45 00 66 15  DE 17 81 49 B2 30 A4 37  | FILE.f....I.0.7|
00000D50: 3A 98 31 2C 54 24 28 54  2C 49 29 3A 82 3A 44 46  |:.1,T$(T,I):.:DF|
00000D60: B2 B6 28 44 46 29 00 7C  15 24 18 4B B2 4B AA 31  |..(DF).|.$.K.K.1|
00000D70: 3A 8B 4B B3 B2 4E 58 89  36 30 36 30 00 B2 15 2E  |:.K..NX.6060....|
00000D80: 18 98 31 2C 22 5C 22 3A  8B 44 46 B1 AB 31 A7 91  |..1,"\":.DF..1..|
00000D90: 53 46 AA 31 89 36 32 32  30 2C 31 30 30 3A 8F 20  |SF.1.6220,100:. |
00000DA0: 20 2D 31 3D 45 4D 50 54  59 20 44 49 53 43 46 49  | -1=EMPTY DISCFI|
00000DB0: 4C 45 00 DB 15 38 18 99  22 11 C7 45 45 4E 20 41  |LE...8.."..EEN A|
00000DC0: 44 52 45 53 53 45 4E 20  49 4E 20 44 45 5A 45 20  |DRESSEN IN DEZE |
00000DD0: 43 41 54 4F 47 4F 52 49  45 2E 22 00 F4 15 42 18  |CATOGORIE."...B.|
00000DE0: A0 31 3A 98 38 2C 22 53  30 3A 22 59 24 3A 98 38  |.1:.8,"S0:"Y$:.8|
00000DF0: 2C 22 49 30 00 03 16 4C  18 8D 38 30 30 30 3A 89  |,"I0...L..8000:.|
00000E00: 31 30 30 00 16 16 58 1B  8F 20 50 52 49 4E 54 20  |100...X.. PRINT |
00000E10: 4C 41 42 45 4C 53 00 33  16 62 1B 53 46 B2 AB 31  |LABELS.3.b.SF..1|
00000E20: 3A 4D B2 33 30 3A 9F 31  2C 30 34 3A 4C 4C B2 39  |:M.30:.1,04:LL.9|
00000E30: 39 39 39 00 5D 16 6C 1B  99 22 11 C5 4E 4B 45 4C  |999.].l.."..NKEL|
00000E40: 45 20 4B 4F 4C 4F 4D 20  45 54 49 4B 45 54 54 45  |E KOLOM ETIKETTE|
00000E50: 4E 22 3B 3A 8D 38 30 35  30 3A 59 B2 49 00 85 16  |N";:.8050:Y.I...|
00000E60: 8A 1B 99 22 11 D0 52 4F  45 46 41 46 44 52 55 4B  |..."..ROEFAFDRUK|
00000E70: 20 20 20 20 20 22 3B 3A  8D 38 30 35 30 3A 8B 49  |     ";:.8050:.I|
00000E80: 89 37 30 39 30 00 B3 16  94 1B 50 24 B2 22 2D 2D  |.7090.....P$."--|
00000E90: 2D 2D 2D 2D 2D 2D 2D 2D  45 45 52 53 54 45 20 52  |--------EERSTE R|
00000EA0: 45 47 45 4C 2D 2D 2D 2D  2D 2D 2D 2D 22 3A 8D 37  |EGEL--------":.7|
00000EB0: 39 30 30 00 EA 16 9E 1B  81 49 B2 30 A4 31 3A 50  |900......I.0.1:P|
00000EC0: 24 B2 22 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |$."-------------|
00000ED0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000EE0: 2D 22 3A 8D 37 39 30 30  3A 82 00 27 17 A8 1B 50  |-":.7900:..'...P|
00000EF0: 24 B2 22 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 4C 41 41  |$."----------LAA|
00000F00: 54 53 54 45 20 52 45 47  45 4C 2D 2D 2D 2D 2D 2D  |TSTE REGEL------|
00000F10: 2D 22 3A 81 49 B2 31 A4  33 3A 8D 37 39 30 30 3A  |-":.I.1.3:.7900:|
00000F20: 82 3A 89 37 30 35 30 00  4C 17 B2 1B 8D 37 32 30  |.:.7050.L....720|
00000F30: 30 3A 8D 37 33 30 30 3A  89 31 30 30 3A 8F 20 4F  |0:.7300:.100:. O|
00000F40: 55 54 50 55 54 20 4C 41  42 45 4C 53 00 63 17 BC  |UTPUT LABELS.c..|
00000F50: 1B 8F 20 50 52 49 4E 54  20 50 48 4F 4E 45 20 42  |.. PRINT PHONE B|
00000F60: 4F 4F 4B 00 7F 17 C6 1B  53 46 B2 30 3A 4D B2 33  |OOK.....SF.0:M.3|
00000F70: 36 3A 59 B2 31 3A 9F 31  2C 30 34 3A 4C B2 30 00  |6:Y.1:.1,04:L.0.|
00000F80: A7 17 D0 1B 99 22 11 D2  45 47 45 4C 53 20 50 45  |....."..EGELS PE|
00000F90: 52 20 42 4C 41 44 20 20  22 4C 30 22 9D 9D 9D 9D  |R BLAD  "L0"....|
00000FA0: 9D 22 3B 3A 85 4C 4C 00  C2 17 DA 1B 8D 37 32 30  |.";:.LL......720|
00000FB0: 30 3A 8D 37 33 30 30 3A  8D 37 39 35 30 3A 89 31  |0:.7300:.7950:.1|
00000FC0: 30 30 00 D5 17 20 1C 8F  20 47 45 54 20 43 41 54  |00... .. GET CAT|
00000FD0: 45 47 4F 52 59 00 0D 18  2A 1C 99 22 93 DA 4F 45  |EGORY...*.."..OE|
00000FE0: 4B 45 4E 20 4E 41 41 52  3A 22 3A 81 49 B2 30 A4  |KEN NAAR:":.I.0.|
00000FF0: 36 3A 99 2C 22 12 22 CA  28 C4 28 49 AA 31 29 2C  |6:.,".".(.(I.1),|
00001000: 32 29 22 92 20 22 4B 24  28 49 29 3A 82 00 48 18  |2)". "K$(I):..H.|
00001010: 34 1C 99 2C 22 12 38 92  20 C1 4C 4C 45 4E 22 3A  |4..,".8. .LLEN":|
00001020: 99 22 11 D5 57 20 4B 45  55 5A 45 20 22 3B 3A 58  |."..W KEUZE ";:X|
00001030: 24 B2 22 31 32 33 34 35  36 37 38 22 3A 8D 38 30  |$."12345678":.80|
00001040: 36 30 3A 46 B2 32 AE 49  00 67 18 3E 1C 8E 3A 8F  |60:F.2.I.g.>..:.|
00001050: 20 41 4C 4C 20 41 52 45  20 4F 52 2D 45 44 20 57  | ALL ARE OR-ED W|
00001060: 49 54 48 20 31 32 38 00  7A 18 84 1C 8F 20 50 52  |ITH 128.z.... PR|
00001070: 49 4E 54 20 45 49 54 48  45 52 00 A9 18 8E 1C 4A  |INT EITHER.....J|
00001080: B2 59 3A 81 4B B2 30 A4  4E 58 3A 54 B2 54 25 28  |.Y:.K.0.NX:T.T%(|
00001090: 4B 29 3A 8B 28 46 AF C6  28 54 24 28 54 2C 39 29  |K):.(F..(T$(T,9)|
000010A0: 29 29 B2 30 89 37 33 38  30 00 C7 18 98 1C 4A B2  |)).0.7380.....J.|
000010B0: 59 AB 4A 3A 8D 33 30 30  3A 8B 53 46 A7 41 24 28  |Y.J:.300:.SF.A$(|
000010C0: 4A 2C 34 29 B2 22 22 00  D5 18 A2 1C 8B 4A B3 59  |J,4).""......J.Y|
000010D0: 89 37 33 38 30 00 F0 18  B6 1C 81 49 B2 30 A4 34  |.7380......I.0.4|
000010E0: 3A 50 24 B2 C8 28 41 24  28 30 2C 49 29 2C 4D 29  |:P$..(A$(0,I),M)|
000010F0: 00 1A 19 C0 1C 8B 4A A7  50 24 B2 50 24 AA C8 28  |......J.P$.P$..(|
00001100: 42 24 2C 4D AA 36 AB C3  28 50 24 29 29 AA C8 28  |B$,M.6..(P$))..(|
00001110: 41 24 28 31 2C 49 29 2C  4D 29 00 2C 19 CA 1C 8D  |A$(1,I),M).,....|
00001120: 37 39 30 30 3A 82 3A 8D  37 39 30 30 00 5D 19 D4  |7900:.:.7900.]..|
00001130: 1C 82 4B 3A 8B 4A B3 59  A7 81 49 B2 30 A4 34 3A  |..K:.J.Y..I.0.4:|
00001140: 50 24 B2 C8 28 41 24 28  30 2C 49 29 2C 4D 29 3A  |P$..(A$(0,I),M):|
00001150: 8D 37 39 30 30 3A 82 3A  8D 37 39 30 30 00 63 19  |.7900:.:.7900.c.|
00001160: DE 1C 8E 00 90 19 DC 1E  4C B2 4C AA 31 3A 98 31  |........L.L.1:.1|
00001170: 2C 22 11 22 AA 50 24 3A  50 24 B2 22 22 3A 8B 4C  |,".".P$:P$."":.L|
00001180: B3 4C 4C A7 8E 3A 8F 20  4C 49 4E 45 20 4F 55 54  |.LL..:. LINE OUT|
00001190: 00 B2 19 E6 1E 4C B2 4C  AA 31 3A 98 31 2C 22 11  |.....L.L.1:.1,".|
000011A0: 22 AA 50 24 3A 50 24 B2  22 22 3A 8B 4C B3 4C 4C  |".P$:P$."":.L.LL|
000011B0: A7 8E 00 E0 19 0E 1F 8B  4C A7 81 4C B2 4C A4 4C  |........L..L.L.L|
000011C0: 50 AB 31 3A 98 31 3A 82  3A 4C B2 30 3A 8E 3A 8F  |P.1:.1:.:L.0:.:.|
000011D0: 20 46 49 4E 49 53 48 20  54 48 45 20 50 41 47 45  | FINISH THE PAGE|
000011E0: 00 F0 19 40 1F 8F 20 55  54 49 4C 49 54 49 45 53  |...@.. UTILITIES|
000011F0: 00 26 1A 4A 1F 99 22 11  12 20 C4 52 55 4B 20 45  |.&.J..".. .RUK E|
00001200: 45 4E 20 57 49 4C 4C 4B  45 55 52 49 47 45 20 54  |EN WILLKEURIGE T|
00001210: 4F 45 54 53 20 49 4E 22  3B 3A 8D 32 30 3A 99 3A  |OETS IN";:.20:.:|
00001220: 99 22 93 22 3A 8E 00 31  1A 72 1F 58 24 B2 22 4A  |.".":..1.r.X$."J|
00001230: 4E 00 3C 1A 7C 1F 99 22  3F 20 22 3B 00 66 1A 86  |N.<.|.."? ";.f..|
00001240: 1F 8D 32 30 3A 81 49 B2  31 A4 C3 28 58 24 29 3A  |..20:.I.1..(X$):|
00001250: 8B 43 24 B3 B1 CA 28 58  24 2C 49 2C 31 29 A7 82  |.C$...(X$,I,1)..|
00001260: 3A 89 38 30 37 30 00 7F  1A 8B 1F 49 B2 49 AB 31  |:.8070.....I.I.1|
00001270: 3A 99 43 24 3B 3A 8B 43  B2 31 33 A7 99 3A 8E 00  |:.C$;:.C.13..:..|
00001280: 9B 1A 90 1F A1 57 24 3A  8B 57 24 B2 22 22 A7 99  |.....W$:.W$.""..|
00001290: 22 A4 9D 22 3B 3A 89 38  30 38 30 00 B1 1A 95 1F  |"..";:.8080.....|
000012A0: 99 22 20 9D 22 3B 3A 8B  57 24 B2 52 24 A7 99 3A  |." .";:.W$.R$..:|
000012B0: 8E 00 CA 1A 9A 1F 8B 57  24 B2 C7 28 32 30 29 A7  |.......W$..(20).|
000012C0: 99 57 24 3B 3A 89 38 30  37 30 00 D4 1A 9F 1F 89  |.W$;:.8070......|
000012D0: 38 30 38 30 00 EF 1A 08  20 58 24 B2 22 22 3A 8F  |8080.... X$."":.|
000012E0: 20 49 4E 50 55 54 20 41  20 53 54 52 49 4E 47 00  | INPUT A STRING.|
000012F0: 00 1B 12 20 A1 43 24 3A  8B 43 24 89 38 32 31 30  |... .C$:.C$.8210|
00001300: 00 10 1B 1C 20 8D 32 35  3A 8B 43 B2 31 33 A7 8E  |.... .25:.C.13..|
00001310: 00 3F 1B 26 20 8B 43 B2  32 30 AF 58 24 B1 22 22  |.?.& .C.20.X$.""|
00001320: A7 99 43 24 3B 3A 58 24  B2 C8 28 58 24 2C C3 28  |..C$;:X$..(X$,.(|
00001330: 58 24 29 AB 31 29 3A 8F  20 44 45 4C 45 54 45 00  |X$).1):. DELETE.|
00001340: 68 1B 2B 20 8B 28 31 32  37 AF 43 29 B3 33 32 89  |h.+ .(127.C).32.|
00001350: 38 32 32 30 3A 8F 20 43  55 52 53 4F 52 20 43 48  |8220:. CURSOR CH|
00001360: 41 52 41 43 54 45 52 53  00 91 1B 30 20 8B 28 4B  |ARACTERS...0 .(K|
00001370: 25 28 43 29 B0 47 29 A7  99 43 24 3B 3A 58 24 B2  |%(C).G)..C$;:X$.|
00001380: 58 24 AA 43 24 3A 8B C3  28 58 24 29 B1 B2 4D A7  |X$.C$:..(X$)..M.|
00001390: 8E 00 9B 1B 3A 20 89 38  32 32 30 00 A1 1B 28 23  |....: .8220...(#|
000013A0: 8F 00 CE 1B 2D 23 4C 30  B2 36 30 3A 4C 50 B2 37  |....-#L0.60:LP.7|
000013B0: 32 3A 4E 58 B2 AB 31 3A  52 24 B2 C7 28 31 33 29  |2:NX..1:R$..(13)|
000013C0: 3A 48 24 B2 22 CE 41 4D  45 20 CC 49 53 54 00 EF  |:H$.".AME .IST..|
000013D0: 1B 32 23 86 4B 25 28 32  35 35 29 2C 41 24 28 31  |.2#.K%(255),A$(1|
000013E0: 2C 34 29 2C 4B 24 28 36  29 2C 46 24 28 38 29 00  |,4),K$(6),F$(8).|
000013F0: 30 1C 3C 23 99 22 93 8E  13 13 0F 11 11 11 11 11  |0.<#."..........|
00001400: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001410: 11 11 11 11 22 A6 33 39  29 22 8F 05 22 3A 97 35  |....".39)"..":.5|
00001420: 39 34 36 38 2C 31 34 3A  8F 20 46 4F 52 4D 41 54  |9468,14:. FORMAT|
00001430: 00 75 1C 41 23 97 35 33  32 37 32 2C 32 B0 C2 28  |.u.A#.53272,2..(|
00001440: 35 33 32 37 32 29 3A 99  22 93 12 20 20 20 20 20  |53272):."..     |
00001450: 20 20 20 20 20 20 20 20  20 20 C1 44 52 45 53 53  |          .DRESS|
00001460: 20 36 34 20 20 20 20 20  20 20 20 20 20 20 20 20  | 64             |
00001470: 20 20 20 92 22 00 90 1C  43 23 8D 36 31 30 30 30  |   ."...C#.61000|
00001480: 3A 20 8F 20 43 4F 4C 4F  52 20 43 48 41 4E 47 45  |: . COLOR CHANGE|
00001490: 00 D2 1C 46 23 99 22 11  12 C3 92 41 53 53 45 54  |...F#."....ASSET|
000014A0: 54 45 2C 20 12 C4 92 49  53 4B 45 54 54 45 2C 4F  |TE, ...ISKETTE,O|
000014B0: 46 20 12 42 92 45 49 44  45 4E 22 3B 3A 58 24 B2  |F .B.EIDEN";:X$.|
000014C0: 22 44 43 42 22 3A 8D 38  30 36 30 3A 43 46 B2 49  |"DCB":.8060:CF.I|
000014D0: AA 31 00 0A 1D 4B 23 81  49 B2 33 32 A4 39 30 3A  |.1...K#.I.32.90:|
000014E0: 87 4B 25 28 49 29 3A 82  3A 81 49 B2 31 39 33 A4  |.K%(I):.:.I.193.|
000014F0: 32 31 38 3A 4B 25 28 49  29 B2 31 3A 82 3A 8F 20  |218:K%(I).1:.:. |
00001500: 43 48 41 52 20 41 52 52  41 59 00 41 1D 50 23 42  |CHAR ARRAY.A.P#B|
00001510: 24 B2 22 20 20 20 20 20  22 3A 81 49 B2 31 A4 35  |$."     ":.I.1.5|
00001520: 3A 42 24 B2 42 24 AA 42  24 3A 82 3A 42 30 24 B2  |:B$.B$.B$:.:B0$.|
00001530: C8 28 42 24 2C 33 39 29  3A 9F 38 2C 30 38 2C 31  |.(B$,39):.8,08,1|
00001540: 35 00 78 1D 55 23 99 22  11 44 41 54 55 4D 20 3A  |5.x.U#.".DATUM :|
00001550: 20 22 3A 4D B2 36 30 3A  47 B2 31 3A 8D 38 32 30  | ":M.60:G.1:.820|
00001560: 30 3A 47 B2 30 3A 44 24  B2 58 24 3A 8B 44 24 B2  |0:G.0:D$.X$:.D$.|
00001570: 22 22 A7 44 24 B2 22 2D  00 9C 1D 6E 23 99 3A 81  |"".D$."-...n#.:.|
00001580: 49 B2 30 A4 38 3A 87 46  24 28 49 29 3A 82 3A 8F  |I.0.8:.F$(I):.:.|
00001590: 20 46 49 45 4C 44 20 4E  41 4D 45 53 00 BD 1D 78  | FIELD NAMES...x|
000015A0: 23 81 49 B2 30 A4 36 3A  87 4B 24 28 49 29 3A 82  |#.I.0.6:.K$(I):.|
000015B0: 3A 8F 20 43 41 54 45 47  4F 52 49 45 53 00 F6 1D  |:. CATEGORIES...|
000015C0: 82 23 56 B2 B5 28 28 B8  28 30 29 AB 32 30 30 30  |.#V..((.(0).2000|
000015D0: 29 AD 31 37 30 29 3A 86  54 24 28 56 2C 39 29 2C  |).170):.T$(V,9),|
000015E0: 54 25 28 56 29 3A 81 49  B2 30 A4 56 3A 54 25 28  |T%(V):.I.0.V:T%(|
000015F0: 49 29 B2 49 3A 82 00 07  1E 1C 25 8F 20 49 4E 50  |I).I:.....%. INP|
00001600: 55 54 20 46 49 4C 45 00  2A 1E 26 25 8B 43 46 B1  |UT FILE.*.&%.CF.|
00001610: 32 A7 99 22 11 D6 41 4E  20 43 41 53 53 45 54 54  |2.."..AN CASSETT|
00001620: 45 20 22 3B 3A 8D 38 30  35 30 00 5C 1E 30 25 8B  |E ";:.8050.\.0%.|
00001630: 43 46 B2 32 B0 28 43 46  B2 33 AF 49 B2 30 29 A7  |CF.2.(CF.3.I.0).|
00001640: 8D 39 37 30 30 3A 91 49  89 31 30 30 3A 9F 31 2C  |.9700:.I.100:.1,|
00001650: 31 2C 30 2C 48 24 3A 89  39 36 30 30 00 7F 1E 4E  |1,0,H$:.9600...N|
00001660: 25 A0 31 3A 9F 31 2C 38  2C 32 2C 48 24 3A 84 38  |%.1:.1,8,2,H$:.8|
00001670: 2C 58 2C 58 24 3A 8B 58  B2 30 89 39 36 30 30 00  |,X,X$:.X.0.9600.|
00001680: 90 1E 58 25 8D 39 37 30  30 3A 8B 49 89 31 30 30  |..X%.9700:.I.100|
00001690: 00 C1 1E 62 25 99 22 11  D6 4F 45 52 20 44 45 20  |...b%."..OER DE |
000016A0: 47 4F 45 44 45 20 44 49  53 4B 45 54 54 45 20 49  |GOEDE DISKETTE I|
000016B0: 4E 20 45 4E 22 3A 8D 38  30 30 30 3A 89 39 35 35  |N EN":.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 19 1F  |$.X$.C$:.9603...|
000016F0: 85 25 99 22 93 C5 4E 54  45 52 45 44 3A 20 12 22  |.%."..NTERED: ."|
00001700: 58 24 3A 99 3A 8F 20 44  41 54 45 4C 49 4E 45 20  |X$:.:. DATELINE |
00001710: 46 52 4F 4D 20 46 49 4C  45 00 4F 1F 8A 25 81 49  |FROM FILE.O..%.I|
00001720: B2 30 A4 56 3A 84 31 2C  58 24 3A 8B 58 24 B2 22  |.0.V:.1,X$:.X$."|
00001730: 5C 22 B0 53 54 B1 30 89  39 36 35 30 3A 8F 20 52  |\".ST.0.9650:. R|
00001740: 45 41 44 49 4E 47 20 43  4F 4D 50 4C 45 54 45 00  |EADING COMPLETE.|
00001750: 80 1F 94 25 99 58 24 3A  54 24 28 49 2C 30 29 B2  |...%.X$:T$(I,0).|
00001760: 58 24 3A 81 4A B2 31 A4  39 3A 84 31 2C 54 24 28  |X$:.J.1.9:.1,T$(|
00001770: 49 2C 4A 29 3A 82 3A 54  25 28 49 29 B2 49 3A 82  |I,J):.:T%(I).I:.|
00001780: 00 9B 1F B2 25 4E 58 B2  49 AB 31 3A 89 31 30 30  |....%NX.I.1:.100|
00001790: 3A 8F 20 43 4F 4D 50 4C  45 54 45 00 C0 1F E4 25  |:. COMPLETE....%|
000017A0: 99 22 11 CE 49 45 55 57  20 42 45 53 54 41 4E 44  |."..IEUW BESTAND|
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 AD 20 CA 26 83  22 C1 43 48 54 45 52 4E  |,1.. .&.".CHTERN|
00001870: 41 41 4D 22 2C 22 D6 4F  4F 52 4E 41 41 4D 20 22  |AAM",".OORNAAM "|
00001880: 2C 22 C1 41 4E 48 45 46  20 28 42 2E 56 2E 20 CD  |,".ANHEF (B.V. .|
00001890: 49 4A 4E 48 45 45 52 2C  C6 41 4D 2E 2C C6 49 52  |IJNHEER,.AM.,.IR|
000018A0: 4D 41 20 29 22 2C 22 D4  49 54 45 4C 22 00 E8 20  |MA )",".ITEL".. |
000018B0: D4 26 83 22 CF 52 47 41  4E 49 53 41 54 49 45 20  |.&.".RGANISATIE |
000018C0: 22 2C 22 D3 54 52 41 41  54 20 22 2C 22 D0 4C 41  |",".TRAAT ",".LA|
000018D0: 41 54 53 20 22 2C 22 CC  41 4E 44 20 22 2C 22 D4  |ATS ",".AND ",".|
000018E0: 45 4C 45 46 4F 4F 4E 22  00 FF 20 10 27 8F 20 53  |ELEFOON".. .'. S|
000018F0: 45 56 45 4E 20 43 41 54  45 47 4F 52 49 45 53 00  |EVEN CATEGORIES.|
00001900: 0F 21 1A 27 83 20 22 C6  41 4D 49 4C 49 45 22 00  |.!.'. ".AMILIE".|
00001910: 20 21 24 27 83 20 22 D6  52 49 45 4E 44 45 4E 22  | !$'. ".RIENDEN"|
00001920: 00 32 21 2E 27 83 20 22  C3 4F 4C 4C 45 47 41 27  |.2!.'. ".OLLEGA'|
00001930: 53 22 00 41 21 38 27 83  20 22 C1 52 54 53 45 4E  |S".A!8'. ".RTSEN|
00001940: 22 00 56 21 42 27 83 20  22 C9 4E 53 54 45 4C 4C  |".V!B'. ".NSTELL|
00001950: 49 4E 47 45 4E 22 00 66  21 4C 27 83 20 22 D3 43  |INGEN".f!L'. ".C|
00001960: 48 4F 4C 45 4E 22 00 77  21 56 27 83 20 22 CF 56  |HOLEN".w!V'. ".V|
00001970: 45 52 49 47 45 4E 22 00  8A 21 60 EA 99 58 24 3A  |ERIGEN"..!`..X$:|
00001980: 8D 38 30 30 30 3A 89 31  30 30 00 A5 21 48 EE 8F  |.8000:.100..!H..|
00001990: 20 43 4F 4C 4F 52 20 43  48 41 4E 47 45 20 52 4F  | COLOR CHANGE RO|
000019A0: 55 54 49 4E 45 00 C9 21  49 EE 96 A5 43 28 58 29  |UTINE..!I...C(X)|
000019B0: B2 C2 28 58 29 AA 31 AA  31 36 AC 28 28 C2 28 58  |..(X).1.16.((.(X|
000019C0: 29 AF 31 35 29 B2 31 35  29 00 EC 21 4A EE 99 22  |).15).15)..!J.."|
000019D0: 13 11 11 11 12 C6 31 92  3D 20 CB 4C 45 55 52 20  |......1.= .LEUR |
000019E0: 56 41 4E 20 44 45 20 52  41 4E 44 22 00 0D 22 4B  |VAN DE RAND".."K|
000019F0: EE 99 22 11 11 12 C6 33  92 3D 20 C1 43 48 54 45  |.."....3.= .CHTE|
00001A00: 52 47 52 4F 4E 44 2D 4B  4C 45 55 52 22 00 30 22  |RGROND-KLEUR".0"|
00001A10: 4C EE 99 22 11 11 12 C6  35 92 3D 20 CB 4C 45 55  |L.."....5.= .LEU|
00001A20: 52 20 56 41 4E 20 44 45  20 54 45 4B 45 4E 53 22  |R VAN DE TEKENS"|
00001A30: 00 4A 22 4D EE 99 22 11  11 12 D2 C5 D4 D5 D2 CE  |.J"M..".........|
00001A40: 92 3D 20 D6 45 52 44 45  52 22 00 5C 22 52 EE A1  |.= .ERDER".\"R..|
00001A50: 43 24 3A 8B 43 24 89 36  31 30 31 30 00 71 22 5C  |C$:.C$.61010.q"\|
00001A60: EE A1 43 24 3A 8B 43 24  B2 22 22 89 36 31 30 32  |..C$:.C$."".6102|
00001A70: 30 00 98 22 66 EE 43 B2  C6 28 43 24 29 3A 8B 43  |0.."f.C..(C$):.C|
00001A80: B2 31 33 35 A7 97 36 34  36 2C A5 43 28 36 34 36  |.135..646,.C(646|
00001A90: 29 3A 89 36 31 30 30 32  00 C4 22 7A EE 43 B2 C6  |):.61002.."z.C..|
00001AA0: 28 43 24 29 3A 8B 43 B2  31 33 33 B0 43 B2 31 33  |(C$):.C.133.C.13|
00001AB0: 34 A7 58 B2 35 33 31 34  37 AA 43 3A 97 58 2C A5  |4.X.53147.C:.X,.|
00001AC0: 43 28 58 29 00 D5 22 84  EE 8B 43 B3 B1 31 33 89  |C(X).."...C..13.|
00001AD0: 36 31 30 31 30 00 DB 22  8E EE 8E 00 00 00        |61010.."......  |

.......G(14):.657,128:.788,52.:....9000:
. (C) BY HEITRONIC.I....C$:.C$.20.F....C
$:.C$.." .";:C.F(C$):..U...."..";:.25...
D. 1:. MENU ENTRY...N.."..              
 ADRESS 64                ...".Q.X.."FUN
CTIES:.."...}..,".I.NVOEREN VAN NAAM EN 
ADRES"......,".Z.OEKEN VAN EEN NAAM/ADRE
S".A....,".A.FDRUKKEN VAN EEN NAAM/ADRES
".\....,".M.AILING ADRESSEN".}. ..,".T.E
LEFOONBOEK AFDRUKKEN"......,".O.PSLAAN V
AN DE NAMEN/ADRESSEN"......,".E.INDE PRO
GRAMMA"......".KEUZE    ";:X$."EIZAMOT":
.8060......I.4000,5000,7000,6000,3000,71
00.D...."..BLAD UIT PRINTER";:.8050:.I.0
..1,04:L..1:.7950: 1.}....OF..".OPSLAAN 
VAN DE *NAME LIST*";:.8050:.I.0..3020...
.. 1:."..DAAAAAAG!":....,.. FORMAT THE L
INE...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$.H.^.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:.
.O.K.BLOCKS .E....... OUTPUT FILE...B..3
020:.100...L.Y$.H$:.3500:.E(X$).60000...
V..X...'...OF.0:.1,D$:..D.N..I.0.NX:T.T%
(I):.T$(T,0)._.X..J.0.9:.1,T$(T,J):.J,I.
W.V..1,"\":.:. COMPLETE...... OPEN THE F
ILE TO WRITE.F...DF.0:X.0:X$."":.CF.2.."
.OP CASSETTE  ";:.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.U....:.".BESTA
ND BESTAAT AL- OVERSCHRIJVEN";:.8050:.I.
X.1:..I....8,"S"L$:.8,"I0......1,08,3,L$
.",S,W":.8,X,X$:.... .. CREATE AN ENTRY.
O....NX..V..".. GEEN RUIMTE MEER  !":.80
00:.100.....NX.NX.1:K.NX:T.T%(K):T$(T,9)
.G(128).....OF.1:M.39:Y.0:. GET NAME/ADD
RESS.)...J.0:.300.[....". ";:.I.1.30:.".
";:.:.I.1.5:."...";:.:.".";......I.1.30:
."...";:.:.I.1.5:."...";:.:."...."..I.0.
4:."."A$(J,I):.:.Y.8.4200.O.6.."........
.."B0$:."."F$(Y):.B0$"....;..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.P.J..C(X$).1.4190...T.X$.
"-":.Y.0..".WISSEN  ";:.8050:.I.1.4900,4
110...^.T$(T,Y).X$:Y.Y.1:.4110.C.H.X$."1
234567".R$:. GET CATEGORIES...R.."......
...CATEGORIEEN:"...|..I.0.6:.,:.X.2.I.."
.";......I.1"."K$(I):..>....".HOE TOEWIJ
ZEN/WISSEN ?   .";:.8070:I.2.I.]...X.(X.
I)..(X.I):.X.128.4210.~.L.T$(T,9).G(X):.
 COMPLETE EDIT...V..".."B0$:.".ALLES OK 
 ";:.8050:.I.4100.J....NX.1.100:. MUST B
E IN ORDER.....X$.T$(T,0):.K.NX..I.K.NX.
1:T%(I).T%(I.1):.:. REMOVE T.6....I.0.NX
.1:.T$(T%(I),0).X$..:. LOCATE T'S SLOT.S
....I.NX.J.I.1:.I.NX.J..1:T%(I).T%(I.1):
.:. MAKE ROOM FOR T.....T%(I).T:.100:. I
NSERT T, EXIT...$.. CLEAN UP DELETION.E.
...I.0.9:T$(T,I)."":....8.NX.NX.1:.I.K.N
X:T%(I).T%(I.1):.:T%(I).T:.100...... SEL
ECT/EDIT AN ENTRY.8....".":."ZOEKEN NAAR
:  .A.CHTERNAAM".O....,"    .V.OORNAAM".
J....,"    .P.LAATS/ADRES".}....,"    .L
.AND"......,"    .T.ELEFOON"...N..".KEUZ
E    ";:X$."AVXXXXPLT":.8060:F.I...X.M.4
0:.".ZOEKEN NAAR:";:.8200:Z$.X$:Z.C(Z$).
....K.0:. SEARCH FOR FIELD.%...T.T%(K):X
$.T$(T,F):Y.0.W....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):.......".VERDER ZOEKEN
   ";:.8050:.I.5180.....K.K.1:.K..NX.511
0...(..:.".ALLES GETEST ":.8000:.100...<
..".WIJZIGEN";:.8050:.I.100:.4100...P.. 
FILE FOR WORD MACHINE.S.Z..".NAAM VAN HE
T BESTAND:";:M.16:.8200:.X$."".6010.P...
Y$.X$:.3500:.E(X$).60000.{....X.100.....
.7200:.".SPECIALE KEUZE ";:.8050:SF.I:J.
0:K.0.P...T.T%(K):.(F.F(T$(T,9))).0.6180
......SF..T$(T,0):.6100......300:.".":.I
.0.3:.A$(J,I):../.J..".OVERNEME        "
;:.8050:.I.6180.E.T.. OUTPUT THE FILE.F.
...I.0.7:.1,T$(T,I):.:DF..(DF).|.$.K.K.1
:.K..NX.6060......1,"\":.DF..1..SF.1.622
0,100:.  -1=EMPTY DISCFILE...8..".GEEN A
DRESSEN IN DEZE CATOGORIE."...B. 1:.8,"S
0:"Y$:.8,"I0...L..8000:.100...X.. PRINT 
LABELS.3.B.SF..1:M.30:.1,04:LL.9999.].L.
.".ENKELE KOLOM ETIKETTEN";:.8050:Y.I...
...".PROEFAFDRUK     ";:.8050:.I.7090...
..P$."----------EERSTE REGEL--------":.7
900......I.0.1:P$."---------------------
---------":.7900:..'...P$."----------LAA
TSTE REGEL-------":.I.1.3:.7900:.:.7050.
L....7200:.7300:.100:. OUTPUT LABELS.C..
.. PRINT PHONE BOOK..F.SF.0:M.36:Y.1:.1
,04:L.0...P..".REGELS PER BLAD  "L0"....
.";:.LL.B.Z..7200:.7300:.7950:.100.U. ..
 GET CATEGORY...*..".ZOEKEN NAAR:":.I.0.
6:.,"."J(D(I.1),2)". "K$(I):..H.4..,".8.
 ALLEN":.".UW KEUZE ";:X$."12345678":.80
60:F.2.I.G.>..:. ALL ARE OR-ED WITH 128.
Z.... PRINT EITHER.....J.Y:.K.0.NX:T.T%(
K):.(F.F(T$(T,9))).0.7380.G...J.Y.J:.300
:.SF.A$(J,4)."".U....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).,.J..7900:.:.7900.].T
..K:.J.Y..I.0.4:P$.H(A$(0,I),M):.7900:.:
.7900.C.........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..".
. DRUK EEN WILLKEURIGE TOETS IN";:.20:.:
.".":..1.R.X$."JN.<.|.."? ";.F....20:.I.
1.C(X$):.C$..J(X$,I,1)..:.8070....I.I.1
:.C$;:.C.13..:.......W$:.W$."".."..";:.8
080......" .";:.W$.R$..:..J....W$.G(20).
.W$;:.8070.T....8080.... X$."":. INPUT A
 STRING.... .C$:.C$.8210.... .25:.C.13..
.?.& .C.20.X$.""..C$;:X$.H(X$,C(X$).1):.
 DELETE.H.+ .(127.C).32.8220:. CURSOR CH
ARACTERS...0 .(K%(C).G)..C$;:X$.X$.C$:.C
(X$)..M.....: .8220...(#..N.-#L0.60:LP.7
2:NX..1:R$.G(13):H$."NAME LIST...2#.K%(2
55),A$(1,4),K$(6),F$(8).0.<#."..........
....................".39)"..":.59468,14:
. FORMAT.U.A#.53272,2.B(53272):."..     
          ADRESS 64                ."...
C#.61000: . COLOR CHANGE.R.F#."..C.ASSET
TE, .D.ISKETTE,OF .B.EIDEN";:X$."DCB":.8
060:CF.I.1...K#.I.32.90:.K%(I):.:.I.193.
218:K%(I).1:.:. CHAR ARRAY.A.P#B$."     
":.I.1.5:B$.B$.B$:.:B0$.H(B$,39):.8,08,1
5.X.U#.".DATUM : ":M.60:G.1:.8200:G.0:D$
.X$:.D$."".D$."-...N#.:.I.0.8:.F$(I):.:.
 FIELD NAMES...X#.I.0.6:.K$(I):.:. CATEG
ORIES....#V..((.(0).2000).170):.T$(V,9),
T%(V):.I.0.V:T%(I).I:.....%. INPUT FILE.
*.&%.CF.2..".VAN CASSETTE ";:.8050.\.0%.
CF.2.(CF.3.I.0)..9700:.I.100:.1,1,0,H$:.
9600..N% 1:.1,8,2,H$:.8,X,X$:.X.0.9600.
..X%.9700:.I.100.A.B%.".VOER DE GOEDE DI
SKETTE IN EN":.8000:.9550.K..%X$.""....%
.#1,C$:.C$..R$.X$.X$.C$:.9603....%.".ENT
ERED: ."X$:.:. DATELINE FROM FILE.O..%.I
.0.V:.1,X$:.X$."\".ST.0.9650:. READING C
OMPLETE....%.X$:T$(I,0).X$:.J.1.9:.1,T$(
I,J):.:T%(I).I:.....%NX.I.1:.100:. COMPL
ETE....%.".NIEUW BESTAND";:.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&."ACHTERNAAM","VOORNAAM ","AANHEF
 (B.V. MIJNHEER,FAM.,FIRMA )","TITEL".. 
T&."ORGANISATIE ","STRAAT ","PLAATS ","L
AND ","TELEFOON".. .'. SEVEN CATEGORIES.
.!.'. "FAMILIE". !$'. "VRIENDEN".2!.'. "
COLLEGA'S".A!8'. "ARTSEN".V!B'. "INSTELL
INGEN".F!L'. "SCHOLEN".W!V'. "OVERIGEN".
.!`..X$:.8000:.100..!H.. COLOR CHANGE RO
UTINE.I!I...C(X).B(X).1.16.((B(X).15).15
)..!J..".....F1.= KLEUR VAN DE RAND".."K
.."...F3.= ACHTERGROND-KLEUR".0"L.."...F
5.= KLEUR VAN DE TEKENS".J"M.."...RETURN
.= VERDER".\"R..C$:.C$.61010.Q"\..C$:.C$
."".61020.."F.C.F(C$):.C.135..646,.C(646
):.61002.D"Z.C.F(C$):.C.133.C.134.X.5314
7.C:.X,.C(X).U"...C..13.61010.."......

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL