EIGEN BEST.CASS
FILE INFORMATION
FILENAME(S): EIGEN BEST.CASS
FILE TYPE(S): PRG
FILE SIZE: 5.5K
FIRST SEEN: 2025-11-30 21:11:57
APPEARS ON: 1 disk(s)
FILE HASH
bb820ad35a45a1c793f8a49d7d449d486a1842756ebb477b694e5f773fa8d27e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HULPPRG 2 B | EIGEN BEST.CASS | PRG | DuncanTwain | 28 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2A 08 0A 00 97 35 33 32 38 30 2C 31 32 3A |..*....53280,12:|
00000010: 97 35 33 32 38 31 2C 31 35 3A 97 37 38 38 2C 35 |.53281,15:.788,5|
00000020: 32 3A 97 37 39 32 2C 31 39 33 00 46 08 14 00 8B |2:.792,193.F....|
00000030: C2 28 31 38 36 29 B2 38 A7 9F 31 35 2C 38 2C 31 |.(186).8..15,8,1|
00000040: 35 2C 22 49 30 22 00 8E 08 1E 00 41 44 24 28 31 |5,"I0".....AD$(1|
00000050: 29 B2 22 4E 41 41 4D 20 20 3A 22 3A 41 44 24 28 |)."NAAM :":AD$(|
00000060: 32 29 B2 22 41 44 52 45 53 20 3A 22 3A 41 44 24 |2)."ADRES :":AD$|
00000070: 28 33 29 B2 22 50 4C 41 41 54 53 3A 22 3A 41 44 |(3)."PLAATS:":AD|
00000080: 24 28 34 29 B2 22 54 45 4C 2E 20 20 3A 22 00 9C |$(4)."TEL. :"..|
00000090: 08 28 00 43 52 24 B2 C7 28 31 33 29 00 A6 08 32 |.(.CR$..(13)...2|
000000A0: 00 89 31 34 39 30 00 BB 08 37 00 8F 2A 2A 2A 57 |..1490...7..***W|
000000B0: 52 49 54 45 20 46 49 4C 45 2A 2A 00 ED 08 3C 00 |RITE FILE**...<.|
000000C0: 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1E 53 43 |."............SC|
000000D0: 48 52 49 4A 46 20 48 45 54 20 42 45 53 54 41 4E |HRIJF HET BESTAN|
000000E0: 44 1F 22 3A 8B 4E 24 B2 22 22 A7 37 30 00 26 09 |D.":.N$."".70.&.|
000000F0: 41 00 99 22 11 1D 45 52 20 49 53 20 52 45 45 44 |A.."..ER IS REED|
00000100: 53 20 45 45 4E 20 42 45 53 54 41 4E 44 20 41 41 |S EEN BESTAND AA|
00000110: 4E 57 45 5A 49 47 20 21 20 22 3A 8D 31 31 37 30 |NWEZIG ! ":.1170|
00000120: 3A 89 31 34 39 30 00 5A 09 46 00 99 22 11 1D 1D |:.1490.Z.F.."...|
00000130: 4F 4E 44 45 52 20 57 45 4C 4B 45 20 4E 41 41 4D |ONDER WELKE NAAM|
00000140: 3F 22 3A 85 4E 24 3A 8B 4E 24 B2 22 5F 22 A7 4E |?":.N$:.N$."_".N|
00000150: 24 B2 22 22 3A 89 31 34 39 30 00 8C 09 5A 00 99 |$."":.1490...Z..|
00000160: 22 11 1D 1D 48 4F 45 56 45 45 4C 20 41 44 52 45 |"...HOEVEEL ADRE|
00000170: 53 53 45 4E 3F 22 3A 85 41 24 3A 41 B2 C5 28 41 |SSEN?":.A$:A..(A|
00000180: 24 29 3A 8B 41 B3 31 A7 31 34 39 30 00 95 09 64 |$):.A.1.1490...d|
00000190: 00 8D 35 32 30 00 B6 09 82 00 81 49 B2 31 A4 41 |..520......I.1.A|
000001A0: 3A 99 22 93 11 1D 12 41 44 52 45 53 20 4E 52 2E |:."....ADRES NR.|
000001B0: 22 49 22 92 11 22 00 C1 09 8C 00 81 4C B2 31 A4 |"I".."......L.1.|
000001C0: 34 00 D7 09 96 00 99 41 44 24 28 4C 29 3B 3A 85 |4......AD$(L);:.|
000001D0: 41 24 28 49 2C 4C 29 00 E0 09 AA 00 82 4C 2C 49 |A$(I,L)......L,I|
000001E0: 00 0E 0A B4 00 99 22 11 11 11 1D 1C 4B 4C 41 41 |......".....KLAA|
000001F0: 52 21 22 3A 99 22 11 1D 12 44 52 55 4B 20 45 45 |R!":."...DRUK EE|
00000200: 4E 20 54 4F 45 54 53 1F 22 3A 8D 35 30 30 00 18 |N TOETS.":.500..|
00000210: 0A BE 00 89 31 34 39 30 00 2D 0A C8 00 8F 2A 2A |....1490.-....**|
00000220: 2A 52 45 41 44 20 46 49 4C 45 2A 2A 2A 00 52 0A |*READ FILE***.R.|
00000230: D2 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
00000240: 1E 49 4E 4C 45 5A 45 4E 20 42 45 53 54 41 4E 44 |.INLEZEN BESTAND|
00000250: 1F 22 00 86 0A D7 00 8B 4E 24 B3 B1 22 22 A7 99 |."......N$..""..|
00000260: 22 11 1D 42 45 53 54 41 4E 44 20 12 1C 22 4E 24 |"..BESTAND .."N$|
00000270: 22 92 1F 20 49 53 20 41 41 4E 57 45 5A 49 47 22 |".. IS AANWEZIG"|
00000280: 20 3A 89 32 31 38 00 90 0A D8 00 89 20 32 33 30 | :.218...... 230|
00000290: 00 B4 0A DA 00 99 22 11 1D 57 49 4C 20 4A 45 20 |......"..WIL JE |
000002A0: 45 45 4E 20 41 4E 44 45 52 20 42 45 53 54 41 4E |EEN ANDER BESTAN|
000002B0: 44 20 3F 22 00 CE 0A DB 00 8D 35 30 30 3A 8B 20 |D ?"......500:. |
000002C0: 57 41 24 B3 B1 22 4A 22 A7 20 31 34 39 30 00 D6 |WA$.."J". 1490..|
000002D0: 0A DC 00 99 3A 9C 00 03 0B E6 00 85 22 1D 11 57 |....:......."..W|
000002E0: 45 4C 4B 20 42 45 53 54 41 4E 44 22 3B 4E 24 3A |ELK BESTAND";N$:|
000002F0: 8B 4E 24 B2 22 5F 22 A7 4E 24 B2 22 22 3A 89 31 |.N$."_".N$."":.1|
00000300: 34 39 30 00 44 0B EB 00 99 22 11 1D 56 41 4E 20 |490.D...."..VAN |
00000310: 12 44 92 49 53 4B 20 4F 46 20 12 43 92 41 53 53 |.D.ISK OF .C.ASS|
00000320: 45 54 54 45 20 3F 22 3A 8D 35 30 30 3A 8B 57 41 |ETTE ?":.500:.WA|
00000330: 24 B3 B1 22 44 22 AF 57 41 24 B3 B1 22 43 22 A7 |$.."D".WA$.."C".|
00000340: 31 34 39 30 00 60 0B ED 00 8B 57 41 24 B2 22 43 |1490.`....WA$."C|
00000350: 22 A7 9F 32 2C 31 2C 30 2C 4E 24 3A 89 32 36 30 |"..2,1,0,N$:.260|
00000360: 00 76 0B F0 00 4A 24 B2 22 30 3A 22 AA 4E 24 AA |.v...J$."0:".N$.|
00000370: 22 2C 53 2C 52 22 00 84 0B FA 00 9F 32 2C 38 2C |",S,R"......2,8,|
00000380: 32 2C 4A 24 00 8D 0B 04 01 84 32 2C 41 00 96 0B |2,J$......2,A...|
00000390: 0E 01 8D 35 32 30 00 A8 0B 18 01 81 49 B2 31 A4 |...520......I.1.|
000003A0: 41 3A 81 4C B2 31 A4 34 00 B7 0B 22 01 84 32 2C |A:.L.1.4..."..2,|
000003B0: 41 24 28 49 2C 4C 29 00 C0 0B 2C 01 82 4C 2C 49 |A$(I,L)...,..L,I|
000003C0: 00 CB 0B 36 01 A0 32 3A 89 33 30 00 E7 0B 40 01 |...6..2:.30...@.|
000003D0: 8F 20 2A 2A 2A 2A 20 4C 41 54 45 4E 20 5A 49 45 |. **** LATEN ZIE|
000003E0: 4E 20 2A 2A 2A 2A 2A 00 FE 0B 45 01 8B 4E 24 B2 |N *****...E..N$.|
000003F0: 22 22 A7 8D 31 31 36 30 3A 89 31 34 39 30 00 07 |""..1160:.1490..|
00000400: 0C 4A 01 53 31 B2 31 00 16 0C 4F 01 81 50 B2 53 |.J.S1.1...O..P.S|
00000410: 31 A4 53 31 AA 33 00 2C 0C 54 01 99 3A 99 22 1C |1.S1.3.,.T..:.".|
00000420: 12 1D 41 44 52 45 53 22 50 22 1F 22 00 46 0C 5E |..ADRES"P".".F.^|
00000430: 01 81 4C B2 31 A4 34 3A 99 22 1D 22 41 24 28 50 |..L.1.4:."."A$(P|
00000440: 2C 4C 29 3A 82 4C 00 4D 0C 72 01 82 50 00 64 0C |,L):.L.M.r..P.d.|
00000450: 74 01 8D 35 30 30 3A 8B 57 41 24 B2 22 5F 22 A7 |t..500:.WA$."_".|
00000460: 31 34 39 30 00 81 0C 77 01 99 22 93 22 3B 3A 53 |1490...w..".";:S|
00000470: 31 B2 53 31 AA 34 3A 8B 53 31 B1 41 A7 31 34 39 |1.S1.4:.S1.A.149|
00000480: 30 00 8A 0C 79 01 89 33 33 35 00 9F 0C 7C 01 8F |0...y..335...|..|
00000490: 2A 2A 55 49 54 42 52 45 49 44 45 4E 2A 2A 2A 00 |**UITBREIDEN***.|
000004A0: B6 0C 86 01 8B 4E 24 B2 22 22 A7 8D 31 31 36 30 |.....N$.""..1160|
000004B0: 3A 89 31 34 39 30 00 F0 0C 90 01 99 22 93 11 1D |:.1490......"...|
000004C0: 4D 45 54 20 48 4F 45 56 45 45 4C 20 57 49 4C 20 |MET HOEVEEL WIL |
000004D0: 4A 45 20 55 49 54 42 52 45 49 44 45 4E 3F 20 28 |JE UITBREIDEN? (|
000004E0: 4D 41 58 2E 31 30 29 22 3A 85 42 24 3A 43 B2 41 |MAX.10)":.B$:C.A|
000004F0: 00 01 0D 92 01 8B 42 24 B2 22 5F 22 A7 31 34 39 |......B$."_".149|
00000500: 30 00 1B 0D 95 01 42 B2 C5 28 42 24 29 3A 8B 42 |0.....B..(B$):.B|
00000510: B3 31 B0 42 B1 31 30 A7 34 30 30 00 54 0D 9A 01 |.1.B.10.400.T...|
00000520: 41 B2 41 AA 31 3A 8B 41 B1 43 AA 42 A7 41 B2 41 |A.A.1:.A.C.B.A.A|
00000530: AB 31 3A 99 22 11 1C 20 12 44 52 55 4B 20 45 45 |.1:.".. .DRUK EE|
00000540: 4E 20 54 4F 45 54 53 1F 22 3A 8D 35 30 30 3A 89 |N TOETS.":.500:.|
00000550: 31 34 39 30 00 6C 0D A4 01 99 22 11 1D 1C 12 41 |1490.l...."....A|
00000560: 44 52 45 53 22 3B 41 22 1F 92 11 22 00 77 0D AE |DRES";A"...".w..|
00000570: 01 81 4C B2 31 A4 34 00 90 0D B8 01 99 41 44 24 |..L.1.4......AD$|
00000580: 28 4C 29 3B 3A 85 41 24 28 41 2C 4C 29 3A 82 4C |(L);:.A$(A,L):.L|
00000590: 00 99 0D C2 01 89 34 31 30 00 D1 0D CC 01 99 22 |......410......"|
000005A0: 11 1D 48 45 42 20 4A 45 20 44 45 20 57 49 4A 5A |..HEB JE DE WIJZ|
000005B0: 49 47 49 4E 47 45 4E 20 57 45 4C 20 57 45 47 47 |IGINGEN WEL WEGG|
000005C0: 45 53 43 48 52 45 56 45 4E 20 3F 22 3A 8D 35 30 |ESCHREVEN ?":.50|
000005D0: 30 00 E2 0D D6 01 8B 57 41 24 B2 22 4E 22 A7 36 |0......WA$."N".6|
000005E0: 37 35 00 10 0E E0 01 99 22 11 11 1D 4F 4B 2E 2E |75......"...OK..|
000005F0: 21 2C 20 54 4F 54 20 5A 49 45 4E 53 2E 22 3A 97 |!, TOT ZIENS.":.|
00000600: 37 38 38 2C 34 39 3A 97 37 39 32 2C 37 31 3A 80 |788,49:.792,71:.|
00000610: 00 2B 0E EA 01 99 22 11 1C 1D 12 44 52 55 4B 20 |.+...."....DRUK |
00000620: 45 45 4E 20 54 4F 45 54 53 1F 22 00 40 0E F4 01 |EEN TOETS.".@...|
00000630: A1 57 41 24 3A 8B 57 41 24 B2 22 22 A7 35 30 30 |.WA$:.WA$."".500|
00000640: 00 46 0E FE 01 8E 00 58 0E 08 02 86 41 24 28 41 |.F.....X....A$(A|
00000650: AA 31 30 2C 34 29 3A 8E 00 6D 0E 12 02 8F 2A 2A |.10,4):..m....**|
00000660: 2A 57 49 4A 5A 49 47 45 4E 2A 2A 2A 2A 00 84 0E |*WIJZIGEN****...|
00000670: 1C 02 8B 4E 24 B2 22 22 A7 8D 31 31 36 30 3A 89 |...N$.""..1160:.|
00000680: 31 34 39 30 00 B0 0E 26 02 99 22 11 1D 57 45 4C |1490...&.."..WEL|
00000690: 4B 20 4E 55 4D 4D 45 52 20 57 59 5A 49 47 45 4E |K NUMMER WYZIGEN|
000006A0: 20 22 3B 3A 85 4E 3A 8B 4E B1 41 A7 31 34 39 30 | ";:.N:.N.A.1490|
000006B0: 00 D2 0E 30 02 99 22 11 11 1D 1C 44 41 54 20 49 |...0.."....DAT I|
000006C0: 53 3A 1F 20 22 3A 99 22 11 1D 22 41 24 28 4E 2C |S:. ":.".."A$(N,|
000006D0: 31 29 00 F8 0E 3A 02 99 22 1C 11 1D 49 53 20 44 |1)...:.."...IS D|
000006E0: 41 54 20 44 45 20 47 4F 45 49 45 3F 28 4A 2F 4E |AT DE GOEIE?(J/N|
000006F0: 29 1F 22 3A 8D 35 30 30 00 13 0F 44 02 8B 57 41 |).":.500...D..WA|
00000700: 24 B3 B1 22 4A 22 AF 57 41 24 B3 B1 22 5F 22 A7 |$.."J".WA$.."_".|
00000710: 35 33 30 00 25 0F 49 02 8B 57 41 24 B2 22 5F 22 |530.%.I..WA$."_"|
00000720: A7 31 34 39 30 00 30 0F 4E 02 81 4C B2 31 A4 34 |.1490.0.N..L.1.4|
00000730: 00 4F 0F 58 02 99 22 11 1D 22 41 24 28 4E 2C 4C |.O.X..".."A$(N,L|
00000740: 29 3A 99 22 4D 4F 45 54 20 5A 49 4A 4E 3A 22 00 |):."MOET ZIJN:".|
00000750: 5C 0F 62 02 85 41 24 28 4E 2C 4C 29 00 63 0F 6C |\.b..A$(N,L).c.l|
00000760: 02 82 4C 00 80 0F 76 02 99 22 11 11 1D 4E 4F 47 |..L...v.."...NOG|
00000770: 20 4D 45 45 52 3F 20 4A 2F 4E 22 3A 8D 35 30 30 | MEER? J/N":.500|
00000780: 00 92 0F 80 02 8B 20 57 41 24 B2 22 4A 22 A7 35 |...... WA$."J".5|
00000790: 33 30 00 9C 0F 8A 02 89 31 34 39 30 00 B1 0F 94 |30......1490....|
000007A0: 02 8F 2A 2A 2A 42 45 57 41 52 45 4E 2A 2A 2A 2A |..***BEWAREN****|
000007B0: 2A 00 C8 0F 9E 02 8B 4E 24 B2 22 22 A7 8D 31 31 |*......N$.""..11|
000007C0: 36 30 3A 89 31 34 39 30 00 0A 10 A3 02 99 22 11 |60:.1490......".|
000007D0: 1D 4E 41 41 52 20 12 44 92 49 53 4B 20 4F 46 20 |.NAAR .D.ISK OF |
000007E0: 12 43 92 41 53 53 45 54 54 45 20 3F 22 3A 8D 35 |.C.ASSETTE ?":.5|
000007F0: 30 30 3A 8B 57 41 24 B3 B1 22 44 22 AF 57 41 24 |00:.WA$.."D".WA$|
00000800: B3 B1 22 43 22 A7 31 34 39 30 00 38 10 A8 02 99 |.."C".1490.8....|
00000810: 22 11 1D 44 41 4E 20 47 41 41 4E 20 57 45 20 48 |"..DAN GAAN WE H|
00000820: 45 54 20 42 45 53 54 41 4E 44 20 57 45 47 53 43 |ET BESTAND WEGSC|
00000830: 48 52 49 4A 56 45 4E 22 00 54 10 AD 02 8B 57 41 |HRIJVEN".T....WA|
00000840: 24 B2 22 43 22 A7 9F 32 2C 31 2C 31 2C 4E 24 3A |$."C"..2,1,1,N$:|
00000850: 89 37 31 30 00 6B 10 B2 02 4A 24 B2 22 40 30 3A |.710.k...J$."@0:|
00000860: 22 AA 4E 24 AA 22 2C 53 2C 57 22 00 79 10 BC 02 |".N$.",S,W".y...|
00000870: 9F 32 2C 38 2C 32 2C 4A 24 00 87 10 C6 02 98 32 |.2,8,2,J$......2|
00000880: 2C 41 2C 43 52 24 3B 00 92 10 D0 02 81 49 B2 31 |,A,CR$;......I.1|
00000890: A4 41 00 9D 10 DA 02 81 4C B2 31 A4 34 00 B0 10 |.A......L.1.4...|
000008A0: E4 02 98 32 2C 41 24 28 49 2C 4C 29 43 52 24 3B |...2,A$(I,L)CR$;|
000008B0: 00 BC 10 EE 02 82 4C 2C 49 3A A0 32 00 E8 10 F3 |......L,I:.2....|
000008C0: 02 99 22 11 1D 48 45 54 20 42 45 53 54 41 4E 44 |.."..HET BESTAND|
000008D0: 20 49 53 20 47 45 53 41 56 45 44 22 3A 8D 31 31 | IS GESAVED":.11|
000008E0: 37 30 3A 89 31 34 39 30 00 FD 10 F8 02 8F 2A 2A |70:.1490......**|
000008F0: 2A 2A 50 52 49 4E 54 45 4E 2A 2A 2A 2A 00 14 11 |**PRINTEN****...|
00000900: 02 03 8B 4E 24 B2 22 22 A7 8D 31 31 36 30 3A 89 |...N$.""..1160:.|
00000910: 31 34 39 30 00 5A 11 0C 03 99 22 93 11 1D 5A 45 |1490.Z...."...ZE|
00000920: 54 20 28 5A 4F 4E 4F 44 49 47 29 20 50 52 49 4E |T (ZONODIG) PRIN|
00000930: 54 45 52 20 41 41 4E 20 45 4E 20 44 52 55 4B 20 |TER AAN EN DRUK |
00000940: 20 20 20 20 20 20 44 41 41 52 4E 41 20 4F 50 20 | DAARNA OP |
00000950: 45 45 4E 20 54 4F 45 54 53 22 00 71 11 16 03 8D |EEN TOETS".q....|
00000960: 35 30 30 3A 8B 57 41 24 B2 22 5F 22 A7 31 34 39 |500:.WA$."_".149|
00000970: 30 00 8F 11 20 03 99 22 93 11 1D 57 41 54 20 57 |0... .."...WAT W|
00000980: 49 4C 54 20 55 20 50 52 49 4E 54 45 4E 20 3F 00 |ILT U PRINTEN ?.|
00000990: C8 11 2A 03 99 22 11 11 1D 1D 1D 31 29 20 41 4C |..*..".....1) AL|
000009A0: 4C 45 53 22 A3 34 33 29 22 11 32 29 20 53 45 4C |LES".43)".2) SEL|
000009B0: 45 43 54 49 45 22 3A 99 22 11 11 1D 54 59 50 45 |ECTIE":."...TYPE|
000009C0: 20 31 20 4F 46 20 32 22 00 E8 11 34 03 A1 57 41 | 1 OF 2"...4..WA|
000009D0: 24 3A 8B 57 41 24 B3 B1 22 31 22 AF 57 41 24 B3 |$:.WA$.."1".WA$.|
000009E0: B1 22 32 22 A7 38 32 30 00 06 12 3E 03 8B 20 57 |."2".820...>.. W|
000009F0: 41 24 B2 22 31 22 A7 99 22 11 11 1D 4F 4B 20 21 |A$."1".."...OK !|
00000A00: 22 3A 89 39 31 30 00 4C 12 48 03 99 22 93 11 1D |":.910.L.H.."...|
00000A10: 54 59 50 45 20 27 4A 27 20 4F 46 20 27 4E 27 20 |TYPE 'J' OF 'N' |
00000A20: 56 4F 4F 52 20 55 57 20 4B 45 55 53 20 20 20 20 |VOOR UW KEUS |
00000A30: 20 20 20 20 20 20 20 20 28 27 5F 27 20 3D 20 4F | ('_' = O|
00000A40: 4E 44 45 52 42 52 45 4B 45 4E 29 22 00 69 12 52 |NDERBREKEN)".i.R|
00000A50: 03 81 4B B2 31 A4 41 3A 99 22 11 1D 22 41 24 28 |..K.1.A:.".."A$(|
00000A60: 4B 2C 31 29 22 20 3F 22 3B 00 8E 12 5C 03 A1 4B |K,1)" ?";...\..K|
00000A70: 24 3A 8B 4B 24 B3 B1 22 4A 22 AF 4B 24 B3 B1 22 |$:.K$.."J".K$.."|
00000A80: 4E 22 AF 4B 24 B3 B1 22 5F 22 A7 38 36 30 00 A5 |N".K$.."_".860..|
00000A90: 12 66 03 8B 4B 24 B2 22 5F 22 A7 54 4C B2 30 3A |.f..K$."_".TL.0:|
00000AA0: 89 31 34 39 30 00 BC 12 70 03 8B 4B 24 B2 22 4E |.1490...p..K$."N|
00000AB0: 22 A7 99 22 20 4E 22 3A 89 39 30 30 00 E9 12 7A |".." N":.900...z|
00000AC0: 03 99 22 20 4A 22 3A 54 4C B2 54 4C AA 31 3A 81 |.." J":TL.TL.1:.|
00000AD0: 57 B2 31 A4 34 3A 41 24 28 54 4C 2C 57 29 B2 41 |W.1.4:A$(TL,W).A|
00000AE0: 24 28 4B 2C 57 29 3A 82 57 00 F5 12 84 03 82 4B |$(K,W):.W......K|
00000AF0: 3A 89 39 37 30 00 FE 12 8E 03 9F 34 2C 34 00 10 |:.970......4,4..|
00000B00: 13 98 03 81 49 B2 31 A4 41 3A 81 4C B2 31 A4 33 |....I.1.A:.L.1.3|
00000B10: 00 1F 13 A2 03 98 34 2C 41 24 28 49 2C 4C 29 00 |......4,A$(I,L).|
00000B20: 26 13 AC 03 82 4C 00 3D 13 B1 03 A1 42 52 24 3A |&....L.=....BR$:|
00000B30: 8B 42 52 24 B3 B1 22 5F 22 A7 39 35 30 00 4A 13 |.BR$.."_".950.J.|
00000B40: B3 03 A0 34 3A 89 31 34 39 30 00 5D 13 B6 03 81 |...4:.1490.]....|
00000B50: 52 41 B2 31 A4 36 3A 98 34 3A 82 52 41 00 6D 13 |RA.1.6:.4:.RA.m.|
00000B60: C0 03 82 49 3A A0 34 3A 89 31 34 39 30 00 85 13 |...I:.4:.1490...|
00000B70: CA 03 9F 34 2C 34 3A 8B 54 4C B2 30 A7 A0 34 3A |...4,4:.TL.0..4:|
00000B80: 89 31 34 39 30 00 98 13 D4 03 81 49 B2 31 A4 54 |.1490......I.1.T|
00000B90: 4C 3A 81 4C B2 31 A4 33 00 A7 13 DE 03 98 34 2C |L:.L.1.3......4,|
00000BA0: 41 24 28 49 2C 4C 29 00 AE 13 E8 03 82 4C 00 C1 |A$(I,L)......L..|
00000BB0: 13 F2 03 81 52 41 B2 31 A4 36 3A 98 34 3A 82 52 |....RA.1.6:.4:.R|
00000BC0: 41 00 D1 13 FC 03 82 49 3A A0 34 3A 89 31 34 39 |A......I:.4:.149|
00000BD0: 30 00 E6 13 06 04 8F 2A 2A 56 45 52 57 49 4A 44 |0......**VERWIJD|
00000BE0: 45 52 45 4E 2A 2A 00 FD 13 10 04 8B 4E 24 B2 22 |EREN**......N$."|
00000BF0: 22 A7 8D 31 31 36 30 3A 89 31 34 39 30 00 37 14 |"..1160:.1490.7.|
00000C00: 1A 04 99 22 11 1D 57 45 4C 4B 20 4E 55 4D 4D 45 |..."..WELK NUMME|
00000C10: 52 20 57 49 4C 20 4A 45 20 56 45 52 57 49 4A 44 |R WIL JE VERWIJD|
00000C20: 45 52 45 4E 3F 22 3A 85 56 24 3A 8B 56 24 B2 22 |EREN?":.V$:.V$."|
00000C30: 5F 22 A7 31 34 39 30 00 51 14 24 04 56 B2 C5 28 |_".1490.Q.$.V..(|
00000C40: 56 24 29 3A 8B 56 B1 41 B0 56 B3 31 A7 31 30 33 |V$):.V.A.V.1.103|
00000C50: 30 00 71 14 2E 04 99 22 11 11 1D 1C 44 41 54 20 |0.q...."....DAT |
00000C60: 49 53 3A 1F 22 3A 99 22 1D 22 41 24 28 56 2C 31 |IS:.":."."A$(V,1|
00000C70: 29 00 8F 14 38 04 99 22 1C 1D 5A 45 4B 45 52 20 |)...8.."..ZEKER |
00000C80: 57 45 54 45 4E 3F 3F 28 4A 2F 4E 29 1F 11 22 00 |WETEN??(J/N)..".|
00000C90: A3 14 42 04 A1 56 24 3A 8B 56 24 B2 22 22 A7 31 |..B..V$:.V$."".1|
00000CA0: 30 39 30 00 B5 14 4C 04 8B 56 24 B3 B1 22 4A 22 |090...L..V$.."J"|
00000CB0: A7 31 30 33 30 00 C3 14 56 04 81 56 57 B2 56 A4 |.1030...V..VW.V.|
00000CC0: 41 AB 31 00 DB 14 60 04 41 24 28 56 57 2C 31 29 |A.1...`.A$(VW,1)|
00000CD0: B2 41 24 28 56 57 AA 31 2C 31 29 00 F3 14 6A 04 |.A$(VW.1,1)...j.|
00000CE0: 41 24 28 56 57 2C 32 29 B2 41 24 28 56 57 AA 31 |A$(VW,2).A$(VW.1|
00000CF0: 2C 32 29 00 0B 15 74 04 41 24 28 56 57 2C 33 29 |,2)...t.A$(VW,3)|
00000D00: B2 41 24 28 56 57 AA 31 2C 33 29 00 2B 15 79 04 |.A$(VW.1,3).+.y.|
00000D10: 41 24 28 56 57 2C 34 29 B2 41 24 28 56 57 AA 31 |A$(VW,4).A$(VW.1|
00000D20: 2C 34 29 3A 82 3A 41 B2 41 AB 31 00 60 15 7E 04 |,4):.:A.A.1.`.~.|
00000D30: 99 22 11 11 1D 56 45 52 57 49 4A 44 45 52 44 21 |."...VERWIJDERD!|
00000D40: 22 3A 99 22 11 11 11 1C 12 44 52 55 4B 20 54 4F |":.".....DRUK TO|
00000D50: 45 54 53 1F 22 3A 8D 35 30 30 3A 89 31 34 39 30 |ETS.":.500:.1490|
00000D60: 00 88 15 88 04 99 22 93 11 1D 45 52 20 49 53 20 |......"...ER IS |
00000D70: 47 45 45 4E 20 42 45 53 54 41 4E 44 20 41 41 4E |GEEN BESTAND AAN|
00000D80: 57 45 5A 49 47 2E 21 22 00 9B 15 92 04 81 56 54 |WEZIG.!"......VT|
00000D90: B2 31 A4 32 30 30 30 3A 82 3A 8E 00 AF 15 9C 04 |.1.2000:.:......|
00000DA0: 8F 2A 2A 2A 5A 4F 45 4B 45 4E 2A 2A 2A 2A 2A 00 |.***ZOEKEN*****.|
00000DB0: C6 15 A6 04 8B 4E 24 B2 22 22 A7 8D 31 31 36 30 |.....N$.""..1160|
00000DC0: 3A 89 31 34 39 30 00 E5 15 B0 04 99 22 93 11 1D |:.1490......"...|
00000DD0: 57 41 54 20 57 49 4C 54 20 55 20 5A 4F 45 4B 45 |WAT WILT U ZOEKE|
00000DE0: 4E 3F 11 11 22 00 1F 16 BA 04 99 22 1D 1D 1D 1D |N?.."......"....|
00000DF0: 31 29 20 4E 41 41 4D 22 3A 99 22 11 1D 1D 1D 1D |1) NAAM":.".....|
00000E00: 32 29 20 41 44 52 45 53 22 3A 99 22 11 1D 1D 1D |2) ADRES":."....|
00000E10: 1D 33 29 20 57 4F 4F 4E 50 4C 41 41 54 53 22 00 |.3) WOONPLAATS".|
00000E20: 38 16 C4 04 99 22 11 11 1D 54 59 50 45 20 31 2C |8...."...TYPE 1,|
00000E30: 20 32 20 4F 46 20 33 22 00 62 16 CE 04 A1 5A 4F | 2 OF 3".b....ZO|
00000E40: 24 3A 8B 5A 4F 24 B3 B1 22 31 22 AF 5A 4F 24 B3 |$:.ZO$.."1".ZO$.|
00000E50: B1 22 32 22 AF 5A 4F 24 B3 B1 22 33 22 A7 31 32 |."2".ZO$.."3".12|
00000E60: 33 30 00 85 16 D8 04 8B 5A 4F 24 B2 22 31 22 A7 |30......ZO$."1".|
00000E70: 5A 4F 24 B2 22 20 4E 41 41 4D 22 3A 5A B2 31 3A |ZO$." NAAM":Z.1:|
00000E80: 89 31 32 37 30 00 AA 16 E2 04 8B 5A 4F 24 B2 22 |.1270......ZO$."|
00000E90: 32 22 A7 5A 4F 24 B2 22 9D 20 41 44 52 45 53 22 |2".ZO$.". ADRES"|
00000EA0: 3A 5A B2 32 3A 89 31 32 37 30 00 CD 16 EC 04 8B |:Z.2:.1270......|
00000EB0: 5A 4F 24 B2 22 33 22 A7 5A 4F 24 B2 22 20 57 4F |ZO$."3".ZO$." WO|
00000EC0: 4F 4E 50 4C 41 41 54 53 22 3A 5A B2 33 00 EE 16 |ONPLAATS":Z.3...|
00000ED0: F6 04 99 22 11 1D 57 45 4C 4B 45 22 5A 4F 24 22 |..."..WELKE"ZO$"|
00000EE0: 3F 22 3A 85 5A 24 3A 4C B2 C3 28 5A 24 29 00 F8 |?":.Z$:L..(Z$)..|
00000EF0: 16 00 05 8D 31 33 34 30 00 11 17 0A 05 81 50 B2 |....1340......P.|
00000F00: 31 A4 41 3A 4C 32 B2 C3 28 41 24 28 50 2C 5A 29 |1.A:L2..(A$(P,Z)|
00000F10: 29 00 21 17 14 05 81 52 B2 31 A4 4C 32 AB 4C AA |).!....R.1.L2.L.|
00000F20: 31 00 43 17 1E 05 8B CA 28 41 24 28 50 2C 5A 29 |1.C.....(A$(P,Z)|
00000F30: 2C 52 2C 4C 29 B2 5A 24 A7 48 55 B2 31 3A 8D 31 |,R,L).Z$.HU.1:.1|
00000F40: 33 36 30 00 5D 17 28 05 82 52 2C 50 3A 8B 48 55 |360.].(..R,P:.HU|
00000F50: B2 31 A7 48 55 B2 30 3A 89 31 34 39 30 00 8D 17 |.1.HU.0:.1490...|
00000F60: 32 05 99 22 93 11 1D 4E 49 45 54 20 41 41 4E 57 |2.."...NIET AANW|
00000F70: 45 5A 49 47 2E 2E 21 22 3A 81 56 54 B2 30 A4 31 |EZIG..!":.VT.0.1|
00000F80: 30 30 30 3A 82 56 54 3A 89 31 34 39 30 00 BE 17 |000:.VT:.1490...|
00000F90: 3C 05 99 22 93 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |<..".-----------|
00000FA0: 2D 3E 20 20 41 44 52 45 53 22 50 22 20 3C 2D 2D |-> ADRES"P" <--|
00000FB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 11 22 00 E2 |------------."..|
00000FC0: 17 3E 05 99 22 13 11 11 11 D5 22 3B 3A 81 50 52 |.>..".....";:.PR|
00000FD0: B2 31 A4 33 37 3A 99 22 C0 22 3B 3A 82 3A 99 22 |.1.37:.".";:.:."|
00000FE0: C9 22 00 FB 17 40 05 99 22 DD 20 4E 41 41 4D 20 |."...@..". NAAM |
00000FF0: 20 20 3A 22 A3 33 38 29 22 DD 22 00 1B 18 42 05 | :".38)"."...B.|
00001000: 99 22 DD 22 3B 3A 81 50 52 B2 31 A4 33 37 3A 99 |.".";:.PR.1.37:.|
00001010: 22 C0 22 3B 3A 82 3A 99 22 DD 22 00 34 18 44 05 |".";:.:.".".4.D.|
00001020: 99 22 DD 20 41 44 52 45 53 20 20 3A 22 A3 33 38 |.". ADRES :".38|
00001030: 29 22 DD 22 00 54 18 46 05 99 22 DD 22 3B 3A 81 |)".".T.F..".";:.|
00001040: 50 52 B2 31 A4 33 37 3A 99 22 C0 22 3B 3A 82 3A |PR.1.37:.".";:.:|
00001050: 99 22 DD 22 00 6D 18 48 05 99 22 DD 20 50 4C 41 |.".".m.H..". PLA|
00001060: 41 54 53 20 3A 22 A3 33 38 29 22 DD 22 00 8D 18 |ATS :".38)"."...|
00001070: 4A 05 99 22 DD 22 3B 3A 81 50 52 B2 31 A4 33 37 |J..".";:.PR.1.37|
00001080: 3A 99 22 C0 22 3B 3A 82 3A 99 22 DD 22 00 A6 18 |:.".";:.:."."...|
00001090: 4C 05 99 22 DD 20 54 45 4C 2E 20 20 20 3A 22 A3 |L..". TEL. :".|
000010A0: 33 38 29 22 DD 22 00 C8 18 4E 05 99 22 CA 22 3B |38)"."...N..".";|
000010B0: 3A 81 50 52 B2 31 A4 33 37 3A 99 22 C0 22 3B 3A |:.PR.1.37:.".";:|
000010C0: 82 3A 99 22 CB 22 3A 8E 00 DA 18 50 05 99 22 13 |.:.".":....P..".|
000010D0: 22 A3 32 30 29 50 22 9D 20 22 00 05 19 51 05 99 |".20)P". "...Q..|
000010E0: 22 13 11 11 22 3A 81 47 B2 31 A4 34 3A 99 22 11 |"...":.G.1.4:.".|
000010F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 41 24 28 50 |..........."A$(P|
00001100: 2C 47 29 3A 82 00 22 19 52 05 99 22 11 11 11 1C |,G):..".R.."....|
00001110: 1D 12 44 52 55 4B 20 45 45 4E 20 54 4F 45 54 53 |..DRUK EEN TOETS|
00001120: 1F 22 00 38 19 54 05 A1 57 41 24 3A 8B 57 41 24 |.".8.T..WA$:.WA$|
00001130: B2 22 22 A7 31 33 36 34 00 77 19 56 05 99 22 13 |."".1364.w.V..".|
00001140: 11 11 22 3A 81 47 B2 31 A4 34 3A 99 22 11 1D 1D |..":.G.1.4:."...|
00001150: 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 20 20 20 20 |......... |
00001160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001170: 20 20 20 20 22 3A 82 00 7D 19 58 05 8E 00 A0 19 | ":..}.X.....|
00001180: 5A 05 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 20 53 4F 52 |Z.. ******** SOR|
00001190: 54 45 52 45 4E 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |TEREN **********|
000011A0: 00 B7 19 5F 05 8B 4E 24 B2 22 22 A7 8D 31 31 36 |..._..N$.""..116|
000011B0: 30 3A 89 31 34 39 30 00 FA 19 64 05 99 22 93 2A |0:.1490...d..".*|
000011C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 53 4F 52 54 45 |***********SORTE|
000011D0: 52 45 4E 20 4F 50 20 4E 41 41 4D 2A 2A 2A 2A 2A |REN OP NAAM*****|
000011E0: 2A 2A 2A 2A 2A 2A 2A 11 11 1D 44 41 54 20 44 55 |*******...DAT DU|
000011F0: 55 52 54 20 45 56 45 4E 21 22 00 07 1A 6E 05 81 |URT EVEN!"...n..|
00001200: 4C B2 31 A4 41 AB 31 00 2C 1A 78 05 99 22 13 11 |L.1.A.1.,.x.."..|
00001210: 11 11 11 11 11 1D 4E 4F 47 22 41 AB 31 AB 4C 22 |......NOG"A.1.L"|
00001220: 9D 20 41 44 52 45 53 53 45 4E 20 22 00 39 1A 82 |. ADRESSEN ".9..|
00001230: 05 81 53 B2 31 A4 41 AB 31 00 55 1A 8C 05 8B 41 |..S.1.A.1.U....A|
00001240: 24 28 53 2C 31 29 B3 41 24 28 53 AA 31 2C 31 29 |$(S,1).A$(S.1,1)|
00001250: A7 31 34 37 30 00 83 1A 96 05 42 24 B2 41 24 28 |.1470.....B$.A$(|
00001260: 53 2C 31 29 3A 41 24 28 53 2C 31 29 B2 41 24 28 |S,1):A$(S,1).A$(|
00001270: 53 AA 31 2C 31 29 3A 41 24 28 53 AA 31 2C 31 29 |S.1,1):A$(S.1,1)|
00001280: B2 42 24 00 B1 1A A0 05 43 24 B2 41 24 28 53 2C |.B$.....C$.A$(S,|
00001290: 32 29 3A 41 24 28 53 2C 32 29 B2 41 24 28 53 AA |2):A$(S,2).A$(S.|
000012A0: 31 2C 32 29 3A 41 24 28 53 AA 31 2C 32 29 B2 43 |1,2):A$(S.1,2).C|
000012B0: 24 00 DF 1A AA 05 44 24 B2 41 24 28 53 2C 33 29 |$.....D$.A$(S,3)|
000012C0: 3A 41 24 28 53 2C 33 29 B2 41 24 28 53 AA 31 2C |:A$(S,3).A$(S.1,|
000012D0: 33 29 3A 41 24 28 53 AA 31 2C 33 29 B2 44 24 00 |3):A$(S.1,3).D$.|
000012E0: 0D 1B B4 05 45 24 B2 41 24 28 53 2C 34 29 3A 41 |....E$.A$(S,4):A|
000012F0: 24 28 53 2C 34 29 B2 41 24 28 53 AA 31 2C 34 29 |$(S,4).A$(S.1,4)|
00001300: 3A 41 24 28 53 AA 31 2C 34 29 B2 45 24 00 16 1B |:A$(S.1,4).E$...|
00001310: BE 05 82 53 2C 4C 00 2E 1B C8 05 99 22 11 11 11 |...S,L......"...|
00001320: 1D 4B 4C 41 41 52 21 21 22 3A 8D 34 39 30 00 61 |.KLAAR!!":.490.a|
00001330: 1B D2 05 99 22 93 1C C5 C5 C5 C5 C5 C5 C5 C5 C5 |...."...........|
00001340: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001350: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 |..............."|
00001360: 3B 00 8C 1B DC 05 99 22 20 20 4A 42 4D 20 20 20 |;......" JBM |
00001370: 12 1C 4D 20 45 20 4E 20 55 92 20 20 20 20 42 45 |..M E N U. BE|
00001380: 53 54 41 4E 44 3A 20 12 1E 22 4E 24 00 BD 1B E6 |STAND: .."N$....|
00001390: 05 99 22 1C C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |..".............|
000013A0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
000013B0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 D1 1B |............"...|
000013C0: F0 05 99 22 1D 1D 1E 4A 45 20 4B 55 4E 54 3A 1F |..."...JE KUNT:.|
000013D0: 22 00 EF 1B FA 05 99 22 11 1D 1D 20 20 31 29 20 |"......"... 1) |
000013E0: 42 45 53 54 41 4E 44 20 49 4E 4C 45 5A 45 4E 00 |BESTAND INLEZEN.|
000013F0: 0A 1C 04 06 99 22 1D 1D 20 20 32 29 20 42 45 53 |.....".. 2) BES|
00001400: 54 41 4E 44 20 4D 41 4B 45 4E 00 22 1C 0E 06 99 |TAND MAKEN."....|
00001410: 22 1D 1D 20 20 33 29 20 4C 41 54 45 4E 20 5A 49 |".. 3) LATEN ZI|
00001420: 45 4E 00 3A 1C 18 06 99 22 1D 1D 20 20 34 29 20 |EN.:....".. 4) |
00001430: 55 49 54 42 52 45 49 44 45 4E 00 50 1C 22 06 99 |UITBREIDEN.P."..|
00001440: 22 1D 1D 20 20 35 29 20 57 49 4A 5A 49 47 45 4E |".. 5) WIJZIGEN|
00001450: 00 65 1C 2C 06 99 22 1D 1D 20 20 36 29 20 50 52 |.e.,..".. 6) PR|
00001460: 49 4E 54 45 4E 00 7E 1C 36 06 99 22 1D 1D 20 20 |INTEN.~.6..".. |
00001470: 37 29 20 56 45 52 57 49 4A 44 45 52 45 4E 00 93 |7) VERWIJDEREN..|
00001480: 1C 40 06 99 22 1D 1D 20 20 38 29 20 42 45 57 41 |.@..".. 8) BEWA|
00001490: 52 45 4E 00 A7 1C 4A 06 99 22 1D 1D 20 20 39 29 |REN...J..".. 9)|
000014A0: 20 5A 4F 45 4B 45 4E 00 BD 1C 54 06 99 22 1D 1D | ZOEKEN...T.."..|
000014B0: 20 31 30 29 20 53 4F 52 54 45 52 45 4E 00 D2 1C | 10) SORTEREN...|
000014C0: 5E 06 99 22 1D 1D 20 31 31 29 20 53 54 4F 50 50 |^..".. 11) STOPP|
000014D0: 45 4E 00 E4 1C 63 06 99 22 1D 1D 20 20 5F 29 20 |EN...c..".. _) |
000014E0: 4D 45 4E 55 00 21 1D 68 06 8B 4E 24 B2 22 22 A7 |MENU.!.h..N$."".|
000014F0: 99 22 11 1D 1D 1E 45 45 52 53 54 20 45 45 4E 20 |."....EERST EEN |
00001500: 42 45 53 54 41 4E 44 20 4D 41 4B 45 4E 20 4F 46 |BESTAND MAKEN OF|
00001510: 20 49 4E 4C 45 5A 45 4E 21 21 22 3A 89 31 36 36 | INLEZEN!!":.166|
00001520: 30 00 40 1D 7C 06 99 22 11 11 1D 1D 1C 57 41 54 |0.@.|..".....WAT|
00001530: 20 49 53 20 4A 45 20 4B 45 55 53 3F 1F 13 22 3B | IS JE KEUS?..";|
00001540: 00 65 1D 86 06 99 22 13 11 11 11 11 11 11 1D 1D |.e....".........|
00001550: 22 3B 3A 85 20 4B 24 3A 99 22 93 22 3B 3A 4B B2 |";:. K$:.".";:K.|
00001560: C5 28 4B 24 29 00 78 1D 90 06 8B 4B B3 31 B0 4B |.(K$).x....K.1.K|
00001570: B1 31 31 A7 31 34 39 30 00 AF 1D 9A 06 91 20 4B |.11.1490...... K|
00001580: 20 89 32 30 30 2C 36 30 2C 33 32 30 2C 33 38 30 | .200,60,320,380|
00001590: 2C 35 33 30 2C 37 37 30 2C 31 30 33 30 2C 36 36 |,530,770,1030,66|
000015A0: 30 2C 31 31 38 30 2C 31 33 37 30 2C 34 36 30 00 |0,1180,1370,460.|
000015B0: C0 1D 6C 07 8F 22 14 14 14 14 14 14 14 14 14 3A |..l..".........:|
000015C0: 00 EA 1D D0 07 8F 22 14 14 14 14 14 14 14 14 14 |......".........|
000015D0: 48 41 4E 53 20 4D 45 49 4A 45 52 2F 54 45 4C 2E |HANS MEIJER/TEL.|
000015E0: 30 33 30 2D 37 31 32 34 39 36 00 00 00 FF |030-712496.... |
..*....53280,12:.53281,15:.788,52:.792,1
93.F....B(186).8..15,8,15,"I0".....AD$(1
)."NAAM :":AD$(2)."ADRES :":AD$(3)."PLA
ATS:":AD$(4)."TEL. :"...(.CR$.G(13)...2
..1490...7..***WRITE FILE**...<.."......
......SCHRIJF HET BESTAND.":.N$."".70.&.
A.."..ER IS REEDS EEN BESTAND AANWEZIG !
":.1170:.1490.Z.F.."...ONDER WELKE NAAM
?":.N$:.N$."_".N$."":.1490...Z.."...HOEV
EEL ADRESSEN?":.A$:A.E(A$):.A.1.1490...D
..520......I.1.A:."....ADRES NR."I"..".A
....L.1.4.W....AD$(L);:.A$(I,L)......L,I
......".....KLAAR!":."...DRUK EEN TOETS.
":.500......1490.-.H..***READ FILE***.R.
R..".............INLEZEN BESTAND."...W..
N$.."".."..BESTAND .."N$".. IS AANWEZIG"
:.218...X.. 230...Z.."..WIL JE EEN ANDE
R BESTAND ?".N....500:. WA$.."J". 1490.V
....:......."..WELK BESTAND";N$:.N$."_".
N$."":.1490.D...."..VAN .D.ISK OF .C.ASS
ETTE ?":.500:.WA$.."D".WA$.."C".1490.`..
..WA$."C"..2,1,0,N$:.260.V...J$."0:".N$.
",S,R"......2,8,2,J$......2,A......520..
....I.1.A:.L.1.4..."..2,A$(I,L)...,..L,I
.K.6. 2:.30...@.. **** LATEN ZIEN *****.
..E..N$.""..1160:.1490...J.S1.1...O..P.S
1.S1.3.,.T..:."...ADRES"P".".F.^..L.1.4:
."."A$(P,L):.L.M.R..P.D.T..500:.WA$."_".
1490...W..".";:S1.S1.4:.S1.A.1490...Y..3
35...|..**UITBREIDEN***......N$.""..1160
:.1490......"...MET HOEVEEL WIL JE UITBR
EIDEN? (MAX.10)":.B$:C.A......B$."_".149
0.....B.E(B$):.B.1.B.10.400.T...A.A.1:.A
.C.B.A.A.1:.".. .DRUK EEN TOETS.":.500:.
1490.L...."....ADRES";A"...".W....L.1.4.
.....AD$(L);:.A$(A,L):.L...B..410.Q.L.."
..HEB JE DE WIJZIGINGEN WEL WEGGESCHREVE
N ?":.500...V..WA$."N".675......"...OK..
!, TOT ZIENS.":.788,49:.792,71:..+....".
...DRUK EEN TOETS.".@....WA$:.WA$."".500
.F.....X....A$(A.10,4):..M....***WIJZIGE
N****......N$.""..1160:.1490...&.."..WEL
K NUMMER WYZIGEN ";:.N:.N.A.1490.R.0..".
...DAT IS:. ":.".."A$(N,1)...:.."...IS D
AT DE GOEIE?(J/N).":.500...D..WA$.."J".W
A$.."_".530.%.I..WA$."_".1490.0.N..L.1.4
.O.X..".."A$(N,L):."MOET ZIJN:".\.B..A$(
N,L).C.L..L...V.."...NOG MEER? J/N":.500
...... WA$."J".530......1490......***BEW
AREN*****.H....N$.""..1160:.1490......".
.NAAR .D.ISK OF .C.ASSETTE ?":.500:.WA$.
."D".WA$.."C".1490.8...."..DAN GAAN WE H
ET BESTAND WEGSCHRIJVEN".T....WA$."C"..2
,1,1,N$:.710.K...J$."@0:".N$.",S,W".Y...
.2,8,2,J$...F..2,A,CR$;...P..I.1.A...Z..
L.1.4......2,A$(I,L)CR$;......L,I: 2....
.."..HET BESTAND IS GESAVED":.1170:.1490
......****PRINTEN****......N$.""..1160:.
1490.Z...."...ZET (ZONODIG) PRINTER AAN
EN DRUK DAARNA OP EEN TOETS".Q....
500:.WA$."_".1490... .."...WAT WILT U PR
INTEN ?.H.*..".....1) ALLES".43)".2) SEL
ECTIE":."...TYPE 1 OF 2"...4..WA$:.WA$..
"1".WA$.."2".820...>.. WA$."1".."...OK !
":.910.L.H.."...TYPE 'J' OF 'N' VOOR UW
KEUS ('_' = ONDERBREKEN)".I.R
..K.1.A:.".."A$(K,1)" ?";...\..K$:.K$.."
J".K$.."N".K$.."_".860...F..K$."_".TL.0:
.1490...P..K$."N".." N":.900...Z.." J":T
L.TL.1:.W.1.4:A$(TL,W).A$(K,W):.W......K
:.970......4,4......I.1.A:.L.1.3......4,
A$(I,L).&....L.=....BR$:.BR$.."_".950.J.
.. 4:.1490.]....RA.1.6:.4:.RA.M....I: 4:
.1490...J..4,4:.TL.0. 4:.1490...T..I.1.T
L:.L.1.3......4,A$(I,L)......L.A....RA.1
.6:.4:.RA.Q....I: 4:.1490......**VERWIJD
EREN**......N$.""..1160:.1490.7...."..WE
LK NUMMER WIL JE VERWIJDEREN?":.V$:.V$."
_".1490.Q.$.V.E(V$):.V.A.V.1.1030.Q...."
....DAT IS:.":."."A$(V,1)...8.."..ZEKER
WETEN??(J/N).."...B..V$:.V$."".1090...L.
.V$.."J".1030.C.V..VW.V.A.1...`.A$(VW,1)
.A$(VW.1,1)...J.A$(VW,2).A$(VW.1,2)...T.
A$(VW,3).A$(VW.1,3).+.Y.A$(VW,4).A$(VW.1
,4):.:A.A.1.`.~.."...VERWIJDERD!":."....
.DRUK TOETS.":.500:.1490......"...ER IS
GEEN BESTAND AANWEZIG.!"......VT.1.2000:
.:.......***ZOEKEN*****.F....N$.""..1160
:.1490......"...WAT WILT U ZOEKEN?.."...
..."....1) NAAM":.".....2) ADRES":."....
.3) WOONPLAATS".8.D.."...TYPE 1, 2 OF 3"
.B.N..ZO$:.ZO$.."1".ZO$.."2".ZO$.."3".12
30...X..ZO$."1".ZO$." NAAM":Z.1:.1270...
...ZO$."2".ZO$.". ADRES":Z.2:.1270.M....
ZO$."3".ZO$." WOONPLAATS":Z.3......"..WE
LKE"ZO$"?":.Z$:L.C(Z$)......1340......P.
1.A:L2.C(A$(P,Z)).!....R.1.L2.L.1.C....J
(A$(P,Z),R,L).Z$.HU.1:.1360.].(..R,P:.HU
.1.HU.0:.1490...2.."...NIET AANWEZIG..!"
:.VT.0.1000:.VT:.1490...<..".-----------
-> ADRES"P" <--------------."...>.."...
.U";:.PR.1.37:.".";:.:."I"...@..". NAAM
:".38)"."...B..".";:.PR.1.37:.".";:.:.
".".4.D..". ADRES :".38)".".T.F..".";:.
PR.1.37:.".";:.:.".".M.H..". PLAATS :".3
8)"."...J..".";:.PR.1.37:.".";:.:."."...
L..". TEL. :".38)".".H.N.."J";:.PR.1.3
7:.".";:.:."K":..Z.P..".".20)P". "...Q..
"...":.G.1.4:."............"A$(P,G):..".
R.."......DRUK EEN TOETS.".8.T..WA$:.WA$
."".1364.W.V.."...":.G.1.4:."...........
. ":..}.X... .
Z.. ******** SORTEREN **********..._..N$
.""..1160:.1490...D..".************SORTE
REN OP NAAM************...DAT DUURT EVEN
!"...N..L.1.A.1.,.X.."........NOG"A.1.L"
. ADRESSEN ".9....S.1.A.1.U....A$(S,1).A
$(S.1,1).1470.....B$.A$(S,1):A$(S,1).A$(
S.1,1):A$(S.1,1).B$... .C$.A$(S,2):A$(S,
2).A$(S.1,2):A$(S.1,2).C$.....D$.A$(S,3)
:A$(S,3).A$(S.1,3):A$(S.1,3).D$.....E$.A
$(S,4):A$(S,4).A$(S.1,4):A$(S.1,4).E$...
...S,L...H.."....KLAAR!!":.490.A.R.."..E
EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE"
;......" JBM ..M E N U. BESTAND: .
."N$......".EEEEEEEEEEEEEEEEEEEEEEEEEEEE
EEEEEEEEEEEE".Q...."...JE KUNT:."......"
... 1) BESTAND INLEZEN......".. 2) BES
TAND MAKEN."....".. 3) LATEN ZIEN.:....
".. 4) UITBREIDEN.P."..".. 5) WIJZIGEN
.E.,..".. 6) PRINTEN.~.6..".. 7) VERWI
JDEREN...@..".. 8) BEWAREN...J..".. 9)
ZOEKEN...T..".. 10) SORTEREN.R.^..".. 1
1) STOPPEN...C..".. _) MENU.!.H..N$."".
."....EERST EEN BESTAND MAKEN OF INLEZEN
!!":.1660.@.|..".....WAT IS JE KEUS?..";
.E....".........";:. K$:.".";:K.E(K$).X.
...K.1.K.11.1490...... K .200,60,320,380
,530,770,1030,660,1180,1370,460...L.."..
.......:...P..".........HANS MEIJER/TEL.
030-712496....
> CLICK IMAGE PREVIEW FOR FULL MODAL