DATABASE
FILE INFORMATION
FILENAME(S): DATABASE
FILE TYPE(S): PRG
FILE SIZE: 15.5K
FIRST SEEN: 2025-11-30 21:06:45
APPEARS ON: 1 disk(s)
FILE HASH
e12e03bee8146afd4d9c70f77cc0d33ea89bb2a7f89e049a5939e83922d468c5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPEED | DATABASE | PRG | DuncanTwain | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 8F 20 20 44 41 54 41 20 42 41 |..'.d.. DATA BA|
00000010: 53 45 20 50 52 4F 47 52 41 4D 4D 41 20 56 4F 4F |SE PROGRAMMA VOO|
00000020: 52 20 43 42 4D 36 34 00 44 08 6E 00 8F 20 20 44 |R CBM64.D.n.. D|
00000030: 4F 4F 52 20 52 49 43 48 41 52 44 20 46 2E 20 44 |OOR RICHARD F. D|
00000040: 41 4C 45 59 00 4A 08 78 00 8F 00 5F 08 7D 00 8F |ALEY.J.x..._.}..|
00000050: 20 20 56 45 52 54 41 41 4C 44 20 44 4F 4F 52 00 | VERTAALD DOOR.|
00000060: 78 08 7E 00 8F 20 20 53 45 54 54 4C 45 2D 4C 49 |x.~.. SETTLE-LI|
00000070: 47 48 54 20 53 4F 46 54 00 9D 08 7F 00 8F 20 20 |GHT SOFT...... |
00000080: 50 4F 53 54 42 55 53 20 37 35 20 34 35 33 30 20 |POSTBUS 75 4530 |
00000090: 41 42 20 20 54 45 52 4E 45 55 5A 45 4E 00 B7 08 |AB TERNEUZEN...|
000000A0: 80 00 8F 20 20 54 45 4C 2E 20 30 31 31 35 30 20 |... TEL. 01150 |
000000B0: 2D 20 31 33 33 38 37 00 BD 08 82 00 8F 00 D3 08 |- 13387.........|
000000C0: 8C 00 8F 20 20 43 4F 50 59 52 49 47 48 54 20 31 |... COPYRIGHT 1|
000000D0: 39 38 35 00 D9 08 AA 00 8F 00 11 09 B4 00 86 54 |985............T|
000000E0: 50 24 28 32 30 29 2C 54 4C 28 32 30 29 2C 52 50 |P$(20),TL(20),RP|
000000F0: 28 31 30 30 29 2C 48 44 24 28 32 30 29 2C 44 41 |(100),HD$(20),DA|
00000100: 24 28 31 33 30 2C 32 30 29 2C 52 4E 28 31 33 30 |$(130,20),RN(130|
00000110: 29 00 4B 09 BE 00 86 52 4E 24 28 32 30 29 2C 54 |).K....RN$(20),T|
00000120: 4C 24 28 32 30 29 2C 4C 41 28 35 2C 35 29 2C 53 |L$(20),LA(5,5),S|
00000130: 50 28 35 2C 35 29 3A 4E 4F 24 B2 22 12 4E 45 45 |P(5,5):NO$.".NEE|
00000140: 92 22 3A 97 38 30 38 2C 32 33 34 00 8C 09 C8 00 |.":.808,234.....|
00000150: 4D 58 B2 31 33 30 3A 43 4C B2 30 3A 43 52 24 B2 |MX.130:CL.0:CR$.|
00000160: C7 28 31 33 29 3A 51 54 24 B2 C7 28 33 34 29 3A |.(13):QT$..(34):|
00000170: 42 4F B2 35 33 32 38 30 3A 42 41 B2 42 4F AA 31 |BO.53280:BA.BO.1|
00000180: 3A 59 53 24 B2 22 12 4A 41 20 92 22 00 D0 09 D2 |:YS$.".JA ."....|
00000190: 00 42 4C 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.BL$." |
000001A0: 20 20 20 20 20 20 20 20 20 20 22 3A 42 4C 24 B2 | ":BL$.|
000001B0: 42 4C 24 AA 42 4C 24 3A 9F 31 35 2C 38 2C 31 35 |BL$.BL$:.15,8,15|
000001C0: 3A 9F 31 2C 30 2C 31 3A 44 52 24 B2 22 30 3A 22 |:.1,0,1:DR$."0:"|
000001D0: 00 F5 09 DC 00 99 22 93 22 3A 97 42 41 2C 31 35 |......".":.BA,15|
000001E0: 3A 97 42 4F 2C 31 31 3A 99 22 90 22 C7 28 38 29 |:.BO,11:.".".(8)|
000001F0: C7 28 31 34 29 00 0F 0A E6 00 48 44 24 28 30 29 |.(14).....HD$(0)|
00000200: B2 22 D2 45 43 4F 52 44 4E 55 4D 4D 45 52 22 00 |.".ECORDNUMMER".|
00000210: 2E 0A F0 00 44 42 24 B2 22 22 3A 44 46 24 B2 22 |....DB$."":DF$."|
00000220: 42 45 53 54 41 4E 44 53 4E 41 4D 45 4E 22 00 38 |BESTANDSNAMEN".8|
00000230: 0A FA 00 8D 33 36 37 30 00 45 0A 04 01 8B 45 52 |....3670.E....ER|
00000240: A7 31 39 32 30 00 4F 0A 0E 01 89 31 37 39 30 00 |.1920.O....1790.|
00000250: 6D 0A 18 01 99 22 12 44 92 4F 4F 52 47 41 41 4E |m....".D.OORGAAN|
00000260: 20 4F 46 20 12 45 92 49 4E 44 45 3F 22 00 89 0A | OF .E.INDE?"...|
00000270: 22 01 8D 33 33 30 3A 8B 41 24 B2 22 44 22 B0 41 |"..330:.A$."D".A|
00000280: 24 B2 22 45 22 A7 33 31 30 00 92 0A 2C 01 89 32 |$."E".310...,..2|
00000290: 39 30 00 B0 0A 36 01 99 22 91 20 20 20 20 20 20 |90...6..". |
000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 91 22 3A 8E | .":.|
000002B0: 00 D7 0A 40 01 99 22 11 C4 52 55 4B 20 4F 50 20 |...@.."..RUK OP |
000002C0: 12 52 45 54 55 52 4E 92 20 56 4F 4F 52 20 56 45 |.RETURN. VOOR VE|
000002D0: 52 56 4F 4C 47 2E 22 00 EB 0A 4A 01 A1 41 24 3A |RVOLG."...J..A$:|
000002E0: 8B 41 24 B3 B1 22 22 A7 33 33 30 00 FE 0A 54 01 |.A$.."".330...T.|
000002F0: A1 41 24 3A 8B 41 24 B2 22 22 A7 33 34 30 00 04 |.A$:.A$."".340..|
00000300: 0B 5E 01 8E 00 1D 0B 68 01 99 22 3F 20 90 22 3B |.^.....h.."? .";|
00000310: 3A 84 31 2C 41 24 3A 99 22 1F 22 3A 8E 00 3A 0B |:.1,A$:.".":..:.|
00000320: 72 01 99 22 93 22 3A 97 42 41 2C 31 34 3A 97 42 |r..".":.BA,14:.B|
00000330: 4F 2C 36 3A 99 22 1F 22 3A 8E 00 4C 0B 77 01 81 |O,6:.".":..L.w..|
00000340: 51 51 B2 31 A4 35 30 30 3A 82 3A 8E 00 5B 0B 7C |QQ.1.500:.:..[.||
00000350: 01 44 46 24 B2 22 2E 48 44 52 22 00 65 0B 86 01 |.DF$.".HDR".e...|
00000360: 8D 33 36 37 30 00 71 0B 90 01 8B 45 52 A7 38 31 |.3670.q....ER.81|
00000370: 30 00 8E 0B 9A 01 81 49 B2 31 A4 4E 52 3A 48 44 |0......I.1.NR:HD|
00000380: 24 28 49 29 B2 54 50 24 28 49 29 3A 82 49 00 9D |$(I).TP$(I):.I..|
00000390: 0B A4 01 4E 48 B2 4E 52 3A 4E 52 B2 30 00 BE 0B |...NH.NR:NR.0...|
000003A0: AE 01 44 46 24 B2 22 2E 44 41 54 22 3A 8D 33 36 |..DF$.".DAT":.36|
000003B0: 37 30 3A 4E 46 B2 4E 52 3A 89 34 33 38 30 00 D5 |70:NF.NR:.4380..|
000003C0: 0B B8 01 8F 20 2A 2A 2A 20 53 4F 52 54 45 52 45 |.... *** SORTERE|
000003D0: 4E 20 2A 2A 2A 00 EC 0B C2 01 81 49 B2 31 A4 4E |N ***......I.1.N|
000003E0: 52 3A 52 4E 28 49 29 B2 30 3A 82 49 00 00 0C CC |R:RN(I).0:.I....|
000003F0: 01 81 49 B2 31 A4 4E 52 3A 81 4A B2 31 A4 4E 52 |..I.1.NR:.J.1.NR|
00000400: 00 0F 0C D6 01 91 4C 89 34 38 30 2C 35 30 30 00 |......L.480,500.|
00000410: 35 0C E0 01 8B 44 41 24 28 49 2C 53 29 B1 B2 44 |5....DA$(I,S)..D|
00000420: 41 24 28 4A 2C 53 29 A7 52 4E 28 49 29 B2 52 4E |A$(J,S).RN(I).RN|
00000430: 28 49 29 AA 31 00 3E 0C EA 01 89 35 31 30 00 6A |(I).1.>....510.j|
00000440: 0C F4 01 8B C5 28 44 41 24 28 49 2C 53 29 29 B1 |.....(DA$(I,S)).|
00000450: B2 C5 28 44 41 24 28 4A 2C 53 29 29 A7 52 4E 28 |..(DA$(J,S)).RN(|
00000460: 49 29 B2 52 4E 28 49 29 AA 31 00 73 0C FE 01 82 |I).RN(I).1.s....|
00000470: 4A 2C 49 00 87 0C 08 02 99 22 53 4F 52 54 45 52 |J,I......"SORTER|
00000480: 45 4E 2E 2E 2E 22 3B 00 A1 0C 12 02 81 49 B2 4E |EN...";......I.N|
00000490: 52 A4 31 A9 AB 31 3A 81 4A B2 4E 52 A4 31 A9 AB |R.1..1:.J.NR.1..|
000004A0: 31 00 C7 0C 1C 02 8B 28 49 B3 B1 4A AF 52 4E 28 |1......(I..J.RN(|
000004B0: 49 29 B2 52 4E 28 4A 29 29 A7 52 4E 28 4A 29 B2 |I).RN(J)).RN(J).|
000004C0: 52 4E 28 4A 29 AB 31 00 D0 0C 26 02 82 4A 2C 49 |RN(J).1...&..J,I|
000004D0: 00 E7 0C 30 02 99 22 53 4F 52 54 45 52 45 4E 2E |...0.."SORTEREN.|
000004E0: 2E 2E 22 3A 4A B2 31 00 FF 0C 3A 02 8B 52 4E 28 |..":J.1...:..RN(|
000004F0: 4A 29 B2 4A A7 4A B2 4A AA 31 3A 89 35 37 30 00 |J).J.J.J.1:.570.|
00000500: 0E 0D 44 02 8B 4A B1 B2 4E 52 A7 36 33 30 00 2A |..D..J..NR.630.*|
00000510: 0D 4E 02 81 49 B2 31 A4 4E 48 3A 5A 24 B2 44 41 |.N..I.1.NH:Z$.DA|
00000520: 24 28 52 4E 28 4A 29 2C 49 29 00 53 0D 58 02 44 |$(RN(J),I).S.X.D|
00000530: 41 24 28 52 4E 28 4A 29 2C 49 29 B2 44 41 24 28 |A$(RN(J),I).DA$(|
00000540: 4A 2C 49 29 3A 44 41 24 28 4A 2C 49 29 B2 5A 24 |J,I):DA$(J,I).Z$|
00000550: 3A 82 49 00 7B 0D 62 02 5A B2 52 4E 28 52 4E 28 |:.I.{.b.Z.RN(RN(|
00000560: 4A 29 29 3A 52 4E 28 52 4E 28 4A 29 29 B2 52 4E |J)):RN(RN(J)).RN|
00000570: 28 4A 29 3A 52 4E 28 4A 29 B2 5A 00 84 0D 6C 02 |(J):RN(J).Z...l.|
00000580: 89 35 37 30 00 BF 0D 76 02 99 22 11 D7 49 4C 54 |.570...v.."..ILT|
00000590: 20 55 20 48 45 54 20 4F 50 20 22 48 44 24 28 53 | U HET OP "HD$(S|
000005A0: 29 3A 99 22 47 45 53 4F 52 54 45 45 52 44 45 20 |):."GESORTEERDE |
000005B0: 42 45 53 54 41 4E 44 20 27 22 44 42 24 22 27 00 |BESTAND '"DB$"'.|
000005C0: DE 0D 80 02 99 22 42 45 57 41 52 45 4E 20 4F 50 |....."BEWAREN OP|
000005D0: 20 44 49 53 4B 3F 20 28 CA 2F CE 29 22 3B 00 0C | DISK? (./.)";..|
000005E0: 0E 8A 02 8D 33 33 30 3A 8B 41 24 B2 22 4A 22 A7 |....330:.A$."J".|
000005F0: 44 46 24 B2 22 2E 44 41 54 22 3A 99 59 53 24 3B |DF$.".DAT":.YS$;|
00000600: 3A 4E 52 B2 4E 46 3A 8D 33 38 38 30 00 24 0E 94 |:NR.NF:.3880.$..|
00000610: 02 8B 41 24 B2 22 4E 22 A7 99 4E 4F 24 3B 3A 89 |..A$."N"..NO$;:.|
00000620: 34 33 38 30 00 2D 0E 9E 02 89 36 35 30 00 68 0E |4380.-....650.h.|
00000630: A8 02 99 22 93 22 3A 8B 4E 46 B2 30 A7 99 22 C7 |...".":.NF.0..".|
00000640: 45 45 4E 20 47 45 47 45 56 45 4E 53 20 49 4E 20 |EEN GEGEVENS IN |
00000650: 48 45 54 20 42 45 53 54 41 4E 44 21 22 3A 8D 33 |HET BESTAND!":.3|
00000660: 32 30 3A 89 34 33 38 30 00 77 0E B2 02 4D 46 B2 |20:.4380.w...MF.|
00000670: 31 3A 8D 33 34 30 30 00 B1 0E BC 02 99 22 D7 41 |1:.3400......".A|
00000680: 54 20 49 53 20 48 45 54 20 54 45 20 53 4F 52 54 |T IS HET TE SORT|
00000690: 45 52 45 4E 20 56 45 4C 44 4E 55 4D 4D 45 52 3A |EREN VELDNUMMER:|
000006A0: 22 3B 3A 8D 33 36 30 3A 53 B2 C5 28 41 24 29 3A |";:.360:S..(A$):|
000006B0: 99 00 C2 0E C6 02 8B 41 24 B2 22 4D 22 A7 34 33 |.......A$."M".43|
000006C0: 38 30 00 D4 0E D0 02 8B 53 B3 31 B0 53 B1 4E 48 |80......S.1.S.NH|
000006D0: A7 37 30 30 00 FC 0E DA 02 99 22 11 C8 4F 45 20 |.700......"..OE |
000006E0: 4D 4F 45 54 20 45 52 20 47 45 53 4F 52 54 45 45 |MOET ER GESORTEE|
000006F0: 52 44 20 57 4F 52 44 45 4E 3A 11 22 00 12 0F E4 |RD WORDEN:."....|
00000700: 02 99 22 31 2E 20 C1 4C 46 41 42 45 54 49 53 43 |.."1. .LFABETISC|
00000710: 48 22 00 26 0F EE 02 99 22 32 2E 20 CE 55 4D 45 |H".&...."2. .UME|
00000720: 52 49 45 4B 11 22 00 40 0F F8 02 99 22 33 2E 20 |RIEK.".@...."3. |
00000730: D4 45 52 55 47 20 4E 41 41 52 20 4D 45 4E 55 22 |.ERUG NAAR MENU"|
00000740: 00 5E 0F 02 03 99 22 11 CB 45 55 5A 45 22 3B 3A |.^...."..EUZE";:|
00000750: 8D 33 36 30 3A 4C B2 C5 28 41 24 29 3A 99 00 6C |.360:L..(A$):..l|
00000760: 0F 0C 03 8B 4C B2 33 A7 34 33 38 30 00 86 0F 16 |....L.3.4380....|
00000770: 03 99 22 11 53 4F 52 54 45 52 45 4E 2E 2E 2E 22 |..".SORTEREN..."|
00000780: 3B 3A 89 34 35 30 00 AB 0F 20 03 8F 20 2A 2A 2A |;:.450... .. ***|
00000790: 20 56 45 4C 44 4E 41 4D 45 4E 42 45 53 54 41 4E | VELDNAMENBESTAN|
000007A0: 44 20 4D 41 4B 45 4E 20 2A 2A 2A 00 B4 0F 2A 03 |D MAKEN ***...*.|
000007B0: 4E 52 B2 31 00 DA 0F 34 03 99 22 93 11 40 20 3D |NR.1...4.."..@ =|
000007C0: 20 54 45 52 55 47 20 4E 41 41 52 20 48 45 54 20 | TERUG NAAR HET |
000007D0: 48 4F 4F 46 44 4D 45 4E 55 22 00 09 10 3E 03 99 |HOOFDMENU"...>..|
000007E0: 22 11 CE 41 41 4D 20 56 41 4E 20 56 45 4C 44 4E |"..AAM VAN VELDN|
000007F0: 55 4D 4D 45 52 22 4E 52 3B 3A 8D 33 36 30 3A 54 |UMMER"NR;:.360:T|
00000800: 50 24 28 4E 52 29 B2 41 24 00 1E 10 48 03 8B 54 |P$(NR).A$...H..T|
00000810: 50 24 28 4E 52 29 B2 22 40 22 A7 38 37 30 00 35 |P$(NR)."@".870.5|
00000820: 10 52 03 4E 52 B2 4E 52 AA 31 3A 8B 4E 52 B1 32 |.R.NR.NR.1:.NR.2|
00000830: 30 A7 38 37 30 00 3E 10 5C 03 89 38 33 30 00 4A |0.870.>.\..830.J|
00000840: 10 66 03 4E 52 B2 4E 52 AB 31 00 59 10 70 03 8D |.f.NR.NR.1.Y.p..|
00000850: 33 38 38 30 3A 89 34 31 30 00 76 10 7A 03 8F 20 |3880:.410.v.z.. |
00000860: 2A 2A 2A 20 44 41 54 41 20 49 4E 42 52 45 4E 47 |*** DATA INBRENG|
00000870: 45 4E 20 2A 2A 2A 00 94 10 84 03 99 22 93 11 C5 |EN ***......"...|
00000880: 52 20 5A 49 54 54 45 4E 22 4E 46 22 52 45 43 4F |R ZITTEN"NF"RECO|
00000890: 52 44 53 22 00 AF 10 8E 03 99 22 49 4E 20 42 45 |RDS"......"IN BE|
000008A0: 53 54 41 4E 44 20 27 22 44 42 24 22 27 2E 22 00 |STAND '"DB$"'.".|
000008B0: BB 10 98 03 4E 46 B2 4E 46 AA 31 00 F2 10 A2 03 |....NF.NF.1.....|
000008C0: 8B 4E 46 B1 4D 58 A7 99 22 93 C8 45 54 20 42 45 |.NF.MX.."..ET BE|
000008D0: 53 54 41 4E 44 20 5A 49 54 20 56 4F 4C 2E 20 D6 |STAND ZIT VOL. .|
000008E0: 4F 4F 52 20 4D 45 45 52 20 47 45 47 45 56 45 4E |OOR MEER GEGEVEN|
000008F0: 53 22 00 2B 11 AC 03 8B 4E 46 B1 4D 58 A7 99 22 |S".+....NF.MX.."|
00000900: 4D 4F 45 54 20 55 20 45 45 4E 20 4E 49 45 55 57 |MOET U EEN NIEUW|
00000910: 20 42 45 53 54 41 4E 44 20 4D 41 4B 45 4E 2E 22 | BESTAND MAKEN."|
00000920: 3A 8D 33 32 30 3A 89 31 30 32 30 00 4D 11 B6 03 |:.320:.1020.M...|
00000930: 99 22 C4 49 54 20 49 53 20 52 45 43 4F 52 44 4E |.".IT IS RECORDN|
00000940: 55 4D 4D 45 52 22 4E 46 22 9D 2E 11 22 00 59 11 |UMMER"NF"...".Y.|
00000950: C0 03 81 49 B2 31 A4 4E 48 00 81 11 CA 03 99 22 |...I.1.NH......"|
00000960: 1F 22 48 44 24 28 49 29 22 3A 22 3B 3A 8D 33 36 |."HD$(I)":";:.36|
00000970: 30 3A 44 41 24 28 4E 46 2C 49 29 B2 41 24 3A 82 |0:DA$(NF,I).A$:.|
00000980: 49 00 9B 11 D4 03 99 22 11 CE 4F 47 20 4D 45 45 |I......"..OG MEE|
00000990: 52 3F 20 28 CA 2F CE 29 20 22 3B 00 BB 11 DE 03 |R? (./.) ";.....|
000009A0: 8D 33 33 30 3A 8B 41 24 B2 22 4A 22 A7 99 59 53 |.330:.A$."J"..YS|
000009B0: 24 3A 8D 33 37 35 3A 89 39 30 30 00 CC 11 E8 03 |$:.375:.900.....|
000009C0: 8B 41 24 B3 B1 22 4E 22 A7 39 39 30 00 DA 11 F2 |.A$.."N".990....|
000009D0: 03 99 4E 4F 24 3A 8D 33 37 35 00 FB 11 FC 03 44 |..NO$:.375.....D|
000009E0: 46 24 B2 22 2E 44 41 54 22 3A 4E 52 B2 4E 46 3A |F$.".DAT":NR.NF:|
000009F0: 8D 33 38 38 30 3A 89 34 33 38 30 00 1B 12 06 04 |.3880:.4380.....|
00000A00: 8F 20 2A 2A 2A 20 5A 4F 45 4B 45 4E 2F 56 45 52 |. *** ZOEKEN/VER|
00000A10: 41 4E 44 45 52 45 4E 20 2A 2A 2A 00 59 12 10 04 |ANDEREN ***.Y...|
00000A20: 4C 43 B2 30 3A 8B 4E 46 B2 30 A7 99 22 93 11 11 |LC.0:.NF.0.."...|
00000A30: C7 45 45 4E 20 47 45 47 45 56 45 4E 53 20 49 4E |.EEN GEGEVENS IN|
00000A40: 20 48 45 54 20 42 45 53 54 41 4E 44 21 22 3A 8D | HET BESTAND!":.|
00000A50: 33 32 30 3A 89 34 33 38 30 00 76 12 1A 04 99 22 |320:.4380.v...."|
00000A60: 93 11 D5 20 4B 55 4E 54 20 5A 4F 45 4B 45 4E 20 |... KUNT ZOEKEN |
00000A70: 42 49 4A 3A 11 22 00 80 12 24 04 8D 33 34 31 30 |BIJ:."...$..3410|
00000A80: 00 94 12 2E 04 99 22 11 CF 46 20 55 20 4B 55 4E |......"..F U KUN|
00000A90: 54 3A 11 22 00 AA 12 38 04 99 49 22 9D 2E 20 D6 |T:."...8..I".. .|
00000AA0: 45 52 41 4E 44 45 52 45 4E 22 00 C8 12 42 04 99 |ERANDEREN"...B..|
00000AB0: 22 11 CB 45 55 5A 45 22 3B 3A 8D 33 36 30 3A 53 |"..EUZE";:.360:S|
00000AC0: B2 C5 28 41 24 29 3A 99 00 DD 12 4C 04 8B 53 B3 |..(A$):....L..S.|
00000AD0: 30 B0 53 B1 4E 48 AA 31 A7 31 30 39 30 00 EE 12 |0.S.NH.1.1090...|
00000AE0: 56 04 8B 53 B2 4E 48 AA 31 A7 31 33 38 30 00 10 |V..S.NH.1.1380..|
00000AF0: 13 60 04 99 22 93 11 D4 45 20 5A 4F 45 4B 45 4E |.`.."...E ZOEKEN|
00000B00: 20 22 48 44 24 28 53 29 3B 3A 99 22 3A 11 90 22 | "HD$(S);:.":.."|
00000B10: 00 1F 13 6A 04 8D 33 36 30 3A 51 24 B2 41 24 00 |...j..360:Q$.A$.|
00000B20: 29 13 74 04 99 22 93 1F 22 00 62 13 7E 04 8B 53 |).t.."..".b.~..S|
00000B30: B2 30 AF C5 28 51 24 29 B1 4E 46 A7 99 22 11 11 |.0..(Q$).NF.."..|
00000B40: C5 52 20 5A 49 4A 4E 20 47 45 45 4E 20 22 51 24 |.R ZIJN GEEN "Q$|
00000B50: 22 20 52 45 43 4F 52 44 53 21 11 22 3A 89 31 32 |" RECORDS!.":.12|
00000B60: 32 30 00 78 13 88 04 46 44 B2 30 3A 4C 43 B2 30 |20.x...FD.0:LC.0|
00000B70: 3A 81 4A B2 31 A4 4E 46 00 AD 13 92 04 44 41 24 |:.J.1.NF.....DA$|
00000B80: 28 4A 2C 30 29 B2 C4 28 4A 29 3A 44 41 24 28 4A |(J,0)..(J):DA$(J|
00000B90: 2C 30 29 B2 C9 28 44 41 24 28 4A 2C 30 29 2C C3 |,0)..(DA$(J,0),.|
00000BA0: 28 44 41 24 28 4A 2C 30 29 29 AB 31 29 00 D2 13 |(DA$(J,0)).1)...|
00000BB0: 9C 04 8B C8 28 44 41 24 28 4A 2C 53 29 2C C3 28 |....(DA$(J,S),.(|
00000BC0: 51 24 29 29 B2 51 24 A7 8D 31 35 35 30 3A 46 44 |Q$)).Q$..1550:FD|
00000BD0: B2 31 00 F0 13 A6 04 8B 4C 43 AA 4E 48 B1 32 30 |.1......LC.NH.20|
00000BE0: A7 8D 31 32 39 30 3A 4C 43 B2 30 3A 99 22 93 22 |..1290:LC.0:."."|
00000BF0: 00 F7 13 B0 04 82 4A 00 25 14 BA 04 8B 46 44 B2 |......J.%....FD.|
00000C00: 30 A7 99 22 CE 49 45 54 53 20 47 45 56 4F 4E 44 |0..".IETS GEVOND|
00000C10: 45 4E 2E 20 D5 20 4B 55 4E 54 20 4E 55 3A 22 3A |EN. . KUNT NU:":|
00000C20: 89 31 32 33 30 00 45 14 C4 04 99 22 20 C4 41 54 |.1230.E...." .AT|
00000C30: 20 57 41 53 20 48 45 54 2E 20 D5 20 4B 55 4E 54 | WAS HET. . KUNT|
00000C40: 20 4E 55 3A 22 00 60 14 CE 04 99 22 11 20 31 2E | NU:".`....". 1.|
00000C50: 20 CF 50 4E 49 45 55 57 20 5A 4F 45 4B 45 4E 22 | .PNIEUW ZOEKEN"|
00000C60: 00 76 14 D8 04 99 22 20 32 2E 20 D6 45 52 41 4E |.v...." 2. .ERAN|
00000C70: 44 45 52 45 4E 22 00 9A 14 E2 04 99 22 20 33 2E |DEREN"......" 3.|
00000C80: 20 D4 45 52 55 47 20 4E 41 41 52 20 48 45 54 20 | .ERUG NAAR HET |
00000C90: 48 4F 4F 46 44 4D 45 4E 55 22 00 AD 14 EC 04 99 |HOOFDMENU"......|
00000CA0: 22 11 20 20 20 20 CB 45 55 5A 45 3A 22 00 CC 14 |". .EUZE:"...|
00000CB0: F6 04 8D 33 33 30 3A 53 B2 C5 28 41 24 29 3A 8B |...330:S..(A$):.|
00000CC0: 53 B3 31 B0 53 B1 33 A7 31 32 37 30 00 E2 14 00 |S.1.S.3.1270....|
00000CD0: 05 91 53 89 31 30 35 30 2C 31 33 38 30 2C 34 33 |..S.1050,1380,43|
00000CE0: 38 30 00 15 15 0A 05 4C 43 B2 30 3A 99 22 27 D2 |80.....LC.0:."'.|
00000CF0: 45 54 55 52 4E 27 3D 56 45 52 56 4F 4C 47 2C 20 |ETURN'=VERVOLG, |
00000D00: 53 50 41 54 49 45 42 41 4C 4B 3D 48 4F 4F 46 44 |SPATIEBALK=HOOFD|
00000D10: 4D 45 4E 55 22 00 29 15 14 05 A1 4C 24 3A 8B 4C |MENU".)....L$:.L|
00000D20: 24 B2 22 22 A7 31 33 30 30 00 3A 15 1E 05 8B 4C |$."".1300.:....L|
00000D30: 24 B2 43 52 24 A7 31 33 34 30 00 4B 15 28 05 8B |$.CR$.1340.K.(..|
00000D40: 4C 24 B2 22 20 22 A7 31 33 35 30 00 55 15 32 05 |L$." ".1350.U.2.|
00000D50: 89 31 33 30 30 00 60 15 3C 05 99 22 93 22 3A 8E |.1300.`.<..".":.|
00000D60: 00 6D 15 46 05 8B 50 52 B2 31 A7 A0 34 00 7C 15 |.m.F..PR.1..4.|.|
00000D70: 50 05 50 52 B2 30 3A 89 34 33 38 30 00 9A 15 5A |P.PR.0:.4380...Z|
00000D80: 05 8F 20 2A 2A 2A 20 56 45 52 41 4E 44 45 52 45 |.. *** VERANDERE|
00000D90: 4E 20 44 41 54 41 20 2A 2A 2A 00 C1 15 64 05 99 |N DATA ***...d..|
00000DA0: 22 93 11 11 D7 41 54 20 49 53 20 48 45 54 20 4E |"....AT IS HET N|
00000DB0: 55 4D 4D 45 52 20 56 41 4E 20 48 45 54 20 54 45 |UMMER VAN HET TE|
00000DC0: 22 00 E8 15 6E 05 99 22 57 49 4A 5A 49 47 45 4E |"...n.."WIJZIGEN|
00000DD0: 20 52 45 43 4F 52 44 22 3B 3A 8D 33 36 30 3A 4A | RECORD";:.360:J|
00000DE0: B2 C5 28 41 24 29 3A 99 00 0F 16 78 05 8B 4A B2 |..(A$):....x..J.|
00000DF0: 30 A7 99 22 C1 4C 4C 45 45 4E 20 4E 55 4D 4D 45 |0..".LLEEN NUMME|
00000E00: 52 53 21 22 3A 8D 33 32 30 3A 89 31 33 38 30 00 |RS!":.320:.1380.|
00000E10: 40 16 82 05 8B 4A B1 4E 46 A7 99 22 11 C5 52 20 |@....J.NF.."..R |
00000E20: 5A 49 4A 4E 20 47 45 45 4E 22 4A 22 52 45 43 4F |ZIJN GEEN"J"RECO|
00000E30: 52 44 53 21 22 3A 8D 33 32 30 3A 89 31 33 38 30 |RDS!":.320:.1380|
00000E40: 00 4A 16 8C 05 8D 31 35 35 30 00 80 16 96 05 99 |.J....1550......|
00000E50: 22 11 D7 41 54 20 49 53 20 48 45 54 20 4E 55 4D |"..AT IS HET NUM|
00000E60: 4D 45 52 20 56 41 4E 20 48 45 54 20 54 45 20 57 |MER VAN HET TE W|
00000E70: 49 4A 5A 49 47 45 4E 20 20 20 56 45 4C 44 22 3B |IJZIGEN VELD";|
00000E80: 00 91 16 A0 05 8D 33 36 30 3A 53 B2 C5 28 41 24 |......360:S..(A$|
00000E90: 29 00 A4 16 AA 05 8B 53 B3 31 B0 53 B1 4E 48 A7 |)......S.1.S.NH.|
00000EA0: 31 34 34 30 00 C3 16 B4 05 99 22 11 56 41 4E 20 |1440......".VAN |
00000EB0: 22 48 44 24 28 53 29 22 3A 20 22 44 41 24 28 4A |"HD$(S)": "DA$(J|
00000EC0: 2C 53 29 00 E8 16 BE 05 99 22 11 49 4E 20 20 22 |,S)......".IN "|
00000ED0: 48 44 24 28 53 29 3B 3A 8D 33 36 30 3A 44 41 24 |HD$(S);:.360:DA$|
00000EE0: 28 4A 2C 53 29 B2 41 24 00 F1 16 C8 05 99 22 93 |(J,S).A$......".|
00000EF0: 22 00 FB 16 D2 05 8D 31 35 35 30 00 1F 17 DC 05 |"......1550.....|
00000F00: 99 22 11 11 1F CD 45 45 52 20 57 49 4A 5A 49 47 |."....EER WIJZIG|
00000F10: 49 4E 47 45 4E 3F 20 28 CA 2F CE 29 20 22 3B 00 |INGEN? (./.) ";.|
00000F20: 40 17 E6 05 8D 33 33 30 3A 8B 41 24 B2 22 4A 22 |@....330:.A$."J"|
00000F30: A7 99 59 53 24 3A 8D 33 37 35 3A 89 31 33 38 30 |..YS$:.375:.1380|
00000F40: 00 52 17 F0 05 8B 41 24 B3 B1 22 4E 22 A7 31 35 |.R....A$.."N".15|
00000F50: 31 30 00 5C 17 FA 05 89 31 30 30 30 00 79 17 04 |10.\....1000.y..|
00000F60: 06 8F 20 2A 2A 2A 20 52 45 43 4F 52 44 20 50 52 |.. *** RECORD PR|
00000F70: 49 4E 54 45 4E 20 2A 2A 2A 00 91 17 0E 06 99 22 |INTEN ***......"|
00000F80: 20 22 48 44 24 28 30 29 22 3A 20 90 22 4A 22 1F | "HD$(0)": ."J".|
00000F90: 22 00 C9 17 18 06 81 49 B2 31 A4 4E 48 3A 99 49 |"......I.1.NH:.I|
00000FA0: 22 9D 2E 20 22 48 44 24 28 49 29 22 3A 20 22 44 |".. "HD$(I)": "D|
00000FB0: 41 24 28 4A 2C 49 29 3A 82 49 3A 99 3A 4C 43 B2 |A$(J,I):.I:.:LC.|
00000FC0: 4C 43 AA 4E 48 AA 32 3A 8E 00 E9 17 22 06 8F 20 |LC.NH.2:....".. |
00000FD0: 2A 2A 2A 20 56 45 52 57 49 4A 44 45 52 45 4E 20 |*** VERWIJDEREN |
00000FE0: 44 41 54 41 53 20 2A 2A 2A 00 25 18 2C 06 99 22 |DATAS ***.%.,.."|
00000FF0: 93 22 3A 44 45 B2 30 3A 8B 4E 46 B2 30 A7 99 22 |.":DE.0:.NF.0.."|
00001000: C7 45 45 4E 20 47 45 47 45 56 45 4E 53 20 49 4E |.EEN GEGEVENS IN|
00001010: 20 42 45 53 54 41 4E 44 21 22 3A 8D 33 32 30 3A | BESTAND!":.320:|
00001020: 89 34 33 38 30 00 5A 18 36 06 99 22 93 D7 45 4C |.4380.Z.6.."..EL|
00001030: 4B 20 52 45 43 4F 52 44 4E 55 4D 4D 45 52 20 56 |K RECORDNUMMER V|
00001040: 45 52 57 49 4A 44 45 52 45 4E 22 3B 3A 8D 33 36 |ERWIJDEREN";:.36|
00001050: 30 3A 44 4E B2 C5 28 41 24 29 00 6B 18 40 06 8B |0:DN..(A$).k.@..|
00001060: 41 24 B2 22 4D 22 A7 34 33 38 30 00 A7 18 4A 06 |A$."M".4380...J.|
00001070: 8B 44 4E B3 31 A7 99 22 11 C7 52 41 41 47 20 45 |.DN.1.."..RAAG E|
00001080: 45 4E 20 4E 55 4D 4D 45 52 20 54 55 53 53 45 4E |EN NUMMER TUSSEN|
00001090: 20 31 20 45 4E 22 4E 52 22 9D 2E 22 3A 8D 33 32 | 1 EN"NR"..":.32|
000010A0: 30 3A 89 31 35 38 30 00 DD 18 54 06 8B 44 4E B1 |0:.1580...T..DN.|
000010B0: 4E 46 A7 99 22 11 C5 52 20 5A 49 4A 4E 20 53 4C |NF.."..R ZIJN SL|
000010C0: 45 43 48 54 53 22 4E 52 22 52 45 43 4F 52 44 53 |ECHTS"NR"RECORDS|
000010D0: 2E 22 3A 8D 33 32 30 3A 89 31 35 38 30 00 EC 18 |.":.320:.1580...|
000010E0: 5E 06 4A B2 44 4E 3A 8D 31 35 35 30 00 17 19 68 |^.J.DN:.1550...h|
000010F0: 06 99 22 11 C4 45 5A 45 20 47 45 47 45 56 45 4E |.."..EZE GEGEVEN|
00001100: 53 20 56 45 52 57 49 4A 44 45 52 45 4E 3F 20 28 |S VERWIJDEREN? (|
00001110: CA 2F CE 29 20 22 3B 00 38 19 72 06 8D 33 33 30 |./.) ";.8.r..330|
00001120: 3A 8B 41 24 B2 22 4A 22 A7 99 59 53 24 3A 8D 33 |:.A$."J"..YS$:.3|
00001130: 37 35 3A 89 31 37 32 30 00 4A 19 7C 06 8B 41 24 |75:.1720.J.|..A$|
00001140: B3 B1 22 4E 22 A7 31 36 35 30 00 68 19 86 06 99 |.."N".1650.h....|
00001150: 4E 4F 24 3A 99 22 11 CE 4F 47 20 45 45 4E 3F 20 |NO$:."..OG EEN? |
00001160: 28 CA 2F CE 29 20 22 3B 00 89 19 90 06 8D 33 33 |(./.) ";......33|
00001170: 30 3A 8B 41 24 B2 22 4A 22 A7 99 59 53 24 3A 8D |0:.A$."J"..YS$:.|
00001180: 33 37 35 3A 89 31 35 39 30 00 9B 19 9A 06 8B 41 |375:.1590......A|
00001190: 24 B3 B1 22 4E 22 A7 31 36 38 30 00 B4 19 A4 06 |$.."N".1680.....|
000011A0: 99 4E 4F 24 3A 8D 33 37 35 3A 8B 44 45 B2 31 A7 |.NO$:.375:.DE.1.|
000011B0: 31 30 32 30 00 BE 19 AE 06 89 34 33 38 30 00 FB |1020......4380..|
000011C0: 19 B8 06 81 4A B2 44 4E A4 4E 46 AB 31 3A 81 49 |....J.DN.NF.1:.I|
000011D0: B2 31 A4 4E 48 3A 44 41 24 28 4A 2C 49 29 B2 44 |.1.NH:DA$(J,I).D|
000011E0: 41 24 28 4A AA 31 2C 49 29 3A 82 49 2C 4A 3A 4E |A$(J.1,I):.I,J:N|
000011F0: 46 B2 4E 46 AB 31 3A 44 45 B2 31 00 23 1A C2 06 |F.NF.1:DE.1.#...|
00001200: 99 22 11 D2 45 43 4F 52 44 4E 55 4D 4D 45 52 22 |."..ECORDNUMMER"|
00001210: 44 4E 22 49 53 20 56 45 52 57 49 4A 44 45 52 44 |DN"IS VERWIJDERD|
00001220: 21 11 22 00 3C 1A CC 06 99 22 CE 4F 47 20 4D 45 |!.".<....".OG ME|
00001230: 45 52 3F 20 28 CA 2F CE 29 20 22 3B 00 5D 1A D6 |ER? (./.) ";.]..|
00001240: 06 8D 33 33 30 3A 8B 41 24 B2 22 4A 22 A7 99 59 |..330:.A$."J"..Y|
00001250: 53 24 3A 8D 33 37 35 3A 89 31 35 39 30 00 6F 1A |S$:.375:.1590.o.|
00001260: E0 06 8B 41 24 B3 B1 22 4E 22 A7 31 37 35 30 00 |...A$.."N".1750.|
00001270: 83 1A EA 06 99 4E 4F 24 3A 8D 33 37 35 3A 89 31 |.....NO$:.375:.1|
00001280: 30 32 30 00 A7 1A F4 06 8F 20 2A 2A 2A 20 42 45 |020...... *** BE|
00001290: 53 54 41 4E 44 53 4E 41 41 4D 20 52 4F 55 54 49 |STANDSNAAM ROUTI|
000012A0: 4E 45 53 20 2A 2A 2A 00 B0 1A FE 06 43 4C B2 31 |NES ***.....CL.1|
000012B0: 00 D0 1A 08 07 99 22 93 20 20 20 20 12 20 C1 D0 |......". . ..|
000012C0: D0 CC C9 C3 C1 D4 C9 C5 2D CD C5 CE D5 20 11 22 |........-.... ."|
000012D0: 00 ED 1A 12 07 81 4A B2 31 A4 4E 52 3A 99 4A 22 |......J.1.NR:.J"|
000012E0: 9D 2E 20 22 54 50 24 28 4A 29 3A 82 4A 00 05 1B |.. "TP$(J):.J...|
000012F0: 1C 07 8B 4E 52 B1 B2 32 30 A7 4A B2 4A AB 31 3A |...NR..20.J.J.1:|
00001300: 89 31 38 34 30 00 24 1B 26 07 99 4A 22 9D 2E 20 |.1840.$.&..J".. |
00001310: CE 49 45 55 57 20 42 45 53 54 41 4E 44 20 4D 41 |.IEUW BESTAND MA|
00001320: 4B 45 4E 22 00 4A 1B 30 07 8B 4A B1 31 A7 99 4A |KEN".J.0..J.1..J|
00001330: AA 31 22 9D 2E 20 C2 45 53 54 41 4E 44 20 56 45 |.1".. .ESTAND VE|
00001340: 52 57 49 4A 44 45 52 45 4E 22 00 6A 1B 3A 07 99 |RWIJDEREN".j.:..|
00001350: 22 11 20 20 20 20 CB 45 55 5A 45 22 3B 3A 8D 33 |". .EUZE";:.3|
00001360: 36 30 3A 53 B2 C5 28 41 24 29 00 7A 1B 44 07 8B |60:S..(A$).z.D..|
00001370: 53 B2 4A AA 31 A7 31 39 39 30 00 8C 1B 4E 07 8B |S.J.1.1990...N..|
00001380: 53 B3 31 B0 53 B1 4A A7 31 38 35 30 00 9B 1B 58 |S.1.S.J.1850...X|
00001390: 07 44 42 24 B2 54 50 24 28 53 29 00 AB 1B 62 07 |.DB$.TP$(S)...b.|
000013A0: 8B 4E 52 B1 B2 32 30 A7 33 38 30 00 B9 1B 6C 07 |.NR..20.380...l.|
000013B0: 8B 53 B3 B1 4A A7 33 38 30 00 BF 1B 76 07 99 00 |.S..J.380...v...|
000013C0: CC 1B 80 07 8B 4A B2 30 A7 4A B2 31 00 DC 1B 8A |.....J.0.J.1....|
000013D0: 07 8B 43 4C A7 99 3A 89 31 39 35 30 00 EA 1B 94 |..CL..:.1950....|
000013E0: 07 43 4C B2 30 3A 8D 33 37 30 00 20 1C 9E 07 99 |.CL.0:.370. ....|
000013F0: 22 CE 41 41 4D 20 56 41 4E 20 48 45 54 20 4E 49 |".AAM VAN HET NI|
00001400: 45 55 57 45 22 3A 99 22 42 45 53 54 41 4E 44 22 |EUWE":."BESTAND"|
00001410: 3B 3A 8D 33 36 30 3A 54 50 24 28 4A 29 B2 41 24 |;:.360:TP$(J).A$|
00001420: 00 36 1C A8 07 4E 52 B2 4A 3A 44 42 24 B2 22 22 |.6...NR.J:DB$.""|
00001430: 3A 8D 33 38 38 30 00 4C 1C B2 07 44 42 24 B2 54 |:.3880.L...DB$.T|
00001440: 50 24 28 4A AB 31 29 3A 89 33 38 30 00 6E 1C BC |P$(J.1):.380.n..|
00001450: 07 8F 20 2A 2A 2A 20 42 45 53 54 41 4E 44 20 56 |.. *** BESTAND V|
00001460: 45 52 57 49 4A 44 45 52 45 4E 20 2A 2A 2A 00 A7 |ERWIJDEREN ***..|
00001470: 1C C6 07 99 22 11 D7 45 4C 4B 20 4E 55 4D 4D 45 |...."..ELK NUMME|
00001480: 52 20 4D 4F 45 54 20 56 45 52 57 49 4A 44 45 52 |R MOET VERWIJDER|
00001490: 44 20 57 4F 52 44 45 4E 22 3B 3A 8D 33 36 30 3A |D WORDEN";:.360:|
000014A0: 53 B2 C5 28 41 24 29 00 BB 1C D0 07 8B 53 B3 31 |S..(A$)......S.1|
000014B0: B0 53 B1 4A AB 31 A7 31 39 39 30 00 F6 1C DA 07 |.S.J.1.1990.....|
000014C0: 8D 33 37 30 3A 99 22 11 11 11 11 11 11 11 11 11 |.370:.".........|
000014D0: C7 45 52 45 45 44 20 4F 4D 20 27 22 54 50 24 28 |.EREED OM '"TP$(|
000014E0: 53 29 22 27 20 54 45 20 56 45 52 57 49 4A 44 45 |S)"' TE VERWIJDE|
000014F0: 52 45 4E 3F 11 22 00 1E 1D E4 07 99 22 D6 45 52 |REN?."......".ER|
00001500: 57 49 4A 44 45 52 44 45 20 47 45 47 45 56 45 4E |WIJDERDE GEGEVEN|
00001510: 53 20 4B 55 4E 4E 45 4E 20 4E 49 45 54 22 00 44 |S KUNNEN NIET".D|
00001520: 1D EE 07 99 22 4D 45 45 52 20 54 45 52 55 47 47 |...."MEER TERUGG|
00001530: 45 48 41 41 4C 44 20 57 4F 52 44 45 4E 2E 20 D7 |EHAALD WORDEN. .|
00001540: 45 45 54 22 00 6B 1D F8 07 99 22 55 20 5A 45 4B |EET".k...."U ZEK|
00001550: 45 52 20 44 41 54 20 55 20 48 45 54 20 42 45 53 |ER DAT U HET BES|
00001560: 54 41 4E 44 20 57 49 4C 54 20 22 00 82 1D 02 08 |TAND WILT ".....|
00001570: 99 22 57 49 53 53 45 4E 3F 20 28 CA 2F CE 29 20 |."WISSEN? (./.) |
00001580: 22 3B 00 A3 1D 0C 08 8D 33 33 30 3A 8B 41 24 B2 |";......330:.A$.|
00001590: 22 4E 22 A7 99 4E 4F 24 3A 8D 33 37 35 3A 89 31 |"N"..NO$:.375:.1|
000015A0: 37 39 30 00 B5 1D 16 08 8B 41 24 B3 B1 22 4A 22 |790......A$.."J"|
000015B0: A7 32 30 36 30 00 E8 1D 20 08 99 22 93 11 11 11 |.2060... .."....|
000015C0: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 12 |................|
000015D0: 20 22 54 50 24 28 53 29 22 20 57 4F 52 44 54 20 | "TP$(S)" WORDT |
000015E0: 47 45 57 49 53 54 20 22 00 08 1E 2A 08 44 42 24 |GEWIST "...*.DB$|
000015F0: B2 54 50 24 28 53 29 3A 44 46 24 B2 22 2E 46 4D |.TP$(S):DF$.".FM|
00001600: 54 22 3A 8D 33 36 37 30 00 31 1E 34 08 81 49 B2 |T":.3670.1.4..I.|
00001610: 31 A4 4E 52 3A 98 31 35 2C 22 53 22 44 52 24 22 |1.NR:.15,"S"DR$"|
00001620: 20 22 54 50 24 28 49 29 22 2E 46 4D 54 22 3A 82 | "TP$(I)".FMT":.|
00001630: 49 00 51 1E 3E 08 44 42 24 B2 54 50 24 28 53 29 |I.Q.>.DB$.TP$(S)|
00001640: 3A 44 46 24 B2 22 2E 4C 42 4C 22 3A 8D 33 36 37 |:DF$.".LBL":.367|
00001650: 30 00 7A 1E 48 08 81 49 B2 31 A4 4E 52 3A 98 31 |0.z.H..I.1.NR:.1|
00001660: 35 2C 22 53 22 44 52 24 22 20 22 54 50 24 28 49 |5,"S"DR$" "TP$(I|
00001670: 29 22 2E 4C 42 4C 22 3A 82 49 00 90 1E 52 08 98 |)".LBL":.I...R..|
00001680: 31 35 2C 22 53 22 44 52 24 44 42 24 22 2E 2A 22 |15,"S"DR$DB$".*"|
00001690: 00 9B 1E 5C 08 44 42 24 B2 22 22 00 B9 1E 66 08 |...\.DB$.""...f.|
000016A0: 44 46 24 B2 22 42 45 53 54 41 4E 44 53 4E 41 4D |DF$."BESTANDSNAM|
000016B0: 45 4E 22 3A 8D 33 36 37 30 00 D8 1E 70 08 8B 4E |EN":.3670...p..N|
000016C0: 52 B2 31 A7 98 31 35 2C 22 53 22 44 52 24 44 46 |R.1..15,"S"DR$DF|
000016D0: 24 3A 9C 3A 89 31 38 30 00 F9 1E 7A 08 81 49 B2 |$:.:.180...z..I.|
000016E0: 53 A4 4E 52 AB 31 3A 54 50 24 28 49 29 B2 54 50 |S.NR.1:TP$(I).TP|
000016F0: 24 28 49 AA 31 29 3A 82 49 00 0B 1F 84 08 4E 52 |$(I.1):.I.....NR|
00001700: B2 4E 52 AB 31 3A 8D 33 38 38 30 00 15 1F 8E 08 |.NR.1:.3880.....|
00001710: 89 31 37 39 30 00 2B 1F 98 08 8F 20 2A 2A 2A 20 |.1790.+.... *** |
00001720: 50 52 49 4E 54 45 4E 20 2A 2A 2A 00 36 1F A2 08 |PRINTEN ***.6...|
00001730: 9F 34 2C 34 2C 37 00 43 1F AC 08 54 39 B2 30 3A |.4,4,7.C...T9.0:|
00001740: 45 B2 30 00 7E 1F B6 08 99 22 93 22 3A 8B 4E 46 |E.0.~....".":.NF|
00001750: B2 30 A7 99 22 C7 45 45 4E 20 47 45 47 45 56 45 |.0..".EEN GEGEVE|
00001760: 4E 53 20 49 4E 20 48 45 54 20 42 45 53 54 41 4E |NS IN HET BESTAN|
00001770: 44 21 22 3A 8D 33 32 30 3A 89 34 33 38 30 00 99 |D!":.320:.4380..|
00001780: 1F C0 08 81 49 B2 30 A4 35 AC 4E 48 AA 34 3A 52 |....I.0.5.NH.4:R|
00001790: 50 28 49 29 B2 30 3A 82 49 00 BA 1F CA 08 81 49 |P(I).0:.I......I|
000017A0: B2 30 A4 4E 48 3A 54 4C 28 49 29 B2 30 3A 82 49 |.0.NH:TL(I).0:.I|
000017B0: 3A 48 43 B2 30 3A 47 54 B2 30 00 C6 1F D4 08 8B |:HC.0:GT.0......|
000017C0: 45 89 32 35 38 30 00 D0 1F DE 08 89 33 34 35 30 |E.2580......3450|
000017D0: 00 F1 1F E8 08 8F 20 41 52 52 41 59 20 52 50 20 |...... ARRAY RP |
000017E0: 42 45 56 41 54 20 46 4F 52 4D 41 54 20 44 41 54 |BEVAT FORMAT DAT|
000017F0: 41 00 F7 1F F2 08 8F 00 14 20 FC 08 8F 20 20 20 |A........ ... |
00001800: 52 50 28 4E 2B 30 29 20 2D 20 56 45 4C 44 4E 55 |RP(N+0) - VELDNU|
00001810: 4D 4D 45 52 00 3F 20 06 09 8F 20 20 20 52 50 28 |MMER.? ... RP(|
00001820: 4E 2B 31 29 20 2D 20 41 41 4E 54 41 4C 20 43 48 |N+1) - AANTAL CH|
00001830: 52 53 20 4C 49 4E 4B 53 45 20 4B 4F 4C 4F 4D 00 |RS LINKSE KOLOM.|
00001840: 6C 20 10 09 8F 20 20 20 52 50 28 4E 2B 32 29 20 |l ... RP(N+2) |
00001850: 2D 20 30 3D 52 45 43 48 54 53 20 31 3D 4C 49 4E |- 0=RECHTS 1=LIN|
00001860: 4B 53 20 41 41 4E 47 45 50 41 53 54 00 9A 20 1A |KS AANGEPAST.. .|
00001870: 09 8F 20 20 20 52 50 28 4E 2B 33 29 20 2D 20 41 |.. RP(N+3) - A|
00001880: 41 4E 54 41 4C 20 41 46 47 45 44 52 55 4B 54 45 |ANTAL AFGEDRUKTE|
00001890: 20 4B 41 52 41 4B 54 45 52 53 00 D1 20 24 09 8F | KARAKTERS.. $..|
000018A0: 20 20 20 52 50 28 4E 2B 34 29 20 2D 20 46 4C 41 | RP(N+4) - FLA|
000018B0: 47 20 56 4F 4F 52 20 54 4F 54 41 41 4C 54 45 4C |G VOOR TOTAALTEL|
000018C0: 4C 49 4E 47 20 56 41 4E 20 44 49 54 20 56 45 4C |LING VAN DIT VEL|
000018D0: 44 00 D7 20 2E 09 8F 00 01 21 38 09 45 B2 30 3A |D.. .....!8.E.0:|
000018E0: 99 22 11 C8 4F 45 56 45 45 4C 20 56 45 4C 44 45 |."..OEVEEL VELDE|
000018F0: 4E 22 3B 3A 8D 33 36 30 3A 48 4E B2 C5 28 41 24 |N";:.360:HN..(A$|
00001900: 29 00 18 21 42 09 8B 48 4E B3 31 B0 48 4E B1 4E |)..!B..HN.1.HN.N|
00001910: 48 AA 31 A7 32 33 36 30 00 33 21 4C 09 8B 45 B2 |H.1.2360.3!L..E.|
00001920: 30 A7 52 4E 24 28 4E 4E 29 B2 22 48 55 49 44 49 |0.RN$(NN)."HUIDI|
00001930: 47 45 22 00 43 21 56 09 81 49 B2 31 A4 48 4E AC |GE".C!V..I.1.HN.|
00001940: 35 A9 35 00 76 21 60 09 99 22 11 D7 41 54 20 49 |5.5.v!`.."..AT I|
00001950: 53 20 48 45 54 20 56 45 4C 44 4E 55 4D 4D 45 52 |S HET VELDNUMMER|
00001960: 20 44 41 54 20 55 20 41 4C 53 22 28 49 AA 34 29 | DAT U ALS"(I.4)|
00001970: AD 35 22 9D 45 22 00 9E 21 6A 09 99 22 57 49 4C |.5".E"..!j.."WIL|
00001980: 54 20 41 46 44 52 55 4B 4B 45 4E 22 3B 3A 8D 33 |T AFDRUKKEN";:.3|
00001990: 36 30 3A 52 50 28 49 29 B2 C5 28 41 24 29 00 B9 |60:RP(I)..(A$)..|
000019A0: 21 74 09 8B 52 50 28 49 29 B3 30 B0 52 50 28 49 |!t..RP(I).0.RP(I|
000019B0: 29 B1 4E 48 A7 32 34 30 30 00 F7 21 7E 09 99 22 |).NH.2400..!~.."|
000019C0: 11 C7 45 45 46 20 50 52 49 4E 54 50 4F 53 49 54 |..EEF PRINTPOSIT|
000019D0: 49 45 20 56 4F 4F 52 20 22 48 44 24 28 52 50 28 |IE VOOR "HD$(RP(|
000019E0: 49 29 29 3B 3A 8D 33 36 30 3A 52 50 28 49 AA 31 |I));:.360:RP(I.1|
000019F0: 29 B2 C5 28 41 24 29 00 17 22 88 09 8B 52 50 28 |)..(A$).."...RP(|
00001A00: 49 AA 31 29 B3 30 B0 52 50 28 49 AA 31 29 B1 32 |I.1).0.RP(I.1).2|
00001A10: 35 35 A7 32 34 33 30 00 42 22 92 09 99 22 11 D2 |55.2430.B"..."..|
00001A20: 45 43 48 54 53 20 4F 46 20 4C 49 4E 4B 53 20 55 |ECHTS OF LINKS U|
00001A30: 49 54 47 45 56 55 4C 44 3F 20 28 D2 2F CC 29 20 |ITGEVULD? (./.) |
00001A40: 22 3B 00 6F 22 9C 09 8D 33 33 30 3A 8B 41 24 B2 |";.o"...330:.A$.|
00001A50: 22 52 22 A7 52 50 28 49 AA 32 29 B2 30 3A 99 22 |"R".RP(I.2).0:."|
00001A60: 12 52 45 43 48 54 53 92 22 3A 89 32 34 39 30 00 |.RECHTS.":.2490.|
00001A70: 96 22 A6 09 8B 41 24 B2 22 4C 22 A7 52 50 28 49 |."...A$."L".RP(I|
00001A80: AA 32 29 B2 31 3A 99 22 12 4C 49 4E 4B 53 92 22 |.2).1:.".LINKS."|
00001A90: 3A 89 32 34 39 30 00 A0 22 B0 09 89 32 34 36 30 |:.2490.."...2460|
00001AA0: 00 C8 22 BA 09 99 22 11 D6 45 4C 44 42 52 45 45 |.."..."..ELDBREE|
00001AB0: 44 54 45 22 3B 3A 8D 33 36 30 3A 52 50 28 49 AA |DTE";:.360:RP(I.|
00001AC0: 33 29 B2 C5 28 41 24 29 00 DD 22 C4 09 8B 52 50 |3)..(A$).."...RP|
00001AD0: 28 49 AA 33 29 B3 B2 30 A7 32 34 39 30 00 21 23 |(I.3)..0.2490.!#|
00001AE0: CE 09 99 22 11 CD 4F 45 54 20 45 52 20 56 41 4E |..."..OET ER VAN|
00001AF0: 20 44 49 54 20 56 45 4C 44 20 45 45 4E 20 54 4F | DIT VELD EEN TO|
00001B00: 54 41 41 4C 22 3A 99 22 42 45 52 45 4B 45 4E 44 |TAAL":."BEREKEND|
00001B10: 20 57 4F 52 44 45 4E 3F 20 28 CA 2F CE 29 20 22 | WORDEN? (./.) "|
00001B20: 3B 00 59 23 D8 09 8D 33 33 30 3A 8B 41 24 B2 22 |;.Y#...330:.A$."|
00001B30: 4A 22 A7 52 50 28 49 AA 34 29 B2 31 3A 52 50 28 |J".RP(I.4).1:RP(|
00001B40: 30 29 B2 31 3A 54 39 B2 31 3A 99 59 53 24 3A 8D |0).1:T9.1:.YS$:.|
00001B50: 33 37 35 3A 89 32 35 35 30 00 6B 23 E2 09 8B 41 |375:.2550.k#...A|
00001B60: 24 B3 B1 22 4E 22 A7 32 35 32 30 00 79 23 EC 09 |$.."N".2520.y#..|
00001B70: 99 4E 4F 24 3A 8D 33 37 35 00 80 23 F6 09 82 49 |.NO$:.375..#...I|
00001B80: 00 93 23 00 0A 8B 52 50 28 30 29 B3 B1 31 A7 32 |..#...RP(0)..1.2|
00001B90: 35 38 30 00 C1 23 0A 0A 52 50 28 49 AA 31 29 B2 |580..#..RP(I.1).|
00001BA0: 52 50 28 49 AB 34 29 3A 52 50 28 49 AA 33 29 B2 |RP(I.4):RP(I.3).|
00001BB0: 52 50 28 49 AB 32 29 3A 52 50 28 49 AA 34 29 B2 |RP(I.2):RP(I.4).|
00001BC0: 31 00 CD 23 14 0A 99 3A 89 32 36 32 30 00 E9 23 |1..#...:.2620..#|
00001BD0: 1E 0A 54 39 B2 30 3A 8B 52 50 28 48 4E AC 35 AA |..T9.0:.RP(HN.5.|
00001BE0: 31 29 B2 31 A7 54 39 B2 31 00 07 24 28 0A 81 4A |1).1.T9.1..$(..J|
00001BF0: B2 35 A4 48 4E AC 35 A9 35 3A 8B 52 50 28 4A 29 |.5.HN.5.5:.RP(J)|
00001C00: B2 31 A7 54 39 B2 31 00 0E 24 32 0A 82 4A 00 56 |.1.T9.1..$2..J.V|
00001C10: 24 3C 0A 99 22 11 CD 4F 45 54 45 4E 20 41 4C 4C |$<.."..OETEN ALL|
00001C20: 45 20 52 45 43 4F 52 44 53 20 55 49 54 20 48 45 |E RECORDS UIT HE|
00001C30: 54 20 42 45 53 54 41 4E 44 20 20 20 20 20 47 45 |T BESTAND GE|
00001C40: 50 52 49 4E 54 20 57 4F 52 44 45 4E 3F 20 28 CA |PRINT WORDEN? (.|
00001C50: 2F CE 29 20 22 3B 00 8D 24 46 0A 8D 33 33 30 3A |/.) ";..$F..330:|
00001C60: 8B 41 24 B2 22 4A 22 A7 99 59 53 24 22 11 22 3A |.A$."J"..YS$".":|
00001C70: 8D 33 37 35 3A 51 24 B2 22 40 22 3A 58 24 B2 22 |.375:Q$."@":X$."|
00001C80: 40 22 3A 53 B2 AB 31 3A 89 32 37 34 30 00 9F 24 |@":S..1:.2740..$|
00001C90: 50 0A 8B 41 24 B3 B1 22 4E 22 A7 32 36 33 30 00 |P..A$.."N".2630.|
00001CA0: B0 24 5A 0A 99 4E 4F 24 22 11 22 3A 8D 33 37 35 |.$Z..NO$".":.375|
00001CB0: 00 E6 24 64 0A 99 22 C9 4E 20 57 45 4C 4B 20 56 |..$d..".N WELK V|
00001CC0: 45 4C 44 20 4D 4F 45 54 20 47 45 5A 4F 43 48 54 |ELD MOET GEZOCHT|
00001CD0: 20 57 4F 52 44 45 4E 22 3B 3A 8D 33 36 30 3A 53 | WORDEN";:.360:S|
00001CE0: B2 C5 28 41 24 29 00 03 25 6E 0A 8B 53 B2 30 A7 |..(A$)..%n..S.0.|
00001CF0: 51 24 B2 22 40 22 3A 58 24 B2 22 40 22 3A 89 32 |Q$."@":X$."@":.2|
00001D00: 37 34 30 00 43 25 78 0A 99 22 11 CD 4F 45 54 20 |740.C%x.."..OET |
00001D10: 45 52 20 4E 4F 47 20 49 4E 20 45 45 4E 20 54 57 |ER NOG IN EEN TW|
00001D20: 45 45 44 45 20 56 45 4C 44 20 47 45 5A 4F 43 48 |EEDE VELD GEZOCH|
00001D30: 54 20 20 57 4F 52 44 45 4E 3F 20 28 CA 2F CE 29 |T WORDEN? (./.)|
00001D40: 20 22 3B 00 6B 25 82 0A 8D 33 33 30 3A 8B 41 24 | ";.k%...330:.A$|
00001D50: B2 22 4E 22 A7 58 24 B2 22 40 22 3A 99 4E 4F 24 |."N".X$."@":.NO$|
00001D60: 3A 8D 33 37 35 3A 89 32 37 32 30 00 7D 25 8C 0A |:.375:.2720.}%..|
00001D70: 8B 41 24 B3 B1 22 4A 22 A7 32 36 39 30 00 C2 25 |.A$.."J".2690..%|
00001D80: 96 0A 4C 24 B2 22 4A 22 3A 99 59 53 24 3A 99 22 |..L$."J":.YS$:."|
00001D90: 11 C9 4E 20 57 45 4C 4B 20 56 45 4C 44 20 4D 4F |..N WELK VELD MO|
00001DA0: 45 54 20 47 45 5A 4F 43 48 54 20 57 4F 52 44 45 |ET GEZOCHT WORDE|
00001DB0: 4E 22 3B 3A 8D 33 36 30 3A 58 B2 C5 28 41 24 29 |N";:.360:X..(A$)|
00001DC0: 3A 99 00 FE 25 A0 0A 99 22 11 D7 41 41 52 4E 41 |:...%..."..AARNA|
00001DD0: 41 52 20 4D 4F 45 54 20 49 4E 20 56 45 4C 44 22 |AR MOET IN VELD"|
00001DE0: 53 22 47 45 5A 4F 43 48 54 20 57 4F 52 44 45 4E |S"GEZOCHT WORDEN|
00001DF0: 22 3A 8D 33 36 30 3A 99 3A 51 24 B2 41 24 00 2C |":.360:.:Q$.A$.,|
00001E00: 26 AA 0A 8B 4C 24 B2 22 4A 22 A7 99 22 45 4E 20 |&...L$."J".."EN |
00001E10: 42 49 4A 20 22 48 44 24 28 58 29 3A 8D 33 36 30 |BIJ "HD$(X):.360|
00001E20: 3A 58 24 B2 41 24 3A 4C 24 B2 22 22 00 36 26 B4 |:X$.A$:L$."".6&.|
00001E30: 0A 8B 46 4D A7 8E 00 7C 26 BE 0A 99 22 11 C8 4F |..FM...|&..."..O|
00001E40: 45 56 45 45 4C 20 52 45 47 45 4C 53 20 4B 55 4E |EVEEL REGELS KUN|
00001E50: 4E 45 4E 20 45 52 20 4D 41 58 49 4D 41 41 4C 20 |NEN ER MAXIMAAL |
00001E60: 4F 50 20 48 45 54 50 41 50 49 45 52 22 3B 3A 8D |OP HETPAPIER";:.|
00001E70: 33 36 30 3A 50 4C B2 C5 28 41 24 29 00 C2 26 C8 |360:PL..(A$)..&.|
00001E80: 0A 99 22 11 C8 4F 45 56 45 45 4C 20 4D 4F 47 45 |.."..OEVEEL MOGE|
00001E90: 4E 20 45 52 20 50 45 52 20 42 4C 41 44 5A 49 4A |N ER PER BLADZIJ|
00001EA0: 44 45 20 47 45 42 52 55 49 4B 54 20 57 4F 52 44 |DE GEBRUIKT WORD|
00001EB0: 45 4E 22 3B 3A 8D 33 36 30 3A 50 43 B2 C5 28 41 |EN";:.360:PC..(A|
00001EC0: 24 29 00 FF 26 D2 0A 8B 50 43 B1 50 4C A7 99 22 |$)..&...PC.PL.."|
00001ED0: 11 DA 4F 56 45 45 4C 20 4B 55 4E 4E 45 4E 20 45 |..OVEEL KUNNEN E|
00001EE0: 52 20 4E 49 45 54 20 4F 50 20 45 45 4E 20 42 4C |R NIET OP EEN BL|
00001EF0: 41 44 5A 49 4A 44 45 21 22 3A 89 32 37 35 30 00 |ADZIJDE!":.2750.|
00001F00: 0C 27 DC 0A 50 43 B2 50 4C AB 50 43 00 16 27 E6 |.'..PC.PL.PC..'.|
00001F10: 0A 8D 33 31 35 30 00 30 27 F0 0A 81 4A B2 31 A4 |..3150.0'...J.1.|
00001F20: 4E 46 3A 44 41 24 28 4A 2C 30 29 B2 C4 28 4A 29 |NF:DA$(J,0)..(J)|
00001F30: 00 41 27 FA 0A 8B 51 24 B2 22 40 22 A7 32 38 35 |.A'...Q$."@".285|
00001F40: 30 00 61 27 04 0B 8B C8 28 44 41 24 28 4A 2C 53 |0.a'....(DA$(J,S|
00001F50: 29 2C C3 28 51 24 29 29 B3 B1 51 24 A7 32 38 36 |),.(Q$))..Q$.286|
00001F60: 30 00 72 27 0E 0B 8B 58 24 B2 22 40 22 A7 32 38 |0.r'...X$."@".28|
00001F70: 35 30 00 92 27 18 0B 8B C8 28 44 41 24 28 4A 2C |50..'....(DA$(J,|
00001F80: 58 29 2C C3 28 58 24 29 29 B3 B1 58 24 A7 32 38 |X),.(X$))..X$.28|
00001F90: 36 30 00 9C 27 22 0B 8D 33 30 32 30 00 C8 27 2C |60..'"..3020..',|
00001FA0: 0B 8B 4C 43 B1 50 4C A7 50 52 B2 31 3A 8D 31 32 |..LC.PL.PR.1:.12|
00001FB0: 39 30 3A 81 4C 43 B2 30 A4 50 43 3A 98 34 3A 82 |90:.LC.0.PC:.4:.|
00001FC0: 4C 43 3A 8D 33 31 35 30 00 D8 27 36 0B 8B 4C 43 |LC:.3150..'6..LC|
00001FD0: B2 30 A7 8D 33 31 35 30 00 F6 27 40 0B A1 41 24 |.0..3150..'@..A$|
00001FE0: 3A 8B 41 24 B2 22 4D 22 A7 4A B2 4E 46 3A 82 4A |:.A$."M".J.NF:.J|
00001FF0: 3A 89 32 39 31 30 00 FD 27 4A 0B 82 4A 00 0B 28 |:.2910..'J..J..(|
00002000: 54 0B 8B 54 39 A7 8D 33 30 39 30 00 17 28 5E 0B |T..T9..3090..(^.|
00002010: 8B 45 89 32 39 37 30 00 3E 28 68 0B 99 22 11 D7 |.E.2970.>(h.."..|
00002020: 49 4C 54 20 55 20 44 45 5A 45 20 4F 56 45 52 5A |ILT U DEZE OVERZ|
00002030: 49 43 48 54 53 49 4E 44 45 4C 49 4E 47 22 00 5E |ICHTSINDELING".^|
00002040: 28 72 0B 99 22 4F 50 20 44 49 53 4B 20 42 45 57 |(r.."OP DISK BEW|
00002050: 41 52 45 4E 3F 20 28 CA 2F CE 29 20 22 3B 00 89 |AREN? (./.) ";..|
00002060: 28 7C 0B 8D 33 33 30 3A 8B 41 24 B2 22 4A 22 A7 |(|..330:.A$."J".|
00002070: 45 B2 31 3A 99 59 53 24 3A 8D 33 37 35 3A 8D 33 |E.1:.YS$:.375:.3|
00002080: 32 34 30 3A 89 32 39 37 30 00 9B 28 86 0B 8B 41 |240:.2970..(...A|
00002090: 24 B3 B1 22 4E 22 A7 32 39 34 30 00 A4 28 90 0B |$.."N".2940..(..|
000020A0: 99 4E 4F 24 00 F0 28 9A 0B 99 22 11 CD 4F 45 54 |.NO$..(..."..OET|
000020B0: 45 4E 20 45 52 20 4E 4F 47 20 4D 45 45 52 20 4F |EN ER NOG MEER O|
000020C0: 56 45 52 5A 49 43 48 54 45 4E 20 47 45 50 52 49 |VERZICHTEN GEPRI|
000020D0: 4E 54 22 3A 99 22 57 4F 52 44 45 4E 20 4D 45 54 |NT":."WORDEN MET|
000020E0: 20 44 45 5A 45 20 49 4E 44 45 4C 49 4E 47 22 3B | DEZE INDELING";|
000020F0: 00 00 29 A4 0B 99 22 3F 20 28 CA 2F CE 29 22 3B |..)..."? (./.)";|
00002100: 00 2B 29 AE 0B 8D 33 33 30 3A 8B 41 24 B2 22 4A |.+)...330:.A$."J|
00002110: 22 A7 99 59 53 24 3A 8D 33 37 35 3A 8D 33 34 30 |"..YS$:.375:.340|
00002120: 30 3A 45 B2 31 3A 89 32 32 35 30 00 3D 29 B8 0B |0:E.1:.2250.=)..|
00002130: 8B 41 24 B3 B1 22 4E 22 A7 32 39 39 30 00 54 29 |.A$.."N".2990.T)|
00002140: C2 0B 99 4E 4F 24 3A 8D 33 37 35 3A A0 34 3A 89 |...NO$:.375:.4:.|
00002150: 34 33 38 30 00 78 29 CC 0B 81 49 B2 31 A4 48 4E |4380.x)...I.1.HN|
00002160: 3A 8B 52 50 28 35 AC 49 29 A7 8D 33 30 37 30 3A |:.RP(5.I)..3070:|
00002170: 82 49 3A 89 33 30 34 30 00 7F 29 D6 0B 82 49 00 |.I:.3040..)...I.|
00002180: 8E 29 E0 0B 48 46 B2 31 3A 8D 34 36 39 30 00 AF |.)..HF.1:.4690..|
00002190: 29 EA 0B 8B 52 50 28 30 29 B2 31 AF 48 43 B3 B1 |)...RP(0).1.HC..|
000021A0: 30 A7 47 54 B2 47 54 AA 48 43 3A 48 43 B2 30 00 |0.GT.GT.HC:HC.0.|
000021B0: BD 29 F4 0B 4C 43 B2 4C 43 AA 31 3A 8E 00 C9 29 |.)..LC.LC.1:...)|
000021C0: FE 0B 4E B2 35 AC 49 AB 34 00 F7 29 08 0C 56 B2 |..N.5.I.4..)..V.|
000021D0: C5 28 44 41 24 28 4A 2C 52 50 28 4E 29 29 29 3A |.(DA$(J,RP(N))):|
000021E0: 54 4C 28 49 29 B2 54 4C 28 49 29 AA 56 3A 48 43 |TL(I).TL(I).V:HC|
000021F0: B2 48 43 AA 56 3A 8E 00 36 2A 12 0C 4E B2 52 50 |.HC.V:..6*..N.RP|
00002200: 28 48 4E AC 35 AA 32 29 AA 52 50 28 48 4E AC 35 |(HN.5.2).RP(HN.5|
00002210: AA 34 29 3A 8B 4E B2 31 A7 4E B2 52 50 28 48 4E |.4):.N.1.N.RP(HN|
00002220: AC 35 AB 33 29 AA 52 50 28 48 4E AC 35 AB 31 29 |.5.3).RP(HN.5.1)|
00002230: 3A 89 33 31 31 30 00 4F 2A 1C 0C 81 49 B2 31 A4 |:.3110.O*...I.1.|
00002240: 4E 3A 98 34 2C 22 2D 22 3B 3A 82 49 3A 98 34 00 |N:.4,"-";:.I:.4.|
00002250: 5B 2A 26 0C 81 49 B2 31 A4 48 4E 00 8C 2A 30 0C |[*&..I.1.HN..*0.|
00002260: 54 4C 24 28 49 29 B2 C4 28 54 4C 28 49 29 29 3A |TL$(I)..(TL(I)):|
00002270: 54 4C 24 28 49 29 B2 C9 28 54 4C 24 28 49 29 2C |TL$(I)..(TL$(I),|
00002280: C3 28 54 4C 24 28 49 29 29 AB 31 29 00 A3 2A 3A |.(TL$(I)).1)..*:|
00002290: 0C 8B 54 4C 28 49 29 B2 30 A7 54 4C 24 28 49 29 |..TL(I).0.TL$(I)|
000022A0: B2 22 22 00 B7 2A 44 0C 82 49 3A 48 46 B2 32 3A |.""..*D..I:HF.2:|
000022B0: 8D 34 36 39 30 3A 8E 00 CA 2A 4E 0C 99 22 93 22 |.4690:...*N.."."|
000022C0: 3A A0 34 3A 9F 34 2C 34 2C 37 00 04 2B 58 0C 8B |:.4:.4,4,7..+X..|
000022D0: 53 B2 AB 31 A7 98 34 2C 44 42 24 22 3A 20 4F 56 |S..1..4,DB$": OV|
000022E0: 45 52 5A 49 43 48 54 20 56 41 4E 20 48 45 54 20 |ERZICHT VAN HET |
000022F0: 48 45 4C 45 20 42 45 53 54 41 4E 44 22 3B 3A 89 |HELE BESTAND";:.|
00002300: 33 32 30 30 00 2D 2B 62 0C 98 34 2C 44 42 24 22 |3200.-+b..4,DB$"|
00002310: 3A 20 4F 56 45 52 5A 49 43 48 54 20 56 41 4E 20 |: OVERZICHT VAN |
00002320: 22 48 44 24 28 53 29 22 3A 22 51 24 3B 00 3E 2B |"HD$(S)":"Q$;.>+|
00002330: 6C 0C 8B 58 24 B2 22 40 22 A7 33 32 30 30 00 58 |l..X$."@".3200.X|
00002340: 2B 76 0C 98 34 2C 22 20 45 4E 20 22 48 44 24 28 |+v..4," EN "HD$(|
00002350: 58 29 22 3A 22 58 24 3B 00 80 2B 80 0C 98 34 2C |X)":"X$;..+...4,|
00002360: 22 20 28 49 4E 44 45 4C 49 4E 47 3A 20 22 3B 52 |" (INDELING: ";R|
00002370: 4E 24 28 4E 4E 29 3B 22 29 22 3A 98 34 3A 98 34 |N$(NN);")":.4:.4|
00002380: 00 9D 2B 8A 0C 48 46 B2 30 3A 8D 34 36 39 30 3A |..+..HF.0:.4690:|
00002390: 4E B2 38 30 3A 8D 33 31 30 30 3A 98 34 00 A8 2B |N.80:.3100:.4..+|
000023A0: 94 0C 4C 43 B2 35 3A 8E 00 DA 2B 9E 0C 8F 20 2A |..LC.5:...+... *|
000023B0: 2A 2A 20 53 45 54 2D 55 50 20 56 4F 4F 52 20 53 |** SET-UP VOOR S|
000023C0: 41 56 45 4E 20 52 41 50 50 4F 52 54 20 49 4E 44 |AVEN RAPPORT IND|
000023D0: 45 4C 49 4E 47 20 20 2A 2A 2A 00 E4 2B A8 0C 4E |ELING ***..+..N|
000023E0: 53 B2 4E 52 00 2C 2C B2 0C 99 22 11 C8 4F 45 20 |S.NR.,,..."..OE |
000023F0: 57 49 4C 54 20 55 20 44 45 5A 45 20 49 4E 44 45 |WILT U DEZE INDE|
00002400: 4C 49 4E 47 20 20 20 20 20 20 20 20 20 20 20 20 |LING |
00002410: 20 20 20 20 4E 4F 45 4D 45 4E 22 3B 3A 8D 33 36 | NOEMEN";:.36|
00002420: 30 3A 52 4E 24 28 4E 4E 29 B2 41 24 00 47 2C BC |0:RN$(NN).A$.G,.|
00002430: 0C 44 46 24 B2 22 20 22 AA 52 4E 24 28 4E 4E 29 |.DF$." ".RN$(NN)|
00002440: AA 22 2E 46 4D 54 22 00 55 2C C6 0C 4E 52 B2 35 |.".FMT".U,..NR.5|
00002450: AC 48 4E AA 34 00 74 2C D0 0C 81 49 B2 31 A4 4E |.HN.4.t,...I.1.N|
00002460: 52 3A 54 50 24 28 49 29 B2 C4 28 52 50 28 49 29 |R:TP$(I)..(RP(I)|
00002470: 29 3A 82 49 00 8A 2C DA 0C 54 50 24 28 49 AB 34 |):.I..,..TP$(I.4|
00002480: 29 B2 C4 28 52 50 28 30 29 29 00 9C 2C E4 0C 8D |)..(RP(0))..,...|
00002490: 33 38 38 30 3A 8D 34 30 37 30 3A 8E 00 C9 2C EE |3880:.4070:...,.|
000024A0: 0C 8F 20 2A 2A 2A 20 53 45 54 2D 55 50 20 49 4E |.. *** SET-UP IN|
000024B0: 4C 45 5A 45 4E 20 52 41 50 50 4F 52 54 2D 46 4F |LEZEN RAPPORT-FO|
000024C0: 52 4D 41 54 20 20 2A 2A 2A 00 D6 2C F8 0C 8B 4C |RMAT ***..,...L|
000024D0: 47 A7 34 32 38 30 00 F1 2C 02 0D 44 46 24 B2 22 |G.4280..,..DF$."|
000024E0: 20 22 AA 52 4E 24 28 4E 4E 29 AA 22 2E 46 4D 54 | ".RN$(NN).".FMT|
000024F0: 22 00 FB 2C 0C 0D 8D 33 36 37 30 00 0B 2D 16 0D |"..,...3670..-..|
00002500: 48 4E B2 28 4E 52 AB 34 29 AD 35 00 1E 2D 20 0D |HN.(NR.4).5..- .|
00002510: 52 50 28 30 29 B2 52 50 28 4E 52 AB 33 29 00 28 |RP(0).RP(NR.3).(|
00002520: 2D 2A 0D 4E 52 B2 4E 53 00 3A 2D 34 0D 8D 33 34 |-*.NR.NS.:-4..34|
00002530: 30 30 3A 99 3A 89 32 35 39 30 00 51 2D 3E 0D 8F |00:.:.2590.Q->..|
00002540: 20 2A 2A 2A 20 53 55 42 20 4D 45 4E 55 20 2A 2A | *** SUB MENU **|
00002550: 2A 00 66 2D 48 0D 99 22 93 11 CB 49 45 53 20 55 |*.f-H.."...IES U|
00002560: 49 54 3A 22 3A 99 00 7E 2D 52 0D 8B 4D 46 B2 30 |IT:":..~-R..MF.0|
00002570: A7 99 22 20 30 2E 20 22 48 44 24 28 30 29 00 9D |.." 0. "HD$(0)..|
00002580: 2D 5C 0D 81 49 B2 31 A4 4E 48 3A 99 49 22 9D 2E |-\..I.1.NH:.I"..|
00002590: 20 22 48 44 24 28 49 29 3A 82 49 3A 99 00 A8 2D | "HD$(I):.I:...-|
000025A0: 66 0D 4D 46 B2 30 3A 8E 00 D2 2D 70 0D 8F 20 2A |f.MF.0:...-p.. *|
000025B0: 2A 2A 20 49 4E 4C 45 5A 45 4E 20 52 41 50 50 4F |** INLEZEN RAPPO|
000025C0: 52 54 2D 46 4F 52 4D 41 54 20 4E 41 4D 45 20 2A |RT-FORMAT NAME *|
000025D0: 2A 2A 00 F6 2D 7A 0D 4E 4E B2 30 3A 81 49 B2 30 |**..-z.NN.0:.I.0|
000025E0: A4 32 30 3A 52 4E 24 28 49 29 B2 22 22 3A 82 49 |.20:RN$(I)."":.I|
000025F0: 3A 4E 53 B2 4E 52 00 14 2E 84 0D 44 46 24 B2 22 |:NS.NR.....DF$."|
00002600: 2E 4E 41 4D 22 3A 8B 4C 47 A7 44 46 24 B2 22 2E |.NAM":.LG.DF$.".|
00002610: 4C 42 4C 22 00 1E 2E 8E 0D 8D 33 36 37 30 00 2E |LBL"......3670..|
00002620: 2E 98 0D 8B 4C 47 AF 45 52 A7 34 39 36 30 00 3B |....LG.ER.4960.;|
00002630: 2E A2 0D 8B 45 52 89 33 36 30 30 00 58 2E AC 0D |....ER.3600.X...|
00002640: 81 49 B2 31 A4 4E 52 3A 52 4E 24 28 49 29 B2 54 |.I.1.NR:RN$(I).T|
00002650: 50 24 28 49 29 3A 82 49 00 6C 2E B6 0D 99 22 93 |P$(I):.I.l....".|
00002660: 11 CB 49 45 53 20 55 49 54 3A 11 22 00 89 2E C0 |..IES UIT:."....|
00002670: 0D 81 49 B2 31 A4 4E 52 3A 99 49 22 9D 2E 20 22 |..I.1.NR:.I".. "|
00002680: 52 4E 24 28 49 29 3A 82 49 00 9A 2E CA 0D 8B 4E |RN$(I):.I......N|
00002690: 52 B1 B2 32 30 A7 33 35 36 30 00 CD 2E D4 0D 8B |R..20.3560......|
000026A0: 4C 47 A7 99 49 22 9D 2E 20 CE 49 45 55 57 45 20 |LG..I".. .IEUWE |
000026B0: 45 54 49 4B 45 54 2D 49 4E 44 45 4C 49 4E 47 20 |ETIKET-INDELING |
000026C0: 4D 41 4B 45 4E 11 22 3A 89 33 35 36 30 00 F8 2E |MAKEN.":.3560...|
000026D0: DE 0D 99 49 22 9D 2E 20 CE 49 45 55 57 45 20 4F |...I".. .IEUWE O|
000026E0: 56 45 52 5A 49 43 48 54 53 49 4E 44 45 4C 49 4E |VERZICHTSINDELIN|
000026F0: 47 20 4D 41 4B 45 4E 22 00 2D 2F E8 0D 99 22 11 |G MAKEN".-/...".|
00002700: CB 45 55 5A 45 22 3B 3A 8D 33 36 30 3A 53 B2 C5 |.EUZE";:.360:S..|
00002710: 28 41 24 29 3A 8B 53 B3 31 B0 53 B1 28 49 AA 28 |(A$):.S.1.S.(I.(|
00002720: 4E 52 B1 B2 32 30 29 29 A7 33 35 36 30 00 43 2F |NR..20)).3560.C/|
00002730: F2 0D 4E 4E B2 53 3A 8B 4C 47 AF 53 B2 49 89 35 |..NN.S:.LG.S.I.5|
00002740: 30 31 30 00 6B 2F FC 0D 8B 53 B3 B1 49 A7 52 4E |010.k/...S..I.RN|
00002750: 24 28 53 29 B2 54 50 24 28 53 29 3A 45 B2 31 3A |$(S).TP$(S):E.1:|
00002760: 4E 52 B2 4E 53 3A 89 33 33 32 30 00 75 2F 06 0E |NR.NS:.3320.u/..|
00002770: 89 33 36 35 30 00 AC 2F 10 0E 99 22 93 11 C5 52 |.3650../..."...R|
00002780: 20 53 54 41 41 4E 20 47 45 45 4E 20 4F 56 45 52 | STAAN GEEN OVER|
00002790: 5A 49 43 48 54 53 49 4E 44 45 4C 49 4E 47 45 4E |ZICHTSINDELINGEN|
000027A0: 20 4F 50 20 20 20 44 49 53 4B 2E 22 00 D6 2F 1A | OP DISK."../.|
000027B0: 0E 4E 4E B2 31 3A 99 22 11 D7 49 4C 54 20 55 20 |.NN.1:."..ILT U |
000027C0: 45 52 20 45 45 4E 20 4D 41 4B 45 4E 3F 20 28 CA |ER EEN MAKEN? (.|
000027D0: 2F CE 29 20 22 3B 00 F7 2F 24 0E 8D 33 33 30 3A |/.) ";../$..330:|
000027E0: 8B 41 24 B2 22 4E 22 A7 99 4E 4F 24 3A 8D 33 37 |.A$."N"..NO$:.37|
000027F0: 35 3A 89 34 33 38 30 00 09 30 2E 0E 8B 41 24 B3 |5:.4380..0...A$.|
00002800: B1 22 4A 22 A7 33 36 32 30 00 17 30 38 0E 99 59 |."J".3620..08..Y|
00002810: 53 24 3A 8D 33 37 35 00 2D 30 42 0E 8D 33 34 30 |S$:.375.-0B..340|
00002820: 30 3A 4E 52 B2 4E 53 3A 89 32 33 36 30 00 47 30 |0:NR.NS:.2360.G0|
00002830: 4C 0E 8F 20 2A 2A 2A 20 4C 45 5A 45 4E 20 46 49 |L.. *** LEZEN FI|
00002840: 4C 45 53 20 2A 2A 2A 00 50 30 56 0E 45 52 B2 30 |LES ***.P0V.ER.0|
00002850: 00 6B 30 60 0E 46 46 B2 30 3A 8B 44 46 24 B3 B1 |.k0`.FF.0:.DF$..|
00002860: 22 2E 44 41 54 22 A7 46 46 B2 31 00 85 30 6A 0E |".DAT".FF.1..0j.|
00002870: 8B C9 28 44 46 24 2C 34 29 B2 22 2E 46 4D 54 22 |..(DF$,4).".FMT"|
00002880: A7 46 46 B2 32 00 B5 30 74 0E 8B C3 28 44 42 24 |.FF.2..0t...(DB$|
00002890: 29 B1 39 A7 46 4C 24 B2 44 52 24 AA C8 28 44 42 |).9.FL$.DR$..(DB|
000028A0: 24 2C 39 29 AA 44 46 24 AA 22 2C 53 2C 52 22 3A |$,9).DF$.",S,R":|
000028B0: 89 33 37 32 30 00 D0 30 7E 0E 46 4C 24 B2 44 52 |.3720..0~.FL$.DR|
000028C0: 24 AA 44 42 24 AA 44 46 24 AA 22 2C 53 2C 52 22 |$.DB$.DF$.",S,R"|
000028D0: 00 DF 30 88 0E 9F 33 2C 38 2C 33 2C 46 4C 24 00 |..0...3,8,3,FL$.|
000028E0: 19 31 92 0E 84 31 35 2C 41 24 2C 42 24 2C 43 24 |.1...15,A$,B$,C$|
000028F0: 2C 44 24 3A 44 54 B2 C5 28 41 24 29 3A 44 54 24 |,D$:DT..(A$):DT$|
00002900: B2 41 24 AA 22 2C 20 22 AA 42 24 AA 22 2C 22 AA |.A$.", ".B$.",".|
00002910: 43 24 AA 22 2C 22 AA 44 24 00 28 31 9C 0E 8B 44 |C$.",".D$.(1...D|
00002920: 54 B2 30 A7 33 37 37 30 00 3E 31 A6 0E 8B 44 54 |T.0.3770.>1...DT|
00002930: B2 36 32 A7 45 52 B2 31 3A 89 33 38 36 30 00 66 |.62.ER.1:.3860.f|
00002940: 31 B0 0E 99 22 93 11 11 44 49 53 4B 20 45 52 52 |1..."...DISK ERR|
00002950: 4F 52 20 2D 22 3A 99 44 54 24 3A A0 31 3A A0 33 |OR -":.DT$:.1:.3|
00002960: 3A A0 31 35 3A 80 00 70 31 BA 0E 84 33 2C 4E 52 |:.15:..p1...3,NR|
00002970: 00 7C 31 C4 0E 81 4A B2 31 A4 4E 52 00 8B 31 CE |.|1...J.1.NR..1.|
00002980: 0E 8B 46 46 B2 31 89 33 38 33 30 00 9A 31 D8 0E |..FF.1.3830..1..|
00002990: 8B 46 46 B2 32 89 33 38 34 30 00 BB 31 E2 0E 81 |.FF.2.3840..1...|
000029A0: 49 B2 31 A4 4E 48 3A 8D 34 36 35 30 3A 44 41 24 |I.1.NH:.4650:DA$|
000029B0: 28 4A 2C 49 29 B2 49 24 3A 82 49 00 C5 31 EC 0E |(J,I).I$:.I..1..|
000029C0: 89 33 38 35 30 00 D9 31 F6 0E 84 33 2C 54 50 24 |.3850..1...3,TP$|
000029D0: 28 4A 29 3A 89 33 38 35 30 00 E6 31 00 0F 84 33 |(J):.3850..1...3|
000029E0: 2C 52 50 28 4A 29 00 ED 31 0A 0F 82 4A 00 FB 31 |,RP(J)..1...J..1|
000029F0: 14 0F A0 33 3A 46 46 B2 30 3A 8E 00 14 32 1E 0F |...3:FF.0:...2..|
00002A00: 8F 20 2A 2A 2A 20 53 41 56 45 20 46 49 4C 45 53 |. *** SAVE FILES|
00002A10: 20 2A 2A 2A 00 2F 32 28 0F 46 46 B2 30 3A 8B 44 | ***./2(.FF.0:.D|
00002A20: 46 24 B3 B1 22 2E 44 41 54 22 A7 46 46 B2 31 00 |F$..".DAT".FF.1.|
00002A30: 49 32 32 0F 8B C9 28 44 46 24 2C 34 29 B2 22 2E |I22...(DF$,4).".|
00002A40: 46 4D 54 22 A7 46 46 B2 32 00 79 32 3C 0F 8B C3 |FMT".FF.2.y2<...|
00002A50: 28 44 42 24 29 B1 39 A7 46 4C 24 B2 44 52 24 AA |(DB$).9.FL$.DR$.|
00002A60: C8 28 44 42 24 2C 39 29 AA 44 46 24 AA 22 2C 53 |.(DB$,9).DF$.",S|
00002A70: 2C 57 22 3A 89 33 39 32 30 00 94 32 46 0F 46 4C |,W":.3920..2F.FL|
00002A80: 24 B2 44 52 24 AA 44 42 24 AA 44 46 24 AA 22 2C |$.DR$.DB$.DF$.",|
00002A90: 53 2C 57 22 00 A3 32 50 0F 9F 33 2C 38 2C 33 2C |S,W"..2P..3,8,3,|
00002AA0: 46 4C 24 00 DC 32 5A 0F 84 31 35 2C 41 24 2C 42 |FL$..2Z..15,A$,B|
00002AB0: 24 2C 43 24 2C 44 24 3A 44 54 B2 C5 28 41 24 29 |$,C$,D$:DT..(A$)|
00002AC0: 3A 44 54 24 B2 41 24 AA 22 2C 22 AA 42 24 AA 22 |:DT$.A$.",".B$."|
00002AD0: 2C 22 AA 43 24 AA 22 2C 22 AA 44 24 00 06 33 64 |,".C$.",".D$..3d|
00002AE0: 0F 8B 44 54 B2 36 33 A7 98 31 35 2C 22 53 22 44 |..DT.63..15,"S"D|
00002AF0: 52 24 C8 28 44 42 24 2C 39 29 44 46 24 3A A0 33 |R$.(DB$,9)DF$:.3|
00002B00: 3A 89 33 39 32 30 00 10 33 6E 0F 98 33 2C 4E 52 |:.3920..3n..3,NR|
00002B10: 00 1C 33 78 0F 81 4A B2 31 A4 4E 52 00 2B 33 82 |..3x..J.1.NR.+3.|
00002B20: 0F 8B 46 46 B2 31 A7 34 30 32 30 00 3A 33 8C 0F |..FF.1.4020.:3..|
00002B30: 8B 46 46 B2 32 A7 34 30 33 30 00 46 33 96 0F 81 |.FF.2.4030.F3...|
00002B40: 49 B2 31 A4 4E 48 00 56 33 A0 0F 98 33 2C 44 41 |I.1.NH.V3...3,DA|
00002B50: 24 28 4A 2C 49 29 00 63 33 AA 0F 82 49 3A 89 34 |$(J,I).c3...I:.4|
00002B60: 30 34 30 00 77 33 B4 0F 98 33 2C 54 50 24 28 4A |040.w3...3,TP$(J|
00002B70: 29 3A 89 34 30 34 30 00 84 33 BE 0F 98 33 2C 52 |):.4040..3...3,R|
00002B80: 50 28 4A 29 00 8B 33 C8 0F 82 4A 00 99 33 D2 0F |P(J)..3...J..3..|
00002B90: A0 33 3A 46 46 B2 30 3A 8E 00 BC 33 DC 0F 8F 20 |.3:FF.0:...3... |
00002BA0: 2A 2A 2A 20 53 41 56 45 20 52 41 50 50 4F 52 54 |*** SAVE RAPPORT|
00002BB0: 20 46 4F 52 4D 41 41 54 20 2A 2A 2A 00 C6 33 E6 | FORMAAT ***..3.|
00002BC0: 0F 4E 52 B2 4E 4E 00 E4 33 F0 0F 44 46 24 B2 22 |.NR.NN..3..DF$."|
00002BD0: 2E 4E 41 4D 22 3A 8B 4C 47 A7 44 46 24 B2 22 2E |.NAM":.LG.DF$.".|
00002BE0: 4C 42 4C 22 00 01 34 FA 0F 81 49 B2 31 A4 4E 52 |LBL"..4...I.1.NR|
00002BF0: 3A 54 50 24 28 49 29 B2 52 4E 24 28 49 29 3A 82 |:TP$(I).RN$(I):.|
00002C00: 49 00 0B 34 04 10 8D 33 38 38 30 00 17 34 0E 10 |I..4...3880..4..|
00002C10: 4E 52 B2 4E 53 3A 8E 00 3D 34 18 10 8F 20 2A 2A |NR.NS:..=4... **|
00002C20: 2A 20 41 4C 4C 45 20 52 45 43 4F 52 44 53 20 4C |* ALLE RECORDS L|
00002C30: 41 54 45 4E 20 5A 49 45 4E 20 2A 2A 2A 00 46 34 |ATEN ZIEN ***.F4|
00002C40: 22 10 4C 43 B2 30 00 7D 34 2C 10 99 22 93 22 3A |".LC.0.}4,..".":|
00002C50: 8B 4E 46 B2 30 A7 99 22 C7 45 45 4E 20 47 45 47 |.NF.0..".EEN GEG|
00002C60: 45 56 45 4E 53 20 49 4E 20 42 45 53 54 41 4E 44 |EVENS IN BESTAND|
00002C70: 21 22 3A 8D 33 32 30 3A 89 34 33 38 30 00 93 34 |!":.320:.4380..4|
00002C80: 36 10 4C 43 B2 30 3A 81 4A B2 31 A4 4E 46 3A 46 |6.LC.0:.J.1.NF:F|
00002C90: 47 B2 30 00 9D 34 40 10 8D 31 35 35 30 00 B1 34 |G.0..4@..1550..4|
00002CA0: 4A 10 8B 4C 43 AA 4E 48 B2 B3 32 30 A7 34 32 34 |J..LC.NH..20.424|
00002CB0: 30 00 E4 34 54 10 46 47 B2 31 3A 99 22 20 27 D2 |0..4T.FG.1:." '.|
00002CC0: 45 54 55 52 4E 27 20 3D 20 56 45 52 56 4F 4C 47 |ETURN' = VERVOLG|
00002CD0: 2C 20 53 50 41 54 49 45 42 41 4C 4B 20 3D 20 4D |, SPATIEBALK = M|
00002CE0: 45 4E 55 22 00 F8 34 5E 10 A1 4C 24 3A 8B 4C 24 |ENU"..4^..L$:.L$|
00002CF0: B2 22 22 A7 34 31 39 30 00 12 35 68 10 8B 4C 24 |."".4190..5h..L$|
00002D00: B2 22 20 22 A7 4A B2 4E 46 3A 82 4A 3A 89 34 33 |." ".J.NF:.J:.43|
00002D10: 38 30 00 23 35 72 10 8B 4C 24 B2 43 52 24 A7 34 |80.#5r..L$.CR$.4|
00002D20: 32 33 30 00 33 35 7C 10 99 22 91 22 3B 3A 89 34 |230.35|..".";:.4|
00002D30: 31 38 30 00 41 35 86 10 99 22 93 22 3A 4C 43 B2 |180.A5...".":LC.|
00002D40: 30 00 59 35 90 10 82 4A 3A 8B 46 47 B2 31 A7 46 |0.Y5...J:.FG.1.F|
00002D50: 47 B2 30 3A 89 34 33 38 30 00 82 35 9A 10 99 22 |G.0:.4380..5..."|
00002D60: 20 C4 52 55 4B 20 4F 50 20 45 45 4E 20 54 4F 45 | .RUK OP EEN TOE|
00002D70: 54 53 20 56 4F 4F 52 20 48 45 54 20 4D 45 4E 55 |TS VOOR HET MENU|
00002D80: 2E 22 00 96 35 A4 10 A1 4C 24 3A 8B 4C 24 B2 22 |."..5...L$:.L$."|
00002D90: 22 A7 34 32 36 30 00 A0 35 AE 10 89 34 33 38 30 |".4260..5...4380|
00002DA0: 00 C4 35 B8 10 8F 20 2A 2A 2A 20 49 4E 4C 45 5A |..5... *** INLEZ|
00002DB0: 45 4E 20 4C 41 42 45 4C 20 46 4F 52 4D 41 41 54 |EN LABEL FORMAAT|
00002DC0: 20 2A 2A 2A 00 DF 35 C2 10 44 46 24 B2 22 20 22 | ***..5..DF$." "|
00002DD0: AA 52 4E 24 28 4E 4E 29 AA 22 2E 4C 42 4C 22 00 |.RN$(NN).".LBL".|
00002DE0: F6 35 CC 10 46 4C 24 B2 44 52 24 AA 44 46 24 AA |.5..FL$.DR$.DF$.|
00002DF0: 22 2C 53 2C 52 22 00 05 36 D6 10 9F 33 2C 38 2C |",S,R"..6...3,8,|
00002E00: 33 2C 46 4C 24 00 0F 36 E0 10 84 33 2C 4C 4E 00 |3,FL$..6...3,LN.|
00002E10: 24 36 EA 10 81 49 B2 31 A4 4C 4E 3A 84 33 2C 4E |$6...I.1.LN:.3,N|
00002E20: 49 28 49 29 00 4C 36 F4 10 81 4A B2 31 A4 4E 49 |I(I).L6...J.1.NI|
00002E30: 28 49 29 3A 84 33 2C 4C 41 28 49 2C 4A 29 3A 84 |(I):.3,LA(I,J):.|
00002E40: 33 2C 53 50 28 49 2C 4A 29 3A 82 4A 00 59 36 FE |3,SP(I,J):.J.Y6.|
00002E50: 10 82 49 3A 84 33 2C 53 50 00 6C 36 08 11 A0 33 |..I:.3,SP.l6...3|
00002E60: 3A 8D 33 34 30 30 3A 89 35 31 39 30 00 84 36 12 |:.3400:.5190..6.|
00002E70: 11 8F 20 2A 2A 2A 20 48 4F 4F 46 44 4D 45 4E 55 |.. *** HOOFDMENU|
00002E80: 20 2A 2A 2A 00 C2 36 1C 11 A0 34 3A 97 42 41 2C | ***..6...4:.BA,|
00002E90: 31 33 3A 97 42 4F 2C 35 3A 99 22 93 11 11 11 90 |13:.BO,5:.".....|
00002EA0: 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 20 CB | ******* .|
00002EB0: C1 C1 D2 D4 C5 CE C2 C1 CB 20 2A 2A 2A 2A 2A 2A |......... ******|
00002EC0: 2A 22 00 CA 36 26 11 45 B2 30 00 D0 36 30 11 8F |*"..6&.E.0..60..|
00002ED0: 00 F2 36 3A 11 99 A3 28 33 38 AB C3 28 44 42 24 |..6:...(38..(DB$|
00002EE0: 29 29 AD 32 29 22 11 11 12 20 22 44 42 24 22 20 |)).2)"... "DB$" |
00002EF0: 92 22 00 17 37 44 11 99 22 11 11 20 20 31 2E 20 |."..7D..".. 1. |
00002F00: CB 49 45 5A 45 4E 20 56 41 4E 20 45 45 4E 20 42 |.IEZEN VAN EEN B|
00002F10: 45 53 54 41 4E 44 22 00 43 37 4E 11 99 22 20 20 |ESTAND".C7N.." |
00002F20: 32 2E 20 DA 4F 45 4B 45 4E 20 45 4E 2F 4F 46 20 |2. .OEKEN EN/OF |
00002F30: 56 45 52 41 4E 44 45 52 45 4E 20 52 45 43 4F 52 |VERANDEREN RECOR|
00002F40: 44 53 22 00 61 37 58 11 99 22 20 20 33 2E 20 C9 |DS".a7X.." 3. .|
00002F50: 4E 42 52 45 4E 47 45 4E 20 52 45 43 4F 52 44 53 |NBRENGEN RECORDS|
00002F60: 22 00 81 37 62 11 99 22 20 20 34 2E 20 D6 45 52 |"..7b.." 4. .ER|
00002F70: 57 49 4A 44 45 52 45 4E 20 52 45 43 4F 52 44 53 |WIJDEREN RECORDS|
00002F80: 22 00 A1 37 6C 11 99 22 20 20 35 2E 20 C1 46 44 |"..7l.." 5. .FD|
00002F90: 52 55 4B 4B 45 4E 20 45 54 49 4B 45 54 54 45 4E |RUKKEN ETIKETTEN|
00002FA0: 22 00 C3 37 76 11 99 22 20 20 36 2E 20 C1 46 44 |"..7v.." 6. .FD|
00002FB0: 52 55 4B 4B 45 4E 20 4F 56 45 52 5A 49 43 48 54 |RUKKEN OVERZICHT|
00002FC0: 45 4E 22 00 0A 38 80 11 99 22 20 20 37 2E 20 D3 |EN"..8..." 7. .|
00002FD0: 4F 52 54 45 52 45 4E 20 28 44 55 55 52 54 20 43 |ORTEREN (DUURT C|
00002FE0: 41 2E 22 B5 28 31 30 AC 28 2E 30 30 30 34 AC 4E |A.".(10.(.0004.N|
00002FF0: 46 AE 32 AA 2E 30 31 AC 4E 46 AA 2E 30 35 29 29 |F.2..01.NF..05))|
00003000: AD 31 30 22 4D 49 4E 2E 29 22 00 2D 38 8A 11 99 |.10"MIN.)".-8...|
00003010: 22 20 20 38 2E 20 CF 56 45 52 5A 49 43 48 54 20 |" 8. .VERZICHT |
00003020: 41 4C 4C 45 20 52 45 43 4F 52 44 53 22 00 3F 38 |ALLE RECORDS".?8|
00003030: 94 11 99 22 20 20 39 2E 20 C5 49 4E 44 45 22 00 |..." 9. .INDE".|
00003040: 5A 38 9E 11 99 22 11 20 20 20 20 20 CD 41 41 4B |Z8...". .AAK|
00003050: 20 55 57 20 4B 45 55 5A 45 22 00 83 38 A8 11 99 | UW KEUZE"..8...|
00003060: 22 11 11 11 20 20 C8 45 54 20 42 45 53 54 41 4E |"... .ET BESTAN|
00003070: 44 20 42 45 56 41 54 22 4E 46 22 52 45 43 4F 52 |D BEVAT"NF"RECOR|
00003080: 44 53 22 00 B5 38 B2 11 99 22 20 20 D5 20 4B 55 |DS"..8..." . KU|
00003090: 4E 54 20 45 52 20 4E 4F 47 22 B5 28 4D 58 AB 4E |NT ER NOG".(MX.N|
000030A0: 46 AA 2E 35 29 22 41 41 4E 20 54 4F 45 56 4F 45 |F..5)"AAN TOEVOE|
000030B0: 47 45 4E 13 22 00 D0 38 BC 11 8D 33 33 30 3A 41 |GEN."..8...330:A|
000030C0: B2 C5 28 41 24 29 3A 8B 41 B2 30 A7 34 35 34 30 |..(A$):.A.0.4540|
000030D0: 00 FE 38 C6 11 54 B2 54 49 3A 99 C8 28 22 13 11 |..8..T.TI:..("..|
000030E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000030F0: 11 11 22 2C 39 AA 41 29 22 20 12 3E 92 22 00 13 |..",9.A)" .>."..|
00003100: 39 D0 11 8B 28 54 49 AB 54 29 B1 32 34 30 A7 34 |9...(TI.T).240.4|
00003110: 36 30 30 00 28 39 DA 11 A1 41 24 3A 8B 41 24 B2 |600.(9...A$:.A$.|
00003120: 22 4A 22 A7 34 36 30 30 00 3A 39 E4 11 8B 41 24 |"J".4600.:9...A$|
00003130: B3 B1 22 4E 22 A7 34 35 36 30 00 68 39 EE 11 99 |.."N".4560.h9...|
00003140: C8 28 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |.(".............|
00003150: 11 11 11 11 11 11 11 22 2C 39 AA 41 29 22 20 20 |.......",9.A)" |
00003160: 13 22 3A 89 34 35 34 30 00 9E 39 F8 11 8D 33 37 |.":.4540..9...37|
00003170: 30 3A 91 41 89 32 33 30 2C 31 30 34 30 2C 39 30 |0:.A.230,1040,90|
00003180: 30 2C 31 35 38 30 2C 34 39 33 30 2C 32 32 32 30 |0,1580,4930,2220|
00003190: 2C 36 38 30 2C 34 31 33 30 2C 34 36 32 30 00 BC |,680,4130,4620..|
000031A0: 39 02 12 8F 20 2A 2A 2A 20 45 49 4E 44 45 20 50 |9... *** EINDE P|
000031B0: 52 4F 47 52 41 4D 4D 41 20 2A 2A 2A 00 D2 39 0C |ROGRAMMA ***..9.|
000031C0: 12 97 42 41 2C 36 3A 97 42 4F 2C 31 34 3A 99 22 |..BA,6:.BO,14:."|
000031D0: 9A 22 00 ED 39 16 12 99 22 93 22 3A 97 38 30 38 |."..9...".":.808|
000031E0: 2C 32 33 37 3A A0 31 3A A0 31 35 3A 80 00 0A 3A |,237:.1:.15:...:|
000031F0: 20 12 8F 20 2A 2A 2A 20 49 4E 50 55 54 20 56 41 | .. *** INPUT VA|
00003200: 4E 20 44 49 53 4B 20 2A 2A 2A 00 30 3A 2A 12 8B |N DISK ***.0:*..|
00003210: 44 54 B2 36 32 A7 99 22 C2 45 53 54 41 4E 44 20 |DT.62..".ESTAND |
00003220: 4E 49 45 54 20 47 45 56 4F 4E 44 45 4E 22 3A 8E |NIET GEVONDEN":.|
00003230: 00 3A 3A 34 12 49 24 B2 22 22 00 46 3A 3E 12 84 |.::4.I$."".F:>..|
00003240: 33 2C 49 24 3A 8E 00 69 3A 48 12 8F 20 2A 2A 2A |3,I$:..i:H.. ***|
00003250: 20 47 45 46 4F 52 4D 41 54 45 45 52 44 20 52 41 | GEFORMATEERD RA|
00003260: 50 50 4F 52 54 20 2A 2A 2A 00 79 3A 52 12 81 51 |PPORT ***.y:R..Q|
00003270: B2 31 A4 48 4E AC 35 A9 35 00 92 3A 5C 12 8B 48 |.1.HN.5.5..:\..H|
00003280: 46 B2 30 A7 53 31 24 B2 48 44 24 28 52 50 28 51 |F.0.S1$.HD$(RP(Q|
00003290: 29 29 00 AD 3A 66 12 8B 48 46 B2 31 A7 53 31 24 |))..:f..HF.1.S1$|
000032A0: B2 44 41 24 28 4A 2C 52 50 28 51 29 29 00 C8 3A |.DA$(J,RP(Q))..:|
000032B0: 70 12 8B 48 46 B2 32 A7 53 31 24 B2 54 4C 24 28 |p..HF.2.S1$.TL$(|
000032C0: 28 51 AA 34 29 AD 35 29 00 E5 3A 7A 12 8F 20 2A |(Q.4).5)..:z.. *|
000032D0: 2A 2A 20 49 4E 53 54 45 4C 4C 45 4E 20 54 41 42 |** INSTELLEN TAB|
000032E0: 53 20 2A 2A 2A 00 FF 3A 84 12 8B 51 B2 31 A7 54 |S ***..:...Q.1.T|
000032F0: 42 B2 52 50 28 51 AA 31 29 3A 89 34 37 38 30 00 |B.RP(Q.1):.4780.|
00003300: 0D 3B 8E 12 4E 32 B2 C3 28 53 32 24 29 00 57 3B |.;..N2..(S2$).W;|
00003310: 98 12 54 42 B2 52 50 28 51 AB 33 29 AC 28 52 50 |..TB.RP(Q.3).(RP|
00003320: 28 51 AA 31 29 AB 52 50 28 51 AB 34 29 AB 4E 32 |(Q.1).RP(Q.4).N2|
00003330: 29 AB 28 52 50 28 51 AB 33 29 B2 30 29 AC 28 52 |).(RP(Q.3).0).(R|
00003340: 50 28 51 AA 31 29 AB 52 50 28 51 AB 34 29 AB 52 |P(Q.1).RP(Q.4).R|
00003350: 50 28 51 AB 32 29 29 00 7E 3B A2 12 8B 54 42 B3 |P(Q.2)).~;...TB.|
00003360: 31 A7 54 42 B2 54 42 AA 4E 32 3A 98 34 2C C8 28 |1.TB.TB.N2:.4,.(|
00003370: 53 31 24 2C 54 42 29 3B 3A 89 34 39 30 30 00 8C |S1$,TB);:.4900..|
00003380: 3B AC 12 4E 31 B2 C3 28 53 31 24 29 00 B9 3B B6 |;..N1..(S1$)..;.|
00003390: 12 8B 4E 31 B1 52 50 28 51 AA 33 29 A7 53 31 24 |..N1.RP(Q.3).S1$|
000033A0: B2 C8 28 53 31 24 2C 52 50 28 51 AA 33 29 29 3A |..(S1$,RP(Q.3)):|
000033B0: 4E 31 B2 C3 28 53 31 24 29 00 CD 3B C0 12 8B 52 |N1..(S1$)..;...R|
000033C0: 50 28 51 AA 32 29 B2 30 A7 34 38 36 30 00 EB 3B |P(Q.2).0.4860..;|
000033D0: CA 12 8F 20 2A 2A 2A 20 4C 49 4E 4B 53 20 55 49 |... *** LINKS UI|
000033E0: 54 56 55 4C 4C 45 4E 20 2A 2A 2A 00 1A 3C D4 12 |TVULLEN ***..<..|
000033F0: 8B 54 42 B3 31 A7 A0 34 3A 99 22 C6 4F 55 54 20 |.TB.1..4:.".OUT |
00003400: 49 4E 20 44 45 20 49 4E 44 45 4C 49 4E 47 22 3A |IN DE INDELING":|
00003410: 8D 33 32 30 3A 89 34 33 38 30 00 2A 3C DE 12 98 |.320:.4380.*<...|
00003420: 34 2C A6 54 42 29 53 31 24 3B 00 34 3C E8 12 89 |4,.TB)S1$;.4<...|
00003430: 34 39 30 30 00 53 3C F2 12 8F 20 2A 2A 2A 20 52 |4900.S<... *** R|
00003440: 45 43 48 54 53 20 55 49 54 56 55 4C 4C 45 4E 20 |ECHTS UITVULLEN |
00003450: 2A 2A 2A 00 68 3C FC 12 54 42 B2 54 42 AA 52 50 |***.h<..TB.TB.RP|
00003460: 28 51 AA 33 29 AB 4E 31 00 8F 3C 06 13 8B 54 42 |(Q.3).N1..<...TB|
00003470: B3 31 A7 54 42 B2 54 42 AA 4E 31 3A 98 34 2C C8 |.1.TB.TB.N1:.4,.|
00003480: 28 53 31 24 2C 54 42 29 3B 3A 89 34 39 30 30 00 |(S1$,TB);:.4900.|
00003490: A0 3C 10 13 98 34 2C A6 54 42 29 3B 53 31 24 3B |.<...4,.TB);S1$;|
000034A0: 00 B7 3C 1A 13 8F 20 2A 2A 2A 20 56 4F 4C 47 45 |..<... *** VOLGE|
000034B0: 4E 44 45 20 2A 2A 2A 00 C3 3C 24 13 53 32 24 B2 |NDE ***..<$.S2$.|
000034C0: 53 31 24 00 CA 3C 2E 13 82 51 00 D3 3C 38 13 98 |S1$..<...Q..<8..|
000034D0: 34 3A 8E 00 F2 3C 42 13 8F 20 2A 2A 2A 20 41 46 |4:...<B.. *** AF|
000034E0: 44 52 55 4B 4B 45 4E 20 4C 41 42 45 4C 53 20 2A |DRUKKEN LABELS *|
000034F0: 2A 2A 00 2D 3D 4C 13 99 22 93 22 3A 8B 4E 46 B2 |**.-=L..".":.NF.|
00003500: 30 A7 99 22 C7 45 45 4E 20 47 45 47 45 56 45 4E |0..".EEN GEGEVEN|
00003510: 53 20 49 4E 20 48 45 54 20 42 45 53 54 41 4E 44 |S IN HET BESTAND|
00003520: 21 22 3A 8D 33 32 30 3A 89 34 33 38 30 00 40 3D |!":.320:.4380.@=|
00003530: 56 13 4C 47 B2 31 3A 45 B2 30 3A 89 33 34 35 30 |V.LG.1:E.0:.3450|
00003540: 00 71 3D 60 13 99 22 93 11 C5 52 20 53 54 41 41 |.q=`.."...R STAA|
00003550: 4E 20 47 45 45 4E 20 45 54 49 4B 45 54 2D 49 4E |N GEEN ETIKET-IN|
00003560: 44 45 4C 49 4E 47 45 4E 20 4F 50 20 44 49 53 4B |DELINGEN OP DISK|
00003570: 22 00 9A 3D 6A 13 4E 4E B2 31 3A 99 22 D7 49 4C |"..=j.NN.1:.".IL|
00003580: 54 20 55 20 45 52 20 45 45 4E 20 4D 41 4B 45 4E |T U ER EEN MAKEN|
00003590: 3F 20 28 CA 2F CE 29 20 22 3B 00 BB 3D 74 13 8D |? (./.) ";..=t..|
000035A0: 33 33 30 3A 8B 41 24 B2 22 4E 22 A7 99 4E 4F 24 |330:.A$."N"..NO$|
000035B0: 3A 8D 33 37 35 3A 89 34 33 38 30 00 CD 3D 7E 13 |:.375:.4380..=~.|
000035C0: 8B 41 24 B3 B1 22 4A 22 A7 34 39 38 30 00 DB 3D |.A$.."J".4980..=|
000035D0: 88 13 99 59 53 24 3A 8D 33 37 35 00 19 3E 92 13 |...YS$:.375..>..|
000035E0: 99 22 11 C8 4F 45 56 45 45 4C 20 52 45 47 45 4C |."..OEVEEL REGEL|
000035F0: 53 20 50 45 52 20 45 54 49 4B 45 54 22 3B 3A 8D |S PER ETIKET";:.|
00003600: 33 36 30 3A 4C 4E B2 C5 28 41 24 29 3A 8B 41 24 |360:LN..(A$):.A$|
00003610: B2 22 4D 22 A7 34 33 38 30 00 4F 3E 9C 13 8B 4C |."M".4380.O>...L|
00003620: 4E B3 31 B0 4C 4E B1 35 A7 99 22 CD 4F 45 54 20 |N.1.LN.5..".OET |
00003630: 54 55 53 53 45 4E 20 31 20 45 4E 20 35 20 5A 49 |TUSSEN 1 EN 5 ZI|
00003640: 4A 4E 21 22 3A 8D 33 32 30 3A 89 35 30 31 30 00 |JN!":.320:.5010.|
00003650: 62 3E A6 13 81 49 49 B2 31 A4 4C 4E 3A 8D 33 34 |b>...II.1.LN:.34|
00003660: 30 30 00 A3 3E B0 13 99 22 C8 4F 45 56 45 45 4C |00..>...".OEVEEL|
00003670: 20 56 45 4C 44 45 4E 20 4F 50 20 52 45 47 45 4C | VELDEN OP REGEL|
00003680: 4E 55 4D 4D 45 52 22 49 49 22 56 41 4E 22 3A 99 |NUMMER"II"VAN":.|
00003690: 22 48 45 54 20 45 54 49 4B 45 54 20 22 3B 3A 8D |"HET ETIKET ";:.|
000036A0: 33 36 30 00 CB 3E BA 13 4E 49 28 49 49 29 B2 C5 |360..>..NI(II)..|
000036B0: 28 41 24 29 3A 8B 41 24 B2 22 4D 22 A7 49 B2 4C |(A$):.A$."M".I.L|
000036C0: 4E 3A 82 49 49 3A 89 34 33 38 30 00 DA 3E C4 13 |N:.II:.4380..>..|
000036D0: 8B 4E 48 B1 35 A7 35 30 39 30 00 1E 3F CE 13 8B |.NH.5.5090..?...|
000036E0: 4E 49 28 49 49 29 B3 31 B0 4E 49 28 49 49 29 B1 |NI(II).1.NI(II).|
000036F0: 4E 48 A7 99 22 C7 45 45 46 20 45 45 4E 20 4E 55 |NH..".EEF EEN NU|
00003700: 4D 4D 45 52 20 54 55 53 53 45 4E 20 31 20 45 4E |MMER TUSSEN 1 EN|
00003710: 22 4E 48 3A 8D 33 32 30 3A 89 35 30 34 30 00 28 |"NH:.320:.5040.(|
00003720: 3F D8 13 89 35 31 30 30 00 3B 3F E2 13 8B 4E 49 |?...5100.;?...NI|
00003730: 28 49 49 29 B2 30 A7 35 31 35 35 00 7E 3F E7 13 |(II).0.5155.~?..|
00003740: 8B 4E 49 28 49 49 29 B3 30 B0 4E 49 28 49 49 29 |.NI(II).0.NI(II)|
00003750: B1 35 A7 99 22 C7 45 45 46 20 45 45 4E 20 4E 55 |.5..".EEF EEN NU|
00003760: 4D 4D 45 52 20 54 55 53 53 45 4E 20 30 20 45 4E |MMER TUSSEN 0 EN|
00003770: 20 35 22 3A 8D 33 32 30 3A 89 35 30 34 30 00 8E | 5":.320:.5040..|
00003780: 3F EC 13 81 4A B2 31 A4 4E 49 28 49 49 29 00 D9 |?...J.1.NI(II)..|
00003790: 3F F6 13 99 22 11 D7 45 4C 4B 20 56 45 4C 44 20 |?..."..ELK VELD |
000037A0: 4F 50 20 50 4C 41 41 54 53 22 4A 22 49 4E 20 52 |OP PLAATS"J"IN R|
000037B0: 45 47 45 4C 22 49 49 3A 99 22 41 46 44 52 55 4B |EGEL"II:."AFDRUK|
000037C0: 4B 45 4E 22 3B 3A 8D 33 36 30 3A 4C 41 28 49 49 |KEN";:.360:LA(II|
000037D0: 2C 4A 29 B2 C5 28 41 24 29 00 EB 3F 00 14 8B C5 |,J)..(A$)..?....|
000037E0: 28 41 24 29 B2 30 A7 35 31 31 30 00 2E 40 0A 14 |(A$).0.5110..@..|
000037F0: 99 22 11 C8 4F 45 56 45 45 4C 20 52 55 49 4D 54 |."..OEVEEL RUIMT|
00003800: 45 20 56 4F 4F 52 20 27 22 48 44 24 28 4C 41 28 |E VOOR '"HD$(LA(|
00003810: 49 49 2C 4A 29 29 22 27 22 3B 3A 8D 33 36 30 3A |II,J))"'";:.360:|
00003820: 53 50 28 49 49 2C 4A 29 B2 C5 28 41 24 29 00 40 |SP(II,J)..(A$).@|
00003830: 40 14 14 8B C5 28 41 24 29 B2 30 A7 35 31 33 30 |@....(A$).0.5130|
00003840: 00 47 40 1E 14 82 4A 00 4F 40 23 14 82 49 49 00 |.G@...J.O@#..II.|
00003850: 7C 40 28 14 99 22 11 C8 4F 45 56 45 45 4C 20 52 ||@(.."..OEVEEL R|
00003860: 55 49 4D 54 45 20 56 4F 4F 52 20 48 45 54 20 45 |UIMTE VOOR HET E|
00003870: 54 49 4B 45 54 22 3B 3A 8D 33 36 30 00 B8 40 32 |TIKET";:.360..@2|
00003880: 14 53 50 B2 C5 28 41 24 29 3A 8B 53 50 B3 30 B0 |.SP..(A$):.SP.0.|
00003890: 53 50 B1 34 30 A7 99 22 11 CD 4F 45 54 20 54 55 |SP.40.."..OET TU|
000038A0: 53 53 45 4E 20 30 20 45 4E 20 34 30 20 5A 49 4A |SSEN 0 EN 40 ZIJ|
000038B0: 4E 22 3A 89 35 31 36 30 00 C2 40 3C 14 8D 33 34 |N":.5160..@<..34|
000038C0: 30 30 00 D6 40 46 14 46 4D B2 31 3A 8D 32 36 32 |00..@F.FM.1:.262|
000038D0: 30 3A 46 4D B2 30 00 1F 41 50 14 99 22 93 11 11 |0:FM.0..AP.."...|
000038E0: 11 C1 46 44 52 55 4B 4B 45 4E 3A 20 43 4F 4E 54 |..FDRUKKEN: CONT|
000038F0: 49 4E 55 20 4F 46 20 4D 45 54 20 45 45 4E 20 50 |INU OF MET EEN P|
00003900: 41 55 5A 45 20 4E 41 22 3A 99 22 45 4C 4B 20 45 |AUZE NA":."ELK E|
00003910: 54 49 4B 45 54 20 28 C3 2F D0 29 3F 20 22 3B 00 |TIKET (./.)? ";.|
00003920: 40 41 5A 14 8D 33 33 30 3A 50 53 B2 30 3A 8B 41 |@AZ..330:PS.0:.A|
00003930: 24 B2 22 50 22 A7 50 53 B2 31 3A 89 35 32 33 30 |$."P".PS.1:.5230|
00003940: 00 52 41 64 14 8B 41 24 B3 B1 22 43 22 A7 35 32 |.RAd..A$.."C".52|
00003950: 31 30 00 65 41 6E 14 99 22 12 22 41 24 22 92 22 |10.eAn.."."A$"."|
00003960: 3A 8D 33 37 35 00 A7 41 78 14 4C 47 B2 30 3A 99 |:.375..Ax.LG.0:.|
00003970: 22 93 11 11 11 D3 54 45 4C 20 44 45 20 45 54 49 |".....TEL DE ETI|
00003980: 4B 45 54 54 45 4E 20 49 4E 20 4F 50 20 44 45 20 |KETTEN IN OP DE |
00003990: 4A 55 49 53 54 45 22 3A 99 22 48 4F 4F 47 54 45 |JUISTE":."HOOGTE|
000039A0: 2E 22 3A 8D 33 32 30 00 B9 41 82 14 99 3A 9F 34 |.":.320..A...:.4|
000039B0: 2C 34 2C 37 3A 4D 4D B2 30 00 D3 41 8C 14 81 49 |,4,7:MM.0..A...I|
000039C0: B2 31 A4 4E 46 3A 44 41 24 28 49 2C 30 29 B2 C4 |.1.NF:DA$(I,0)..|
000039D0: 28 49 29 00 E4 41 96 14 8B 51 24 B2 22 40 22 A7 |(I)..A...Q$."@".|
000039E0: 35 33 31 30 00 04 42 A0 14 8B C8 28 44 41 24 28 |5310..B....(DA$(|
000039F0: 49 2C 53 29 2C C3 28 51 24 29 29 B3 B1 51 24 A7 |I,S),.(Q$))..Q$.|
00003A00: 35 34 31 30 00 15 42 AA 14 8B 58 24 B2 22 40 22 |5410..B...X$."@"|
00003A10: A7 35 33 31 30 00 35 42 B4 14 8B C8 28 44 41 24 |.5310.5B....(DA$|
00003A20: 28 49 2C 58 29 2C C3 28 58 24 29 29 B3 B1 58 24 |(I,X),.(X$))..X$|
00003A30: A7 35 34 31 30 00 58 42 BE 14 4D 4D B2 31 3A 81 |.5410.XB..MM.1:.|
00003A40: 4A B2 31 A4 4C 4E 3A 8B 53 50 A7 98 34 2C C8 28 |J.1.LN:.SP..4,.(|
00003A50: 42 4C 24 2C 53 50 29 3B 00 67 42 C8 14 81 4B B2 |BL$,SP);.gB...K.|
00003A60: 31 A4 4E 49 28 4A 29 00 9E 42 D2 14 98 34 2C C8 |1.NI(J)..B...4,.|
00003A70: 28 44 41 24 28 49 2C 4C 41 28 4A 2C 4B 29 29 AA |(DA$(I,LA(J,K)).|
00003A80: 42 4C 24 2C 53 50 28 4A 2C 4B 29 29 3B 3A 8B 4B |BL$,SP(J,K));:.K|
00003A90: B3 4E 49 28 4A 29 A7 98 34 2C 22 20 22 3B 00 A8 |.NI(J)..4," ";..|
00003AA0: 42 DC 14 82 4B 3A 98 34 00 BC 42 E6 14 A1 41 24 |B...K:.4..B...A$|
00003AB0: 3A 8B 41 24 B2 22 22 A7 35 33 37 30 00 F6 42 F0 |:.A$."".5370..B.|
00003AC0: 14 8B 41 24 B2 22 45 22 A7 49 B2 4E 46 3A 82 49 |..A$."E".I.NF:.I|
00003AD0: 3A A0 34 3A 99 22 93 CC 41 41 54 53 54 45 20 52 |:.4:."..AATSTE R|
00003AE0: 45 43 4F 52 44 20 47 45 50 52 49 4E 54 11 11 22 |ECORD GEPRINT.."|
00003AF0: 3A 89 35 34 33 30 00 0D 43 FA 14 82 4A 3A 81 4B |:.5430..C...J:.K|
00003B00: B2 4C 4E AA 31 A4 36 3A 98 34 3A 82 4B 00 1A 43 |.LN.1.6:.4:.K..C|
00003B10: 04 15 8B 50 53 A7 8D 32 38 30 00 2E 43 0E 15 8B |...PS..280..C...|
00003B20: 50 53 AF 41 24 B2 22 43 22 A7 35 34 31 30 00 4E |PS.A$."C".5410.N|
00003B30: 43 18 15 8B 50 53 AF 41 24 B2 22 45 22 A7 49 B2 |C...PS.A$."E".I.|
00003B40: 4E 46 3A 82 49 3A A0 34 3A 89 35 34 33 30 00 7D |NF:.I:.4:.5430.}|
00003B50: 43 22 15 82 49 3A A0 34 3A 99 22 CC 41 41 54 53 |C"..I:.4:.".AATS|
00003B60: 54 45 20 52 45 43 4F 52 44 20 47 45 50 52 49 4E |TE RECORD GEPRIN|
00003B70: 54 11 11 22 3A 8B 4D 4D A7 35 34 33 30 00 9B 43 |T..":.MM.5430..C|
00003B80: 2C 15 99 22 11 11 CE 49 45 54 53 20 47 45 56 4F |,.."...IETS GEVO|
00003B90: 4E 44 45 4E 2E 22 3A 8D 33 32 30 00 A7 43 36 15 |NDEN.":.320..C6.|
00003BA0: 8B 45 A7 35 34 39 30 00 D5 43 40 15 99 22 11 D7 |.E.5490..C@.."..|
00003BB0: 49 4C 54 20 55 20 44 45 20 49 4E 44 45 4C 49 4E |ILT U DE INDELIN|
00003BC0: 47 20 56 41 4E 20 44 45 5A 45 20 45 54 49 4B 45 |G VAN DEZE ETIKE|
00003BD0: 54 54 45 4E 22 00 F5 43 4A 15 99 22 4F 50 20 44 |TTEN"..CJ.."OP D|
00003BE0: 49 53 4B 20 42 45 57 41 52 45 4E 3F 20 28 CA 2F |ISK BEWAREN? (./|
00003BF0: CE 29 20 22 3B 00 20 44 54 15 8D 33 33 30 3A 8B |.) ";. DT..330:.|
00003C00: 41 24 B2 22 4A 22 A7 45 B2 31 3A 99 59 53 24 3A |A$."J".E.1:.YS$:|
00003C10: 8D 33 37 35 3A 8D 35 35 35 30 3A 89 35 34 39 30 |.375:.5550:.5490|
00003C20: 00 32 44 5E 15 8B 41 24 B3 B1 22 4E 22 A7 35 34 |.2D^..A$.."N".54|
00003C30: 36 30 00 40 44 68 15 99 4E 4F 24 3A 8D 33 37 35 |60.@Dh..NO$:.375|
00003C40: 00 69 44 72 15 99 22 11 CD 4F 45 54 45 4E 20 45 |.iDr.."..OETEN E|
00003C50: 52 20 4E 4F 47 20 45 54 49 4B 45 54 54 45 4E 20 |R NOG ETIKETTEN |
00003C60: 4D 45 54 20 44 45 5A 45 22 00 91 44 7C 15 99 22 |MET DEZE"..D|.."|
00003C70: 49 4E 44 45 4C 49 4E 47 20 47 45 50 52 49 4E 54 |INDELING GEPRINT|
00003C80: 20 57 4F 52 44 45 4E 3F 20 28 CA 2F CE 29 20 22 | WORDEN? (./.) "|
00003C90: 3B 00 BC 44 86 15 8D 33 33 30 3A 8B 41 24 B2 22 |;..D...330:.A$."|
00003CA0: 4A 22 A7 45 B2 31 3A 99 59 53 24 3A 8D 33 37 35 |J".E.1:.YS$:.375|
00003CB0: 3A 8D 33 34 30 30 3A 89 35 31 39 30 00 CE 44 90 |:.3400:.5190..D.|
00003CC0: 15 8B 41 24 B3 B1 22 4E 22 A7 35 35 31 30 00 E2 |..A$.."N".5510..|
00003CD0: 44 9A 15 99 4E 4F 24 3A 8D 33 37 35 3A 89 34 33 |D...NO$:.375:.43|
00003CE0: 38 30 00 03 45 A4 15 8F 20 2A 2A 2A 20 53 41 56 |80..E... *** SAV|
00003CF0: 45 20 4C 41 42 45 4C 49 4E 44 45 4C 49 4E 47 20 |E LABELINDELING |
00003D00: 2A 2A 2A 00 0D 45 AE 15 4E 53 B2 4E 46 00 3D 45 |***..E..NS.NF.=E|
00003D10: B8 15 99 22 11 CE 41 41 4D 20 45 54 49 4B 45 54 |..."..AAM ETIKET|
00003D20: 2D 49 4E 44 45 4C 49 4E 47 3A 20 22 3B 3A 8D 33 |-INDELING: ";:.3|
00003D30: 36 30 3A 52 4E 24 28 4E 4E 29 B2 41 24 00 51 45 |60:RN$(NN).A$.QE|
00003D40: C2 15 4C 47 B2 31 3A 8D 34 30 37 30 3A 4C 47 B2 |..LG.1:.4070:LG.|
00003D50: 30 00 74 45 CC 15 46 4C 24 B2 44 52 24 AA 22 20 |0.tE..FL$.DR$." |
00003D60: 22 AA 52 4E 24 28 4E 4E 29 AA 44 46 24 AA 22 2C |".RN$(NN).DF$.",|
00003D70: 53 2C 57 22 00 83 45 D6 15 9F 33 2C 38 2C 33 2C |S,W"..E...3,8,3,|
00003D80: 46 4C 24 00 8D 45 E0 15 98 33 2C 4C 4E 00 A2 45 |FL$..E...3,LN..E|
00003D90: EA 15 81 49 B2 31 A4 4C 4E 3A 98 33 2C 4E 49 28 |...I.1.LN:.3,NI(|
00003DA0: 49 29 00 CA 45 F4 15 81 4A B2 31 A4 4E 49 28 49 |I)..E...J.1.NI(I|
00003DB0: 29 3A 98 33 2C 4C 41 28 49 2C 4A 29 3A 98 33 2C |):.3,LA(I,J):.3,|
00003DC0: 53 50 28 49 2C 4A 29 3A 82 4A 00 D7 45 FE 15 82 |SP(I,J):.J..E...|
00003DD0: 49 3A 98 33 2C 53 50 00 E0 45 08 16 A0 33 3A 8E |I:.3,SP..E...3:.|
00003DE0: 00 00 00 |... |
..'.D.. DATA BASE PROGRAMMA VOOR CBM64.
D.N.. DOOR RICHARD F. DALEY.J.X..._.}..
VERTAALD DOOR.X.~.. SETTLE-LIGHT SOFT
..... POSTBUS 75 4530 AB TERNEUZEN...
... TEL. 01150 - 13387.......S.... COP
YRIGHT 1985.Y..........TP$(20),TL(20),RP
(100),HD$(20),DA$(130,20),RN(130).K....R
N$(20),TL$(20),LA(5,5),SP(5,5):NO$.".NEE
.":.808,234...H.MX.130:CL.0:CR$.G(13):QT
$.G(34):BO.53280:BA.BO.1:YS$.".JA .".P.R
.BL$." ":BL$.BL$.BL$:
.15,8,15:.1,0,1:DR$."0:"......".":.BA,15
:.BO,11:."."G(8)G(14).....HD$(0)."RECORD
NUMMER".....DB$."":DF$."BESTANDSNAMEN".8
....3670.E....ER.1920.O....1790.M....".D
.OORGAAN OF .E.INDE?"..."..330:.A$."D".A
$."E".310...,..290...6..".
.":..W.@..".DRUK OP .RETURN. VOOR VE
RVOLG."...J..A$:.A$.."".330...T..A$:.A$.
"".340...^.....H.."? .";:.1,A$:.".":..:.
R..".":.BA,14:.BO,6:.".":..L.W..QQ.1.500
:.:..[.|.DF$.".HDR".E....3670.Q....ER.81
0......I.1.NR:HD$(I).TP$(I):.I.....NH.NR
:NR.0.....DF$.".DAT":.3670:NF.NR:.4380.U
.... *** SORTEREN ***...B..I.1.NR:RN(I).
0:.I...L..I.1.NR:.J.1.NR...V..L.480,500.
5....DA$(I,S)..DA$(J,S).RN(I).RN(I).1.>.
...510.J....E(DA$(I,S))..E(DA$(J,S)).RN(
I).RN(I).1.S....J,I......"SORTEREN...";.
.....I.NR.1..1:.J.NR.1..1.G....(I..J.RN(
I).RN(J)).RN(J).RN(J).1.P.&..J,I...0.."S
ORTEREN...":J.1...:..RN(J).J.J.J.1:.570.
..D..J..NR.630.*.N..I.1.NH:Z$.DA$(RN(J),
I).S.X.DA$(RN(J),I).DA$(J,I):DA$(J,I).Z$
:.I.{.B.Z.RN(RN(J)):RN(RN(J)).RN(J):RN(J
).Z...L..570...V..".WILT U HET OP "HD$(S
):."GESORTEERDE BESTAND '"DB$"'......"BE
WAREN OP DISK? (J/N)";......330:.A$."J".
DF$.".DAT":.YS$;:NR.NF:.3880.$....A$."N"
..NO$;:.4380.-....650.H....".":.NF.0.."G
EEN GEGEVENS IN HET BESTAND!":.320:.4380
.W...MF.1:.3400......"WAT IS HET TE SORT
EREN VELDNUMMER:";:.360:S.E(A$):..B.F..A
$."M".4380.T.P..S.1.S.NH.700...Z..".HOE
MOET ER GESORTEERD WORDEN:."......"1. AL
FABETISCH".&...."2. NUMERIEK.".@...."3.
TERUG NAAR MENU".^....".KEUZE";:.360:L.E
(A$):..L....L.3.4380......".SORTEREN..."
;:.450... .. *** VELDNAMENBESTAND MAKEN
***...*.NR.1.Z.4.."..@ = TERUG NAAR HET
HOOFDMENU"...>..".NAAM VAN VELDNUMMER"NR
;:.360:TP$(NR).A$...H..TP$(NR)."@".870.5
.R.NR.NR.1:.NR.20.870.>.\..830.J.F.NR.NR
.1.Y.P..3880:.410.V.Z.. *** DATA INBRENG
EN ***......"..ER ZITTEN"NF"RECORDS"....
.."IN BESTAND '"DB$"'.".....NF.NF.1.....
.NF.MX..".HET BESTAND ZIT VOL. VOOR MEER
GEGEVENS".+....NF.MX.."MOET U EEN NIEUW
BESTAND MAKEN.":.320:.1020.M...."DIT IS
RECORDNUMMER"NF"...".Y....I.1.NH...J.."
."HD$(I)":";:.360:DA$(NF,I).A$:.I...T.."
.NOG MEER? (J/N) ";......330:.A$."J"..YS
$:.375:.900.L....A$.."N".990.Z....NO$:.3
75.....DF$.".DAT":NR.NF:.3880:.4380.....
. *** ZOEKEN/VERANDEREN ***.Y...LC.0:.NF
.0.."...GEEN GEGEVENS IN HET BESTAND!":.
320:.4380.V...."..U KUNT ZOEKEN BIJ:."..
.$..3410......".OF U KUNT:."...8..I".. V
ERANDEREN".H.B..".KEUZE";:.360:S.E(A$):.
...L..S.0.S.NH.1.1090...V..S.NH.1.1380..
.`.."..TE ZOEKEN "HD$(S);:.":.."...J..36
0:Q$.A$.).T.."..".B.~..S.0.E(Q$).NF.."..
ER ZIJN GEEN "Q$" RECORDS!.":.1220.X...F
D.0:LC.0:.J.1.NF.....DA$(J,0).D(J):DA$(J
,0).I(DA$(J,0),C(DA$(J,0)).1).R....H(DA$
(J,S),C(Q$)).Q$..1550:FD.1......LC.NH.20
..1290:LC.0:."."......J.%....FD.0.."NIET
S GEVONDEN. U KUNT NU:":.1230.E.D.." DAT
WAS HET. U KUNT NU:".`.N..". 1. OPNIEUW
ZOEKEN".V.X.." 2. VERANDEREN"......" 3.
TERUG NAAR HET HOOFDMENU"......". KE
UZE:".L....330:S.E(A$):.S.1.S.3.1270....
..S.1050,1380,4380.....LC.0:."'RETURN'=V
ERVOLG, SPATIEBALK=HOOFDMENU".)....L$:.L
$."".1300.:....L$.CR$.1340.K.(..L$." ".1
350.U.2..1300.`.<..".":..M.F..PR.1. 4.|.
P.PR.0:.4380...Z.. *** VERANDEREN DATA *
**.A.D.."...WAT IS HET NUMMER VAN HET TE
"...N.."WIJZIGEN RECORD";:.360:J.E(A$):.
...X..J.0.."ALLEEN NUMMERS!":.320:.1380.
@....J.NF..".ER ZIJN GEEN"J"RECORDS!":.3
20:.1380.J....1550......".WAT IS HET NUM
MER VAN HET TE WIJZIGEN VELD";... ..36
0:S.E(A$)......S.1.S.NH.1440.C....".VAN
"HD$(S)": "DA$(J,S)......".IN "HD$(S);:
.360:DA$(J,S).A$...H.."."...R..1550.....
."...MEER WIJZIGINGEN? (J/N) ";.@....330
:.A$."J"..YS$:.375:.1380.R....A$.."N".15
10.\....1000.Y.... *** RECORD PRINTEN **
*......" "HD$(0)": ."J".".I....I.1.NH:.I
".. "HD$(I)": "DA$(J,I):.I:.:LC.LC.NH.2:
....".. *** VERWIJDEREN DATAS ***.%.,.."
.":DE.0:.NF.0.."GEEN GEGEVENS IN BESTAND
!":.320:.4380.Z.6..".WELK RECORDNUMMER V
ERWIJDEREN";:.360:DN.E(A$).K.@..A$."M".4
380...J..DN.1..".GRAAG EEN NUMMER TUSSEN
1 EN"NR"..":.320:.1580...T..DN.NF..".ER
ZIJN SLECHTS"NR"RECORDS.":.320:.1580...
^.J.DN:.1550...H..".DEZE GEGEVENS VERWIJ
DEREN? (J/N) ";.8.R..330:.A$."J"..YS$:.3
75:.1720.J.|..A$.."N".1650.H....NO$:.".N
OG EEN? (J/N) ";......330:.A$."J"..YS$:.
375:.1590......A$.."N".1680......NO$:.37
5:.DE.1.1020......4380......J.DN.NF.1:.I
.1.NH:DA$(J,I).DA$(J.1,I):.I,J:NF.NF.1:D
E.1.#.B..".RECORDNUMMER"DN"IS VERWIJDERD
!.".<.L.."NOG MEER? (J/N) ";.].V..330:.A
$."J"..YS$:.375:.1590.O....A$.."N".1750.
.....NO$:.375:.1020...... *** BESTANDSNA
AM ROUTINES ***.....CL.1.P....". . AP
PLICATIE-MENU ."......J.1.NR:.J".. "TP$(
J):.J......NR..20.J.J.1:.1840.$.&..J"..
NIEUW BESTAND MAKEN".J.0..J.1..J.1".. BE
STAND VERWIJDEREN".J.:..". KEUZE";:.3
60:S.E(A$).Z.D..S.J.1.1990...N..S.1.S.J.
1850...X.DB$.TP$(S)...B..NR..20.380...L.
.S..J.380...V...L....J.0.J.1......CL..:.
1950.....CL.0:.370. ...."NAAM VAN HET NI
EUWE":."BESTAND";:.360:TP$(J).A$.6...NR.
J:DB$."":.3880.L...DB$.TP$(J.1):.380.N..
.. *** BESTAND VERWIJDEREN ***...F..".WE
LK NUMMER MOET VERWIJDERD WORDEN";:.360:
S.E(A$)...P..S.1.S.J.1.1990...Z..370:.".
........GEREED OM '"TP$(S)"' TE VERWIJDE
REN?."......"VERWIJDERDE GEGEVENS KUNNEN
NIET".D...."MEER TERUGGEHAALD WORDEN. W
EET".K...."U ZEKER DAT U HET BESTAND WIL
T "......"WISSEN? (J/N) ";......330:.A$.
"N"..NO$:.375:.1790......A$.."J".2060...
..".................... "TP$(S)" WORDT
GEWIST "...*.DB$.TP$(S):DF$.".FMT":.3670
.1.4..I.1.NR:.15,"S"DR$" "TP$(I)".FMT":.
I.Q.>.DB$.TP$(S):DF$.".LBL":.3670.Z.H..I
.1.NR:.15,"S"DR$" "TP$(I)".LBL":.I...R..
15,"S"DR$DB$".*"...\.DB$.""...F.DF$."BES
TANDSNAMEN":.3670.X.P..NR.1..15,"S"DR$DF
$:.:.180...Z..I.S.NR.1:TP$(I).TP$(I.1):.
I.....NR.NR.1:.3880......1790.+.... ***
PRINTEN ***.6....4,4,7.C...T9.0:E.0.~...
.".":.NF.0.."GEEN GEGEVENS IN HET BESTAN
D!":.320:.4380......I.0.5.NH.4:RP(I).0:.
I...J..I.0.NH:TL(I).0:.I:HC.0:GT.0.F.T..
E.2580.P....3450...... ARRAY RP BEVAT FO
RMAT DATA........ ... RP(N+0) - VELDNU
MMER.? ... RP(N+1) - AANTAL CHRS LINKS
E KOLOM.L ... RP(N+2) - 0=RECHTS 1=LIN
KS AANGEPAST.. ... RP(N+3) - AANTAL AF
GEDRUKTE KARAKTERS.Q $.. RP(N+4) - FLA
G VOOR TOTAALTELLING VAN DIT VELD.W ....
.!8.E.0:.".HOEVEEL VELDEN";:.360:HN.E(A$
)..!B..HN.1.HN.NH.1.2360.3!L..E.0.RN$(NN
)."HUIDIGE".C!V..I.1.HN.5.5.V!`..".WAT I
S HET VELDNUMMER DAT U ALS"(I.4).5".E"..
!J.."WILT AFDRUKKEN";:.360:RP(I).E(A$)..
!T..RP(I).0.RP(I).NH.2400..!~..".GEEF PR
INTPOSITIE VOOR "HD$(RP(I));:.360:RP(I.1
).E(A$).."...RP(I.1).0.RP(I.1).255.2430.
B"...".RECHTS OF LINKS UITGEVULD? (R/L)
";.O"...330:.A$."R".RP(I.2).0:.".RECHTS.
":.2490.."...A$."L".RP(I.2).1:.".LINKS."
:.2490. "...2460.H"...".VELDBREEDTE";:.3
60:RP(I.3).E(A$).."D..RP(I.3)..0.2490.!#
N..".MOET ER VAN DIT VELD EEN TOTAAL":."
BEREKEND WORDEN? (J/N) ";.Y#X..330:.A$."
J".RP(I.4).1:RP(0).1:T9.1:.YS$:.375:.255
0.K#...A$.."N".2520.Y#...NO$:.375..#...I
..#...RP(0)..1.2580.A#..RP(I.1).RP(I.4):
RP(I.3).RP(I.2):RP(I.4).1.M#...:.2620..#
..T9.0:.RP(HN.5.1).1.T9.1..$(..J.5.HN.5.
5:.RP(J).1.T9.1..$2..J.V$<..".MOETEN ALL
E RECORDS UIT HET BESTAND GEPRINT WO
RDEN? (J/N) ";..$F..330:.A$."J"..YS$".":
.375:Q$."@":X$."@":S..1:.2740..$P..A$.."
N".2630..$Z..NO$".":.375..$D.."IN WELK V
ELD MOET GEZOCHT WORDEN";:.360:S.E(A$)..
%N..S.0.Q$."@":X$."@":.2740.C%X..".MOET
ER NOG IN EEN TWEEDE VELD GEZOCHT WORDE
N? (J/N) ";.K%...330:.A$."N".X$."@":.NO$
:.375:.2720.}%...A$.."J".2690.B%..L$."J"
:.YS$:.".IN WELK VELD MOET GEZOCHT WORDE
N";:.360:X.E(A$):...% ..".WAARNAAR MOET
IN VELD"S"GEZOCHT WORDEN":.360:.:Q$.A$.,
&...L$."J".."EN BIJ "HD$(X):.360:X$.A$:L
$."".6&...FM...|&...".HOEVEEL REGELS KUN
NEN ER MAXIMAAL OP HETPAPIER";:.360:PL.E
(A$).B&H..".HOEVEEL MOGEN ER PER BLADZIJ
DE GEBRUIKT WORDEN";:.360:PC.E(A$)..&R..
PC.PL..".ZOVEEL KUNNEN ER NIET OP EEN BL
ADZIJDE!":.2750..'..PC.PL.PC..'...3150.0
'...J.1.NF:DA$(J,0).D(J).A'...Q$."@".285
0.A'...H(DA$(J,S),C(Q$))..Q$.2860.R'...X
$."@".2850..'...H(DA$(J,X),C(X$))..X$.28
60..'"..3020.H',..LC.PL.PR.1:.1290:.LC.0
.PC:.4:.LC:.3150.X'6..LC.0..3150..'@..A$
:.A$."M".J.NF:.J:.2910..'J..J..(T..T9..3
090..(^..E.2970.>(H..".WILT U DEZE OVERZ
ICHTSINDELING".^(R.."OP DISK BEWAREN? (J
/N) ";..(|..330:.A$."J".E.1:.YS$:.375:.3
240:.2970..(...A$.."N".2940..(...NO$..(.
..".MOETEN ER NOG MEER OVERZICHTEN GEPRI
NT":."WORDEN MET DEZE INDELING";..)..."?
(J/N)";.+)...330:.A$."J"..YS$:.375:.340
0:E.1:.2250.=)...A$.."N".2990.T)B..NO$:.
375: 4:.4380.X)L..I.1.HN:.RP(5.I)..3070:
.I:.3040.)V..I..)..HF.1:.4690..)...RP(0
).1.HC..0.GT.GT.HC:HC.0..)..LC.LC.1:..I)
..N.5.I.4..)..V.E(DA$(J,RP(N))):TL(I).TL
(I).V:HC.HC.V:..6*..N.RP(HN.5.2).RP(HN.5
.4):.N.1.N.RP(HN.5.3).RP(HN.5.1):.3110.O
*...I.1.N:.4,"-";:.I:.4.[*&..I.1.HN..*0.
TL$(I).D(TL(I)):TL$(I).I(TL$(I),C(TL$(I)
).1)..*:..TL(I).0.TL$(I).""..*D..I:HF.2:
.4690:..J*N..".": 4:.4,4,7..+X..S..1..4,
DB$": OVERZICHT VAN HET HELE BESTAND";:.
3200.-+B..4,DB$": OVERZICHT VAN "HD$(S)"
:"Q$;.>+L..X$."@".3200.X+V..4," EN "HD$(
X)":"X$;..+...4," (INDELING: ";RN$(NN);"
)":.4:.4..+..HF.0:.4690:N.80:.3100:.4..+
..LC.5:..Z+... *** SET-UP VOOR SAVEN RAP
PORT INDELING ***..+..NS.NR.,,...".HOE
WILT U DEZE INDELING NOEM
EN";:.360:RN$(NN).A$.G,..DF$." ".RN$(NN)
.".FMT".U,F.NR.5.HN.4.T,P..I.1.NR:TP$(I)
.D(RP(I)):.I..,Z.TP$(I.4).D(RP(0))..,...
3880:.4070:..I,... *** SET-UP INLEZEN RA
PPORT-FORMAT ***.V,...LG.4280..,..DF$."
".RN$(NN).".FMT"..,...3670..-..HN.(NR.4
).5..- .RP(0).RP(NR.3).(-*.NR.NS.:-4..34
00:.:.2590.Q->.. *** SUB MENU ***.F-H.."
..KIES UIT:":..~-R..MF.0.." 0. "HD$(0)..
-\..I.1.NH:.I".. "HD$(I):.I:...-F.MF.0:.
.R-P.. *** INLEZEN RAPPORT-FORMAT NAME *
**..-Z.NN.0:.I.0.20:RN$(I)."":.I:NS.NR..
...DF$.".NAM":.LG.DF$.".LBL"......3670..
....LG.ER.4960.;....ER.3600.X....I.1.NR:
RN$(I).TP$(I):.I.L...."..KIES UIT:."....
..I.1.NR:.I".. "RN$(I):.I...J..NR..20.35
60.M.T..LG..I".. NIEUWE ETIKET-INDELING
MAKEN.":.3560......I".. NIEUWE OVERZICHT
SINDELING MAKEN".-/...".KEUZE";:.360:S.E
(A$):.S.1.S.(I.(NR..20)).3560.C/..NN.S:.
LG.S.I.5010.K/...S..I.RN$(S).TP$(S):E.1:
NR.NS:.3320.U/...3650../..."..ER STAAN G
EEN OVERZICHTSINDELINGEN OP DISK.".V/.
.NN.1:.".WILT U ER EEN MAKEN? (J/N) ";..
/$..330:.A$."N"..NO$:.375:.4380..0...A$.
."J".3620..08..YS$:.375.-0B..3400:NR.NS:
.2360.G0L.. *** LEZEN FILES ***.P0V.ER.0
.K0`.FF.0:.DF$..".DAT".FF.1..0J..I(DF$,4
).".FMT".FF.2..0T..C(DB$).9.FL$.DR$.H(DB
$,9).DF$.",S,R":.3720.P0~.FL$.DR$.DB$.DF
$.",S,R"..0...3,8,3,FL$..1...15,A$,B$,C$
,D$:DT.E(A$):DT$.A$.", ".B$.",".C$.",".D
$.(1...DT.0.3770.>1...DT.62.ER.1:.3860.F
1..."...DISK ERROR -":.DT$: 1: 3: 15:..P
1...3,NR.|1D..J.1.NR..1N..FF.1.3830..1X.
.FF.2.3840..1...I.1.NH:.4650:DA$(J,I).I$
:.I.E1...3850.Y1...3,TP$(J):.3850..1...3
,RP(J)..1...J..1.. 3:FF.0:...2... *** SA
VE FILES ***./2(.FF.0:.DF$..".DAT".FF.1.
I22..I(DF$,4).".FMT".FF.2.Y2<..C(DB$).9.
FL$.DR$.H(DB$,9).DF$.",S,W":.3920..2F.FL
$.DR$.DB$.DF$.",S,W"..2P..3,8,3,FL$..2Z.
.15,A$,B$,C$,D$:DT.E(A$):DT$.A$.",".B$."
,".C$.",".D$..3D..DT.63..15,"S"DR$H(DB$,
9)DF$: 3:.3920..3N..3,NR..3X..J.1.NR.+3.
..FF.1.4020.:3...FF.2.4030.F3...I.1.NH.V
3 ..3,DA$(J,I).C3...I:.4040.W3...3,TP$(J
):.4040..3...3,RP(J)..3H..J..3R. 3:FF.0:
...3... *** SAVE RAPPORT FORMAAT ***.F3.
.NR.NN..3..DF$.".NAM":.LG.DF$.".LBL"..4.
..I.1.NR:TP$(I).RN$(I):.I..4...3880..4..
NR.NS:..=4... *** ALLE RECORDS LATEN ZIE
N ***.F4".LC.0.}4,..".":.NF.0.."GEEN GEG
EVENS IN BESTAND!":.320:.4380..46.LC.0:.
J.1.NF:FG.0..4@..1550..4J..LC.NH..20.424
0..4T.FG.1:." 'RETURN' = VERVOLG, SPATIE
BALK = MENU"..4^..L$:.L$."".4190..5H..L$
." ".J.NF:.J:.4380.#5R..L$.CR$.4230.35|.
.".";:.4180.A5...".":LC.0.Y5...J:.FG.1.F
G.0:.4380..5..." DRUK OP EEN TOETS VOOR
HET MENU."..5...L$:.L$."".4260. 5...4380
.D5... *** INLEZEN LABEL FORMAAT ***..5B
.DF$." ".RN$(NN).".LBL"..5L.FL$.DR$.DF$.
",S,R"..6V..3,8,3,FL$..6...3,LN.$6...I.1
.LN:.3,NI(I).L6...J.1.NI(I):.3,LA(I,J):.
3,SP(I,J):.J.Y6...I:.3,SP.L6.. 3:.3400:.
5190..6... *** HOOFDMENU ***.B6.. 4:.BA,
13:.BO,5:."..... ******* KAARTENBA
K *******".J6&.E.0.P60....6:...(38.C(DB$
)).2)"... "DB$" ."..7D..".. 1. KIEZEN V
AN EEN BESTAND".C7N.." 2. ZOEKEN EN/OF
VERANDEREN RECORDS".A7X.." 3. INBRENGEN
RECORDS"..7B.." 4. VERWIJDEREN RECORDS
"..7L.." 5. AFDRUKKEN ETIKETTEN".C7V.."
6. AFDRUKKEN OVERZICHTEN"..8..." 7. S
ORTEREN (DUURT CA.".(10.(.0004.NF.2..01.
NF..05)).10"MIN.)".-8..." 8. OVERZICHT
ALLE RECORDS".?8..." 9. EINDE".Z8...".
MAAK UW KEUZE"..8..."... HET BESTAN
D BEVAT"NF"RECORDS"..8..." U KUNT ER NO
G".(MX.NF..5)"AAN TOEVOEGEN.".P8...330:A
.E(A$):.A.0.4540..8F.T.TI:.H("..........
..........",9.A)" .>."..9P..(TI.T).240.4
600.(9Z..A$:.A$."J".4600.:9...A$.."N".45
60.H9...H("....................",9.A)"
.":.4540..9...370:.A.230,1040,900,1580,4
930,2220,680,4130,4620..9... *** EINDE P
ROGRAMMA ***.R9...BA,6:.BO,14:."."..9...
".":.808,237: 1: 15:...: .. *** INPUT VA
N DISK ***.0:*..DT.62.."BESTAND NIET GEV
ONDEN":..::4.I$."".F:>..3,I$:..I:H.. ***
GEFORMATEERD RAPPORT ***.Y:R..Q.1.HN.5.
5..:\..HF.0.S1$.HD$(RP(Q))..:F..HF.1.S1$
.DA$(J,RP(Q)).H:P..HF.2.S1$.TL$((Q.4).5)
..:Z.. *** INSTELLEN TABS ***..:...Q.1.T
B.RP(Q.1):.4780..;..N2.C(S2$).W;..TB.RP(
Q.3).(RP(Q.1).RP(Q.4).N2).(RP(Q.3).0).(R
P(Q.1).RP(Q.4).RP(Q.2)).~;...TB.1.TB.TB.
N2:.4,H(S1$,TB);:.4900..;..N1.C(S1$)..;.
..N1.RP(Q.3).S1$.H(S1$,RP(Q.3)):N1.C(S1$
).M;...RP(Q.2).0.4860..;J.. *** LINKS UI
TVULLEN ***..<T..TB.1. 4:."FOUT IN DE IN
DELING":.320:.4380.*<...4,.TB)S1$;.4<...
4900.S<... *** RECHTS UITVULLEN ***.H<..
TB.TB.RP(Q.3).N1..<...TB.1.TB.TB.N1:.4,H
(S1$,TB);:.4900. <...4,.TB);S1$;..<... *
** VOLGENDE ***.C<$.S2$.S1$.J<...Q.S<8..
4:...<B.. *** AFDRUKKEN LABELS ***.-=L..
".":.NF.0.."GEEN GEGEVENS IN HET BESTAND
!":.320:.4380.@=V.LG.1:E.0:.3450.Q=`..".
.ER STAAN GEEN ETIKET-INDELINGEN OP DISK
"..=J.NN.1:."WILT U ER EEN MAKEN? (J/N)
";..=T..330:.A$."N"..NO$:.375:.4380.M=~.
.A$.."J".4980..=...YS$:.375..>...".HOEVE
EL REGELS PER ETIKET";:.360:LN.E(A$):.A$
."M".4380.O>...LN.1.LN.5.."MOET TUSSEN 1
EN 5 ZIJN!":.320:.5010.B>...II.1.LN:.34
00..>..."HOEVEEL VELDEN OP REGELNUMMER"I
I"VAN":."HET ETIKET ";:.360.K>..NI(II).E
(A$):.A$."M".I.LN:.II:.4380.Z>D..NH.5.50
90..?N..NI(II).1.NI(II).NH.."GEEF EEN NU
MMER TUSSEN 1 EN"NH:.320:.5040.(?X..5100
.;?...NI(II).0.5155.~?...NI(II).0.NI(II)
.5.."GEEF EEN NUMMER TUSSEN 0 EN 5":.320
:.5040..?...J.1.NI(II).Y?...".WELK VELD
OP PLAATS"J"IN REGEL"II:."AFDRUKKEN";:.3
60:LA(II,J).E(A$)..?...E(A$).0.5110..@..
.".HOEVEEL RUIMTE VOOR '"HD$(LA(II,J))"'
";:.360:SP(II,J).E(A$).@@...E(A$).0.5130
.G@...J.O@#..II.|@(..".HOEVEEL RUIMTE VO
OR HET ETIKET";:.360..@2.SP.E(A$):.SP.0.
SP.40..".MOET TUSSEN 0 EN 40 ZIJN":.5160
.B@<..3400.V@F.FM.1:.2620:FM.0..AP.."...
.AFDRUKKEN: CONTINU OF MET EEN PAUZE NA"
:."ELK ETIKET (C/P)? ";.@AZ..330:PS.0:.A
$."P".PS.1:.5230.RAD..A$.."C".5210.EAN..
"."A$".":.375..AX.LG.0:."....STEL DE ETI
KETTEN IN OP DE JUISTE":."HOOGTE.":.320.
.A...:.4,4,7:MM.0.SA...I.1.NF:DA$(I,0).D
(I)..A...Q$."@".5310..B ..H(DA$(I,S),C(Q
$))..Q$.5410..B...X$."@".5310.5B...H(DA$
(I,X),C(X$))..X$.5410.XB..MM.1:.J.1.LN:.
SP..4,H(BL$,SP);.GBH..K.1.NI(J)..BR..4,H
(DA$(I,LA(J,K)).BL$,SP(J,K));:.K.NI(J)..
4," ";..B...K:.4..B...A$:.A$."".5370..B.
..A$."E".I.NF:.I: 4:.".LAATSTE RECORD GE
PRINT..":.5430..C...J:.K.LN.1.6:.4:.K..C
...PS..280..C...PS.A$."C".5410.NC...PS.A
$."E".I.NF:.I: 4:.5430.}C"..I: 4:."LAATS
TE RECORD GEPRINT..":.MM.5430..C,.."..NI
ETS GEVONDEN.":.320..C6..E.5490.UC@..".W
ILT U DE INDELING VAN DEZE ETIKETTEN"..C
J.."OP DISK BEWAREN? (J/N) ";. DT..330:.
A$."J".E.1:.YS$:.375:.5550:.5490.2D^..A$
.."N".5460.@DH..NO$:.375.IDR..".MOETEN E
R NOG ETIKETTEN MET DEZE"..D|.."INDELING
GEPRINT WORDEN? (J/N) ";..D...330:.A$."
J".E.1:.YS$:.375:.3400:.5190.ND...A$.."N
".5510..D...NO$:.375:.4380..E... *** SAV
E LABELINDELING ***..E..NS.NF.=E...".NAA
M ETIKET-INDELING: ";:.360:RN$(NN).A$.QE
B.LG.1:.4070:LG.0.TEL.FL$.DR$." ".RN$(NN
).DF$.",S,W"..EV..3,8,3,FL$..E...3,LN..E
...I.1.LN:.3,NI(I).JE...J.1.NI(I):.3,LA(
I,J):.3,SP(I,J):.J.WE...I:.3,SP..E.. 3:.
...
> CLICK IMAGE PREVIEW FOR FULL MODAL