ADRESS 64
FILE INFORMATION
FILENAME(S): ADRESS 64
FILE TYPE(S): PRG
FILE SIZE: 7.1K
FIRST SEEN: 2025-11-30 21:24:57
APPEARS ON: 1 disk(s)
FILE HASH
cf08a065177e171a85133ff7dd341de1244ec7144c9f744697f166fea9334488
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JORRIT SCHIKS 01 | ADRESS 64 | PRG | DuncanTwain | 32 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 01 00 8F 20 20 2A 2A 2A 2A 2A 2A 2A |..(.... *******| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 02 00 8F 20 20 |********.O.... | 00000030: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* | 00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 00000050: 76 08 03 00 8F 20 20 2A 20 20 20 20 41 44 52 45 |v.... * ADRE| 00000060: 53 20 42 45 53 54 41 4E 44 20 43 42 4D 2D 36 34 |S BESTAND CBM-64| 00000070: 20 20 20 20 20 2A 00 9D 08 04 00 8F 20 20 2A 20 | *...... * | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000090: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 C4 08 | *...| 000000A0: 05 00 8F 20 20 2A 20 20 20 20 52 49 4E 49 20 56 |... * RINI V| 000000B0: 41 4E 20 44 45 20 4C 45 55 52 20 42 2E 56 2E 20 |AN DE LEUR B.V. | 000000C0: 20 20 20 2A 00 EB 08 06 00 8F 20 20 2A 20 20 20 | *...... * | 000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000E0: 20 20 20 20 20 20 20 20 20 20 2A 00 12 09 07 00 | *.....| 000000F0: 8F 20 20 2A 20 20 20 20 20 20 20 20 20 38 33 2D |. * 83-| 00000100: 31 31 2D 32 34 20 20 20 20 20 20 20 20 20 20 20 |11-24 | 00000110: 20 2A 00 39 09 08 00 8F 20 20 2A 20 20 20 20 20 | *.9.... * | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000130: 20 20 20 20 20 20 20 20 2A 00 60 09 09 00 8F 20 | *.`.... | 00000140: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************| 00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000160: 00 7C 09 12 00 99 C7 28 31 34 29 3A 97 36 35 37 |.|.....(14):.657| 00000170: 2C 31 32 38 3A 97 37 38 38 2C 35 32 00 A2 09 13 |,128:.788,52....| 00000180: 00 89 39 30 30 30 3A 8F 20 28 43 29 20 52 49 4E |..9000:. (C) RIN| 00000190: 49 20 56 41 4E 20 44 45 20 4C 45 55 52 20 42 2E |I VAN DE LEUR B.| 000001A0: 56 2E 00 B1 09 14 00 A1 43 24 3A 8B 43 24 89 32 |V.......C$:.C$.2| 000001B0: 30 00 CE 09 19 00 A1 43 24 3A 8B 43 24 A7 99 22 |0......C$:.C$.."| 000001C0: 20 9D 22 3B 3A 43 B2 C6 28 43 24 29 3A 8E 00 DD | .";:C..(C$):...| 000001D0: 09 1B 00 99 22 A4 9D 22 3B 3A 89 32 35 00 F1 09 |...."..";:.25...| 000001E0: 64 00 A0 31 3A 8F 20 4D 45 4E 55 20 45 4E 54 52 |d..1:. MENU ENTR| 000001F0: 59 00 26 0A 6E 00 99 22 93 12 20 20 20 20 20 20 |Y.&.n..".. | 00000200: 20 20 20 20 20 20 20 20 20 C1 44 52 45 53 53 20 | .DRESS | 00000210: 36 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |64 | 00000220: 20 20 92 11 11 22 00 39 0A 78 00 99 22 C6 55 4E | ...".9.x..".UN| 00000230: 43 54 49 45 53 3A 11 11 22 00 5E 0A 7D 00 99 2C |CTIES:..".^.}..,| 00000240: 22 12 C9 92 4E 56 4F 45 52 45 4E 20 56 41 4E 20 |"...NVOEREN VAN | 00000250: CE 41 41 4D 20 45 4E 20 C1 44 52 45 53 22 00 82 |.AAM EN .DRES"..| 00000260: 0A 82 00 99 2C 22 12 DA 92 4F 45 4B 45 4E 20 56 |....,"...OEKEN V| 00000270: 41 4E 20 45 45 4E 20 CE 41 41 4D 2F C1 44 52 45 |AN EEN .AAM/.DRE| 00000280: 53 22 00 A9 0A 8C 00 99 2C 22 12 C1 92 46 44 52 |S"......,"...FDR| 00000290: 55 4B 4B 45 4E 20 56 41 4E 20 45 45 4E 20 CE 41 |UKKEN VAN EEN .A| 000002A0: 41 4D 2F C1 44 52 45 53 22 00 C4 0A 96 00 99 2C |AM/.DRES"......,| 000002B0: 22 12 CD 92 41 49 4C 49 4E 47 20 41 44 52 45 53 |"...AILING ADRES| 000002C0: 53 45 4E 22 00 E5 0A A0 00 99 2C 22 12 D4 92 45 |SEN"......,"...E| 000002D0: 4C 45 46 4F 4F 4E 42 4F 45 4B 20 41 46 44 52 55 |LEFOONBOEK AFDRU| 000002E0: 4B 4B 45 4E 22 00 0D 0B AA 00 99 2C 22 12 CF 92 |KKEN"......,"...| 000002F0: 50 53 4C 41 41 4E 20 56 41 4E 20 44 45 20 CE 41 |PSLAAN VAN DE .A| 00000300: 4D 45 4E 2F 41 44 52 45 53 53 45 4E 22 00 27 0B |MEN/ADRESSEN".'.| 00000310: B4 00 99 2C 22 12 C5 92 49 4E 44 45 20 50 52 4F |...,"...INDE PRO| 00000320: 47 52 41 4D 4D 41 22 00 4D 0B BE 00 99 22 11 CB |GRAMMA".M...."..| 00000330: 45 55 5A 45 20 20 20 20 22 3B 3A 58 24 B2 22 45 |EUZE ";:X$."E| 00000340: 49 5A 41 4D 4F 54 22 3A 8D 38 30 36 30 00 72 0B |IZAMOT":.8060.r.| 00000350: FA 00 91 49 89 34 30 30 30 2C 35 30 30 30 2C 37 |...I.4000,5000,7| 00000360: 30 30 30 2C 36 30 30 30 2C 33 30 30 30 2C 37 31 |000,6000,3000,71| 00000370: 30 30 00 AC 0B 04 01 99 22 93 11 C2 4C 41 44 20 |00......"...LAD | 00000380: 55 49 54 20 50 52 49 4E 54 45 52 22 3B 3A 8D 38 |UIT PRINTER";:.8| 00000390: 30 35 30 3A 8B 49 B2 30 A7 9F 31 2C 30 34 3A 4C |050:.I.0..1,04:L| 000003A0: B2 2E 31 3A 8D 37 39 35 30 3A A0 31 00 E5 0B 0E |..1:.7950:.1....| 000003B0: 01 8B 4F 46 A7 99 22 11 CF 50 53 4C 41 41 4E 20 |..OF.."..PSLAAN | 000003C0: 56 41 4E 20 44 45 20 2A CE 41 4D 45 20 CC 49 53 |VAN DE *.AME .IS| 000003D0: 54 2A 22 3B 3A 8D 38 30 35 30 3A 8B 49 B2 30 A7 |T*";:.8050:.I.0.| 000003E0: 8D 33 30 32 30 00 FD 0B 18 01 A0 31 3A 99 22 93 |.3020......1:.".| 000003F0: 11 C4 41 41 41 41 41 41 47 21 22 3A 80 00 13 0C |..AAAAAAG!":....| 00000400: 2C 01 8F 20 46 4F 52 4D 41 54 20 54 48 45 20 4C |,.. FORMAT THE L| 00000410: 49 4E 45 00 43 0C 36 01 58 24 B2 54 24 28 54 2C |INE.C.6.X$.T$(T,| 00000420: 30 29 3A 59 24 B2 54 24 28 54 2C 31 29 3A 8B C3 |0):Y$.T$(T,1):..| 00000430: 28 59 24 29 B1 31 A7 58 24 B2 59 24 AA 22 20 22 |(Y$).1.X$.Y$." "| 00000440: AA 58 24 00 68 0C 40 01 59 24 B2 54 24 28 54 2C |.X$.h.@.Y$.T$(T,| 00000450: 32 29 3A 8B C3 28 59 24 29 B1 31 A7 58 24 B2 59 |2):..(Y$).1.X$.Y| 00000460: 24 AA 22 20 22 AA 58 24 00 8E 0C 4A 01 59 24 B2 |$." ".X$...J.Y$.| 00000470: 54 24 28 54 2C 33 29 3A 8B C3 28 59 24 29 B1 31 |T$(T,3):..(Y$).1| 00000480: A7 58 24 B2 58 24 AA 22 2C 20 22 AA 59 24 00 D0 |.X$.X$.", ".Y$..| 00000490: 0C 5E 01 41 24 28 4A 2C 30 29 B2 58 24 3A 81 49 |.^.A$(J,0).X$:.I| 000004A0: B2 31 A4 33 3A 41 24 28 4A 2C 49 29 B2 22 22 3A |.1.3:A$(J,I)."":| 000004B0: 59 24 B2 54 24 28 54 2C 49 AA 33 29 3A 8B C3 28 |Y$.T$(T,I.3):..(| 000004C0: 59 24 29 B1 31 A7 41 24 28 4A 2C 49 29 B2 59 24 |Y$).1.A$(J,I).Y$| 000004D0: 00 01 0D 68 01 82 3A 8B C3 28 54 24 28 54 2C 37 |...h..:..(T$(T,7| 000004E0: 29 29 B1 31 A7 41 24 28 4A 2C 33 29 B2 41 24 28 |)).1.A$(J,3).A$(| 000004F0: 4A 2C 33 29 AA 22 2C 20 22 AA 54 24 28 54 2C 37 |J,3).", ".T$(T,7| 00000500: 29 00 28 0D 72 01 41 24 28 4A 2C 34 29 B2 54 24 |).(.r.A$(J,4).T$| 00000510: 28 54 2C 38 29 3A 58 B2 C6 28 54 24 28 54 2C 39 |(T,8):X..(T$(T,9| 00000520: 29 29 AF 31 32 37 3A 8E 00 37 0D 4B 02 42 4C 4F |)).127:..7.K.BLO| 00000530: 43 4B 53 20 B8 45 2E 00 49 0D B8 0B 8F 20 4F 55 |CKS .E..I.... OU| 00000540: 54 50 55 54 20 46 49 4C 45 00 58 0D C2 0B 8D 33 |TPUT FILE.X....3| 00000550: 30 32 30 3A 89 31 30 30 00 75 0D CC 0B 59 24 B2 |020:.100.u...Y$.| 00000560: 48 24 3A 8D 33 35 30 30 3A 8B C5 28 58 24 29 89 |H$:.3500:..(X$).| 00000570: 36 30 30 30 30 00 7E 0D D6 0B 8B 58 A7 8E 00 8F |60000.~....X....| 00000580: 0D 1C 0C 4F 46 B2 30 3A 98 31 2C 44 24 3A 99 00 |...OF.0:.1,D$:..| 00000590: AC 0D 4E 0C 81 49 B2 30 A4 4E 58 3A 54 B2 54 25 |..N..I.0.NX:T.T%| 000005A0: 28 49 29 3A 99 54 24 28 54 2C 30 29 00 C7 0D 58 |(I):.T$(T,0)...X| 000005B0: 0C 81 4A B2 30 A4 39 3A 98 31 2C 54 24 28 54 2C |..J.0.9:.1,T$(T,| 000005C0: 4A 29 3A 82 4A 2C 49 00 DF 0D 76 0C 98 31 2C 22 |J):.J,I...v..1,"| 000005D0: 5C 22 3A 8E 3A 8F 20 43 4F 4D 50 4C 45 54 45 00 |\":.:. COMPLETE.| 000005E0: FC 0D AC 0D 8F 20 4F 50 45 4E 20 54 48 45 20 46 |..... OPEN THE F| 000005F0: 49 4C 45 20 54 4F 20 57 52 49 54 45 00 2E 0E C0 |ILE TO WRITE....| 00000600: 0D 44 46 B2 30 3A 58 B2 30 3A 58 24 B2 22 22 3A |.DF.0:X.0:X$."":| 00000610: 8B 43 46 B1 32 A7 99 22 93 CF 50 20 43 41 53 53 |.CF.2.."..P CASS| 00000620: 45 54 54 45 20 20 22 3B 3A 8D 38 30 35 30 00 4F |ETTE ";:.8050.O| 00000630: 0E CA 0D 8B 43 46 B2 32 B0 28 43 46 B2 33 AF 49 |....CF.2.(CF.3.I| 00000640: B2 30 29 A7 9F 31 2C 31 2C 31 2C 59 24 3A 8E 00 |.0)..1,1,1,Y$:..| 00000650: 81 0E DE 0D 44 46 B2 AB 31 3A 4C 24 B2 22 30 3A |....DF..1:L$."0:| 00000660: 22 AA 59 24 3A 9F 31 2C 30 38 2C 32 2C 4C 24 3A |".Y$:.1,08,2,L$:| 00000670: 84 38 2C 58 3A 20 20 A0 31 3A 8B 58 89 33 35 38 |.8,X: .1:.X.358| 00000680: 30 00 BD 0E E8 0D 99 3A 99 22 11 C2 45 53 54 41 |0......:."..ESTA| 00000690: 4E 44 20 42 45 53 54 41 41 54 20 41 4C 2D 20 4F |ND BESTAAT AL- O| 000006A0: 56 45 52 53 43 48 52 49 4A 56 45 4E 22 3B 3A 8D |VERSCHRIJVEN";:.| 000006B0: 38 30 35 30 3A 8B 49 A7 58 B2 31 3A 8E 00 D1 0E |8050:.I.X.1:....| 000006C0: F2 0D 98 38 2C 22 53 22 4C 24 3A 98 38 2C 22 49 |...8,"S"L$:.8,"I| 000006D0: 30 00 F1 0E FC 0D 9F 31 2C 30 38 2C 33 2C 4C 24 |0......1,08,3,L$| 000006E0: AA 22 2C 53 2C 57 22 3A 84 38 2C 58 2C 58 24 3A |.",S,W":.8,X,X$:| 000006F0: 8E 00 07 0F A0 0F 8F 20 43 52 45 41 54 45 20 41 |....... CREATE A| 00000700: 4E 20 45 4E 54 52 59 00 37 0F AA 0F 8B 4E 58 B1 |N ENTRY.7....NX.| 00000710: B2 56 A7 99 22 11 12 20 C7 45 45 4E 20 52 55 49 |.V..".. .EEN RUI| 00000720: 4D 54 45 20 4D 45 45 52 20 20 21 22 3A 8D 38 30 |MTE MEER !":.80| 00000730: 30 30 3A 89 31 30 30 00 5F 0F B4 0F 4E 58 B2 4E |00:.100._...NX.N| 00000740: 58 AA 31 3A 4B B2 4E 58 3A 54 B2 54 25 28 4B 29 |X.1:K.NX:T.T%(K)| 00000750: 3A 54 24 28 54 2C 39 29 B2 C7 28 31 32 38 29 00 |:T$(T,9)..(128).| 00000760: 84 0F 04 10 4F 46 B2 31 3A 4D B2 33 39 3A 59 B2 |....OF.1:M.39:Y.| 00000770: 30 3A 8F 20 47 45 54 20 4E 41 4D 45 2F 41 44 44 |0:. GET NAME/ADD| 00000780: 52 45 53 53 00 91 0F 0E 10 4A B2 30 3A 8D 33 30 |RESS.....J.0:.30| 00000790: 30 00 C3 0F 18 10 99 22 93 20 22 3B 3A 81 49 B2 |0......". ";:.I.| 000007A0: 31 A4 33 30 3A 99 22 A4 22 3B 3A 82 3A 81 49 B2 |1.30:.".";:.:.I.| 000007B0: 31 A4 35 3A 99 22 11 A5 9D 22 3B 3A 82 3A 99 22 |1.5:."...";:.:."| 000007C0: 11 22 3B 00 EE 0F 1A 10 81 49 B2 31 A4 33 30 3A |.";......I.1.30:| 000007D0: 99 22 9D A3 9D 22 3B 3A 82 3A 81 49 B2 31 A4 35 |."...";:.:.I.1.5| 000007E0: 3A 99 22 91 9D A7 22 3B 3A 82 3A 99 22 13 00 11 |:."...";:.:."...| 000007F0: 10 22 10 81 49 B2 30 A4 34 3A 99 22 1D 22 41 24 |."..I.0.4:."."A$| 00000800: 28 4A 2C 49 29 3A 82 3A 8B 59 B1 38 89 34 32 30 |(J,I):.:.Y.8.420| 00000810: 30 00 37 10 36 10 99 22 13 11 11 11 11 11 11 11 |0.7.6.."........| 00000820: 11 11 22 42 30 24 3A 99 22 91 22 46 24 28 59 29 |.."B0$:."."F$(Y)| 00000830: 3A 99 42 30 24 22 91 00 4D 10 3B 10 8D 38 32 30 |:.B0$"..M.;..820| 00000840: 30 3A 8B 43 B3 B1 31 33 89 34 31 32 30 00 77 10 |0:.C..13.4120.w.| 00000850: 3D 10 99 3A 8B C9 28 58 24 2C 31 29 B2 22 20 22 |=..:..(X$,1)." "| 00000860: A7 58 24 B2 C8 28 58 24 2C C3 28 58 24 29 AB 31 |.X$..(X$,.(X$).1| 00000870: 29 3A 89 34 31 35 37 00 A6 10 40 10 8B 58 24 B2 |):.4157...@..X$.| 00000880: 22 22 AF 54 24 28 54 2C 59 29 B1 22 22 A7 59 B2 |"".T$(T,Y)."".Y.| 00000890: 59 AA 31 3A 91 32 AA 28 59 B3 39 29 89 34 31 35 |Y.1:.2.(Y.9).415| 000008A0: 30 2C 34 31 31 30 00 B8 10 4A 10 8B C3 28 58 24 |0,4110...J...(X$| 000008B0: 29 B1 31 89 34 31 39 30 00 EB 10 54 10 58 24 B2 |).1.4190...T.X$.| 000008C0: 22 2D 22 3A 8B 59 B2 30 A7 99 22 11 D7 49 53 53 |"-":.Y.0.."..ISS| 000008D0: 45 4E 20 20 22 3B 3A 8D 38 30 35 30 3A 91 49 AA |EN ";:.8050:.I.| 000008E0: 31 89 34 39 30 30 2C 34 31 31 30 00 06 11 5E 10 |1.4900,4110...^.| 000008F0: 54 24 28 54 2C 59 29 B2 58 24 3A 59 B2 59 AA 31 |T$(T,Y).X$:Y.Y.1| 00000900: 3A 89 34 31 31 30 00 2B 11 68 10 58 24 B2 22 31 |:.4110.+.h.X$."1| 00000910: 32 33 34 35 36 37 22 AA 52 24 3A 8F 20 47 45 54 |234567".R$:. GET| 00000920: 20 43 41 54 45 47 4F 52 49 45 53 00 48 11 72 10 | CATEGORIES.H.r.| 00000930: 99 22 13 11 11 11 11 11 11 11 11 C3 41 54 45 47 |."..........ATEG| 00000940: 4F 52 49 45 45 4E 3A 22 00 63 11 7C 10 81 49 B2 |ORIEEN:".c.|..I.| 00000950: 30 A4 36 3A 99 2C 3A 8B 58 AF 32 AE 49 A7 99 22 |0.6:.,:.X.2.I.."| 00000960: 12 22 3B 00 76 11 86 10 99 49 AA 31 22 92 22 4B |.";.v....I.1"."K| 00000970: 24 28 49 29 3A 82 00 A6 11 90 10 99 22 11 C8 4F |$(I):......."..O| 00000980: 45 20 54 4F 45 57 49 4A 5A 45 4E 2F 57 49 53 53 |E TOEWIJZEN/WISS| 00000990: 45 4E 20 3F 20 20 20 9D 22 3B 3A 8D 38 30 37 30 |EN ? .";:.8070| 000009A0: 3A 49 B2 32 AE 49 00 C5 11 9A 10 58 B2 28 58 B0 |:I.2.I.....X.(X.| 000009B0: 49 29 AF A8 28 58 AF 49 29 3A 8B 58 B3 31 32 38 |I)..(X.I):.X.128| 000009C0: 89 34 32 31 30 00 E6 11 CC 10 54 24 28 54 2C 39 |.4210.....T$(T,9| 000009D0: 29 B2 C7 28 58 29 3A 8F 20 43 4F 4D 50 4C 45 54 |)..(X):. COMPLET| 000009E0: 45 20 45 44 49 54 00 11 12 D6 10 99 22 91 91 22 |E EDIT......".."| 000009F0: 42 30 24 3A 99 22 91 C1 4C 4C 45 53 20 4F 4B 20 |B0$:."..LLES OK | 00000A00: 20 22 3B 3A 8D 38 30 35 30 3A 8B 49 89 34 31 30 | ";:.8050:.I.410| 00000A10: 30 00 32 12 E0 10 8B 4E 58 B3 31 89 31 30 30 3A |0.2....NX.1.100:| 00000A20: 8F 20 4D 55 53 54 20 42 45 20 49 4E 20 4F 52 44 |. MUST BE IN ORD| 00000A30: 45 52 00 6C 12 EA 10 58 24 B2 54 24 28 54 2C 30 |ER.l...X$.T$(T,0| 00000A40: 29 3A 8B 4B B3 4E 58 A7 81 49 B2 4B A4 4E 58 AB |):.K.NX..I.K.NX.| 00000A50: 31 3A 54 25 28 49 29 B2 54 25 28 49 AA 31 29 3A |1:T%(I).T%(I.1):| 00000A60: 82 3A 8F 20 52 45 4D 4F 56 45 20 54 00 9E 12 F4 |.:. REMOVE T....| 00000A70: 10 81 49 B2 30 A4 4E 58 AB 31 3A 8B 54 24 28 54 |..I.0.NX.1:.T$(T| 00000A80: 25 28 49 29 2C 30 29 B3 58 24 A7 82 3A 8F 20 4C |%(I),0).X$..:. L| 00000A90: 4F 43 41 54 45 20 54 27 53 20 53 4C 4F 54 00 DB |OCATE T'S SLOT..| 00000AA0: 12 FE 10 8B 49 B3 4E 58 A7 4A B2 49 AA 31 3A 81 |....I.NX.J.I.1:.| 00000AB0: 49 B2 4E 58 A4 4A A9 AB 31 3A 54 25 28 49 29 B2 |I.NX.J..1:T%(I).| 00000AC0: 54 25 28 49 AB 31 29 3A 82 3A 8F 20 4D 41 4B 45 |T%(I.1):.:. MAKE| 00000AD0: 20 52 4F 4F 4D 20 46 4F 52 20 54 00 FD 12 08 11 | ROOM FOR T.....| 00000AE0: 54 25 28 49 29 B2 54 3A 89 31 30 30 3A 8F 20 49 |T%(I).T:.100:. I| 00000AF0: 4E 53 45 52 54 20 54 2C 20 45 58 49 54 00 15 13 |NSERT T, EXIT...| 00000B00: 24 13 8F 20 43 4C 45 41 4E 20 55 50 20 44 45 4C |$.. CLEAN UP DEL| 00000B10: 45 54 49 4F 4E 00 2D 13 2E 13 81 49 B2 30 A4 39 |ETION.-....I.0.9| 00000B20: 3A 54 24 28 54 2C 49 29 B2 22 22 3A 82 00 5E 13 |:T$(T,I)."":..^.| 00000B30: 38 13 4E 58 B2 4E 58 AB 31 3A 81 49 B2 4B A4 4E |8.NX.NX.1:.I.K.N| 00000B40: 58 3A 54 25 28 49 29 B2 54 25 28 49 AA 31 29 3A |X:T%(I).T%(I.1):| 00000B50: 82 3A 54 25 28 49 29 B2 54 3A 89 31 30 30 00 79 |.:T%(I).T:.100.y| 00000B60: 13 88 13 8F 20 53 45 4C 45 43 54 2F 45 44 49 54 |.... SELECT/EDIT| 00000B70: 20 41 4E 20 45 4E 54 52 59 00 A0 13 92 13 99 22 | AN ENTRY......"| 00000B80: 93 22 3A 99 22 DA 4F 45 4B 45 4E 20 4E 41 41 52 |.":.".OEKEN NAAR| 00000B90: 3A 20 20 12 C1 92 43 48 54 45 52 4E 41 41 4D 22 |: ...CHTERNAAM"| 00000BA0: 00 B7 13 9C 13 99 2C 22 20 20 20 20 12 D6 92 4F |......," ...O| 00000BB0: 4F 52 4E 41 41 4D 22 00 CE 13 A6 13 99 2C 22 20 |ORNAAM"......," | 00000BC0: 20 20 20 12 D0 92 4F 53 54 43 4F 44 45 22 00 ED | ...OSTCODE"..| 00000BD0: 13 B0 13 99 2C 22 20 20 20 20 12 D7 92 4F 4F 4E |....," ...OON| 00000BE0: 50 4C 41 41 54 53 2F 41 44 52 45 53 22 00 04 14 |PLAATS/ADRES"...| 00000BF0: BA 13 99 2C 22 20 20 20 20 12 D4 92 45 4C 45 46 |...," ...ELEF| 00000C00: 4F 4F 4E 22 00 30 14 CE 13 99 22 11 CB 45 55 5A |OON".0...."..EUZ| 00000C10: 45 20 20 20 20 22 3B 3A 58 24 B2 22 41 56 58 58 |E ";:X$."AVXX| 00000C20: 58 58 50 57 54 22 3A 8D 38 30 36 30 3A 46 B2 49 |XXPWT":.8060:F.I| 00000C30: 00 5F 14 D8 13 4D B2 34 30 3A 99 22 11 DA 4F 45 |._...M.40:."..OE| 00000C40: 4B 45 4E 20 4E 41 41 52 3A 22 3B 3A 8D 38 32 30 |KEN NAAR:";:.820| 00000C50: 30 3A 5A 24 B2 58 24 3A 5A B2 C3 28 5A 24 29 00 |0:Z$.X$:Z..(Z$).| 00000C60: 7A 14 EC 13 4B B2 30 3A 8F 20 53 45 41 52 43 48 |z...K.0:. SEARCH| 00000C70: 20 46 4F 52 20 46 49 45 4C 44 00 95 14 F6 13 54 | FOR FIELD.....T| 00000C80: B2 54 25 28 4B 29 3A 58 24 B2 54 24 28 54 2C 46 |.T%(K):X$.T$(T,F| 00000C90: 29 3A 59 B2 30 00 C7 14 00 14 81 49 B2 31 A4 C3 |):Y.0......I.1..| 00000CA0: 28 58 24 29 AB 5A AA 31 3A 59 B2 28 CA 28 58 24 |(X$).Z.1:Y.(.(X$| 00000CB0: 2C 49 2C 5A 29 B2 5A 24 29 B0 59 3A 82 3A 8B 59 |,I,Z).Z$).Y:.:.Y| 00000CC0: B2 30 89 35 31 35 30 00 EB 14 0A 14 4A B2 30 3A |.0.5150.....J.0:| 00000CD0: 8D 33 30 30 3A 99 22 93 22 3A 81 49 B2 30 A4 34 |.300:.".":.I.0.4| 00000CE0: 3A 99 41 24 28 30 2C 49 29 3A 82 00 13 15 14 14 |:.A$(0,I):......| 00000CF0: 99 22 11 D6 45 52 44 45 52 20 5A 4F 45 4B 45 4E |."..ERDER ZOEKEN| 00000D00: 20 20 20 22 3B 3A 8D 38 30 35 30 3A 8B 49 89 35 | ";:.8050:.I.5| 00000D10: 31 38 30 00 29 15 1E 14 4B B2 4B AA 31 3A 8B 4B |180.)...K.K.1:.K| 00000D20: B3 B2 4E 58 89 35 31 31 30 00 4C 15 28 14 99 3A |..NX.5110.L.(..:| 00000D30: 99 22 11 C1 4C 4C 45 53 20 47 45 54 45 53 54 20 |."..LLES GETEST | 00000D40: 22 3A 8D 38 30 30 30 3A 89 31 30 30 00 71 15 3C |":.8000:.100.q.<| 00000D50: 14 99 22 11 D7 49 4A 5A 49 47 45 4E 22 3B 3A 8D |.."..IJZIGEN";:.| 00000D60: 38 30 35 30 3A 91 49 89 31 30 30 3A 89 34 31 30 |8050:.I.100:.410| 00000D70: 30 00 8D 15 70 17 8F 20 46 49 4C 45 20 46 4F 52 |0...p.. FILE FOR| 00000D80: 20 57 4F 52 44 20 4D 41 43 48 49 4E 45 00 C3 15 | WORD MACHINE...| 00000D90: 7A 17 99 22 93 CE 41 41 4D 20 56 41 4E 20 48 45 |z.."..AAM VAN HE| 00000DA0: 54 20 42 45 53 54 41 4E 44 3A 22 3B 3A 4D B2 31 |T BESTAND:";:M.1| 00000DB0: 36 3A 8D 38 32 30 30 3A 8B 58 24 B2 22 22 89 36 |6:.8200:.X$."".6| 00000DC0: 30 31 30 00 E0 15 84 17 59 24 B2 58 24 3A 8D 33 |010.....Y$.X$:.3| 00000DD0: 35 30 30 3A 8B C5 28 58 24 29 89 36 30 30 30 30 |500:..(X$).60000| 00000DE0: 00 EB 15 8E 17 8B 58 89 31 30 30 00 1D 16 A2 17 |......X.100.....| 00000DF0: 8D 37 32 30 30 3A 99 22 11 D3 50 45 43 49 41 4C |.7200:."..PECIAL| 00000E00: 45 20 4B 45 55 5A 45 20 22 3B 3A 8D 38 30 35 30 |E KEUZE ";:.8050| 00000E10: 3A 53 46 B2 49 3A 4A B2 30 3A 4B B2 30 00 40 16 |:SF.I:J.0:K.0.@.| 00000E20: AC 17 54 B2 54 25 28 4B 29 3A 8B 28 46 AF C6 28 |..T.T%(K):.(F..(| 00000E30: 54 24 28 54 2C 39 29 29 29 B2 30 89 36 31 38 30 |T$(T,9))).0.6180| 00000E40: 00 57 16 B6 17 8B 53 46 A7 99 54 24 28 54 2C 30 |.W....SF..T$(T,0| 00000E50: 29 3A 89 36 31 30 30 00 77 16 C0 17 8D 33 30 30 |):.6100.w....300| 00000E60: 3A 99 22 93 22 3A 81 49 B2 30 A4 33 3A 99 41 24 |:.".":.I.0.3:.A$| 00000E70: 28 4A 2C 49 29 3A 82 00 9F 16 CA 17 99 22 11 CF |(J,I):......."..| 00000E80: 56 45 52 4E 45 4D 45 20 20 20 20 20 20 20 20 22 |VERNEME "| 00000E90: 3B 3A 8D 38 30 35 30 3A 8B 49 89 36 31 38 30 00 |;:.8050:.I.6180.| 00000EA0: B5 16 D4 17 8F 20 4F 55 54 50 55 54 20 54 48 45 |..... OUTPUT THE| 00000EB0: 20 46 49 4C 45 00 D6 16 DE 17 81 49 B2 30 A4 37 | FILE......I.0.7| 00000EC0: 3A 98 31 2C 54 24 28 54 2C 49 29 3A 82 3A 44 46 |:.1,T$(T,I):.:DF| 00000ED0: B2 B6 28 44 46 29 00 EC 16 24 18 4B B2 4B AA 31 |..(DF)...$.K.K.1| 00000EE0: 3A 8B 4B B3 B2 4E 58 89 36 30 36 30 00 22 17 2E |:.K..NX.6060."..| 00000EF0: 18 98 31 2C 22 5C 22 3A 8B 44 46 B1 AB 31 A7 91 |..1,"\":.DF..1..| 00000F00: 53 46 AA 31 89 36 32 32 30 2C 31 30 30 3A 8F 20 |SF.1.6220,100:. | 00000F10: 20 2D 31 3D 45 4D 50 54 59 20 44 49 53 43 46 49 | -1=EMPTY DISCFI| 00000F20: 4C 45 00 4B 17 38 18 99 22 11 C7 45 45 4E 20 41 |LE.K.8.."..EEN A| 00000F30: 44 52 45 53 53 45 4E 20 49 4E 20 44 45 5A 45 20 |DRESSEN IN DEZE | 00000F40: 43 41 54 4F 47 4F 52 49 45 2E 22 00 64 17 42 18 |CATOGORIE.".d.B.| 00000F50: A0 31 3A 98 38 2C 22 53 30 3A 22 59 24 3A 98 38 |.1:.8,"S0:"Y$:.8| 00000F60: 2C 22 49 30 00 73 17 4C 18 8D 38 30 30 30 3A 89 |,"I0.s.L..8000:.| 00000F70: 31 30 30 00 86 17 58 1B 8F 20 50 52 49 4E 54 20 |100...X.. PRINT | 00000F80: 4C 41 42 45 4C 53 00 A3 17 62 1B 53 46 B2 AB 31 |LABELS...b.SF..1| 00000F90: 3A 4D B2 33 30 3A 9F 31 2C 30 34 3A 4C 4C B2 39 |:M.30:.1,04:LL.9| 00000FA0: 39 39 39 00 CD 17 6C 1B 99 22 11 C5 4E 4B 45 4C |999...l.."..NKEL| 00000FB0: 45 20 4B 4F 4C 4F 4D 20 45 54 49 4B 45 54 54 45 |E KOLOM ETIKETTE| 00000FC0: 4E 22 3B 3A 8D 38 30 35 30 3A 59 B2 49 00 F5 17 |N";:.8050:Y.I...| 00000FD0: 8A 1B 99 22 11 D0 52 4F 45 46 41 46 44 52 55 4B |..."..ROEFAFDRUK| 00000FE0: 20 20 20 20 20 22 3B 3A 8D 38 30 35 30 3A 8B 49 | ";:.8050:.I| 00000FF0: 89 37 30 39 30 00 23 18 94 1B 50 24 B2 22 2D 2D |.7090.#...P$."--| 00001000: 2D 2D 2D 2D 2D 2D 2D 2D 45 45 52 53 54 45 20 52 |--------EERSTE R| 00001010: 45 47 45 4C 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 8D 37 |EGEL--------":.7| 00001020: 39 30 30 00 5A 18 9E 1B 81 49 B2 30 A4 31 3A 50 |900.Z....I.0.1:P| 00001030: 24 B2 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |$."-------------| 00001040: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001050: 2D 22 3A 8D 37 39 30 30 3A 82 00 97 18 A8 1B 50 |-":.7900:......P| 00001060: 24 B2 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 4C 41 41 |$."----------LAA| 00001070: 54 53 54 45 20 52 45 47 45 4C 2D 2D 2D 2D 2D 2D |TSTE REGEL------| 00001080: 2D 22 3A 81 49 B2 31 A4 33 3A 8D 37 39 30 30 3A |-":.I.1.3:.7900:| 00001090: 82 3A 89 37 30 35 30 00 BC 18 B2 1B 8D 37 32 30 |.:.7050......720| 000010A0: 30 3A 8D 37 33 30 30 3A 89 31 30 30 3A 8F 20 4F |0:.7300:.100:. O| 000010B0: 55 54 50 55 54 20 4C 41 42 45 4C 53 00 D3 18 BC |UTPUT LABELS....| 000010C0: 1B 8F 20 50 52 49 4E 54 20 50 48 4F 4E 45 20 42 |.. PRINT PHONE B| 000010D0: 4F 4F 4B 00 EF 18 C6 1B 53 46 B2 30 3A 4D B2 33 |OOK.....SF.0:M.3| 000010E0: 36 3A 59 B2 31 3A 9F 31 2C 30 34 3A 4C B2 30 00 |6:Y.1:.1,04:L.0.| 000010F0: 17 19 D0 1B 99 22 11 D2 45 47 45 4C 53 20 50 45 |....."..EGELS PE| 00001100: 52 20 42 4C 41 44 20 20 22 4C 30 22 9D 9D 9D 9D |R BLAD "L0"....| 00001110: 9D 22 3B 3A 85 4C 4C 00 32 19 DA 1B 8D 37 32 30 |.";:.LL.2....720| 00001120: 30 3A 8D 37 33 30 30 3A 8D 37 39 35 30 3A 89 31 |0:.7300:.7950:.1| 00001130: 30 30 00 45 19 20 1C 8F 20 47 45 54 20 43 41 54 |00.E. .. GET CAT| 00001140: 45 47 4F 52 59 00 7D 19 2A 1C 99 22 93 DA 4F 45 |EGORY.}.*.."..OE| 00001150: 4B 45 4E 20 4E 41 41 52 3A 22 3A 81 49 B2 30 A4 |KEN NAAR:":.I.0.| 00001160: 36 3A 99 2C 22 12 22 CA 28 C4 28 49 AA 31 29 2C |6:.,".".(.(I.1),| 00001170: 32 29 22 92 20 22 4B 24 28 49 29 3A 82 00 B8 19 |2)". "K$(I):....| 00001180: 34 1C 99 2C 22 12 38 92 20 C1 4C 4C 45 4E 22 3A |4..,".8. .LLEN":| 00001190: 99 22 11 D5 57 20 4B 45 55 5A 45 20 22 3B 3A 58 |."..W KEUZE ";:X| 000011A0: 24 B2 22 31 32 33 34 35 36 37 38 22 3A 8D 38 30 |$."12345678":.80| 000011B0: 36 30 3A 46 B2 32 AE 49 00 D7 19 3E 1C 8E 3A 8F |60:F.2.I...>..:.| 000011C0: 20 41 4C 4C 20 41 52 45 20 4F 52 2D 45 44 20 57 | ALL ARE OR-ED W| 000011D0: 49 54 48 20 31 32 38 00 EA 19 84 1C 8F 20 50 52 |ITH 128...... PR| 000011E0: 49 4E 54 20 45 49 54 48 45 52 00 19 1A 8E 1C 4A |INT EITHER.....J| 000011F0: B2 59 3A 81 4B B2 30 A4 4E 58 3A 54 B2 54 25 28 |.Y:.K.0.NX:T.T%(| 00001200: 4B 29 3A 8B 28 46 AF C6 28 54 24 28 54 2C 39 29 |K):.(F..(T$(T,9)| 00001210: 29 29 B2 30 89 37 33 38 30 00 37 1A 98 1C 4A B2 |)).0.7380.7...J.| 00001220: 59 AB 4A 3A 8D 33 30 30 3A 8B 53 46 A7 41 24 28 |Y.J:.300:.SF.A$(| 00001230: 4A 2C 34 29 B2 22 22 00 45 1A A2 1C 8B 4A B3 59 |J,4)."".E....J.Y| 00001240: 89 37 33 38 30 00 60 1A B6 1C 81 49 B2 30 A4 34 |.7380.`....I.0.4| 00001250: 3A 50 24 B2 C8 28 41 24 28 30 2C 49 29 2C 4D 29 |:P$..(A$(0,I),M)| 00001260: 00 8A 1A C0 1C 8B 4A A7 50 24 B2 50 24 AA C8 28 |......J.P$.P$..(| 00001270: 42 24 2C 4D AA 36 AB C3 28 50 24 29 29 AA C8 28 |B$,M.6..(P$))..(| 00001280: 41 24 28 31 2C 49 29 2C 4D 29 00 9C 1A CA 1C 8D |A$(1,I),M)......| 00001290: 37 39 30 30 3A 82 3A 8D 37 39 30 30 00 CD 1A D4 |7900:.:.7900....| 000012A0: 1C 82 4B 3A 8B 4A B3 59 A7 81 49 B2 30 A4 34 3A |..K:.J.Y..I.0.4:| 000012B0: 50 24 B2 C8 28 41 24 28 30 2C 49 29 2C 4D 29 3A |P$..(A$(0,I),M):| 000012C0: 8D 37 39 30 30 3A 82 3A 8D 37 39 30 30 00 D3 1A |.7900:.:.7900...| 000012D0: DE 1C 8E 00 00 1B DC 1E 4C B2 4C AA 31 3A 98 31 |........L.L.1:.1| 000012E0: 2C 22 11 22 AA 50 24 3A 50 24 B2 22 22 3A 8B 4C |,".".P$:P$."":.L| 000012F0: B3 4C 4C A7 8E 3A 8F 20 4C 49 4E 45 20 4F 55 54 |.LL..:. LINE OUT| 00001300: 00 22 1B E6 1E 4C B2 4C AA 31 3A 98 31 2C 22 11 |."...L.L.1:.1,".| 00001310: 22 AA 50 24 3A 50 24 B2 22 22 3A 8B 4C B3 4C 4C |".P$:P$."":.L.LL| 00001320: A7 8E 00 50 1B 0E 1F 8B 4C A7 81 4C B2 4C A4 4C |...P....L..L.L.L| 00001330: 50 AB 31 3A 98 31 3A 82 3A 4C B2 30 3A 8E 3A 8F |P.1:.1:.:L.0:.:.| 00001340: 20 46 49 4E 49 53 48 20 54 48 45 20 50 41 47 45 | FINISH THE PAGE| 00001350: 00 60 1B 40 1F 8F 20 55 54 49 4C 49 54 49 45 53 |.`.@.. UTILITIES| 00001360: 00 96 1B 4A 1F 99 22 11 12 20 C4 52 55 4B 20 45 |...J..".. .RUK E| 00001370: 45 4E 20 57 49 4C 4C 4B 45 55 52 49 47 45 20 54 |EN WILLKEURIGE T| 00001380: 4F 45 54 53 20 49 4E 22 3B 3A 8D 32 30 3A 99 3A |OETS IN";:.20:.:| 00001390: 99 22 93 22 3A 8E 00 A1 1B 72 1F 58 24 B2 22 4A |.".":....r.X$."J| 000013A0: 4E 00 AC 1B 7C 1F 99 22 3F 20 22 3B 00 D6 1B 86 |N...|.."? ";....| 000013B0: 1F 8D 32 30 3A 81 49 B2 31 A4 C3 28 58 24 29 3A |..20:.I.1..(X$):| 000013C0: 8B 43 24 B3 B1 CA 28 58 24 2C 49 2C 31 29 A7 82 |.C$...(X$,I,1)..| 000013D0: 3A 89 38 30 37 30 00 EF 1B 8B 1F 49 B2 49 AB 31 |:.8070.....I.I.1| 000013E0: 3A 99 43 24 3B 3A 8B 43 B2 31 33 A7 99 3A 8E 00 |:.C$;:.C.13..:..| 000013F0: 0B 1C 90 1F A1 57 24 3A 8B 57 24 B2 22 22 A7 99 |.....W$:.W$.""..| 00001400: 22 A4 9D 22 3B 3A 89 38 30 38 30 00 21 1C 95 1F |"..";:.8080.!...| 00001410: 99 22 20 9D 22 3B 3A 8B 57 24 B2 52 24 A7 99 3A |." .";:.W$.R$..:| 00001420: 8E 00 3A 1C 9A 1F 8B 57 24 B2 C7 28 32 30 29 A7 |..:....W$..(20).| 00001430: 99 57 24 3B 3A 89 38 30 37 30 00 44 1C 9F 1F 89 |.W$;:.8070.D....| 00001440: 38 30 38 30 00 5F 1C 08 20 58 24 B2 22 22 3A 8F |8080._.. X$."":.| 00001450: 20 49 4E 50 55 54 20 41 20 53 54 52 49 4E 47 00 | INPUT A STRING.| 00001460: 70 1C 12 20 A1 43 24 3A 8B 43 24 89 38 32 31 30 |p.. .C$:.C$.8210| 00001470: 00 80 1C 1C 20 8D 32 35 3A 8B 43 B2 31 33 A7 8E |.... .25:.C.13..| 00001480: 00 AF 1C 26 20 8B 43 B2 32 30 AF 58 24 B1 22 22 |...& .C.20.X$.""| 00001490: A7 99 43 24 3B 3A 58 24 B2 C8 28 58 24 2C C3 28 |..C$;:X$..(X$,.(| 000014A0: 58 24 29 AB 31 29 3A 8F 20 44 45 4C 45 54 45 00 |X$).1):. DELETE.| 000014B0: D8 1C 2B 20 8B 28 31 32 37 AF 43 29 B3 33 32 89 |..+ .(127.C).32.| 000014C0: 38 32 32 30 3A 8F 20 43 55 52 53 4F 52 20 43 48 |8220:. CURSOR CH| 000014D0: 41 52 41 43 54 45 52 53 00 01 1D 30 20 8B 28 4B |ARACTERS...0 .(K| 000014E0: 25 28 43 29 B0 47 29 A7 99 43 24 3B 3A 58 24 B2 |%(C).G)..C$;:X$.| 000014F0: 58 24 AA 43 24 3A 8B C3 28 58 24 29 B1 B2 4D A7 |X$.C$:..(X$)..M.| 00001500: 8E 00 0B 1D 3A 20 89 38 32 32 30 00 11 1D 28 23 |....: .8220...(#| 00001510: 8F 00 3E 1D 2D 23 4C 30 B2 36 30 3A 4C 50 B2 37 |..>.-#L0.60:LP.7| 00001520: 32 3A 4E 58 B2 AB 31 3A 52 24 B2 C7 28 31 33 29 |2:NX..1:R$..(13)| 00001530: 3A 48 24 B2 22 CE 41 4D 45 20 CC 49 53 54 00 5F |:H$.".AME .IST._| 00001540: 1D 32 23 86 4B 25 28 32 35 35 29 2C 41 24 28 31 |.2#.K%(255),A$(1| 00001550: 2C 34 29 2C 4B 24 28 36 29 2C 46 24 28 38 29 00 |,4),K$(6),F$(8).| 00001560: A0 1D 3C 23 99 22 93 8E 13 13 0F 11 11 11 11 11 |..<#."..........| 00001570: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001580: 11 11 11 11 22 A6 33 39 29 22 8F 05 22 3A 97 35 |....".39)"..":.5| 00001590: 39 34 36 38 2C 31 34 3A 8F 20 46 4F 52 4D 41 54 |9468,14:. FORMAT| 000015A0: 00 E5 1D 41 23 97 35 33 32 37 32 2C 32 B0 C2 28 |...A#.53272,2..(| 000015B0: 35 33 32 37 32 29 3A 99 22 93 12 20 20 20 20 20 |53272):.".. | 000015C0: 20 20 20 20 20 20 20 20 20 20 C1 44 52 45 53 53 | .DRESS| 000015D0: 20 36 34 20 20 20 20 20 20 20 20 20 20 20 20 20 | 64 | 000015E0: 20 20 20 92 22 00 00 1E 43 23 8D 36 31 30 30 30 | ."...C#.61000| 000015F0: 3A 20 8F 20 43 4F 4C 4F 52 20 43 48 41 4E 47 45 |: . COLOR CHANGE| 00001600: 00 42 1E 46 23 99 22 11 12 C3 92 41 53 53 45 54 |.B.F#."....ASSET| 00001610: 54 45 2C 20 12 C4 92 49 53 4B 45 54 54 45 2C 4F |TE, ...ISKETTE,O| 00001620: 46 20 12 42 92 45 49 44 45 4E 22 3B 3A 58 24 B2 |F .B.EIDEN";:X$.| 00001630: 22 44 43 42 22 3A 8D 38 30 36 30 3A 43 46 B2 49 |"DCB":.8060:CF.I| 00001640: AA 31 00 7A 1E 4B 23 81 49 B2 33 32 A4 39 30 3A |.1.z.K#.I.32.90:| 00001650: 87 4B 25 28 49 29 3A 82 3A 81 49 B2 31 39 33 A4 |.K%(I):.:.I.193.| 00001660: 32 31 38 3A 4B 25 28 49 29 B2 31 3A 82 3A 8F 20 |218:K%(I).1:.:. | 00001670: 43 48 41 52 20 41 52 52 41 59 00 B1 1E 50 23 42 |CHAR ARRAY...P#B| 00001680: 24 B2 22 20 20 20 20 20 22 3A 81 49 B2 31 A4 35 |$." ":.I.1.5| 00001690: 3A 42 24 B2 42 24 AA 42 24 3A 82 3A 42 30 24 B2 |:B$.B$.B$:.:B0$.| 000016A0: C8 28 42 24 2C 33 39 29 3A 9F 38 2C 30 38 2C 31 |.(B$,39):.8,08,1| 000016B0: 35 00 E8 1E 55 23 99 22 11 44 41 54 55 4D 20 3A |5...U#.".DATUM :| 000016C0: 20 22 3A 4D B2 36 30 3A 47 B2 31 3A 8D 38 32 30 | ":M.60:G.1:.820| 000016D0: 30 3A 47 B2 30 3A 44 24 B2 58 24 3A 8B 44 24 B2 |0:G.0:D$.X$:.D$.| 000016E0: 22 22 A7 44 24 B2 22 2D 00 0C 1F 6E 23 99 3A 81 |"".D$."-...n#.:.| 000016F0: 49 B2 30 A4 38 3A 87 46 24 28 49 29 3A 82 3A 8F |I.0.8:.F$(I):.:.| 00001700: 20 46 49 45 4C 44 20 4E 41 4D 45 53 00 2D 1F 78 | FIELD NAMES.-.x| 00001710: 23 81 49 B2 30 A4 36 3A 87 4B 24 28 49 29 3A 82 |#.I.0.6:.K$(I):.| 00001720: 3A 8F 20 43 41 54 45 47 4F 52 49 45 53 00 66 1F |:. CATEGORIES.f.| 00001730: 82 23 56 B2 B5 28 28 B8 28 30 29 AB 32 30 30 30 |.#V..((.(0).2000| 00001740: 29 AD 31 37 30 29 3A 86 54 24 28 56 2C 39 29 2C |).170):.T$(V,9),| 00001750: 54 25 28 56 29 3A 81 49 B2 30 A4 56 3A 54 25 28 |T%(V):.I.0.V:T%(| 00001760: 49 29 B2 49 3A 82 00 77 1F 1C 25 8F 20 49 4E 50 |I).I:..w..%. INP| 00001770: 55 54 20 46 49 4C 45 00 9A 1F 26 25 8B 43 46 B1 |UT FILE...&%.CF.| 00001780: 32 A7 99 22 11 D6 41 4E 20 43 41 53 53 45 54 54 |2.."..AN CASSETT| 00001790: 45 20 22 3B 3A 8D 38 30 35 30 00 CC 1F 30 25 8B |E ";:.8050...0%.| 000017A0: 43 46 B2 32 B0 28 43 46 B2 33 AF 49 B2 30 29 A7 |CF.2.(CF.3.I.0).| 000017B0: 8D 39 37 30 30 3A 91 49 89 31 30 30 3A 9F 31 2C |.9700:.I.100:.1,| 000017C0: 31 2C 30 2C 48 24 3A 89 39 36 30 30 00 EF 1F 4E |1,0,H$:.9600...N| 000017D0: 25 A0 31 3A 9F 31 2C 38 2C 32 2C 48 24 3A 84 38 |%.1:.1,8,2,H$:.8| 000017E0: 2C 58 2C 58 24 3A 8B 58 B2 30 89 39 36 30 30 00 |,X,X$:.X.0.9600.| 000017F0: 00 20 58 25 8D 39 37 30 30 3A 8B 49 89 31 30 30 |. X%.9700:.I.100| 00001800: 00 31 20 62 25 99 22 11 D6 4F 45 52 20 44 45 20 |.1 b%."..OER DE | 00001810: 47 4F 45 44 45 20 44 49 53 4B 45 54 54 45 20 49 |GOEDE DISKETTE I| 00001820: 4E 20 45 4E 22 3A 8D 38 30 30 30 3A 89 39 35 35 |N EN":.8000:.955| 00001830: 30 00 3B 20 80 25 58 24 B2 22 22 00 5D 20 83 25 |0.; .%X$."".] .%| 00001840: A1 23 31 2C 43 24 3A 8B 43 24 B3 B1 52 24 A7 58 |.#1,C$:.C$..R$.X| 00001850: 24 B2 58 24 AA 43 24 3A 89 39 36 30 33 00 89 20 |$.X$.C$:.9603.. | 00001860: 85 25 99 22 93 C5 4E 54 45 52 45 44 3A 20 12 22 |.%."..NTERED: ."| 00001870: 58 24 3A 99 3A 8F 20 44 41 54 45 4C 49 4E 45 20 |X$:.:. DATELINE | 00001880: 46 52 4F 4D 20 46 49 4C 45 00 BF 20 8A 25 81 49 |FROM FILE.. .%.I| 00001890: B2 30 A4 56 3A 84 31 2C 58 24 3A 8B 58 24 B2 22 |.0.V:.1,X$:.X$."| 000018A0: 5C 22 B0 53 54 B1 30 89 39 36 35 30 3A 8F 20 52 |\".ST.0.9650:. R| 000018B0: 45 41 44 49 4E 47 20 43 4F 4D 50 4C 45 54 45 00 |EADING COMPLETE.| 000018C0: F0 20 94 25 99 58 24 3A 54 24 28 49 2C 30 29 B2 |. .%.X$:T$(I,0).| 000018D0: 58 24 3A 81 4A B2 31 A4 39 3A 84 31 2C 54 24 28 |X$:.J.1.9:.1,T$(| 000018E0: 49 2C 4A 29 3A 82 3A 54 25 28 49 29 B2 49 3A 82 |I,J):.:T%(I).I:.| 000018F0: 00 0B 21 B2 25 4E 58 B2 49 AB 31 3A 89 31 30 30 |..!.%NX.I.1:.100| 00001900: 3A 8F 20 43 4F 4D 50 4C 45 54 45 00 30 21 E4 25 |:. COMPLETE.0!.%| 00001910: 99 22 11 CE 49 45 55 57 20 42 45 53 54 41 4E 44 |."..IEUW BESTAND| 00001920: 22 3B 3A 8D 38 30 35 30 3A 49 B2 31 AB 49 3A 8E |";:.8050:I.1.I:.| 00001930: 00 52 21 AC 26 8F 20 41 43 43 45 50 54 41 42 4C |.R!.&. ACCEPTABL| 00001940: 45 20 43 48 41 52 41 43 54 45 52 53 20 33 32 2D |E CHARACTERS 32-| 00001950: 39 30 00 97 21 B6 26 83 31 2C 31 2C 30 2C 31 2C |90..!.&.1,1,0,1,| 00001960: 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C |1,1,1,1,1,1,1,1,| 00001970: 30 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C |0,1,1,1,1,1,1,1,| 00001980: 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 30 2C 30 2C |1,1,1,1,1,1,0,0,| 00001990: 31 2C 31 2C 31 2C 31 00 D2 21 C0 26 83 31 2C 31 |1,1,1,1..!.&.1,1| 000019A0: 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 |,1,1,1,1,1,1,1,1| 000019B0: 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 |,1,1,1,1,1,1,1,1| 000019C0: 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 |,1,1,1,1,1,1,1,1| 000019D0: 2C 31 00 1D 22 CA 26 83 22 C1 43 48 54 45 52 4E |,1..".&.".CHTERN| 000019E0: 41 41 4D 22 2C 22 D6 4F 4F 52 4E 41 41 4D 20 22 |AAM",".OORNAAM "| 000019F0: 2C 22 C1 41 4E 48 45 46 20 28 42 2E 56 2E 20 CD |,".ANHEF (B.V. .| 00001A00: 49 4A 4E 48 45 45 52 2C C6 41 4D 2E 2C C6 49 52 |IJNHEER,.AM.,.IR| 00001A10: 4D 41 20 29 22 2C 22 D4 49 54 45 4C 22 00 60 22 |MA )",".ITEL".`"| 00001A20: D4 26 83 22 CF 52 47 41 4E 49 53 41 54 49 45 20 |.&.".RGANISATIE | 00001A30: 22 2C 22 D3 54 52 41 41 54 20 22 2C 22 D0 4F 53 |",".TRAAT ",".OS| 00001A40: 54 43 4F 44 45 20 20 22 2C 22 D7 4F 4F 4E 50 4C |TCODE ",".OONPL| 00001A50: 41 41 54 53 22 2C 22 D4 45 4C 45 46 4F 4F 4E 22 |AATS",".ELEFOON"| 00001A60: 00 77 22 10 27 8F 20 53 45 56 45 4E 20 43 41 54 |.w".'. SEVEN CAT| 00001A70: 45 47 4F 52 49 45 53 00 87 22 1A 27 83 20 22 C6 |EGORIES..".'. ".| 00001A80: 41 4D 49 4C 49 45 22 00 98 22 24 27 83 20 22 D6 |AMILIE".."$'. ".| 00001A90: 52 49 45 4E 44 45 4E 22 00 AA 22 2E 27 83 20 22 |RIENDEN"..".'. "| 00001AA0: C3 4F 4C 4C 45 47 41 27 53 22 00 B9 22 38 27 83 |.OLLEGA'S".."8'.| 00001AB0: 20 22 C1 52 54 53 45 4E 22 00 CE 22 42 27 83 20 | ".RTSEN".."B'. | 00001AC0: 22 C9 4E 53 54 45 4C 4C 49 4E 47 45 4E 22 00 DE |".NSTELLINGEN"..| 00001AD0: 22 4C 27 83 20 22 D3 43 48 4F 4C 45 4E 22 00 EF |"L'. ".CHOLEN"..| 00001AE0: 22 56 27 83 20 22 CF 56 45 52 49 47 45 4E 22 00 |"V'. ".VERIGEN".| 00001AF0: 02 23 60 EA 99 58 24 3A 8D 38 30 30 30 3A 89 31 |.#`..X$:.8000:.1| 00001B00: 30 30 00 1D 23 48 EE 8F 20 43 4F 4C 4F 52 20 43 |00..#H.. COLOR C| 00001B10: 48 41 4E 47 45 20 52 4F 55 54 49 4E 45 00 41 23 |HANGE ROUTINE.A#| 00001B20: 49 EE 96 A5 43 28 58 29 B2 C2 28 58 29 AA 31 AA |I...C(X)..(X).1.| 00001B30: 31 36 AC 28 28 C2 28 58 29 AF 31 35 29 B2 31 35 |16.((.(X).15).15| 00001B40: 29 00 64 23 4A EE 99 22 13 11 11 11 12 C6 31 92 |).d#J.."......1.| 00001B50: 3D 20 CB 4C 45 55 52 20 56 41 4E 20 44 45 20 52 |= .LEUR VAN DE R| 00001B60: 41 4E 44 22 00 85 23 4B EE 99 22 11 11 12 C6 33 |AND"..#K.."....3| 00001B70: 92 3D 20 C1 43 48 54 45 52 47 52 4F 4E 44 2D 4B |.= .CHTERGROND-K| 00001B80: 4C 45 55 52 22 00 A8 23 4C EE 99 22 11 11 12 C6 |LEUR"..#L.."....| 00001B90: 35 92 3D 20 CB 4C 45 55 52 20 56 41 4E 20 44 45 |5.= .LEUR VAN DE| 00001BA0: 20 54 45 4B 45 4E 53 22 00 C2 23 4D EE 99 22 11 | TEKENS"..#M..".| 00001BB0: 11 12 D2 C5 D4 D5 D2 CE 92 3D 20 D6 45 52 44 45 |.........= .ERDE| 00001BC0: 52 22 00 D4 23 52 EE A1 43 24 3A 8B 43 24 89 36 |R"..#R..C$:.C$.6| 00001BD0: 31 30 31 30 00 E9 23 5C EE A1 43 24 3A 8B 43 24 |1010..#\..C$:.C$| 00001BE0: B2 22 22 89 36 31 30 32 30 00 10 24 66 EE 43 B2 |."".61020..$f.C.| 00001BF0: C6 28 43 24 29 3A 8B 43 B2 31 33 35 A7 97 36 34 |.(C$):.C.135..64| 00001C00: 36 2C A5 43 28 36 34 36 29 3A 89 36 31 30 30 32 |6,.C(646):.61002| 00001C10: 00 3C 24 7A EE 43 B2 C6 28 43 24 29 3A 8B 43 B2 |.<$z.C..(C$):.C.| 00001C20: 31 33 33 B0 43 B2 31 33 34 A7 58 B2 35 33 31 34 |133.C.134.X.5314| 00001C30: 37 AA 43 3A 97 58 2C A5 43 28 58 29 00 4D 24 84 |7.C:.X,.C(X).M$.| 00001C40: EE 8B 43 B3 B1 31 33 89 36 31 30 31 30 00 53 24 |..C..13.61010.S$| 00001C50: 8E EE 8E 00 00 00 |...... |
..(.... *******************************
.O.... * *.
V.... * ADRES BESTAND CBM-64 *..
.... * *.D.
... * RINI VAN DE LEUR B.V. *....
.. * *.....
. * 83-11-24 *.9....
* *.`....
*******************************.|....G(
14):.657,128:.788,52......9000:. (C) RIN
I VAN DE LEUR B.V.......C$:.C$.20.N....C
$:.C$.." .";:C.F(C$):......."..";:.25...
D. 1:. MENU ENTRY.&.N.."..
ADRESS 64 ...".9.X.."FUN
CTIES:..".^.}..,".I.NVOEREN VAN NAAM EN
ADRES"......,".Z.OEKEN VAN EEN NAAM/ADRE
S"......,".A.FDRUKKEN VAN EEN NAAM/ADRES
".D....,".M.AILING ADRESSEN"... ..,".T.E
LEFOONBOEK AFDRUKKEN"......,".O.PSLAAN V
AN DE NAMEN/ADRESSEN".'....,".E.INDE PRO
GRAMMA".M....".KEUZE ";:X$."EIZAMOT":
.8060.R....I.4000,5000,7000,6000,3000,71
00......"..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.C.6.X$.T$(T,0):Y$.T$(T,1):.C(Y$).1.X
$.Y$." ".X$.H.@.Y$.T$(T,2):.C(Y$).1.X$.Y
$." ".X$...J.Y$.T$(T,3):.C(Y$).1.X$.X$."
, ".Y$.P.^.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:.
.7.K.BLOCKS .E..I.... OUTPUT FILE.X.B..3
020:.100.U.L.Y$.H$:.3500:.E(X$).60000.~.
V..X.......OF.0:.1,D$:....N..I.0.NX:T.T%
(I):.T$(T,0).G.X..J.0.9:.1,T$(T,J):.J,I.
..V..1,"\":.:. COMPLETE...... OPEN THE F
ILE TO WRITE.....DF.0:X.0:X$."":.CF.2.."
.OP CASSETTE ";:.8050.O.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......:.".BESTA
ND BESTAAT AL- OVERSCHRIJVEN";:.8050:.I.
X.1:..Q....8,"S"L$:.8,"I0......1,08,3,L$
.",S,W":.8,X,X$:.... .. CREATE AN ENTRY.
7....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.C....". ";:.I.1.30:.".
";:.:.I.1.5:."...";:.:.".";......I.1.30:
."...";:.:.I.1.5:."...";:.:."...."..I.0.
4:."."A$(J,I):.:.Y.8.4200.7.6.."........
.."B0$:."."F$(Y):.B0$"..M.;..8200:.C..13
.4120.W.=..:.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.X$.
"-":.Y.0..".WISSEN ";:.8050:.I.1.4900,4
110...^.T$(T,Y).X$:Y.Y.1:.4110.+.H.X$."1
234567".R$:. GET CATEGORIES.H.R.."......
...CATEGORIEEN:".C.|..I.0.6:.,:.X.2.I.."
.";.V....I.1"."K$(I):.......".HOE TOEWIJ
ZEN/WISSEN ? .";:.8070:I.2.I.E...X.(X.
I)..(X.I):.X.128.4210...L.T$(T,9).G(X):.
COMPLETE EDIT...V..".."B0$:.".ALLES OK
";:.8050:.I.4100.2....NX.1.100:. MUST B
E IN ORDER.L...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..
....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.-.
...I.0.9:T$(T,I)."":..^.8.NX.NX.1:.I.K.N
X:T%(I).T%(I.1):.:T%(I).T:.100.Y.... SEL
ECT/EDIT AN ENTRY. ....".":."ZOEKEN NAAR
: .A.CHTERNAAM"......," .V.OORNAAM".
N....," .P.OSTCODE"......," .W.OON
PLAATS/ADRES"......," .T.ELEFOON".0.N
..".KEUZE ";:X$."AVXXXXPWT":.8060:F.I
._.X.M.40:.".ZOEKEN NAAR:";:.8200:Z$.X$:
Z.C(Z$).Z...K.0:. SEARCH FOR FIELD.....T
.T%(K):X$.T$(T,F):Y.0.G....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):.......".VERDE
R ZOEKEN ";:.8050:.I.5180.)...K.K.1:.K
..NX.5110.L.(..:.".ALLES GETEST ":.8000:
.100.Q.<..".WIJZIGEN";:.8050:.I.100:.410
0...P.. FILE FOR WORD MACHINE.C.Z..".NAA
M VAN HET BESTAND:";:M.16:.8200:.X$."".6
010.....Y$.X$:.3500:.E(X$).60000......X.
100......7200:.".SPECIALE KEUZE ";:.8050
:SF.I:J.0:K.0.@...T.T%(K):.(F.F(T$(T,9))
).0.6180.W....SF..T$(T,0):.6100.W....300
:.".":.I.0.3:.A$(J,I):....J..".OVERNEME
";:.8050:.I.6180...T.. OUTPUT THE
FILE.V....I.0.7:.1,T$(T,I):.:DF..(DF)..
.$.K.K.1:.K..NX.6060."....1,"\":.DF..1..
SF.1.6220,100:. -1=EMPTY DISCFILE.K.8..
".GEEN ADRESSEN IN DEZE CATOGORIE.".D.B.
1:.8,"S0:"Y$:.8,"I0.S.L..8000:.100...X.
. PRINT LABELS...B.SF..1:M.30:.1,04:LL.9
999.M.L..".ENKELE KOLOM ETIKETTEN";:.805
0:Y.I......".PROEFAFDRUK ";:.8050:.I
.7090.#...P$."----------EERSTE REGEL----
----":.7900.Z....I.0.1:P$."-------------
-----------------":.7900:......P$."-----
-----LAATSTE REGEL-------":.I.1.3:.7900:
.:.7050......7200:.7300:.100:. OUTPUT LA
BELS.S.... PRINT PHONE BOOK...F.SF.0:M.3
6:Y.1:.1,04:L.0...P..".REGELS PER BLAD
"L0".....";:.LL.2.Z..7200:.7300:.7950:.1
00.E. .. GET CATEGORY.}.*..".ZOEKEN NAAR
:":.I.0.6:.,"."J(D(I.1),2)". "K$(I):....
4..,".8. ALLEN":.".UW KEUZE ";:X$."12345
678":.8060:F.2.I.W.>..:. ALL ARE OR-ED W
ITH 128...... PRINT EITHER.....J.Y:.K.0.
NX:T.T%(K):.(F.F(T$(T,9))).0.7380.7...J.
Y.J:.300:.SF.A$(J,4)."".E....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.M.T..K:.J.Y..I.0.4:P$.H(A$(0,I),M):
.7900:.:.7900.S.........L.L.1:.1,".".P$:
P$."":.L.LL..:. LINE OUT."...L.L.1:.1,".
".P$:P$."":.L.LL...P....L..L.L.LP.1:.1:.
:L.0:.:. FINISH THE PAGE.`.@.. UTILITIES
...J..".. DRUK EEN WILLKEURIGE TOETS IN"
;:.20:.:.".":....R.X$."JN...|.."? ";.V..
..20:.I.1.C(X$):.C$..J(X$,I,1)..:.8070..
...I.I.1:.C$;:.C.13..:.......W$:.W$.""..
"..";:.8080.!...." .";:.W$.R$..:..:....W
$.G(20)..W$;:.8070.D....8080._.. X$."":.
INPUT A STRING.P.. .C$:.C$.8210.... .25
:.C.13.....& .C.20.X$.""..C$;:X$.H(X$,C(
X$).1):. DELETE.X.+ .(127.C).32.8220:. C
URSOR CHARACTERS...0 .(K%(C).G)..C$;:X$.
X$.C$:.C(X$)..M.....: .8220...(#..>.-#L0
.60:LP.72:NX..1:R$.G(13):H$."NAME LIST._
.2#.K%(255),A$(1,4),K$(6),F$(8). .<#."..
............................".39)"..":.5
9468,14:. FORMAT...A#.53272,2.B(53272):.
".. ADRESS 64
."...C#.61000: . COLOR CHANGE.B.F#.".
.C.ASSETTE, .D.ISKETTE,OF .B.EIDEN";:X$.
"DCB":.8060:CF.I.1.Z.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 : ":M.60:G.1:.820
0:G.0:D$.X$:.D$."".D$."-...N#.:.I.0.8:.F
$(I):.:. FIELD NAMES.-.X#.I.0.6:.K$(I):.
:. CATEGORIES.F..#V..((.(0).2000).170):.
T$(V,9),T%(V):.I.0.V:T%(I).I:..W..%. INP
UT FILE...&%.CF.2..".VAN CASSETTE ";:.80
50.L.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.1 B%.".VOER DE
GOEDE DISKETTE IN EN":.8000:.9550.; .%X$
."".] .%.#1,C$:.C$..R$.X$.X$.C$:.9603..
.%.".ENTERED: ."X$:.:. DATELINE FROM FIL
E.. .%.I.0.V:.1,X$:.X$."\".ST.0.9650:. R
EADING COMPLETE.. .%.X$:T$(I,0).X$:.J.1.
9:.1,T$(I,J):.:T%(I).I:...!.%NX.I.1:.100
:. COMPLETE.0!.%.".NIEUW BESTAND";:.8050
:I.1.I:..R!.&. 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.R!.&.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 )","T
ITEL".`"T&."ORGANISATIE ","STRAAT ","POS
TCODE ","WOONPLAATS","TELEFOON".W".'. S
EVEN CATEGORIES..".'. "FAMILIE".."$'. "V
RIENDEN"..".'. "COLLEGA'S".."8'. "ARTSEN
".N"B'. "INSTELLINGEN".."L'. "SCHOLEN"..
"V'. "OVERIGEN"..#`..X$:.8000:.100..#H..
COLOR CHANGE ROUTINE.A#I...C(X).B(X).1.
16.((B(X).15).15).D#J..".....F1.= KLEUR
VAN DE RAND"..#K.."...F3.= ACHTERGROND-K
LEUR"..#L.."...F5.= KLEUR VAN DE TEKENS"
.B#M.."...RETURN.= VERDER".T#R..C$:.C$.6
1010..#\..C$:.C$."".61020..$F.C.F(C$):.C
.135..646,.C(646):.61002.<$Z.C.F(C$):.C.
133.C.134.X.53147.C:.X,.C(X).M$...C..13.
61010.S$......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL