DATA BASE
FILE INFORMATION
FILENAME(S): DATA BASE
FILE TYPE(S): PRG
FILE SIZE: 13.1K
FIRST SEEN: 2025-11-30 15:51:52
APPEARS ON: 1 disk(s)
FILE HASH
9bff4b514c51c3b1bddf9657a048d7862d7dd8405562cac6bbb52347a906f6f7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ACOM | DATA BASE | PRG | Belgium | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 0A 00 86 42 28 31 30 32 29 2C 5A 24 |.......B(102),Z$|
00000010: 28 31 33 32 29 00 67 08 14 00 4C 43 B2 31 34 3A |(132).g...LC.14:|
00000020: 46 43 B2 36 3A 42 4C 24 B2 22 20 20 20 20 20 20 |FC.6:BL$." |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000060: 20 20 20 20 20 20 22 00 B8 08 1E 00 42 4C 24 B2 | ".....BL$.|
00000070: 42 4C 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 |BL$." |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000B0: 20 20 20 20 20 20 20 22 00 D5 08 28 00 81 49 B2 | "...(..I.|
000000C0: 30 A4 31 39 3A 87 41 3A 97 34 39 31 35 32 AA 49 |0.19:.A:.49152.I|
000000D0: 2C 41 3A 82 49 00 09 09 32 00 57 31 B2 39 3A 50 |,A:.I...2.W1.9:P|
000000E0: 44 B2 32 3A 50 44 24 B2 22 50 52 2F 12 44 49 53 |D.2:PD$."PR/.DIS|
000000F0: 92 20 22 3A 53 41 B2 30 3A 9F 33 2C 33 3A 99 C7 |. ":SA.0:.3,3:..|
00000100: 28 31 34 37 29 22 91 91 22 00 2B 09 3C 00 99 22 |(147)"..".+.<.."|
00000110: 20 43 4F 50 59 57 52 49 54 45 20 42 59 20 4C 45 | COPYWRITE BY LE|
00000120: 50 50 45 50 2D 53 4F 46 54 11 22 00 45 09 46 00 |PPEP-SOFT.".E.F.|
00000130: 99 22 20 54 45 4C 2E 20 4F 32 32 39 30 2D 33 31 |." TEL. O2290-31|
00000140: 38 34 31 11 22 00 75 09 50 00 99 22 20 4F 50 4D |841.".u.P.." OPM|
00000150: 45 52 4B 49 4E 47 45 4E 2C 20 4B 4C 41 43 48 54 |ERKINGEN, KLACHT|
00000160: 45 4E 2C 20 53 55 47 47 45 53 54 49 45 53 2C 20 |EN, SUGGESTIES, |
00000170: 45 54 43 2E 22 00 9B 09 5A 00 99 22 20 47 41 41 |ETC."...Z.." GAA|
00000180: 52 4E 45 20 41 41 4E 20 42 4F 56 45 4E 53 54 41 |RNE AAN BOVENSTA|
00000190: 41 4E 44 20 54 45 4C 2E 4E 52 22 00 BD 09 64 00 |AND TEL.NR"...d.|
000001A0: 99 22 11 20 44 52 55 4B 20 4F 50 20 52 45 54 55 |.". DRUK OP RETU|
000001B0: 52 4E 2E 2E 2E 2E 22 3B 3A 8D 31 37 30 00 F4 09 |RN....";:.170...|
000001C0: 6E 00 99 22 93 11 11 11 20 20 31 20 3D 20 46 49 |n..".... 1 = FI|
000001D0: 4C 45 20 4C 45 5A 45 4E 11 22 3A 99 22 20 20 44 |LE LEZEN.":." D|
000001E0: 20 3D 20 46 49 4C 45 20 44 45 46 49 4E 49 45 52 | = FILE DEFINIER|
000001F0: 45 4E 11 22 00 0D 0A 78 00 99 22 20 20 43 20 3D |EN."...x.." C =|
00000200: 20 44 49 52 45 43 54 4F 52 59 11 11 22 00 39 0A | DIRECTORY..".9.|
00000210: 82 00 99 22 11 11 20 20 4D 41 41 4B 20 55 57 20 |...".. MAAK UW |
00000220: 4B 45 55 5A 45 22 3B 3A 8D 31 37 30 3A 8B 42 24 |KEUZE";:.170:.B$|
00000230: B2 22 31 22 A7 33 37 30 30 00 49 0A 8C 00 8B 42 |."1".3700.I....B|
00000240: 24 B2 22 44 22 A7 34 36 30 00 5A 0A 96 00 8B 42 |$."D".460.Z....B|
00000250: 24 B2 22 43 22 A7 31 32 30 30 00 7E 0A A0 00 99 |$."C".1200.~....|
00000260: 22 11 11 20 20 22 3B C7 28 31 38 29 22 46 4F 55 |".. ";.(18)"FOU|
00000270: 54 45 20 4B 45 55 5A 45 22 3A 89 31 30 30 00 9B |TE KEUZE":.100..|
00000280: 0A AA 00 81 50 58 B2 31 A4 31 30 30 3A 82 50 58 |....PX.1.100:.PX|
00000290: 3A 42 24 B2 22 22 3A 58 50 B2 30 00 AF 0A B4 00 |:B$."":XP.0.....|
000002A0: A1 42 24 3A 8B 42 24 B3 B1 22 22 A7 31 38 30 00 |.B$:.B$.."".180.|
000002B0: BC 0A BE 00 99 22 3A 20 A4 9D 22 3B 00 CF 0A C8 |.....": ..";....|
000002C0: 00 A1 58 24 3A 8B 58 24 B2 22 22 A7 32 30 30 00 |..X$:.X$."".200.|
000002D0: DF 0A D2 00 8B 58 24 B2 22 11 22 89 32 30 30 00 |.....X$.".".200.|
000002E0: EF 0A DC 00 8B 58 24 B2 22 91 22 89 32 30 30 00 |.....X$.".".200.|
000002F0: FF 0A E6 00 8B 58 24 B2 22 1D 22 89 32 30 30 00 |.....X$.".".200.|
00000300: 0D 0B F0 00 8B 57 31 B2 39 A7 32 36 30 00 27 0B |.....W1.9.260.'.|
00000310: FA 00 8B 58 24 B2 C7 28 39 35 29 A7 99 3A 43 4D |...X$..(95)..:CM|
00000320: B2 30 3A 89 36 32 30 00 43 0B 04 01 8B 58 24 B2 |.0:.620.C....X$.|
00000330: C7 28 32 30 29 B0 58 24 B2 C7 28 31 35 37 29 89 |.(20).X$..(157).|
00000340: 33 36 30 00 53 0B 0E 01 8B 58 24 B2 22 85 22 89 |360.S....X$.".".|
00000350: 33 38 30 00 63 0B 18 01 8B 58 24 B2 22 86 22 89 |380.c....X$.".".|
00000360: 34 30 30 00 73 0B 22 01 8B 58 24 B2 22 87 22 89 |400.s."..X$.".".|
00000370: 34 33 30 00 88 0B 2C 01 8B 58 24 B2 C7 28 31 33 |430...,..X$..(13|
00000380: 29 A7 99 22 20 22 3A 8E 00 96 0B 36 01 8B 43 4D |).." ":....6..CM|
00000390: B2 30 A7 33 35 30 00 A4 0B 3B 01 8B 58 50 B2 31 |.0.350...;..XP.1|
000003A0: A7 33 33 30 00 BC 0B 40 01 8B C6 28 58 24 29 B2 |.330...@...(X$).|
000003B0: 34 36 A7 58 50 B2 31 3A 89 33 35 30 00 D7 0B 4A |46.XP.1:.350...J|
000003C0: 01 8B C6 28 58 24 29 B1 34 37 AF C6 28 58 24 29 |...(X$).47..(X$)|
000003D0: B3 35 38 A7 33 35 30 00 E0 0B 54 01 89 32 30 30 |.58.350...T..200|
000003E0: 00 FC 0B 5E 01 42 24 B2 42 24 AA 58 24 3A 99 58 |...^.B$.B$.X$:.X|
000003F0: 24 3B 22 A4 9D 22 3B 3A 89 32 30 30 00 1B 0C 68 |$;"..";:.200...h|
00000400: 01 50 58 B2 C3 28 42 24 29 3A 50 58 B2 50 58 AB |.PX..(B$):PX.PX.|
00000410: 31 3A 8B 50 58 B3 30 A7 32 30 30 00 3C 0C 72 01 |1:.PX.0.200.<.r.|
00000420: 99 22 20 9D 9D 20 9D A4 9D 22 3B 3A 42 24 B2 C8 |." .. ...";:B$..|
00000430: 28 42 24 2C 50 58 29 3A 89 32 30 30 00 54 0C 7C |(B$,PX):.200.T.||
00000440: 01 42 43 B2 42 43 AA 31 3A 8B 42 43 B1 31 35 A7 |.BC.BC.1:.BC.15.|
00000450: 42 43 B2 30 00 67 0C 86 01 97 35 33 32 38 30 2C |BC.0.g....53280,|
00000460: 42 43 3A 89 32 30 30 00 7F 0C 90 01 46 43 B2 46 |BC:.200.....FC.F|
00000470: 43 AA 31 3A 8B 46 43 B1 31 35 A7 46 43 B2 30 00 |C.1:.FC.15.FC.0.|
00000480: 8E 0C 9A 01 8B 4C 43 B2 46 43 A7 34 30 30 00 A1 |.....LC.FC.400..|
00000490: 0C A4 01 97 35 33 32 38 31 2C 46 43 3A 89 32 30 |....53281,FC:.20|
000004A0: 30 00 B9 0C AE 01 4C 43 B2 4C 43 AA 31 3A 8B 4C |0.....LC.LC.1:.L|
000004B0: 43 B1 31 35 A7 4C 43 B2 30 00 C8 0C B8 01 8B 4C |C.15.LC.0......L|
000004C0: 43 B2 46 43 A7 34 33 30 00 E8 0C C2 01 97 32 35 |C.FC.430......25|
000004D0: 35 2C 4C 43 3A 9E 34 39 31 35 32 3A 97 36 34 36 |5,LC:.49152:.646|
000004E0: 2C 4C 43 3A 89 32 30 30 00 03 0D CC 01 99 C7 28 |,LC:.200.......(|
000004F0: 31 34 37 29 3A 52 4E B2 30 3A 54 53 B2 30 3A 49 |147):RN.0:TS.0:I|
00000500: 41 B2 30 00 2C 0D D6 01 99 22 20 46 49 4C 45 20 |A.0.,...." FILE |
00000510: 44 45 46 49 4E 49 54 49 45 11 11 22 3A 99 20 A3 |DEFINITIE..":. .|
00000520: 32 36 29 22 2A 2A 2A 2A 2A 2A 2A 22 00 6C 0D E0 |26)"*******".l..|
00000530: 01 99 22 20 4F 4E 44 45 52 57 45 52 50 20 49 4E |.." ONDERWERP IN|
00000540: 20 45 4E 4B 45 4C 56 4F 55 44 20 22 3B 3A 8D 31 | ENKELVOUD ";:.1|
00000550: 37 30 3A 4F 57 24 B2 42 24 3A 99 A3 32 36 29 22 |70:OW$.B$:..26)"|
00000560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 99 0D EA |***********"....|
00000570: 01 99 22 20 4F 4E 44 45 52 57 45 52 50 20 49 4E |.." ONDERWERP IN|
00000580: 20 4D 45 45 52 56 4F 55 44 20 20 22 3B 3A 8D 31 | MEERVOUD ";:.1|
00000590: 37 30 3A 4D 57 24 B2 42 24 00 C9 0D F4 01 99 22 |70:MW$.B$......"|
000005A0: 20 41 41 4E 54 41 4C 20 52 55 42 52 49 45 4B 45 | AANTAL RUBRIEKE|
000005B0: 4E 28 4D 41 58 20 31 35 29 22 3B 3A 8D 20 31 37 |N(MAX 15)";:. 17|
000005C0: 30 3A 59 B2 C5 28 42 24 29 00 D6 0D FE 01 8B 59 |0:Y..(B$)......Y|
000005D0: B3 31 89 35 30 30 00 E4 0D 08 02 8B 59 B1 31 35 |.1.500......Y.15|
000005E0: 89 35 30 30 00 29 0E 12 02 49 41 B2 59 AB 31 3A |.500.)...IA.Y.1:|
000005F0: 99 A3 32 36 29 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..26)"**********|
00000600: 22 3A 49 B2 30 3A 86 41 24 28 31 30 30 2C 59 29 |":I.0:.A$(100,Y)|
00000610: 2C 43 24 28 59 AB 31 29 2C 4D 28 33 2C 59 29 2C |,C$(Y.1),M(3,Y),|
00000620: 53 43 28 32 2C 59 AB 31 29 00 36 0E 1C 02 86 43 |SC(2,Y.1).6....C|
00000630: 4E 28 59 AB 31 29 00 40 0E 26 02 49 B2 49 AA 31 |N(Y.1).@.&.I.I.1|
00000640: 00 73 0E 30 02 99 22 20 4F 4D 53 43 48 52 59 56 |.s.0.." OMSCHRYV|
00000650: 49 4E 47 20 52 55 42 52 49 45 4B 20 22 49 3B 3A |ING RUBRIEK "I;:|
00000660: 8D 31 37 30 3A 4A B2 49 AB 31 3A 43 24 28 4A 29 |.170:J.I.1:C$(J)|
00000670: B2 42 24 00 AC 0E 3A 02 99 22 20 22 43 24 28 4A |.B$...:.." "C$(J|
00000680: 29 22 20 4E 55 4D 45 52 49 45 4B 20 4A 2F 4E 22 |)" NUMERIEK J/N"|
00000690: 3B 3A 8D 31 37 30 3A 8B 42 24 B3 B1 22 4A 22 A7 |;:.170:.B$.."J".|
000006A0: 43 4E 28 4A 29 B2 30 3A 89 36 30 30 00 E2 0E 44 |CN(J).0:.600...D|
000006B0: 02 99 22 20 48 4F 45 56 45 45 4C 20 50 4F 53 49 |.." HOEVEEL POSI|
000006C0: 54 49 45 53 20 56 4F 4F 52 20 22 43 24 28 4A 29 |TIES VOOR "C$(J)|
000006D0: 3B 3A 8D 31 37 30 3A 43 4E 28 4A 29 B2 C5 28 42 |;:.170:CN(J)..(B|
000006E0: 24 29 00 06 0F 4E 02 8B 43 4E 28 4A 29 B2 30 A7 |$)...N..CN(J).0.|
000006F0: 99 22 11 20 46 4F 55 54 45 20 57 41 41 52 44 45 |.". FOUTE WAARDE|
00000700: 22 3A 89 35 38 30 00 13 0F 58 02 8B 49 B3 59 A7 |":.580...X..I.Y.|
00000710: 35 35 30 00 1C 0F 62 02 89 36 32 30 00 43 0F 6C |550...b..620.C.l|
00000720: 02 57 31 B2 30 3A 99 22 11 20 44 52 55 4B 20 4F |.W1.0:.". DRUK O|
00000730: 50 20 52 45 54 55 52 4E 20 2E 2E 2E 22 3B 3A 8D |P RETURN ...";:.|
00000740: 31 37 30 00 6E 0F 76 02 99 20 C7 28 31 34 37 29 |170.n.v.. .(147)|
00000750: 3A 99 20 22 20 41 41 4E 54 41 4C 20 22 4D 57 24 |:. " AANTAL "MW$|
00000760: 22 20 49 53 20 22 3B A3 32 35 29 3B 52 4E 00 8B |" IS ";.25);RN..|
00000770: 0F 80 02 99 22 20 47 45 53 45 4C 45 43 54 45 45 |...." GESELECTEE|
00000780: 52 44 22 3B A3 32 35 29 3B 54 53 00 B6 0F 8A 02 |RD";.25);TS.....|
00000790: 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |." -------------|
000007A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A |--------------":|
000007B0: 99 3A 89 37 37 30 00 C2 0F 94 02 99 C7 28 31 34 |.:.770.......(14|
000007C0: 37 29 00 EB 0F 9E 02 99 22 20 32 20 3D 20 22 4D |7)......" 2 = "M|
000007D0: 57 24 22 20 53 41 56 45 4E 22 A3 32 35 29 22 41 |W$" SAVEN".25)"A|
000007E0: 20 3D 20 4D 45 4D 4F 52 59 11 22 00 1C 10 A8 02 | = MEMORY.".....|
000007F0: 99 22 20 33 20 3D 20 22 4F 57 24 22 20 54 4F 45 |." 3 = "OW$" TOE|
00000800: 56 4F 45 47 45 4E 22 A3 32 35 29 22 42 20 3D 20 |VOEGEN".25)"B = |
00000810: 4F 43 43 55 52 52 45 4E 43 59 11 22 00 4E 10 B2 |OCCURRENCY.".N..|
00000820: 02 99 22 20 34 20 3D 20 22 4F 57 24 22 20 56 45 |.." 4 = "OW$" VE|
00000830: 52 57 49 4A 44 45 52 45 4E 22 A3 32 35 29 22 43 |RWIJDEREN".25)"C|
00000840: 20 3D 20 44 49 52 45 43 54 4F 52 59 11 22 00 7A | = DIRECTORY.".z|
00000850: 10 BC 02 99 22 20 35 20 3D 20 22 4F 57 24 22 20 |...." 5 = "OW$" |
00000860: 57 49 4A 5A 49 47 45 4E 22 A3 32 35 29 22 5F 20 |WIJZIGEN".25)"_ |
00000870: 3D 20 45 53 43 41 50 45 11 22 00 A1 10 C6 02 99 |= ESCAPE."......|
00000880: 22 20 36 20 3D 20 50 52 49 4E 54 45 4E 20 22 4D |" 6 = PRINTEN "M|
00000890: 57 24 A3 32 35 29 22 48 20 3D 20 48 45 4C 50 11 |W$.25)"H = HELP.|
000008A0: 22 00 CA 10 D0 02 99 22 20 37 20 3D 20 44 49 53 |"......" 7 = DIS|
000008B0: 50 4C 41 59 20 22 4D 57 24 A3 32 35 29 22 46 31 |PLAY "MW$.25)"F1|
000008C0: 3D 20 42 4F 52 44 45 52 11 22 00 F4 10 DA 02 99 |= BORDER."......|
000008D0: 22 20 38 20 3D 20 53 4F 52 54 45 52 45 4E 22 A3 |" 8 = SORTEREN".|
000008E0: 32 35 29 22 46 33 3D 20 42 41 43 4B 47 52 4F 55 |25)"F3= BACKGROU|
000008F0: 4E 44 11 22 00 24 11 E4 02 99 22 20 39 20 3D 20 |ND.".$...." 9 = |
00000900: 45 49 4E 44 45 20 50 52 4F 47 52 41 4D 4D 41 22 |EINDE PROGRAMMA"|
00000910: A3 32 35 29 22 46 35 3D 20 43 48 41 52 41 43 54 |.25)"F5= CHARACT|
00000920: 45 52 11 22 00 50 11 EE 02 99 22 20 30 20 3D 20 |ER.".P...." 0 = |
00000930: 53 45 4C 45 43 54 45 52 45 4E 22 A3 32 35 29 22 |SELECTEREN".25)"|
00000940: 45 20 3D 20 53 43 52 41 54 43 48 2F 56 41 4C 22 |E = SCRATCH/VAL"|
00000950: 00 7D 11 F8 02 99 22 20 46 20 3D 20 54 4F 54 41 |.}...." F = TOTA|
00000960: 4C 45 4E 2F 47 45 4D 2E 22 A3 32 35 29 22 50 20 |LEN/GEM.".25)"P |
00000970: 3D 20 22 3B 50 44 24 3B 22 53 57 11 22 00 A8 11 |= ";PD$;"SW."...|
00000980: 02 03 99 22 20 4D 41 41 4B 20 55 57 20 4B 45 55 |..." MAAK UW KEU|
00000990: 5A 45 20 28 20 4D 20 56 4F 4F 52 20 4D 45 4E 55 |ZE ( M VOOR MENU|
000009A0: 29 22 3B 3A 8D 31 37 30 00 B8 11 0C 03 8B 42 24 |)";:.170......B$|
000009B0: B2 22 4D 22 89 36 36 30 00 C9 11 16 03 8B 42 24 |."M".660......B$|
000009C0: B2 22 30 22 89 31 39 34 30 00 DA 11 20 03 8B 42 |."0".1940... ..B|
000009D0: 24 B2 22 35 22 89 33 32 36 30 00 EB 11 2A 03 8B |$."5".3260...*..|
000009E0: 42 24 B2 22 32 22 89 33 34 34 30 00 FC 11 34 03 |B$."2".3440...4.|
000009F0: 8B 42 24 B2 22 36 22 89 32 34 32 30 00 0C 12 3E |.B$."6".2420...>|
00000A00: 03 8B 42 24 B2 22 37 22 89 39 36 30 00 1D 12 48 |..B$."7".960...H|
00000A10: 03 8B 42 24 B2 22 33 22 89 31 30 32 30 00 2E 12 |..B$."3".1020...|
00000A20: 52 03 8B 42 24 B2 22 38 22 89 31 35 37 30 00 3F |R..B$."8".1570.?|
00000A30: 12 5C 03 8B 42 24 B2 22 34 22 89 31 34 37 30 00 |.\..B$."4".1470.|
00000A40: 50 12 66 03 8B 42 24 B2 22 39 22 A7 34 32 33 30 |P.f..B$."9".4230|
00000A50: 00 61 12 70 03 8B 42 24 B2 22 41 22 89 32 39 37 |.a.p..B$."A".297|
00000A60: 30 00 72 12 7A 03 8B 42 24 B2 22 42 22 89 33 30 |0.r.z..B$."B".30|
00000A70: 31 30 00 83 12 84 03 8B 42 24 B2 22 43 22 89 31 |10......B$."C".1|
00000A80: 32 30 30 00 94 12 8E 03 8B 42 24 B2 22 45 22 89 |200......B$."E".|
00000A90: 33 38 38 30 00 A5 12 98 03 8B 42 24 B2 22 46 22 |3880......B$."F"|
00000AA0: 89 33 39 35 30 00 B6 12 A2 03 8B 42 24 B2 22 50 |.3950......B$."P|
00000AB0: 22 89 34 31 34 30 00 C7 12 AC 03 8B 42 24 B2 22 |".4140......B$."|
00000AC0: 48 22 A7 34 33 33 30 00 EB 12 B6 03 99 22 11 20 |H".4330......". |
00000AD0: 22 3B C7 28 31 38 29 3B 22 46 4F 55 54 45 20 4B |";.(18);"FOUTE K|
00000AE0: 45 55 5A 45 11 22 3A 89 36 32 30 00 11 13 C0 03 |EUZE.":.620.....|
00000AF0: 99 C7 28 31 34 37 29 22 11 20 44 49 53 50 4C 41 |..(147)". DISPLA|
00000B00: 59 20 53 45 4C 45 43 54 49 45 11 11 22 3A 54 B2 |Y SELECTIE..":T.|
00000B10: 30 00 31 13 CA 03 54 B2 54 AA 31 3A 8B 41 24 28 |0.1...T.T.1:.A$(|
00000B20: 54 2C 49 41 AA 31 29 B3 B1 22 53 22 89 31 30 30 |T,IA.1).."S".100|
00000B30: 30 00 5B 13 D4 03 99 3A 81 49 B2 30 A4 49 41 3A |0.[....:.I.0.IA:|
00000B40: 99 22 20 22 43 24 28 49 29 3B A3 31 32 29 3B 41 |." "C$(I);.12);A|
00000B50: 24 28 54 2C 49 29 3A 82 49 3A 99 00 7C 13 DE 03 |$(T,I):.I:..|...|
00000B60: 99 22 20 44 52 55 4B 20 4F 50 20 52 45 54 55 52 |." DRUK OP RETUR|
00000B70: 4E 2E 2E 2E 22 3B 3A 8D 20 31 37 30 00 8A 13 E8 |N...";:. 170....|
00000B80: 03 8B 54 B3 52 4E 89 39 37 30 00 93 13 F2 03 89 |..T.RN.970......|
00000B90: 36 33 30 00 B4 13 FC 03 99 C7 28 31 34 37 29 22 |630.......(147)"|
00000BA0: 11 20 22 4F 57 24 22 20 54 4F 45 56 4F 45 47 45 |. "OW$" TOEVOEGE|
00000BB0: 4E 11 11 22 00 CD 13 06 04 99 22 20 22 4F 57 24 |N.."......" "OW$|
00000BC0: 22 20 54 4F 45 56 4F 45 47 45 4E 11 22 00 F7 13 |" TOEVOEGEN."...|
00000BD0: 10 04 99 A3 31 35 29 3B 22 2A 2A 2A 2A 2A 2A 2A |....15);"*******|
00000BE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BF0: 2A 22 3A 49 B2 AB 31 00 15 14 1A 04 49 B2 49 AA |*":I..1.....I.I.|
00000C00: 31 3A 43 4D B2 30 3A 8B 43 4E 28 49 29 B3 B1 30 |1:CM.0:.CN(I)..0|
00000C10: A7 43 4D B2 31 00 33 14 24 04 99 22 20 22 43 24 |.CM.1.3.$.." "C$|
00000C20: 28 49 29 3B A3 31 33 29 3B 3A 8D 31 37 30 3A 43 |(I);.13);:.170:C|
00000C30: 4D B2 30 00 45 14 2E 04 8B 43 4E 28 49 29 B2 30 |M.0.E....CN(I).0|
00000C40: A7 31 31 30 30 00 88 14 38 04 4A B2 43 4E 28 49 |.1100...8.J.CN(I|
00000C50: 29 AB C3 28 42 24 29 3A 8B 4A B3 30 A7 99 22 11 |)..(B$):.J.0..".|
00000C60: 20 52 55 42 52 49 45 4B 20 49 53 20 4D 41 58 22 | RUBRIEK IS MAX"|
00000C70: 43 4E 28 49 29 22 50 4F 53 2E 11 22 3A 49 B2 49 |CN(I)"POS..":I.I|
00000C80: AB 31 3A 89 31 30 35 30 00 A8 14 42 04 5A 24 28 |.1:.1050...B.Z$(|
00000C90: 49 29 B2 22 2D 22 AA C8 28 42 4C 24 2C 4A 29 AA |I)."-"..(BL$,J).|
00000CA0: 42 24 3A 89 31 31 31 30 00 B5 14 4C 04 5A 24 28 |B$:.1110...L.Z$(|
00000CB0: 49 29 B2 42 24 00 C4 14 56 04 8B 49 B3 49 41 A7 |I).B$...V..I.IA.|
00000CC0: 31 30 35 30 00 EA 14 60 04 99 A3 31 35 29 3B 22 |1050...`...15);"|
00000CD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CE0: 2A 2A 2A 2A 2A 2A 2A 2A 11 22 00 1B 15 6A 04 99 |********."...j..|
00000CF0: 22 20 43 4F 52 52 45 43 54 20 4A 2F 4E 20 28 2B |" CORRECT J/N (+|
00000D00: 4D 3D 4D 4F 52 45 29 20 22 3B 3A 8D 31 37 30 3A |M=MORE) ";:.170:|
00000D10: 8B 42 24 B2 22 4E 22 A7 36 32 30 00 2D 15 74 04 |.B$."N".620.-.t.|
00000D20: 8B 42 24 B2 22 4E 4D 22 89 31 30 34 30 00 4A 15 |.B$."NM".1040.J.|
00000D30: 7E 04 4E 24 B2 C8 28 42 24 2C 31 29 3A 8B 4E 24 |~.N$..(B$,1):.N$|
00000D40: B3 B1 22 4A 22 89 31 31 33 30 00 72 15 88 04 52 |.."J".1130.r...R|
00000D50: 4E B2 52 4E AA 31 3A 81 49 B2 30 A4 49 41 3A 8B |N.RN.1:.I.0.IA:.|
00000D60: 5A 24 28 49 29 B2 22 22 A7 5A 24 28 49 29 B2 22 |Z$(I)."".Z$(I)."|
00000D70: 20 22 00 8E 15 92 04 41 24 28 52 4E 2C 49 29 B2 | ".....A$(RN,I).|
00000D80: 5A 24 28 49 29 3A 82 20 49 3A 53 41 B2 30 00 B0 |Z$(I):. I:SA.0..|
00000D90: 15 9C 04 41 24 28 52 4E 2C 49 41 AA 31 29 B2 22 |...A$(RN,IA.1)."|
00000DA0: 22 3A 8B 20 42 24 B2 22 4A 4D 22 89 31 30 34 30 |":. B$."JM".1040|
00000DB0: 00 B9 15 A6 04 89 36 32 30 00 DF 15 B0 04 99 C7 |......620.......|
00000DC0: 28 31 34 37 29 22 11 20 44 49 52 45 43 54 4F 52 |(147)". DIRECTOR|
00000DD0: 59 20 4C 45 5A 45 4E 11 11 22 3A 50 50 B2 33 00 |Y LEZEN..":PP.3.|
00000DE0: FE 15 BA 04 9F 31 2C 38 2C 32 2C 22 24 22 3A 8B |.....1,8,2,"$":.|
00000DF0: 50 44 B2 31 A7 9F 34 2C 34 3A 50 50 B2 34 00 15 |PD.1..4,4:PP.4..|
00000E00: 16 C4 04 81 58 B2 31 A4 31 34 31 3A A1 23 31 2C |....X.1.141:.#1,|
00000E10: 41 41 24 3A 82 00 55 16 CE 04 54 24 28 30 29 B2 |AA$:..U...T$(0).|
00000E20: 22 44 45 4C 22 3A 54 24 28 31 29 B2 22 53 45 51 |"DEL":T$(1)."SEQ|
00000E30: 22 3A 54 24 28 32 29 B2 22 50 52 47 22 3A 54 24 |":T$(2)."PRG":T$|
00000E40: 28 33 29 B2 22 55 53 52 22 3A 54 24 28 34 29 B2 |(3)."USR":T$(4).|
00000E50: 22 52 45 4C 22 00 92 16 D8 04 4A B2 31 37 3A 8D |"REL".....J.17:.|
00000E60: 31 34 30 30 3A 4E 24 B2 42 24 3A 4A B2 32 3A 8D |1400:N$.B$:J.2:.|
00000E70: 31 34 30 30 3A 49 24 B2 42 24 3A A1 23 31 2C 41 |1400:I$.B$:.#1,A|
00000E80: 41 24 3A 4A B2 32 3A 8D 31 34 30 30 3A 4F 24 B2 |A$:J.2:.1400:O$.|
00000E90: 42 24 00 A9 16 E2 04 81 4C B2 31 A4 38 38 3A A1 |B$......L.1.88:.|
00000EA0: 23 31 2C 41 41 24 3A 82 4C 00 CC 16 EC 04 98 50 |#1,AA$:.L......P|
00000EB0: 50 2C 22 20 44 49 53 4B 20 4E 41 4D 45 3A 22 2C |P," DISK NAME:",|
00000EC0: C7 28 31 38 29 3B 4E 24 3A 98 50 50 00 F0 16 F6 |.(18);N$:.PP....|
00000ED0: 04 98 50 50 2C 22 20 4C 45 4E 47 54 48 22 2C 22 |..PP," LENGTH","|
00000EE0: 54 59 50 45 22 2C 22 4E 41 4D 45 22 3A 98 50 50 |TYPE","NAME":.PP|
00000EF0: 00 F8 16 00 05 50 B2 30 00 22 17 0A 05 50 B2 50 |.....P.0."...P.P|
00000F00: AA 31 3A A1 23 31 2C 54 24 2C 41 41 24 2C 41 41 |.1:.#1,T$,AA$,AA|
00000F10: 24 3A 8B 54 24 B2 22 22 A7 54 24 B2 C7 28 31 32 |$:.T$."".T$..(12|
00000F20: 38 29 00 37 17 14 05 4A B2 31 35 3A 8D 31 34 30 |8).7...J.15:.140|
00000F30: 30 3A 4E 24 B2 42 24 00 69 17 1E 05 A1 23 31 2C |0:N$.B$.i....#1,|
00000F40: 41 41 24 2C 41 41 24 2C 41 41 24 2C 41 41 24 2C |AA$,AA$,AA$,AA$,|
00000F50: 41 41 24 2C 41 41 24 2C 41 41 24 2C 41 41 24 2C |AA$,AA$,AA$,AA$,|
00000F60: 41 41 24 2C 4C 24 2C 48 24 00 93 17 28 05 4C B2 |AA$,L$,H$...(.L.|
00000F70: C6 28 4C 24 AA C7 28 30 29 29 AA 32 35 36 AC C6 |.(L$..(0)).256..|
00000F80: 28 48 24 AA C7 28 30 29 29 3A 8B 4C B2 30 A7 31 |(H$..(0)):.L.0.1|
00000F90: 33 38 30 00 A0 17 32 05 8B 53 54 A7 31 34 34 30 |380...2..ST.1440|
00000FA0: 00 B4 17 3C 05 8B C6 28 54 24 29 B2 31 32 38 89 |...<...(T$).128.|
00000FB0: 31 33 37 30 00 CF 17 46 05 42 24 B2 C4 28 4C 29 |1370...F.B$..(L)|
00000FC0: 3A 42 24 B2 42 24 AA C8 28 42 4C 24 2C 33 29 00 |:B$.B$..(BL$,3).|
00000FD0: F4 17 50 05 98 50 50 2C 22 20 22 3B C8 28 42 24 |..P..PP," ";.(B$|
00000FE0: 2C 33 29 2C 54 24 28 C6 28 54 24 29 AB 31 32 38 |,3),T$(.(T$).128|
00000FF0: 29 2C 4E 24 00 09 18 5A 05 8B 50 B3 38 A7 A1 23 |),N$...Z..P.8..#|
00001000: 31 2C 41 41 24 2C 41 41 24 00 17 18 64 05 8B 50 |1,AA$,AA$...d..P|
00001010: B3 38 89 31 32 39 30 00 21 18 6E 05 89 31 32 38 |.8.1290.!.n..128|
00001020: 30 00 2B 18 78 05 42 24 B2 22 22 00 3E 18 82 05 |0.+.x.B$."".>...|
00001030: 81 4C B2 30 A4 4A 3A A1 23 31 2C 41 41 24 00 66 |.L.0.J:.#1,AA$.f|
00001040: 18 8C 05 8B 41 41 24 B3 B1 C7 28 39 36 29 A7 8B |....AA$...(96)..|
00001050: 41 41 24 B3 B1 C7 28 31 36 30 29 A7 20 42 24 B2 |AA$...(160). B$.|
00001060: 42 24 AA 41 41 24 00 6F 18 96 05 82 4C 3A 8E 00 |B$.AA$.o....L:..|
00001070: 83 18 A0 05 A0 31 3A 98 50 50 3A 8B 50 44 B2 31 |.....1:.PP:.PD.1|
00001080: A7 A0 34 00 B0 18 AA 05 8B 57 31 B2 39 A7 99 22 |..4......W1.9.."|
00001090: 11 11 20 44 52 55 4B 20 4F 50 20 52 45 54 55 52 |.. DRUK OP RETUR|
000010A0: 4E 2E 2E 2E 22 3B 3A 8D 31 37 30 3A 89 31 31 30 |N...";:.170:.110|
000010B0: 00 B9 18 B4 05 89 36 32 30 00 E5 18 BE 05 4B B2 |......620.....K.|
000010C0: 30 3A 99 C7 28 31 34 37 29 22 11 20 22 3B 4F 57 |0:..(147)". ";OW|
000010D0: 24 22 20 56 45 52 57 49 4A 44 45 52 45 4E 11 11 |$" VERWIJDEREN..|
000010E0: 22 3A 54 B2 30 00 EF 18 C8 05 54 B2 54 AA 31 00 |":T.0.....T.T.1.|
000010F0: 09 19 D2 05 8B 41 24 28 54 2C 49 41 AA 31 29 B3 |.....A$(T,IA.1).|
00001100: B1 22 53 22 89 31 35 35 30 00 34 19 DC 05 99 3A |."S".1550.4....:|
00001110: 81 49 B2 30 A4 49 41 3A 99 22 20 22 3B 43 24 28 |.I.0.IA:." ";C$(|
00001120: 49 29 3B A3 31 32 29 3B 41 24 28 54 2C 49 29 3A |I);.12);A$(T,I):|
00001130: 82 49 3A 99 00 61 19 E6 05 99 22 11 20 56 45 52 |.I:..a....". VER|
00001140: 57 49 4A 44 45 52 45 4E 20 4A 2F 4E 22 3B 3A 8D |WIJDEREN J/N";:.|
00001150: 31 37 30 3A 8B 42 24 B3 B1 22 4A 22 A7 31 35 34 |170:.B$.."J".154|
00001160: 30 00 9A 19 F0 05 99 22 11 20 57 4F 52 44 54 20 |0......". WORDT |
00001170: 4E 55 20 56 45 52 57 49 4A 44 45 52 44 2E 2E 2E |NU VERWIJDERD...|
00001180: 2E 22 3A 4B B2 4B AA 31 3A 54 53 B2 54 53 AB 31 |.":K.K.1:TS.TS.1|
00001190: 3A 81 49 B2 54 A4 52 4E AB 31 00 DB 19 FA 05 81 |:.I.T.RN.1......|
000011A0: 4A B2 30 A4 28 49 41 AA 31 29 3A 41 24 28 49 2C |J.0.(IA.1):A$(I,|
000011B0: 4A 29 B2 41 24 28 49 AA 31 2C 4A 29 3A 82 4A 3A |J).A$(I.1,J):.J:|
000011C0: 82 49 3A 52 4E B2 52 4E AB 31 3A 54 B2 54 AB 31 |.I:RN.RN.1:T.T.1|
000011D0: 3A 53 41 B2 30 3A 89 31 35 35 30 00 FA 19 04 06 |:SA.0:.1550.....|
000011E0: 99 22 11 20 57 4F 52 44 54 20 4E 49 45 54 20 56 |.". WORDT NIET V|
000011F0: 45 52 57 49 4A 44 45 52 44 22 00 09 1A 0E 06 8B |ERWIJDERD"......|
00001200: 54 B3 52 4E 89 31 34 38 30 00 2E 1A 18 06 99 22 |T.RN.1480......"|
00001210: 11 20 22 3B 4B 3B 22 20 22 4D 57 24 22 20 56 45 |. ";K;" "MW$" VE|
00001220: 52 57 49 4A 44 45 52 44 22 3A 89 36 32 30 00 56 |RWIJDERD":.620.V|
00001230: 1A 22 06 99 C7 28 31 34 37 29 22 11 11 20 20 22 |."...(147)".. "|
00001240: 4D 57 24 22 20 53 4F 52 54 45 52 45 4E 11 11 22 |MW$" SORTEREN.."|
00001250: 3A 59 53 B2 39 39 00 93 1A 2C 06 99 22 20 53 4F |:YS.99...,.." SO|
00001260: 52 54 45 52 45 4E 20 4F 50 20 52 55 42 52 49 45 |RTEREN OP RUBRIE|
00001270: 4B 20 3A 22 3A 99 3A 81 49 B2 30 A4 49 41 3A 99 |K :":.:.I.0.IA:.|
00001280: 22 20 22 3B 49 AA 31 3B 22 20 3D 20 22 3B 43 24 |" ";I.1;" = ";C$|
00001290: 28 49 29 00 BE 1A 36 06 82 49 3A 99 22 11 20 4D |(I)...6..I:.". M|
000012A0: 41 41 4B 20 55 57 20 4B 45 55 5A 45 20 22 3B 3A |AAK UW KEUZE ";:|
000012B0: 8D 31 37 30 3A 59 B2 C5 28 42 24 29 AB 31 00 CC |.170:Y..(B$).1..|
000012C0: 1A 40 06 8B 59 B3 4F 89 31 39 33 30 00 DB 1A 4A |.@..Y.O.1930...J|
000012D0: 06 8B 59 B1 49 41 89 31 39 33 30 00 12 1B 54 06 |..Y.IA.1930...T.|
000012E0: 99 22 11 20 53 4F 52 54 45 52 45 4E 20 4F 50 20 |.". SORTEREN OP |
000012F0: 53 55 42 2D 52 55 42 52 49 45 4B 4E 52 2E 20 22 |SUB-RUBRIEKNR. "|
00001300: 3B 3A 8D 20 31 37 30 3A 59 59 B2 C5 28 42 24 29 |;:. 170:YY..(B$)|
00001310: AB 31 00 22 1B 5E 06 8B 59 59 B1 49 41 89 31 36 |.1.".^..YY.IA.16|
00001320: 32 30 00 5D 1B 68 06 99 22 11 20 42 45 5A 49 47 |20.].h..". BEZIG|
00001330: 20 4D 45 54 20 53 4F 52 54 45 52 45 4E 20 2E 2E | MET SORTEREN ..|
00001340: 2E 22 3A 4E B2 52 4E 3A 4C B2 31 3A 42 28 4C 29 |.":N.RN:L.1:B(L)|
00001350: B2 4E AA 31 3A 4D B2 31 3A 59 53 B2 59 00 6A 1B |.N.1:M.1:YS.Y.j.|
00001360: 72 06 42 28 4C 29 B2 4E AA 31 00 72 1B 7C 06 4D |r.B(L).N.1.r.|.M|
00001370: B2 31 00 8F 1B 86 06 4A B2 42 28 4C 29 3A 49 B2 |.1.....J.B(L):I.|
00001380: 4D AB 31 3A 8B 4A AB 4D B3 33 A7 31 38 35 30 00 |M.1:.J.M.3.1850.|
00001390: A1 1B 90 06 4D 31 B2 B5 28 28 49 AA 4A 29 AD 32 |....M1..((I.J).2|
000013A0: 29 00 B5 1B 9A 06 49 B2 49 AA 31 3A 8B 49 B2 4A |).....I.I.1:.I.J|
000013B0: A7 31 38 31 30 00 C4 1B A4 06 8B 59 59 B3 30 89 |.1810......YY.0.|
000013C0: 31 37 33 30 00 F7 1B AE 06 8B 28 41 24 28 49 2C |1730......(A$(I,|
000013D0: 59 29 AA 41 24 28 49 2C 59 59 29 29 B3 B2 28 41 |Y).A$(I,YY))..(A|
000013E0: 24 28 4D 31 2C 59 29 AA 41 24 28 4D 31 2C 59 59 |$(M1,Y).A$(M1,YY|
000013F0: 29 29 A7 31 36 39 30 00 01 1C B8 06 89 31 37 34 |)).1690......174|
00001400: 30 00 1D 1C C2 06 8B 41 24 28 49 2C 59 29 B3 B2 |0......A$(I,Y)..|
00001410: 41 24 28 4D 31 2C 59 29 A7 31 36 39 30 00 31 1C |A$(M1,Y).1690.1.|
00001420: CC 06 4A B2 4A AB 31 3A 8B 49 B2 4A A7 31 38 31 |..J.J.1:.I.J.181|
00001430: 30 00 40 1C D6 06 8B 59 59 B3 30 A7 31 37 38 30 |0.@....YY.0.1780|
00001440: 00 73 1C E0 06 8B 28 41 24 28 4A 2C 59 29 AA 41 |.s....(A$(J,Y).A|
00001450: 24 28 4A 2C 59 59 29 29 B1 B2 28 41 24 28 4D 31 |$(J,YY))..(A$(M1|
00001460: 2C 59 29 AA 41 24 28 4D 31 2C 59 59 29 29 A7 31 |,Y).A$(M1,YY)).1|
00001470: 37 34 30 00 7D 1C EA 06 89 31 37 39 30 00 99 1C |740.}....1790...|
00001480: F4 06 8B 41 24 28 4A 2C 59 29 B1 B2 41 24 28 4D |...A$(J,Y)..A$(M|
00001490: 31 2C 59 29 A7 31 37 34 30 00 DC 1C FE 06 81 58 |1,Y).1740......X|
000014A0: B2 30 A4 28 49 41 AA 31 29 3A 41 24 28 30 2C 58 |.0.(IA.1):A$(0,X|
000014B0: 29 B2 41 24 28 49 2C 58 29 3A 41 24 28 49 2C 58 |).A$(I,X):A$(I,X|
000014C0: 29 B2 41 24 28 4A 2C 58 29 3A 41 24 28 4A 2C 58 |).A$(J,X):A$(J,X|
000014D0: 29 B2 41 24 28 30 2C 58 29 3A 82 58 00 E6 1C 08 |).A$(0,X):.X....|
000014E0: 07 89 31 36 39 30 00 F7 1C 12 07 8B 49 B1 B2 4D |..1690......I..M|
000014F0: 31 A7 49 B2 49 AB 31 00 06 1D 1C 07 8B 4A B2 4D |1.I.I.1......J.M|
00001500: 31 A7 31 38 34 30 00 4B 1D 26 07 81 58 B2 30 A4 |1.1840.K.&..X.0.|
00001510: 28 49 41 AA 31 29 3A 41 24 28 30 2C 58 29 B2 41 |(IA.1):A$(0,X).A|
00001520: 24 28 49 2C 58 29 3A 41 24 28 49 2C 58 29 B2 41 |$(I,X):A$(I,X).A|
00001530: 24 28 4D 31 2C 58 29 3A 41 24 28 4D 31 2C 58 29 |$(M1,X):A$(M1,X)|
00001540: B2 41 24 28 30 2C 58 29 3A 82 58 00 62 1D 30 07 |.A$(0,X):.X.b.0.|
00001550: 4C B2 4C AA 31 3A 42 28 4C 29 B2 49 3A 89 31 36 |L.L.1:B(L).I:.16|
00001560: 37 30 00 72 1D 3A 07 8B 4A AB 4D B3 32 A7 31 39 |70.r.:..J.M.2.19|
00001570: 31 30 00 81 1D 44 07 8B 59 59 B3 30 A7 31 38 39 |10...D..YY.0.189|
00001580: 30 00 B5 1D 4E 07 8B 28 41 24 28 4D 2C 59 29 AA |0...N..(A$(M,Y).|
00001590: 41 24 28 4D 2C 59 59 29 29 B3 28 41 24 28 4D AA |A$(M,YY)).(A$(M.|
000015A0: 31 2C 59 29 AA 41 24 28 4D AA 31 2C 59 59 29 29 |1,Y).A$(M.1,YY))|
000015B0: A7 31 39 31 30 00 BF 1D 58 07 89 31 39 30 30 00 |.1910...X..1900.|
000015C0: DB 1D 62 07 8B 41 24 28 4D 2C 59 29 B3 41 24 28 |..b..A$(M,Y).A$(|
000015D0: 4D AA 31 2C 59 29 A7 31 39 31 30 00 22 1E 6C 07 |M.1,Y).1910.".l.|
000015E0: 81 58 B2 30 A4 28 49 41 AA 31 29 3A 41 24 28 30 |.X.0.(IA.1):A$(0|
000015F0: 2C 58 29 B2 41 24 28 4D 2C 58 29 3A 41 24 28 4D |,X).A$(M,X):A$(M|
00001600: 2C 58 29 B2 41 24 28 4D AA 31 2C 58 29 3A 41 24 |,X).A$(M.1,X):A$|
00001610: 28 4D AA 31 2C 58 29 B2 41 24 28 30 2C 58 29 3A |(M.1,X).A$(0,X):|
00001620: 82 58 00 3F 1E 76 07 4D B2 42 28 4C 29 AA 31 3A |.X.?.v.M.B(L).1:|
00001630: 4C B2 4C AB 31 3A 8B 4C B1 30 A7 31 36 37 30 00 |L.L.1:.L.0.1670.|
00001640: 48 1E 80 07 89 36 32 30 00 78 1E 8A 07 99 22 11 |H....620.x....".|
00001650: 20 22 3B C7 28 31 38 29 3B 22 46 4F 55 54 45 20 | ";.(18);"FOUTE |
00001660: 4B 45 55 5A 45 22 3A 81 49 B2 31 A4 37 30 30 3A |KEUZE":.I.1.700:|
00001670: 82 49 3A 89 31 35 37 30 00 9A 1E 94 07 99 C7 28 |.I:.1570.......(|
00001680: 31 34 37 29 22 11 20 22 4D 57 24 22 20 53 45 4C |147)". "MW$" SEL|
00001690: 45 43 54 45 52 45 4E 11 11 22 00 BD 1E 9E 07 99 |ECTEREN.."......|
000016A0: 22 20 31 20 3D 20 41 4C 4C 45 20 22 4D 57 24 22 |" 1 = ALLE "MW$"|
000016B0: 20 53 45 4C 45 43 54 45 52 45 4E 11 22 00 DC 1E | SELECTEREN."...|
000016C0: A8 07 99 22 20 32 20 3D 20 53 45 4C 45 43 54 49 |..." 2 = SELECTI|
000016D0: 45 20 4F 50 48 45 46 46 45 4E 11 22 00 FD 1E B2 |E OPHEFFEN."....|
000016E0: 07 99 22 20 33 20 3D 20 56 41 52 49 41 42 45 4C |.." 3 = VARIABEL|
000016F0: 20 53 45 4C 45 43 54 45 52 45 4E 11 22 00 1D 1F | SELECTEREN."...|
00001700: BC 07 99 22 20 34 20 3D 20 56 49 53 55 45 45 4C |..." 4 = VISUEEL|
00001710: 20 53 45 4C 45 43 54 45 52 45 4E 11 22 00 3D 1F | SELECTEREN.".=.|
00001720: C6 07 99 22 11 20 4D 41 41 4B 20 55 57 20 4B 45 |...". MAAK UW KE|
00001730: 55 5A 45 20 20 22 3B 3A 8D 20 31 37 30 00 4E 1F |UZE ";:. 170.N.|
00001740: D0 07 8B 42 24 B2 22 31 22 89 32 31 31 30 00 5F |...B$."1".2110._|
00001750: 1F DA 07 8B 42 24 B2 22 32 22 89 32 31 34 30 00 |....B$."2".2140.|
00001760: 70 1F E4 07 8B 42 24 B2 22 33 22 89 32 31 37 30 |p....B$."3".2170|
00001770: 00 81 1F EE 07 8B 42 24 B2 22 34 22 A7 32 30 35 |......B$."4".205|
00001780: 30 00 B1 1F F8 07 99 22 11 20 22 3B C7 28 31 38 |0......". ";.(18|
00001790: 29 3B 22 46 4F 55 54 45 20 4B 45 55 5A 45 22 3A |);"FOUTE KEUZE":|
000017A0: 81 49 B2 31 A4 37 30 30 3A 82 49 3A 89 31 39 34 |.I.1.700:.I:.194|
000017B0: 30 00 C0 1F 02 08 54 B2 30 3A 99 3A 54 53 B2 30 |0.....T.0:.:TS.0|
000017C0: 00 EE 1F 0C 08 54 B2 54 AA 31 3A 81 49 B2 30 A4 |.....T.T.1:.I.0.|
000017D0: 49 41 3A 99 22 20 22 43 24 28 49 29 3B A3 31 32 |IA:." "C$(I);.12|
000017E0: 29 3B 41 24 28 54 2C 49 29 3A 82 49 3A 99 00 1C |);A$(T,I):.I:...|
000017F0: 20 16 08 99 22 20 53 45 4C 45 43 54 45 52 45 4E | ..." SELECTEREN|
00001800: 20 4A 2F 4E 20 22 3B 3A 8D 31 37 30 3A 41 24 28 | J/N ";:.170:A$(|
00001810: 54 2C 49 41 AA 31 29 B2 22 22 3A 99 00 3F 20 20 |T,IA.1)."":..? |
00001820: 08 8B 42 24 B2 22 4A 22 A7 41 24 28 54 2C 49 41 |..B$."J".A$(T,IA|
00001830: AA 31 29 B2 22 53 22 3A 54 53 B2 54 53 AA 31 00 |.1)."S":TS.TS.1.|
00001840: 4E 20 2A 08 8B 54 B3 52 4E A7 32 30 36 30 00 5D |N *..T.RN.2060.]|
00001850: 20 34 08 54 B2 54 53 3A 89 32 31 32 30 00 86 20 | 4.T.TS:.2120.. |
00001860: 3E 08 81 54 B2 31 A4 52 4E 3A 41 24 28 54 2C 49 |>..T.1.RN:A$(T,I|
00001870: 41 AA 31 29 B2 22 53 22 3A 82 54 3A 54 B2 54 AB |A.1)."S":.T:T.T.|
00001880: 31 3A 54 53 B2 54 00 A6 20 48 08 99 22 11 22 54 |1:TS.T.. H.."."T|
00001890: 3B 22 20 22 4D 57 24 22 20 47 45 53 45 4C 45 43 |;" "MW$" GESELEC|
000018A0: 54 45 45 52 44 22 00 D3 20 52 08 99 22 11 22 54 |TEERD".. R.."."T|
000018B0: 53 3B 22 20 22 4D 57 24 22 20 54 4F 54 41 41 4C |S;" "MW$" TOTAAL|
000018C0: 20 47 45 53 45 4C 45 43 54 45 45 52 44 22 3A 89 | GESELECTEERD":.|
000018D0: 36 32 30 00 F6 20 5C 08 99 22 11 20 5A 45 4B 45 |620.. \..". ZEKE|
000018E0: 52 20 57 45 54 45 4E 20 28 4A 2F 4E 29 20 20 22 |R WETEN (J/N) "|
000018F0: 3B 3A 8D 31 37 30 00 1B 21 66 08 8B 42 24 B3 B1 |;:.170..!f..B$..|
00001900: 22 4A 22 A7 99 3A 99 22 20 44 55 53 20 4E 49 45 |"J"..:." DUS NIE|
00001910: 54 20 2E 2E 2E 22 3A 89 36 32 30 00 47 21 70 08 |T ...":.620.G!p.|
00001920: 81 54 B2 31 A4 52 4E 3A 41 24 28 54 2C 49 41 AA |.T.1.RN:A$(T,IA.|
00001930: 31 29 B2 22 22 3A 82 54 3A 54 B2 30 3A 54 53 B2 |1)."":.T:T.0:TS.|
00001940: 30 3A 89 32 31 32 30 00 7D 21 7A 08 99 22 11 20 |0:.2120.}!z..". |
00001950: 53 45 4C 45 43 54 49 45 20 4F 50 20 3A 22 3A 99 |SELECTIE OP :":.|
00001960: 3A 81 49 B2 4F A4 49 41 3A 99 22 20 22 3B 49 AA |:.I.O.IA:." ";I.|
00001970: 31 3B 22 20 3D 20 22 3B 43 24 28 49 29 00 86 21 |1;" = ";C$(I)..!|
00001980: 84 08 82 49 3A 99 00 B7 21 8E 08 99 22 20 4D 41 |...I:...!..." MA|
00001990: 41 4B 20 55 57 20 4B 45 55 5A 45 20 22 3B 3A 8D |AK UW KEUZE ";:.|
000019A0: 31 37 30 3A 59 B2 C5 28 42 24 29 AB 31 3A 8B 59 |170:Y..(B$).1:.Y|
000019B0: B3 30 A7 32 34 31 30 00 C6 21 98 08 8B 59 B1 49 |.0.2410..!...Y.I|
000019C0: 41 89 32 34 31 30 00 FD 21 A2 08 99 22 11 20 53 |A.2410..!...". S|
000019D0: 45 4C 45 43 54 49 45 20 57 41 41 52 44 45 20 20 |ELECTIE WAARDE |
000019E0: 22 3B 3A 8D 31 37 30 3A 42 31 24 B2 42 24 3A 54 |";:.170:B1$.B$:T|
000019F0: B2 30 3A 99 3A 50 B2 C3 28 42 31 24 29 00 41 22 |.0:.:P..(B1$).A"|
00001A00: AC 08 99 22 20 31 20 3D 20 41 41 4E 20 53 45 4C |..." 1 = AAN SEL|
00001A10: 45 43 54 49 45 20 54 4F 45 56 4F 45 47 45 4E 22 |ECTIE TOEVOEGEN"|
00001A20: 3A 99 22 20 32 20 3D 20 56 41 4E 20 53 45 4C 45 |:." 2 = VAN SELE|
00001A30: 43 54 49 45 20 56 45 52 57 49 4A 44 45 52 45 4E |CTIE VERWIJDEREN|
00001A40: 22 00 75 22 B6 08 99 22 20 33 20 3D 20 55 49 54 |".u"..." 3 = UIT|
00001A50: 2D 53 45 4C 45 43 54 45 52 45 4E 11 22 3A 99 22 |-SELECTEREN.":."|
00001A60: 20 4D 41 41 4B 20 55 57 20 4B 45 55 5A 45 22 3B | MAAK UW KEUZE";|
00001A70: 3A 8D 31 37 30 00 86 22 C0 08 8B 42 24 B2 22 31 |:.170.."...B$."1|
00001A80: 22 89 32 32 37 30 00 97 22 CA 08 8B 42 24 B2 22 |".2270.."...B$."|
00001A90: 33 22 89 32 32 37 30 00 A9 22 D4 08 8B 42 24 B3 |3".2270.."...B$.|
00001AA0: B1 22 32 22 89 32 32 32 30 00 B5 22 DE 08 81 49 |."2".2220.."...I|
00001AB0: B2 31 A4 52 4E 00 D1 22 E8 08 8B C8 28 41 24 28 |.1.RN.."....(A$(|
00001AC0: 49 2C 59 29 2C 31 29 B3 B1 22 2D 22 A7 32 33 34 |I,Y),1).."-".234|
00001AD0: 30 00 FA 22 F2 08 81 4A B2 32 A4 C3 28 41 24 28 |0.."...J.2..(A$(|
00001AE0: 49 2C 59 29 29 3A 4B 48 B2 C6 28 CA 28 41 24 28 |I,Y)):KH..(.(A$(|
00001AF0: 49 2C 59 29 2C 4A 2C 4A 29 29 00 0B 23 FC 08 8B |I,Y),J,J))..#...|
00001B00: 4B 48 B3 B1 33 32 A7 32 33 32 30 00 12 23 06 09 |KH..32.2320..#..|
00001B10: 82 4A 00 42 23 10 09 4B 47 B2 C3 28 41 24 28 49 |.J.B#..KG..(A$(I|
00001B20: 2C 59 29 29 3A 43 24 B2 CA 28 41 24 28 49 2C 59 |,Y)):C$..(A$(I,Y|
00001B30: 29 2C 4A 2C 4B 47 29 3A 43 24 B2 C8 28 43 24 2C |),J,KG):C$..(C$,|
00001B40: 50 29 00 4C 23 1A 09 89 32 33 35 30 00 60 23 24 |P).L#...2350.`#$|
00001B50: 09 43 24 B2 C8 28 41 24 28 49 2C 59 29 2C 50 29 |.C$..(A$(I,Y),P)|
00001B60: 00 9D 23 2E 09 8B 43 24 B3 B1 42 31 24 AF 42 24 |..#...C$..B1$.B$|
00001B70: B2 22 33 22 AF 41 24 28 49 2C 49 41 AA 31 29 B2 |."3".A$(I,IA.1).|
00001B80: 22 53 22 A7 41 24 28 49 2C 49 41 AA 31 29 B2 22 |"S".A$(I,IA.1)."|
00001B90: 22 3A 54 B2 54 AB 31 3A 89 32 33 39 30 00 AF 23 |":T.T.1:.2390..#|
00001BA0: 38 09 8B 43 24 B3 B1 42 31 24 89 32 33 39 30 00 |8..C$..B1$.2390.|
00001BB0: E1 23 42 09 8B 42 24 B2 22 31 22 A7 8B 41 24 28 |.#B..B$."1"..A$(|
00001BC0: 49 2C 49 41 AA 31 29 B3 B1 22 53 22 A7 41 24 28 |I,IA.1).."S".A$(|
00001BD0: 49 2C 49 41 AA 31 29 B2 22 53 22 3A 54 B2 54 AA |I,IA.1)."S":T.T.|
00001BE0: 31 00 11 24 4C 09 8B 42 24 B2 22 32 22 A7 8B 41 |1..$L..B$."2"..A|
00001BF0: 24 28 49 2C 49 41 AA 31 29 B2 22 53 22 A7 41 24 |$(I,IA.1)."S".A$|
00001C00: 28 49 2C 49 41 AA 31 29 B2 22 22 3A 54 B2 54 AB |(I,IA.1)."":T.T.|
00001C10: 31 00 2B 24 56 09 82 49 3A 54 53 B2 54 53 AA 54 |1.+$V..I:TS.TS.T|
00001C20: 3A 8B 54 53 B3 30 A7 54 53 B2 30 00 35 24 60 09 |:.TS.0.TS.0.5$`.|
00001C30: 89 32 31 32 30 00 65 24 6A 09 99 22 11 20 22 3B |.2120.e$j..". ";|
00001C40: C7 28 31 38 29 3B 22 46 4F 55 54 45 20 4B 45 55 |.(18);"FOUTE KEU|
00001C50: 5A 45 22 3A 81 49 B2 31 A4 37 30 30 3A 82 49 3A |ZE":.I.1.700:.I:|
00001C60: 89 31 39 34 30 00 95 24 74 09 99 C7 28 31 34 37 |.1940..$t...(147|
00001C70: 29 3A 59 54 B2 30 3A 81 49 B2 30 A4 49 41 3A 81 |):YT.0:.I.0.IA:.|
00001C80: 4A B2 30 A4 32 3A 53 43 28 4A 2C 49 29 B2 30 3A |J.0.2:SC(J,I).0:|
00001C90: 82 4A 3A 82 49 00 D1 24 7E 09 99 22 20 50 52 49 |.J:.I..$~.." PRI|
00001CA0: 4E 54 45 4E 20 22 4D 57 24 3A 99 3A 99 3A 50 24 |NTEN "MW$:.:.:P$|
00001CB0: B2 22 22 3A 81 49 B2 31 A4 31 33 32 3A 5A 24 28 |."":.I.1.132:Z$(|
00001CC0: 49 29 B2 22 22 3A 82 49 3A 49 B2 AB 31 3A 4A B2 |I)."":.I:I..1:J.|
00001CD0: 30 00 DB 24 88 09 4A B2 4A AA 31 00 EE 24 92 09 |0..$..J.J.1..$..|
00001CE0: 49 B2 49 AA 31 3A 4D 28 33 2C 4A 29 B2 49 00 26 |I.I.1:M(3,J).I.&|
00001CF0: 25 9C 09 99 22 11 20 22 43 24 28 49 29 3B A3 31 |%...". "C$(I);.1|
00001D00: 35 29 3B 22 4F 50 20 57 45 4C 4B 45 20 52 45 47 |5);"OP WELKE REG|
00001D10: 45 4C 22 3B 3A 8D 31 37 30 3A 4D 28 31 2C 4A 29 |EL";:.170:M(1,J)|
00001D20: B2 C5 28 42 24 29 00 40 25 A6 09 8B 4D 28 31 2C |..(B$).@%...M(1,|
00001D30: 4A 29 B2 30 A7 4A B2 4A AB 31 3A 89 32 35 33 30 |J).0.J.J.1:.2530|
00001D40: 00 6F 25 B0 09 99 A3 31 35 29 22 4F 50 20 57 45 |.o%....15)"OP WE|
00001D50: 4C 4B 45 20 50 4F 53 49 54 49 45 22 3B 3A 8D 31 |LKE POSITIE";:.1|
00001D60: 37 30 3A 4D 28 32 2C 4A 29 B2 C5 28 42 24 29 00 |70:M(2,J)..(B$).|
00001D70: 82 25 B2 09 8B 4D 28 32 2C 4A 29 B3 31 A7 32 34 |.%...M(2,J).1.24|
00001D80: 38 36 00 97 25 B4 09 8B 4D 28 32 2C 4A 29 B3 31 |86..%...M(2,J).1|
00001D90: 33 33 A7 32 34 39 30 00 BD 25 B6 09 99 22 11 20 |33.2490..%...". |
00001DA0: 22 3B C7 28 31 38 29 3B 22 46 4F 55 54 45 20 50 |";.(18);"FOUTE P|
00001DB0: 4F 53 49 54 49 45 22 3A 89 32 34 38 30 00 E4 25 |OSITIE":.2480..%|
00001DC0: BA 09 99 22 20 20 20 4B 4F 50 52 45 47 45 4C 20 |..." KOPREGEL |
00001DD0: 4F 4D 53 43 48 52 49 4A 56 49 4E 47 20 22 3B 3A |OMSCHRIJVING ";:|
00001DE0: 8D 31 37 30 00 F4 25 C4 09 8B 42 24 B2 22 22 A7 |.170..%...B$."".|
00001DF0: 32 35 33 30 00 09 26 CE 09 8B 42 24 B2 22 3A 22 |2530..&...B$.":"|
00001E00: A7 42 24 B2 43 24 28 49 29 00 1B 26 D8 09 5A 24 |.B$.C$(I)..&..Z$|
00001E10: 28 4D 28 32 2C 4A 29 29 B2 42 24 00 2A 26 E2 09 |(M(2,J)).B$.*&..|
00001E20: 8B 49 B3 49 41 A7 32 34 34 30 00 46 26 EC 09 4A |.I.IA.2440.F&..J|
00001E30: 4A B2 4A 3A 81 49 B2 32 A4 4A 4A 3A 8B 4A 4A B2 |J.J:.I.2.JJ:.JJ.|
00001E40: 31 A7 32 36 30 30 00 7A 26 F6 09 4D 28 31 2C 30 |1.2600.z&..M(1,0|
00001E50: 29 B2 4D 28 31 2C 49 29 3A 4D 28 32 2C 30 29 B2 |).M(1,I):M(2,0).|
00001E60: 4D 28 32 2C 49 29 3A 4D 28 33 2C 30 29 B2 4D 28 |M(2,I):M(3,0).M(|
00001E70: 33 2C 49 29 3A 4A B2 49 AB 31 00 92 26 00 0A 8B |3,I):J.I.1..&...|
00001E80: 4D 28 31 2C 30 29 B1 4D 28 31 2C 4A 29 A7 32 35 |M(1,0).M(1,J).25|
00001E90: 39 30 00 AB 26 0A 0A 8B 4D 28 32 2C 30 29 B1 B2 |90..&...M(2,0)..|
00001EA0: 4D 28 32 2C 4A 29 A7 32 35 39 30 00 F0 26 14 0A |M(2,J).2590..&..|
00001EB0: 4D 28 31 2C 4A AA 31 29 B2 4D 28 31 2C 4A 29 3A |M(1,J.1).M(1,J):|
00001EC0: 4D 28 32 2C 4A AA 31 29 B2 4D 28 32 2C 4A 29 3A |M(2,J.1).M(2,J):|
00001ED0: 4D 28 33 2C 4A AA 31 29 B2 4D 28 33 2C 4A 29 3A |M(3,J.1).M(3,J):|
00001EE0: 4A B2 4A AB 31 3A 8B 4A B3 B1 30 A7 32 35 36 30 |J.J.1:.J..0.2560|
00001EF0: 00 24 27 1E 0A 4D 28 31 2C 4A AA 31 29 B2 4D 28 |.$'..M(1,J.1).M(|
00001F00: 31 2C 30 29 3A 4D 28 32 2C 4A AA 31 29 B2 4D 28 |1,0):M(2,J.1).M(|
00001F10: 32 2C 30 29 3A 4D 28 33 2C 4A AA 31 29 B2 4D 28 |2,0):M(3,J.1).M(|
00001F20: 33 2C 30 29 00 30 27 28 0A 82 49 3A 9F 34 2C 34 |3,0).0'(..I:.4,4|
00001F30: 00 5C 27 2D 0A 98 34 2C 22 20 22 3B 54 53 22 47 |.\'-..4," ";TS"G|
00001F40: 45 53 45 4C 45 43 54 45 45 52 44 45 20 22 4D 57 |ESELECTEERDE "MW|
00001F50: 24 22 20 55 49 54 22 52 4E 3A 98 34 00 89 27 32 |$" UIT"RN:.4..'2|
00001F60: 0A 99 22 11 20 20 20 53 55 42 54 4F 54 41 4C 45 |..". SUBTOTALE|
00001F70: 4E 20 4A 2F 4E 22 3B 3A 8D 31 37 30 3A 8B 42 24 |N J/N";:.170:.B$|
00001F80: B2 22 4A 22 A7 59 54 B2 31 00 A5 27 3C 0A 81 4E |."J".YT.1..'<..N|
00001F90: B2 31 A4 31 33 32 3A 8B 5A 24 28 4E 29 B2 22 22 |.1.132:.Z$(N).""|
00001FA0: A7 32 36 35 30 00 BC 27 46 0A 51 B2 4E AB C3 28 |.2650..'F.Q.N..(|
00001FB0: 50 24 29 3A 8B 51 B3 31 A7 51 B2 31 00 D5 27 50 |P$):.Q.1.Q.1..'P|
00001FC0: 0A 50 24 B2 50 24 AA C8 28 42 4C 24 2C 51 29 AA |.P$.P$..(BL$,Q).|
00001FD0: 5A 24 28 4E 29 00 DC 27 5A 0A 82 4E 00 EE 27 64 |Z$(N)..'Z..N..'d|
00001FE0: 0A 8B 50 24 B3 B1 22 22 A7 98 34 2C 50 24 00 03 |..P$..""..4,P$..|
00001FF0: 28 6E 0A 8D 32 36 38 30 3A 49 49 B2 30 3A 89 32 |(n..2680:II.0:.2|
00002000: 37 32 30 00 20 28 78 0A 81 4E B2 31 A4 C3 28 50 |720. (x..N.1..(P|
00002010: 24 29 3A 8B C3 28 50 24 29 B2 30 A7 32 37 31 30 |$):..(P$).0.2710|
00002020: 00 48 28 82 0A 51 B2 C6 28 CA 28 50 24 2C 4E 2C |.H(..Q..(.(P$,N,|
00002030: 4E 29 29 3A 8B 51 B3 B1 33 32 A7 98 34 2C 22 2D |N)):.Q..32..4,"-|
00002040: 22 3B 3A 89 32 37 31 30 00 54 28 8C 0A 98 34 2C |";:.2710.T(...4,|
00002050: 22 20 22 3B 00 60 28 96 0A 82 4E 3A 98 34 3A 8E |" ";.`(...N:.4:.|
00002060: 00 83 28 A0 0A 49 49 B2 49 49 AA 31 3A 8B 41 24 |..(..II.II.1:.A$|
00002070: 28 49 49 2C 49 41 AA 31 29 B3 B1 22 53 22 89 32 |(II,IA.1).."S".2|
00002080: 39 35 30 00 8F 28 AA 0A 49 B2 30 3A 4A B2 31 00 |950..(..I.0:J.1.|
00002090: 9D 28 B4 0A 49 B2 49 AA 31 3A 4B B2 30 00 B4 28 |.(..I.I.1:K.0..(|
000020A0: BE 0A 8B 49 B3 4D 28 31 2C 4A 29 A7 98 34 3A 89 |...I.M(1,J)..4:.|
000020B0: 32 37 34 30 00 C7 28 C8 0A 8B 49 B1 4D 28 31 2C |2740..(...I.M(1,|
000020C0: 4A 29 A7 32 39 35 30 00 DF 28 D2 0A 4B B2 4D 28 |J).2950..(..K.M(|
000020D0: 32 2C 4A 29 AB 4B 3A 8B 4B B3 31 A7 4B B2 31 00 |2,J).K:.K.1.K.1.|
000020E0: 11 29 DC 0A 4C B2 4D 28 33 2C 4A 29 3A 53 43 28 |.)..L.M(3,J):SC(|
000020F0: 30 2C 4C 29 B2 4D 28 32 2C 4A 29 3A 98 34 2C C8 |0,L).M(2,J):.4,.|
00002100: 28 42 4C 24 2C 4B 29 3B 41 24 28 49 49 2C 4C 29 |(BL$,K);A$(II,L)|
00002110: 3B 00 3B 29 F0 0A 8B 43 4E 28 4C 29 B3 B1 30 A7 |;.;)...CN(L)..0.|
00002120: 53 43 28 31 2C 4C 29 B2 53 43 28 31 2C 4C 29 AA |SC(1,L).SC(1,L).|
00002130: C5 28 41 24 28 49 49 2C 4C 29 29 00 67 29 FA 0A |.(A$(II,L)).g)..|
00002140: 4B B2 4D 28 32 2C 4A 29 AA C3 28 41 24 28 49 49 |K.M(2,J)..(A$(II|
00002150: 2C 4C 29 29 3A 4A B2 4A AA 31 3A 8B 4A B3 4A 4A |,L)):J.J.1:.J.JJ|
00002160: AA 31 A7 32 37 35 30 00 8A 29 0E 0B 98 34 3A 8B |.1.2750..)...4:.|
00002170: 41 24 28 49 49 2C 59 53 29 B2 41 24 28 49 49 AA |A$(II,YS).A$(II.|
00002180: 31 2C 59 53 29 A7 32 37 32 30 00 99 29 22 0B 8B |1,YS).2720..)"..|
00002190: 59 54 B2 30 A7 32 39 35 30 00 AB 29 2C 0B 4B B2 |YT.0.2950..),.K.|
000021A0: 30 3A 8D 32 36 38 30 3A 51 B2 31 00 C7 29 36 0B |0:.2680:Q.1..)6.|
000021B0: 81 4C B2 30 A4 49 41 3A 8B 53 43 28 31 2C 4C 29 |.L.0.IA:.SC(1,L)|
000021C0: B2 30 A7 32 39 33 30 00 F8 29 40 0B 53 43 28 32 |.0.2930..)@.SC(2|
000021D0: 2C 4C 29 B2 53 43 28 32 2C 4C 29 AA 53 43 28 31 |,L).SC(2,L).SC(1|
000021E0: 2C 4C 29 3A 4B B2 53 43 28 30 2C 4C 29 AB 4B 3A |,L):K.SC(0,L).K:|
000021F0: 8B 4B B3 31 A7 4B B2 31 00 35 2A 4A 0B 42 24 B2 |.K.1.K.1.5*J.B$.|
00002200: C4 28 AB 28 53 43 28 31 2C 4C 29 29 29 3A 4B 4B |.(.(SC(1,L))):KK|
00002210: B2 43 4E 28 4C 29 AB C3 28 42 24 29 3A 42 24 B2 |.CN(L)..(B$):B$.|
00002220: CA 28 42 24 2C 32 2C C3 28 42 24 29 29 3A 4B 4B |.(B$,2,.(B$)):KK|
00002230: B2 4B 4B AA 31 00 44 2A 54 0B 8B 4B 4B B3 30 A7 |.KK.1.D*T..KK.0.|
00002240: 4B 4B B2 30 00 5C 2A 5E 0B 42 24 B2 22 2D 22 AA |KK.0.\*^.B$."-".|
00002250: C8 28 42 4C 24 2C 4B 4B 29 AA 42 24 00 8E 2A 68 |.(BL$,KK).B$..*h|
00002260: 0B 98 34 2C C8 28 42 4C 24 2C 4B 29 3B 42 24 3B |..4,.(BL$,K);B$;|
00002270: 3A 53 43 28 31 2C 4C 29 B2 30 3A 4B B2 53 43 28 |:SC(1,L).0:K.SC(|
00002280: 30 2C 4C 29 AA C3 28 42 24 29 3A 51 B2 30 00 95 |0,L)..(B$):Q.0..|
00002290: 2A 72 0B 82 4C 00 A4 2A 7C 0B 8B 51 B2 30 A7 98 |*r..L..*|..Q.0..|
000022A0: 34 3A 98 34 00 B4 2A 86 0B 8B 49 49 B3 52 4E 89 |4:.4..*...II.RN.|
000022B0: 32 37 32 30 00 DA 2A 87 0B 8D 32 36 38 30 3A 4B |2720..*...2680:K|
000022C0: B2 30 3A 81 4C B2 30 A4 49 41 3A 8B 53 43 28 32 |.0:.L.0.IA:.SC(2|
000022D0: 2C 4C 29 B2 30 A7 32 39 35 37 00 F3 2A 88 0B 4B |,L).0.2957..*..K|
000022E0: B2 53 43 28 30 2C 4C 29 AB 4B 3A 8B 4B B3 31 A7 |.SC(0,L).K:.K.1.|
000022F0: 4B B2 31 00 30 2B 89 0B 42 24 B2 C4 28 AB 28 53 |K.1.0+..B$..(.(S|
00002300: 43 28 32 2C 4C 29 29 29 3A 4B 4B B2 43 4E 28 4C |C(2,L))):KK.CN(L|
00002310: 29 AB C3 28 42 24 29 3A 42 24 B2 CA 28 42 24 2C |)..(B$):B$..(B$,|
00002320: 32 2C C3 28 42 24 29 29 3A 4B 4B B2 4B 4B AA 31 |2,.(B$)):KK.KK.1|
00002330: 00 3F 2B 8A 0B 8B 4B 4B B3 30 A7 4B 4B B2 30 00 |.?+...KK.0.KK.0.|
00002340: 57 2B 8B 0B 42 24 B2 22 2D 22 AA C8 28 42 4C 24 |W+..B$."-"..(BL$|
00002350: 2C 4B 4B 29 AA 42 24 00 7B 2B 8C 0B 98 34 2C C8 |,KK).B$.{+...4,.|
00002360: 28 42 4C 24 2C 4B 29 3B 42 24 3B 3A 4B B2 53 43 |(BL$,K);B$;:K.SC|
00002370: 28 30 2C 4C 29 AA C3 28 42 24 29 00 82 2B 8D 0B |(0,L)..(B$)..+..|
00002380: 82 4C 00 92 2B 8E 0B 98 34 3A 8D 32 36 38 30 3A |.L..+...4:.2680:|
00002390: 98 34 00 9E 2B 90 0B A0 34 3A 89 36 32 30 00 AE |.4..+...4:.620..|
000023A0: 2B 9A 0B 99 C7 28 31 34 37 29 22 11 11 22 00 DA |+....(147)".."..|
000023B0: 2B A4 0B 99 22 20 42 45 53 43 48 49 4B 42 41 52 |+..." BESCHIKBAR|
000023C0: 45 20 47 45 48 45 55 47 45 4E 52 55 49 4D 54 45 |E GEHEUGENRUIMTE|
000023D0: 20 49 53 20 4E 4F 47 3A 11 22 00 F3 2B AE 0B 99 | IS NOG:."..+...|
000023E0: 22 20 45 56 45 4E 20 47 45 44 55 4C 44 2E 2E 2E |" EVEN GEDULD...|
000023F0: 2E 11 22 00 29 2C B8 0B 49 B2 B8 28 30 29 3A 99 |..".),..I..(0):.|
00002400: 22 20 20 20 20 22 3B 49 AB 28 49 B3 30 29 AC 36 |" ";I.(I.0).6|
00002410: 35 35 33 36 3B 22 20 43 48 41 52 41 43 54 45 52 |5536;" CHARACTER|
00002420: 53 11 11 22 3A 89 36 32 30 00 4F 2C C2 0B 99 20 |S..":.620.O,... |
00002430: C7 28 31 34 37 29 22 11 22 3A 99 22 20 4F 43 43 |.(147)".":." OCC|
00002440: 55 52 52 45 4E 43 49 45 53 20 2E 2E 2E 11 22 00 |URRENCIES ....".|
00002450: 73 2C CC 0B 81 49 B2 30 A4 49 41 3A 99 22 20 22 |s,...I.0.IA:." "|
00002460: 49 AA 31 22 20 3D 20 22 3B 43 24 28 49 29 3A 82 |I.1" = ";C$(I):.|
00002470: 49 3A 99 00 9F 2C D6 0B 99 22 20 4D 41 41 4B 20 |I:...,..." MAAK |
00002480: 4A 45 20 4B 45 55 5A 45 20 22 3B 3A 8D 20 31 37 |JE KEUZE ";:. 17|
00002490: 30 3A 59 B2 C5 28 42 24 29 3A 59 B2 59 AB 31 00 |0:Y..(B$):Y.Y.1.|
000024A0: AD 2C E0 0B 8B 59 B3 30 89 33 30 36 30 00 C0 2C |.,...Y.0.3060..,|
000024B0: EA 0B 8B 59 B3 28 49 41 AA 31 29 89 33 30 37 30 |...Y.(IA.1).3070|
000024C0: 00 F1 2C F4 0B 99 22 11 20 22 3B C7 28 31 38 29 |..,...". ";.(18)|
000024D0: 3B 22 46 4F 55 54 45 20 4B 45 55 5A 45 22 3A 81 |;"FOUTE KEUZE":.|
000024E0: 49 B2 31 A4 37 30 30 3A 82 49 3A 89 20 33 30 31 |I.1.700:.I:. 301|
000024F0: 30 00 0A 2D FE 0B 50 50 B2 33 3A 8B 50 44 B2 31 |0..-..PP.3:.PD.1|
00002500: A7 50 50 B2 34 3A 9F 34 2C 34 00 3D 2D 08 0C 98 |.PP.4:.4,4.=-...|
00002510: 50 50 3A 98 50 50 2C 22 20 22 3B 54 53 22 47 45 |PP:.PP," ";TS"GE|
00002520: 53 45 4C 45 43 54 45 45 52 44 45 20 22 4D 57 24 |SELECTEERDE "MW$|
00002530: 22 20 55 49 54 20 22 52 4E 3A 98 50 50 00 6C 2D |" UIT "RN:.PP.l-|
00002540: 12 0C 98 50 50 2C 22 20 4F 43 43 55 52 52 45 4E |...PP," OCCURREN|
00002550: 43 49 45 53 20 56 4F 4F 52 20 22 43 24 28 59 29 |CIES VOOR "C$(Y)|
00002560: 22 20 5A 49 4A 4E 3A 22 3A 98 50 50 00 A6 2D 1C |" ZIJN:":.PP..-.|
00002570: 0C 4B B2 30 3A 81 49 B2 31 A4 31 30 30 3A 42 28 |.K.0:.I.1.100:B(|
00002580: 49 29 B2 30 3A 5A 24 28 49 29 B2 22 22 3A 82 49 |I).0:Z$(I)."":.I|
00002590: 3A 42 28 31 30 31 29 B2 30 3A 42 28 31 30 32 29 |:B(101).0:B(102)|
000025A0: B2 30 3A 49 B2 30 00 C6 2D 26 0C 49 B2 49 AA 31 |.0:I.0..-&.I.I.1|
000025B0: 3A 8B 41 24 28 49 2C 49 41 AA 31 29 B3 B1 22 53 |:.A$(I,IA.1).."S|
000025C0: 22 89 33 31 37 30 00 CE 2D 30 0C 4A B2 30 00 D8 |".3170..-0.J.0..|
000025D0: 2D 3A 0C 4A B2 4A AA 31 00 FD 2D 44 0C 8B 5A 24 |-:.J.J.1..-D..Z$|
000025E0: 28 4A 29 B2 41 24 28 49 2C 59 29 A7 42 28 4A 29 |(J).A$(I,Y).B(J)|
000025F0: B2 42 28 4A 29 AA 31 3A 89 33 31 37 30 00 0B 2E |.B(J).1:.3170...|
00002600: 4E 0C 8B 4A B3 4B 89 33 31 33 30 00 2A 2E 58 0C |N..J.K.3130.*.X.|
00002610: 4B B2 4B AA 31 3A 42 28 4B 29 B2 31 3A 5A 24 28 |K.K.1:B(K).1:Z$(|
00002620: 4B 29 B2 41 24 28 49 2C 59 29 00 39 2E 62 0C 8B |K).A$(I,Y).9.b..|
00002630: 49 B3 52 4E 89 33 31 31 30 00 41 2E 6C 0C 49 B2 |I.RN.3110.A.l.I.|
00002640: 30 00 4B 2E 76 0C 49 B2 49 AA 31 00 69 2E 80 0C |0.K.v.I.I.1.i...|
00002650: 50 24 B2 C4 28 42 28 49 29 29 AA 42 4C 24 3A 50 |P$..(B(I)).BL$:P|
00002660: 24 B2 C8 28 50 24 2C 38 29 00 93 2E 8A 0C 98 50 |$..(P$,8)......P|
00002670: 50 2C 22 20 22 3B 50 24 3B 22 20 4B 45 45 52 20 |P," ";P$;" KEER |
00002680: 22 3B 5A 24 28 49 29 3A 8B 50 50 B3 B1 33 89 33 |";Z$(I):.PP..3.3|
00002690: 32 33 30 00 C7 2E 94 0C 8B 49 B2 32 30 B0 49 B2 |230......I.20.I.|
000026A0: 34 30 B0 49 B2 36 30 B0 49 B2 38 30 A7 3A 99 3A |40.I.60.I.80.:.:|
000026B0: 99 22 20 44 52 55 4B 20 4F 50 20 52 45 54 55 52 |." DRUK OP RETUR|
000026C0: 4E 22 3A 8D 31 37 30 00 D5 2E 9E 0C 8B 49 B3 4B |N":.170......I.K|
000026D0: 89 33 31 39 30 00 E2 2E A8 0C 8B 50 50 B2 34 A7 |.3190......PP.4.|
000026E0: A0 34 00 EB 2E B2 0C 89 36 32 30 00 10 2F BC 0C |.4......620../..|
000026F0: 99 C7 28 31 34 37 29 22 11 11 20 22 4F 57 24 22 |..(147)".. "OW$"|
00002700: 20 57 49 4A 5A 49 47 45 4E 11 11 22 3A 49 B2 30 | WIJZIGEN..":I.0|
00002710: 00 1A 2F C6 0C 49 B2 49 AA 31 00 34 2F D0 0C 8B |../..I.I.1.4/...|
00002720: 41 24 28 49 2C 49 41 AA 31 29 B3 B1 22 53 22 89 |A$(I,IA.1).."S".|
00002730: 33 34 31 30 00 3A 2F DA 0C 99 00 66 2F E4 0C 81 |3410.:/....f/...|
00002740: 4A B2 30 A4 49 41 3A 99 4A AA 31 22 9D 3D 20 22 |J.0.IA:.J.1".= "|
00002750: 3B 43 24 28 4A 29 3B A3 31 35 29 3B 41 24 28 49 |;C$(J);.15);A$(I|
00002760: 2C 4A 29 3A 82 4A 00 81 2F EE 0C 99 22 11 20 58 |,J):.J../...". X|
00002770: 3D 20 4E 49 45 54 53 20 57 59 5A 49 47 45 4E 11 |= NIETS WYZIGEN.|
00002780: 22 00 B3 2F F8 0C 99 22 20 52 55 42 52 49 45 4B |"../..." RUBRIEK|
00002790: 4E 52 2E 20 54 45 20 57 49 4A 5A 49 47 45 4E 22 |NR. TE WIJZIGEN"|
000027A0: 3B 3A 8D 31 37 30 3A 8B 42 24 B2 22 58 22 89 33 |;:.170:.B$."X".3|
000027B0: 34 31 30 00 CB 2F 02 0D 59 B2 C5 28 42 24 29 AB |410../..Y..(B$).|
000027C0: 31 3A 8B 59 B3 30 A7 33 34 33 30 00 DA 2F 0C 0D |1:.Y.0.3430../..|
000027D0: 8B 59 B1 49 41 89 33 34 33 30 00 00 30 16 0D 99 |.Y.IA.3430..0...|
000027E0: 22 20 20 22 3B 41 24 28 49 2C 59 29 3A 43 4D B2 |" ";A$(I,Y):CM.|
000027F0: 30 3A 8B 43 4E 28 59 29 B3 B1 30 A7 43 4D B2 31 |0:.CN(Y)..0.CM.1|
00002800: 00 3B 30 20 0D 99 22 20 20 2A 2A 2A 2A 2A 2A 2A |.;0 .." *******|
00002810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002820: 2A 22 3A 8D 20 31 37 30 3A 43 4D B2 30 3A 8B 42 |*":. 170:CM.0:.B|
00002830: 24 B2 22 22 A7 42 24 B2 22 20 22 00 4D 30 2A 0D |$."".B$." ".M0*.|
00002840: 8B 43 4E 28 59 29 B2 30 A7 33 34 30 30 00 8A 30 |.CN(Y).0.3400..0|
00002850: 34 0D 4A B2 43 4E 28 59 29 AB C3 28 42 24 29 3A |4.J.CN(Y)..(B$):|
00002860: 8B 4A B3 30 A7 99 22 11 20 52 55 42 52 49 45 4B |.J.0..". RUBRIEK|
00002870: 20 49 53 20 4D 41 58 22 43 4E 28 59 29 22 50 4F | IS MAX"CN(Y)"PO|
00002880: 53 2E 11 22 3A 89 33 33 35 30 00 B1 30 3E 0D 41 |S..":.3350..0>.A|
00002890: 24 28 49 2C 59 29 B2 22 2D 22 AA C8 28 42 4C 24 |$(I,Y)."-"..(BL$|
000028A0: 2C 4A 29 AA 42 24 3A 53 41 B2 30 3A 89 33 32 39 |,J).B$:SA.0:.329|
000028B0: 30 00 CB 30 48 0D 41 24 28 49 2C 59 29 B2 42 24 |0..0H.A$(I,Y).B$|
000028C0: 3A 53 41 B2 30 3A 89 33 32 39 30 00 DA 30 52 0D |:SA.0:.3290..0R.|
000028D0: 8B 49 B3 52 4E 89 33 32 37 30 00 E3 30 5C 0D 89 |.I.RN.3270..0\..|
000028E0: 36 32 30 00 13 31 66 0D 99 22 11 20 22 3B C7 28 |620..1f..". ";.(|
000028F0: 31 38 29 3B 22 46 4F 55 54 45 20 4B 45 55 5A 45 |18);"FOUTE KEUZE|
00002900: 22 3A 81 50 B2 31 A4 37 30 30 3A 82 50 3A 89 33 |":.P.1.700:.P:.3|
00002910: 32 39 30 00 36 31 70 0D 99 C7 28 31 34 37 29 3A |290.61p...(147):|
00002920: 99 20 22 20 46 49 4C 45 20 53 43 48 52 49 4A 56 |. " FILE SCHRIJV|
00002930: 45 4E 11 11 11 22 00 5D 31 7A 0D 99 22 20 4E 41 |EN...".]1z.." NA|
00002940: 41 52 20 44 49 53 4B 20 4F 46 20 54 41 50 45 20 |AR DISK OF TAPE |
00002950: 28 44 2F 54 29 20 22 3B 3A 8D 31 37 30 00 74 31 |(D/T) ";:.170.t1|
00002960: 84 0D 8B 42 24 B2 22 44 22 A7 44 54 B2 38 3A 89 |...B$."D".DT.8:.|
00002970: 33 34 39 30 00 8B 31 8E 0D 8B 42 24 B2 22 54 22 |3490..1...B$."T"|
00002980: A7 44 54 B2 31 3A 89 33 34 39 30 00 A6 31 98 0D |.DT.1:.3490..1..|
00002990: 99 22 11 20 46 4F 55 54 45 20 4B 45 55 5A 45 22 |.". FOUTE KEUZE"|
000029A0: 3A 89 33 34 35 30 00 BF 31 A2 0D 99 22 11 20 4E |:.3450..1...". N|
000029B0: 41 41 4D 20 46 49 4C 45 22 3B 3A 8D 31 37 30 00 |AAM FILE";:.170.|
000029C0: D9 31 AC 0D 8B 44 54 B2 31 A7 9F 31 2C 31 2C 31 |.1...DT.1..1,1,1|
000029D0: 2C 42 24 3A 89 33 35 38 30 00 0D 32 B6 0D 9F 31 |,B$:.3580..2...1|
000029E0: 35 2C 38 2C 31 35 3A 9F 31 2C 38 2C 32 2C 22 30 |5,8,15:.1,8,2,"0|
000029F0: 3A 22 AA 42 24 AA 22 2C 53 2C 57 22 3A 84 31 35 |:".B$.",S,W":.15|
00002A00: 2C 45 4E 2C 45 52 24 2C 45 54 2C 45 53 00 1E 32 |,EN,ER$,ET,ES..2|
00002A10: C0 0D 8B 45 4E B3 B1 36 33 89 33 35 37 30 00 5A |...EN..63.3570.Z|
00002A20: 32 CA 0D 99 3A 99 22 20 46 49 4C 45 20 22 42 24 |2...:." FILE "B$|
00002A30: 22 20 42 45 53 54 41 41 54 20 41 4C 22 3A 99 22 |" BESTAAT AL":."|
00002A40: 11 20 4F 56 45 52 53 43 48 52 49 4A 56 45 4E 20 |. OVERSCHRIJVEN |
00002A50: 28 4A 2F 4E 29 20 3F 20 22 3B 00 76 32 D4 0D 4E |(J/N) ? ";.v2..N|
00002A60: 24 B2 42 24 3A 8D 31 37 30 3A 8B 42 24 B3 B1 22 |$.B$:.170:.B$.."|
00002A70: 4A 22 89 36 32 30 00 A4 32 DE 0D 99 22 11 20 46 |J".620..2...". F|
00002A80: 49 4C 45 20 22 4E 24 22 20 57 4F 52 44 54 20 44 |ILE "N$" WORDT D|
00002A90: 55 53 20 4F 56 45 52 53 43 48 52 45 56 45 4E 2E |US OVERSCHREVEN.|
00002AA0: 2E 2E 2E 22 00 C9 32 E8 0D A0 31 3A 9F 20 31 2C |..."..2...1:. 1,|
00002AB0: 38 2C 32 2C 22 40 30 3A 22 AA 4E 24 AA 22 2C 53 |8,2,"@0:".N$.",S|
00002AC0: 2C 57 22 3A 89 33 35 38 30 00 D9 32 F2 0D 8B 45 |,W":.3580..2...E|
00002AD0: 4E B3 B1 30 89 33 36 38 30 00 F0 32 FC 0D 52 24 |N..0.3680..2..R$|
00002AE0: B2 C7 28 31 33 29 3A 98 31 2C 52 4E 3B 52 24 3B |..(13):.1,RN;R$;|
00002AF0: 00 0C 33 06 0E 98 31 2C 4F 57 24 3B 52 24 3B 4D |..3...1,OW$;R$;M|
00002B00: 57 24 3B 52 24 3B 49 41 3B 52 24 3B 00 15 33 10 |W$;R$;IA;R$;..3.|
00002B10: 0E 49 B2 AB 31 00 1F 33 1A 0E 49 B2 49 AA 31 00 |.I..1..3..I.I.1.|
00002B20: 37 33 24 0E 98 31 2C 43 24 28 49 29 52 24 3B 43 |73$..1,C$(I)R$;C|
00002B30: 4E 28 49 29 52 24 3B 00 46 33 2E 0E 8B 49 B3 49 |N(I)R$;.F3...I.I|
00002B40: 41 89 33 36 31 30 00 6D 33 38 0E 99 22 11 20 53 |A.3610.m38..". S|
00002B50: 43 48 52 49 4A 56 45 4E 20 22 3B 52 4E 3B 22 20 |CHRIJVEN ";RN;" |
00002B60: 22 4D 57 24 3B 3A 81 54 B2 31 A4 52 4E 00 A2 33 |"MW$;:.T.1.RN..3|
00002B70: 42 0E 99 A3 33 35 29 54 22 91 22 3A 81 49 B2 30 |B...35)T".":.I.0|
00002B80: A4 49 41 3A 98 31 2C 41 24 28 54 2C 49 29 52 24 |.IA:.1,A$(T,I)R$|
00002B90: 3B 3A 82 49 3A 98 31 2C 22 58 22 3B 52 24 3B 3A |;:.I:.1,"X";R$;:|
00002BA0: 82 54 00 BB 33 4C 0E A0 31 3A A0 31 35 3A 99 3A |.T..3L..1:.15:.:|
00002BB0: 99 3A 53 41 B2 31 3A 89 36 32 30 00 D8 33 56 0E |.:SA.1:.620..3V.|
00002BC0: 84 31 35 2C 45 4E 2C 45 52 24 2C 45 54 2C 45 53 |.15,EN,ER$,ET,ES|
00002BD0: 3A 8B 45 4E B2 30 A7 8E 00 0A 34 60 0E 99 22 20 |:.EN.0....4`.." |
00002BE0: 22 3B C7 28 31 38 29 3B 45 52 24 3A 99 3A 99 22 |";.(18);ER$:.:."|
00002BF0: 20 49 4E 20 54 52 41 43 4B 22 45 54 22 20 45 4E | IN TRACK"ET" EN|
00002C00: 20 53 45 43 54 4F 52 22 45 53 00 1A 34 6A 0E A0 | SECTOR"ES..4j..|
00002C10: 31 3A A0 31 35 3A 89 31 30 30 00 38 34 74 0E 99 |1:.15:.100.84t..|
00002C20: C7 28 31 34 37 29 3A 99 22 20 46 49 4C 45 20 4C |.(147):." FILE L|
00002C30: 45 5A 45 4E 11 11 11 22 00 5E 34 7E 0E 99 22 20 |EZEN...".^4~.." |
00002C40: 56 41 4E 20 44 49 53 4B 20 4F 46 20 54 41 50 45 |VAN DISK OF TAPE|
00002C50: 20 28 44 2F 54 29 20 22 3B 3A 8D 31 37 30 00 75 | (D/T) ";:.170.u|
00002C60: 34 88 0E 8B 42 24 B2 22 44 22 A7 44 54 B2 38 3A |4...B$."D".DT.8:|
00002C70: 89 33 37 35 30 00 8C 34 92 0E 8B 42 24 B2 22 54 |.3750..4...B$."T|
00002C80: 22 A7 44 54 B2 31 3A 89 33 37 35 30 00 A8 34 9C |".DT.1:.3750..4.|
00002C90: 0E 99 22 11 20 46 4F 55 54 45 20 4B 45 55 5A 45 |..". FOUTE KEUZE|
00002CA0: 22 3A 89 20 33 37 31 30 00 AE 34 A6 0E 99 00 C6 |":. 3710..4.....|
00002CB0: 34 B0 0E 99 22 20 4E 41 41 4D 20 46 49 4C 45 22 |4..." NAAM FILE"|
00002CC0: 3B 3A 8D 31 37 30 00 E0 34 BA 0E 8B 44 54 B2 31 |;:.170..4...DT.1|
00002CD0: A7 9F 31 2C 31 2C 30 2C 42 24 3A 89 33 37 39 30 |..1,1,0,B$:.3790|
00002CE0: 00 02 35 C4 0E 9F 31 35 2C 38 2C 31 35 3A 9F 31 |..5...15,8,15:.1|
00002CF0: 2C 38 2C 32 2C 22 30 3A 22 AA 42 24 AA 22 2C 53 |,8,2,"0:".B$.",S|
00002D00: 2C 52 00 0C 35 CE 0E 84 31 2C 52 4E 00 1C 35 D8 |,R..5...1,RN..5.|
00002D10: 0E 8B 44 54 B2 38 A7 8D 33 36 37 30 00 3A 35 E2 |..DT.8..3670.:5.|
00002D20: 0E 84 31 2C 4F 57 24 2C 4D 57 24 2C 49 41 3A 8B |..1,OW$,MW$,IA:.|
00002D30: 44 54 B2 38 A7 8D 33 36 37 30 00 6E 35 EC 0E 59 |DT.8..3670.n5..Y|
00002D40: B2 49 41 AA 31 3A 86 41 24 28 31 30 30 2C 59 29 |.IA.1:.A$(100,Y)|
00002D50: 2C 43 24 28 49 41 29 2C 4D 28 33 2C 59 29 2C 53 |,C$(IA),M(3,Y),S|
00002D60: 43 28 32 2C 49 41 29 2C 43 4E 28 49 41 29 00 8F |C(2,IA),CN(IA)..|
00002D70: 35 F6 0E 99 22 11 20 4C 45 5A 45 4E 20 22 52 4E |5...". LEZEN "RN|
00002D80: 22 20 22 4D 57 24 3B 3A 81 49 B2 30 A4 49 41 00 |" "MW$;:.I.0.IA.|
00002D90: A2 35 00 0F 84 31 2C 43 24 28 49 29 2C 43 4E 28 |.5...1,C$(I),CN(|
00002DA0: 49 29 00 B1 35 0A 0F 82 49 3A 81 54 B2 31 A4 52 |I)..5...I:.T.1.R|
00002DB0: 4E 00 DB 35 14 0F 99 A3 33 35 29 54 22 91 22 3A |N..5....35)T".":|
00002DC0: 81 49 B2 30 A4 49 41 3A 84 31 2C 41 24 28 54 2C |.I.0.IA:.1,A$(T,|
00002DD0: 49 29 3A 82 49 3A 84 31 2C 42 24 00 FE 35 19 0F |I):.I:.1,B$..5..|
00002DE0: 8B 42 24 B3 B1 22 58 22 A7 99 22 11 11 44 49 53 |.B$.."X".."..DIS|
00002DF0: 4B 2D 44 41 54 41 20 46 4F 55 54 22 3A 90 00 05 |K-DATA FOUT":...|
00002E00: 36 1B 0F 82 54 00 1E 36 1E 0F A0 31 3A A0 31 35 |6...T..6...1:.15|
00002E10: 3A 99 3A 99 3A 54 53 B2 30 3A 89 36 32 30 00 45 |:.:.:TS.0:.620.E|
00002E20: 36 28 0F 99 C7 28 31 34 37 29 22 11 20 44 49 53 |6(...(147)". DIS|
00002E30: 4B 20 46 49 4C 45 20 56 45 52 57 49 4A 44 45 52 |K FILE VERWIJDER|
00002E40: 45 4E 11 11 22 00 72 36 32 0F 99 22 20 4E 41 41 |EN..".r62.." NAA|
00002E50: 4D 20 56 41 4E 20 44 45 20 46 49 4C 45 20 22 3B |M VAN DE FILE ";|
00002E60: 3A 8D 20 31 37 30 3A 8B 42 24 B2 22 22 A7 33 39 |:. 170:.B$."".39|
00002E70: 32 30 00 9E 36 3C 0F 9F 31 35 2C 38 2C 31 35 3A |20..6<..15,8,15:|
00002E80: 98 31 35 2C 22 53 3A 22 AA 42 24 22 22 3A 84 31 |.15,"S:".B$"":.1|
00002E90: 35 2C 45 4E 2C 45 52 24 2C 45 54 2C 45 53 00 C4 |5,EN,ER$,ET,ES..|
00002EA0: 36 46 0F 99 3A 99 22 20 22 3B 45 54 3B 22 20 46 |6F..:." ";ET;" F|
00002EB0: 49 4C 45 53 20 56 45 52 57 49 4A 44 45 52 44 22 |ILES VERWIJDERD"|
00002EC0: 3A A0 31 35 00 F5 36 50 0F 99 22 11 20 56 41 4C |:.15..6P..". VAL|
00002ED0: 49 44 41 54 45 20 44 49 53 4B 20 28 4A 2F 4E 29 |IDATE DISK (J/N)|
00002EE0: 20 22 3B 3A 8D 31 37 30 3A 8B 42 24 B3 B1 22 4A | ";:.170:.B$.."J|
00002EF0: 22 A7 36 32 30 00 27 37 5A 0F 9F 31 35 2C 38 2C |".620.'7Z..15,8,|
00002F00: 31 35 3A 99 22 11 20 56 41 4C 49 44 41 54 49 4E |15:.". VALIDATIN|
00002F10: 47 2E 2E 2E 22 3A 98 31 35 2C 22 56 22 3A 8D 33 |G...":.15,"V":.3|
00002F20: 36 37 30 3A A0 31 35 00 31 37 64 0F 89 20 36 32 |670:.15.17d.. 62|
00002F30: 30 00 59 37 6E 0F 99 C7 28 31 34 37 29 22 11 11 |0.Y7n...(147)"..|
00002F40: 11 20 42 45 52 45 4B 45 4E 45 4E 20 54 4F 54 41 |. BEREKENEN TOTA|
00002F50: 4C 45 4E 2F 47 45 4D 2E 22 00 88 37 78 0F 99 22 |LEN/GEM."..7x.."|
00002F60: 11 20 45 56 45 4E 20 47 45 44 55 4C 44 20 2E 2E |. EVEN GEDULD ..|
00002F70: 2E 2E 22 3A 50 50 B2 33 3A 8B 50 44 B2 31 A7 50 |..":PP.3:.PD.1.P|
00002F80: 50 B2 34 3A 9F 34 2C 34 00 AB 37 82 0F 81 49 B2 |P.4:.4,4..7...I.|
00002F90: 31 A4 32 3A 81 4A B2 30 A4 49 41 3A 53 43 28 49 |1.2:.J.0.IA:SC(I|
00002FA0: 2C 4A 29 B2 30 3A 82 4A 3A 82 49 00 D5 37 8C 0F |,J).0:.J:.I..7..|
00002FB0: 81 49 B2 30 A4 49 41 3A 81 4A B2 31 A4 52 4E 3A |.I.0.IA:.J.1.RN:|
00002FC0: 8B 41 24 28 4A 2C 49 41 AA 31 29 B3 B1 22 53 22 |.A$(J,IA.1).."S"|
00002FD0: A7 34 30 31 30 00 E7 37 96 0F 8B 43 4E 28 49 29 |.4010..7...CN(I)|
00002FE0: B2 30 A7 34 30 31 30 00 0A 38 A0 0F 58 B2 C5 28 |.0.4010..8..X..(|
00002FF0: 41 24 28 4A 2C 49 29 29 3A 53 43 28 31 2C 49 29 |A$(J,I)):SC(1,I)|
00003000: B2 53 43 28 31 2C 49 29 AA 58 00 14 38 AA 0F 82 |.SC(1,I).X..8...|
00003010: 4A 3A 82 49 00 23 38 B4 0F 8B 54 53 B3 31 89 34 |J:.I.#8...TS.1.4|
00003020: 30 34 30 00 48 38 BE 0F 81 49 B2 30 A4 49 41 3A |040.H8...I.0.IA:|
00003030: 53 43 28 32 2C 49 29 B2 B5 28 53 43 28 31 2C 49 |SC(2,I)..(SC(1,I|
00003040: 29 AD 54 53 29 3A 82 49 00 54 38 C8 0F 98 50 50 |).TS):.I.T8...PP|
00003050: 3A 98 50 50 00 83 38 D2 0F 98 50 50 2C 22 20 22 |:.PP..8...PP," "|
00003060: 3B 54 53 22 47 45 53 45 4C 45 43 54 45 45 52 44 |;TS"GESELECTEERD|
00003070: 45 20 22 4D 57 24 22 20 55 49 54 20 22 52 4E 3A |E "MW$" UIT "RN:|
00003080: 98 50 50 00 B1 38 DC 0F 98 50 50 2C 22 20 2A 2A |.PP..8...PP," **|
00003090: 2A 2A 2A 2A 2A 2A 2A 2A 20 20 54 4F 54 41 41 4C |******** TOTAAL|
000030A0: 20 20 20 20 20 20 47 45 4D 49 44 44 45 4C 44 45 | GEMIDDELDE|
000030B0: 22 00 E3 38 E6 0F 98 50 50 2C 22 20 2D 2D 2D 2D |"..8...PP," ----|
000030C0: 2D 2D 2D 2D 2D 2D 20 20 2D 2D 2D 2D 2D 2D 20 20 |------ ------ |
000030D0: 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A | ----------":|
000030E0: 98 50 50 00 FD 38 F0 0F 81 49 B2 30 A4 49 41 3A |.PP..8...I.0.IA:|
000030F0: 8B 43 4E 28 49 29 B2 30 A7 34 31 31 30 00 33 39 |.CN(I).0.4110.39|
00003100: FA 0F 50 24 B2 22 20 22 AA 43 24 28 49 29 AA 42 |..P$." ".C$(I).B|
00003110: 4C 24 3A 50 24 B2 C8 28 50 24 2C 31 33 29 3A 50 |L$:P$..(P$,13):P|
00003120: 24 B2 50 24 AA C4 28 53 43 28 31 2C 49 29 29 AA |$.P$..(SC(1,I)).|
00003130: 42 4C 24 00 5B 39 04 10 50 24 B2 C8 28 50 24 2C |BL$.[9..P$..(P$,|
00003140: 32 35 29 3A 50 24 B2 50 24 AA C4 28 53 43 28 32 |25):P$.P$..(SC(2|
00003150: 2C 49 29 29 3A 98 50 50 2C 50 24 00 62 39 0E 10 |,I)):.PP,P$.b9..|
00003160: 82 49 00 73 39 18 10 98 50 50 3A 8B 50 44 B2 31 |.I.s9...PP:.PD.1|
00003170: A7 A0 34 00 7C 39 22 10 89 36 32 30 00 A1 39 2C |..4.|9"..620..9,|
00003180: 10 99 22 93 11 11 20 20 41 46 44 52 55 4B 20 56 |.."... AFDRUK V|
00003190: 4F 4F 52 3A 20 20 4F 43 43 55 52 52 45 4E 43 59 |OOR: OCCURRENCY|
000031A0: 22 00 C2 39 36 10 99 22 20 20 20 20 20 20 20 20 |"..96.." |
000031B0: 20 20 20 20 20 20 20 20 44 49 52 45 43 54 4F 52 | DIRECTOR|
000031C0: 59 22 00 E6 39 40 10 99 22 20 20 20 20 20 20 20 |Y"..9@.." |
000031D0: 20 20 20 20 20 20 20 20 20 54 4F 54 41 4C 45 4E | TOTALEN|
000031E0: 2F 47 45 4D 2E 22 00 14 3A 4A 10 99 22 11 20 31 |/GEM."..:J..". 1|
000031F0: 20 3D 20 4E 41 41 52 20 50 52 49 4E 54 45 52 20 | = NAAR PRINTER |
00003200: 20 20 20 20 20 20 20 20 20 20 53 54 41 54 55 53 | STATUS|
00003210: 20 49 53 22 00 3C 3A 54 10 99 22 20 32 20 3D 20 | IS".<:T.." 2 = |
00003220: 4E 41 41 52 20 53 43 48 45 52 4D 20 20 20 20 20 |NAAR SCHERM |
00003230: 20 20 20 20 20 20 20 22 3B 50 44 24 00 63 3A 5E | ";PD$.c:^|
00003240: 10 99 22 11 20 4D 41 41 4B 20 55 57 20 4B 45 55 |..". MAAK UW KEU|
00003250: 5A 45 20 22 3B 3A 8D 31 37 30 3A 50 44 B2 C5 28 |ZE ";:.170:PD..(|
00003260: 42 24 29 00 83 3A 68 10 8B 50 44 B2 31 A7 50 44 |B$)..:h..PD.1.PD|
00003270: 24 B2 22 12 50 52 92 2F 44 49 53 20 22 3A 89 20 |$.".PR./DIS ":. |
00003280: 36 32 30 00 A3 3A 72 10 8B 50 44 B2 32 A7 50 44 |620..:r..PD.2.PD|
00003290: 24 B2 22 50 52 2F 12 44 49 53 92 20 22 3A 89 20 |$."PR/.DIS. ":. |
000032A0: 36 32 30 00 AE 3A 7C 10 89 20 34 31 39 30 00 C1 |620..:|.. 4190..|
000032B0: 3A 86 10 8F 20 2A 2A 2A 20 45 58 49 54 20 2A 2A |:... *** EXIT **|
000032C0: 2A 00 E5 3A 90 10 99 20 C7 28 31 34 37 29 22 11 |*..:... .(147)".|
000032D0: 11 11 20 45 49 4E 44 45 20 50 52 4F 47 52 41 4D |.. EINDE PROGRAM|
000032E0: 4D 41 11 11 22 00 F4 3A 9A 10 8B 53 41 B2 31 A7 |MA.."..:...SA.1.|
000032F0: 34 33 31 30 00 03 3B A4 10 8B 52 4E B2 30 A7 34 |4310..;...RN.0.4|
00003300: 33 31 30 00 2C 3B AE 10 99 22 11 20 4E 4F 47 20 |310.,;...". NOG |
00003310: 22 3B 52 4E 3B 22 20 22 3B 4D 57 24 3B 22 20 4E |";RN;" ";MW$;" N|
00003320: 49 45 54 20 47 45 53 41 56 45 44 22 00 4F 3B B8 |IET GESAVED".O;.|
00003330: 10 99 22 11 20 54 4F 43 48 20 45 49 4E 44 45 20 |..". TOCH EINDE |
00003340: 3F 20 28 4A 2F 4E 29 20 22 3B 3A 8D 31 37 30 00 |? (J/N) ";:.170.|
00003350: 60 3B C2 10 8B 42 24 B2 22 4A 22 A7 34 33 31 30 |`;...B$."J".4310|
00003360: 00 69 3B CC 10 89 36 32 30 00 A5 3B D6 10 99 C7 |.i;...620..;....|
00003370: 28 31 34 37 29 3B 22 11 11 11 11 1D 1D 50 52 45 |(147);"......PRE|
00003380: 54 54 49 47 20 4D 45 54 20 55 20 54 45 20 48 45 |TTIG MET U TE HE|
00003390: 42 42 45 4E 20 53 41 4D 45 4E 47 45 57 45 52 4B |BBEN SAMENGEWERK|
000033A0: 54 11 11 11 22 00 D5 3B E0 10 99 22 20 20 20 20 |T..."..;..." |
000033B0: 45 4E 20 44 45 20 47 52 4F 45 54 4A 45 53 20 56 |EN DE GROETJES V|
000033C0: 41 4E 20 4C 45 50 50 45 50 2D 53 4F 46 54 11 11 |AN LEPPEP-SOFT..|
000033D0: 11 11 22 3A 80 00 09 3C EA 10 99 22 93 11 11 11 |..":...<..."....|
000033E0: 20 20 4C 45 45 53 20 44 45 20 47 45 42 52 55 49 | LEES DE GEBRUI|
000033F0: 4B 45 52 53 2D 48 41 4E 44 4C 45 49 44 49 4E 47 |KERS-HANDLEIDING|
00003400: 11 11 11 22 3A 89 36 32 30 00 55 3C F4 10 83 31 |...":.620.U<...1|
00003410: 36 35 2C 32 35 35 2C 31 35 37 2C 30 2C 32 31 36 |65,255,157,0,216|
00003420: 2C 31 35 37 2C 30 2C 32 31 37 2C 31 35 37 2C 30 |,157,0,217,157,0|
00003430: 2C 32 31 38 2C 31 35 37 2C 30 2C 32 31 39 2C 32 |,218,157,0,219,2|
00003440: 33 32 2C 32 30 38 2C 32 33 39 2C 32 33 30 2C 32 |32,208,239,230,2|
00003450: 35 35 2C 39 36 00 00 00 |55,96... |
.......B(102),Z$(132).G...LC.14:FC.6:BL$
."
".....BL$.BL$."
".U.(..I.0.19:.A:
.49152.I,A:.I...2.W1.9:PD.2:PD$."PR/.DIS
. ":SA.0:.3,3:.G(147)"..".+.<.." COPYWRI
TE BY LEPPEP-SOFT.".E.F.." TEL. O2290-31
841.".U.P.." OPMERKINGEN, KLACHTEN, SUGG
ESTIES, ETC."...Z.." GAARNE AAN BOVENSTA
AND TEL.NR"...D..". DRUK OP RETURN....";
:.170...N..".... 1 = FILE LEZEN.":." D
= FILE DEFINIEREN."...X.." C = DIRECTO
RY..".9....".. MAAK UW KEUZE";:.170:.B$
."1".3700.I....B$."D".460.Z....B$."C".12
00.~. ..".. ";G(18)"FOUTE KEUZE":.100..
....PX.1.100:.PX:B$."":XP.0......B$:.B$.
."".180......": ..";.O.H..X$:.X$."".200.
..R..X$.".".200......X$.".".200......X$.
".".200......W1.9.260.'....X$.G(95)..:CM
.0:.620.C....X$.G(20).X$.G(157).360.S...
.X$.".".380.C....X$.".".400.S."..X$.".".
430...,..X$.G(13).." ":....6..CM.0.350..
.;..XP.1.330...@..F(X$).46.XP.1:.350.W.J
..F(X$).47.F(X$).58.350...T..200...^.B$.
B$.X$:.X$;"..";:.200...H.PX.C(B$):PX.PX.
1:.PX.0.200.<.R.." .. ...";:B$.H(B$,PX):
.200.T.|.BC.BC.1:.BC.15.BC.0.G....53280,
BC:.200....FC.FC.1:.FC.15.FC.0......LC.
FC.400......53281,FC:.200.....LC.LC.1:.L
C.15.LC.0.H....LC.FC.430...B..255,LC:.49
152:.646,LC:.200...L..G(147):RN.0:TS.0:I
A.0.,.V.." FILE DEFINITIE..":. .26)"****
***".L...." ONDERWERP IN ENKELVOUD ";:.1
70:OW$.B$:..26)"***********"......" ONDE
RWERP IN MEERVOUD ";:.170:MW$.B$.I...."
AANTAL RUBRIEKEN(MAX 15)";:. 170:Y.E(B$
).V....Y.1.500......Y.15.500.)...IA.Y.1:
..26)"**********":I.0:.A$(100,Y),C$(Y.1)
,M(3,Y),SC(2,Y.1).6....CN(Y.1).@.&.I.I.1
.S.0.." OMSCHRYVING RUBRIEK "I;:.170:J.I
.1:C$(J).B$...:.." "C$(J)" NUMERIEK J/N"
;:.170:.B$.."J".CN(J).0:.600...D.." HOEV
EEL POSITIES VOOR "C$(J);:.170:CN(J).E(B
$)...N..CN(J).0..". FOUTE WAARDE":.580..
.X..I.Y.550...B..620.C.L.W1.0:.". DRUK O
P RETURN ...";:.170.N.V.. G(147):. " AAN
TAL "MW$" IS ";.25);RN......" GESELECTEE
RD";.25);TS......" ---------------------
------":.:.770.B....G(147)......" 2 = "M
W$" SAVEN".25)"A = MEMORY."......" 3 = "
OW$" TOEVOEGEN".25)"B = OCCURRENCY.".N..
.." 4 = "OW$" VERWIJDEREN".25)"C = DIREC
TORY.".Z...." 5 = "OW$" WIJZIGEN".25)"_
= ESCAPE."...F.." 6 = PRINTEN "MW$.25)"H
= HELP.".J.P.." 7 = DISPLAY "MW$.25)"F1
= BORDER."...Z.." 8 = SORTEREN".25)"F3=
BACKGROUND.".$...." 9 = EINDE PROGRAMMA"
.25)"F5= CHARACTER.".P...." 0 = SELECTER
EN".25)"E = SCRATCH/VAL".}...." F = TOTA
LEN/GEM.".25)"P = ";PD$;"SW."......" MAA
K UW KEUZE ( M VOOR MENU)";:.170......B$
."M".660.I....B$."0".1940.Z. ..B$."5".32
60...*..B$."2".3440...4..B$."6".2420...>
..B$."7".960...H..B$."3".1020...R..B$."8
".1570.?.\..B$."4".1470.P.F..B$."9".4230
.A.P..B$."A".2970.R.Z..B$."B".3010......
B$."C".1200......B$."E".3880......B$."F"
.3950......B$."P".4140.G....B$."H".4330.
.....". ";G(18);"FOUTE KEUZE.":.620.....
.G(147)". DISPLAY SELECTIE..":T.0.1.J.T.
T.1:.A$(T,IA.1).."S".1000.[.T..:.I.0.IA:
." "C$(I);.12);A$(T,I):.I:..|...." DRUK
OP RETURN...";:. 170......T.RN.970......
630......G(147)". "OW$" TOEVOEGEN..".M..
.." "OW$" TOEVOEGEN.".......15);"*******
*****************":I..1.....I.I.1:CM.0:.
CN(I)..0.CM.1.3.$.." "C$(I);.13);:.170:C
M.0.E....CN(I).0.1100...8.J.CN(I).C(B$):
.J.0..". RUBRIEK IS MAX"CN(I)"POS..":I.I
.1:.1050...B.Z$(I)."-".H(BL$,J).B$:.1110
...L.Z$(I).B$.D.V..I.IA.1050...`...15);"
************************."...J.." CORREC
T J/N (+M=MORE) ";:.170:.B$."N".620.-.T.
.B$."NM".1040.J.~.N$.H(B$,1):.N$.."J".11
30.R...RN.RN.1:.I.0.IA:.Z$(I)."".Z$(I)."
".....A$(RN,I).Z$(I):. I:SA.0.....A$(RN
,IA.1)."":. B$."JM".1040......620......G
(147)". DIRECTORY LEZEN..":PP.3......1,8
,2,"$":.PD.1..4,4:PP.4...D..X.1.141:.#1,
AA$:..U.N.T$(0)."DEL":T$(1)."SEQ":T$(2).
"PRG":T$(3)."USR":T$(4)."REL"...X.J.17:.
1400:N$.B$:J.2:.1400:I$.B$:.#1,AA$:J.2:.
1400:O$.B$......L.1.88:.#1,AA$:.L.L....P
P," DISK NAME:",G(18);N$:.PP......PP," L
ENGTH","TYPE","NAME":.PP.....P.0."...P.P
.1:.#1,T$,AA$,AA$:.T$."".T$.G(128).7...J
.15:.1400:N$.B$.I....#1,AA$,AA$,AA$,AA$,
AA$,AA$,AA$,AA$,AA$,L$,H$...(.L.F(L$.G(0
)).256.F(H$.G(0)):.L.0.1380. .2..ST.1440
...<..F(T$).128.1370.O.F.B$.D(L):B$.B$.H
(BL$,3)...P..PP," ";H(B$,3),T$(F(T$).128
),N$...Z..P.8..#1,AA$,AA$...D..P.8.1290.
!.N..1280.+.X.B$."".>....L.0.J:.#1,AA$.F
....AA$..G(96)..AA$..G(160). B$.B$.AA$.O
....L:.... . 1:.PP:.PD.1. 4......W1.9.."
.. DRUK OP RETURN...";:.170:.110......62
0.....K.0:.G(147)". ";OW$" VERWIJDEREN..
":T.0...H.T.T.1...R..A$(T,IA.1).."S".155
0.4....:.I.0.IA:." ";C$(I);.12);A$(T,I):
.I:..A....". VERWIJDEREN J/N";:.170:.B$.
."J".1540......". WORDT NU VERWIJDERD...
.":K.K.1:TS.TS.1:.I.T.RN.1......J.0.(IA.
1):A$(I,J).A$(I.1,J):.J:.I:RN.RN.1:T.T.1
:SA.0:.1550......". WORDT NIET VERWIJDER
D"......T.RN.1480......". ";K;" "MW$" VE
RWIJDERD":.620.V."..G(147)".. "MW$" SOR
TEREN..":YS.99...,.." SORTEREN OP RUBRIE
K :":.:.I.0.IA:." ";I.1;" = ";C$(I)...6.
.I:.". MAAK UW KEUZE ";:.170:Y.E(B$).1.L
.@..Y.O.1930...J..Y.IA.1930...T..". SORT
EREN OP SUB-RUBRIEKNR. ";:. 170:YY.E(B$)
.1.".^..YY.IA.1620.].H..". BEZIG MET SOR
TEREN ...":N.RN:L.1:B(L).N.1:M.1:YS.Y.J.
R.B(L).N.1.R.|.M.1.....J.B(L):I.M.1:.J.M
.3.1850.....M1..((I.J).2).....I.I.1:.I.J
.1810.D....YY.0.1730......(A$(I,Y).A$(I,
YY))..(A$(M1,Y).A$(M1,YY)).1690......174
0...B..A$(I,Y)..A$(M1,Y).1690.1.L.J.J.1:
.I.J.1810.@.V..YY.0.1780.S....(A$(J,Y).A
$(J,YY))..(A$(M1,Y).A$(M1,YY)).1740.}...
.1790......A$(J,Y)..A$(M1,Y).1740......X
.0.(IA.1):A$(0,X).A$(I,X):A$(I,X).A$(J,X
):A$(J,X).A$(0,X):.X......1690......I..M
1.I.I.1......J.M1.1840.K.&..X.0.(IA.1):A
$(0,X).A$(I,X):A$(I,X).A$(M1,X):A$(M1,X)
.A$(0,X):.X.B.0.L.L.1:B(L).I:.1670.R.:..
J.M.2.1910...D..YY.0.1890...N..(A$(M,Y).
A$(M,YY)).(A$(M.1,Y).A$(M.1,YY)).1910...
X..1900...B..A$(M,Y).A$(M.1,Y).1910.".L.
.X.0.(IA.1):A$(0,X).A$(M,X):A$(M,X).A$(M
.1,X):A$(M.1,X).A$(0,X):.X.?.V.M.B(L).1:
L.L.1:.L.0.1670.H....620.X....". ";G(18)
;"FOUTE KEUZE":.I.1.700:.I:.1570......G(
147)". "MW$" SELECTEREN.."......" 1 = AL
LE "MW$" SELECTEREN."......" 2 = SELECTI
E OPHEFFEN."......" 3 = VARIABEL SELECTE
REN."......" 4 = VISUEEL SELECTEREN.".=.
F..". MAAK UW KEUZE ";:. 170.N.P..B$."1
".2110._.Z..B$."2".2140.P....B$."3".2170
......B$."4".2050......". ";G(18);"FOUTE
KEUZE":.I.1.700:.I:.1940.....T.0:.:TS.0
.....T.T.1:.I.0.IA:." "C$(I);.12);A$(T,I
):.I:... ..." SELECTEREN J/N ";:.170:A$(
T,IA.1)."":..? ..B$."J".A$(T,IA.1)."S":
TS.TS.1.N *..T.RN.2060.] 4.T.TS:.2120..
>..T.1.RN:A$(T,IA.1)."S":.T:T.T.1:TS.T..
H.."."T;" "MW$" GESELECTEERD".S R.."."T
S;" "MW$" TOTAAL GESELECTEERD":.620.. \.
.". ZEKER WETEN (J/N) ";:.170..!F..B$..
"J"..:." DUS NIET ...":.620.G!P..T.1.RN:
A$(T,IA.1)."":.T:T.0:TS.0:.2120.}!Z..".
SELECTIE OP :":.:.I.O.IA:." ";I.1;" = ";
C$(I)..!...I:...!..." MAAK UW KEUZE ";:.
170:Y.E(B$).1:.Y.0.2410.F!...Y.IA.2410..
!...". SELECTIE WAARDE ";:.170:B1$.B$:T
.0:.:P.C(B1$).A"..." 1 = AAN SELECTIE TO
EVOEGEN":." 2 = VAN SELECTIE VERWIJDEREN
".U"..." 3 = UIT-SELECTEREN.":." MAAK UW
KEUZE";:.170.."...B$."1".2270.."J..B$."
3".2270.."T..B$.."2".2220.."...I.1.RN.Q"
...H(A$(I,Y),1).."-".2340.."...J.2.C(A$(
I,Y)):KH.F(J(A$(I,Y),J,J))..#...KH..32.2
320..#...J.B#..KG.C(A$(I,Y)):C$.J(A$(I,Y
),J,KG):C$.H(C$,P).L#...2350.`#$.C$.H(A$
(I,Y),P)..#...C$..B1$.B$."3".A$(I,IA.1).
"S".A$(I,IA.1)."":T.T.1:.2390..#8..C$..B
1$.2390..#B..B$."1"..A$(I,IA.1).."S".A$(
I,IA.1)."S":T.T.1..$L..B$."2"..A$(I,IA.1
)."S".A$(I,IA.1)."":T.T.1.+$V..I:TS.TS.T
:.TS.0.TS.0.5$`..2120.E$J..". ";G(18);"F
OUTE KEUZE":.I.1.700:.I:.1940..$T..G(147
):YT.0:.I.0.IA:.J.0.2:SC(J,I).0:.J:.I.Q$
~.." PRINTEN "MW$:.:.:P$."":.I.1.132:Z$(
I)."":.I:I..1:J.0..$..J.J.1..$..I.I.1:M(
3,J).I.&%...". "C$(I);.15);"OP WELKE REG
EL";:.170:M(1,J).E(B$).@%...M(1,J).0.J.J
.1:.2530.O%....15)"OP WELKE POSITIE";:.1
70:M(2,J).E(B$)..%...M(2,J).1.2486..%...
M(2,J).133.2490..%...". ";G(18);"FOUTE P
OSITIE":.2480..%..." KOPREGEL OMSCHRIJ
VING ";:.170..%D..B$."".2530..&N..B$.":"
.B$.C$(I)..&X.Z$(M(2,J)).B$.*&...I.IA.24
40.F&..JJ.J:.I.2.JJ:.JJ.1.2600.Z&..M(1,0
).M(1,I):M(2,0).M(2,I):M(3,0).M(3,I):J.I
.1..&...M(1,0).M(1,J).2590..&...M(2,0)..
M(2,J).2590..&..M(1,J.1).M(1,J):M(2,J.1)
.M(2,J):M(3,J.1).M(3,J):J.J.1:.J..0.2560
.$'..M(1,J.1).M(1,0):M(2,J.1).M(2,0):M(3
,J.1).M(3,0).0'(..I:.4,4.\'-..4," ";TS"G
ESELECTEERDE "MW$" UIT"RN:.4..'2..". S
UBTOTALEN J/N";:.170:.B$."J".YT.1..'<..N
.1.132:.Z$(N)."".2650..'F.Q.N.C(P$):.Q.1
.Q.1.U'P.P$.P$.H(BL$,Q).Z$(N)..'Z..N..'D
..P$..""..4,P$..(N..2680:II.0:.2720. (X.
.N.1.C(P$):.C(P$).0.2710.H(..Q.F(J(P$,N,
N)):.Q..32..4,"-";:.2710.T(...4," ";.`(.
..N:.4:...( .II.II.1:.A$(II,IA.1).."S".2
950..(..I.0:J.1..(..I.I.1:K.0..(...I.M(1
,J)..4:.2740.G(H..I.M(1,J).2950..(R.K.M(
2,J).K:.K.1.K.1..)..L.M(3,J):SC(0,L).M(2
,J):.4,H(BL$,K);A$(II,L);.;)...CN(L)..0.
SC(1,L).SC(1,L).E(A$(II,L)).G)..K.M(2,J)
.C(A$(II,L)):J.J.1:.J.JJ.1.2750..)...4:.
A$(II,YS).A$(II.1,YS).2720..)"..YT.0.295
0..),.K.0:.2680:Q.1.G)6..L.0.IA:.SC(1,L)
.0.2930..)@.SC(2,L).SC(2,L).SC(1,L):K.SC
(0,L).K:.K.1.K.1.5*J.B$.D(.(SC(1,L))):KK
.CN(L).C(B$):B$.J(B$,2,C(B$)):KK.KK.1.D*
T..KK.0.KK.0.\*^.B$."-".H(BL$,KK).B$..*H
..4,H(BL$,K);B$;:SC(1,L).0:K.SC(0,L).C(B
$):Q.0..*R..L..*|..Q.0..4:.4..*...II.RN.
2720.Z*...2680:K.0:.L.0.IA:.SC(2,L).0.29
57..*..K.SC(0,L).K:.K.1.K.1.0+..B$.D(.(S
C(2,L))):KK.CN(L).C(B$):B$.J(B$,2,C(B$))
:KK.KK.1.?+...KK.0.KK.0.W+..B$."-".H(BL$
,KK).B$.{+...4,H(BL$,K);B$;:K.SC(0,L).C(
B$)..+...L..+...4:.2680:.4..+.. 4:.620..
+...G(147)"..".Z+..." BESCHIKBARE GEHEUG
ENRUIMTE IS NOG:."..+..." EVEN GEDULD...
..".),..I..(0):." ";I.(I.0).65536;" C
HARACTERS..":.620.O,B.. G(147)".":." OCC
URRENCIES ....".S,L..I.0.IA:." "I.1" = "
;C$(I):.I:...,V.." MAAK JE KEUZE ";:. 17
0:Y.E(B$):Y.Y.1..,...Y.0.3060..,...Y.(IA
.1).3070..,...". ";G(18);"FOUTE KEUZE":.
I.1.700:.I:. 3010..-..PP.3:.PD.1.PP.4:.4
,4.=-...PP:.PP," ";TS"GESELECTEERDE "MW$
" UIT "RN:.PP.L-...PP," OCCURRENCIES VOO
R "C$(Y)" ZIJN:":.PP..-..K.0:.I.1.100:B(
I).0:Z$(I)."":.I:B(101).0:B(102).0:I.0.F
-&.I.I.1:.A$(I,IA.1).."S".3170.N-0.J.0.X
-:.J.J.1..-D..Z$(J).A$(I,Y).B(J).B(J).1:
.3170...N..J.K.3130.*.X.K.K.1:B(K).1:Z$(
K).A$(I,Y).9.B..I.RN.3110.A.L.I.0.K.V.I.
I.1.I...P$.D(B(I)).BL$:P$.H(P$,8)......P
P," ";P$;" KEER ";Z$(I):.PP..3.3230.G...
.I.20.I.40.I.60.I.80.:.:." DRUK OP RETUR
N":.170.U....I.K.3190......PP.4. 4......
620../...G(147)".. "OW$" WIJZIGEN..":I.0
../F.I.I.1.4/P..A$(I,IA.1).."S".3410.:/Z
...F/...J.0.IA:.J.1".= ";C$(J);.15);A$(I
,J):.J../...". X= NIETS WYZIGEN."../..."
RUBRIEKNR. TE WIJZIGEN";:.170:.B$."X".3
410.K/..Y.E(B$).1:.Y.0.3430.Z/...Y.IA.34
30..0..." ";A$(I,Y):CM.0:.CN(Y)..0.CM.1
.;0 .." ************************":. 170
:CM.0:.B$."".B$." ".M0*..CN(Y).0.3400..0
4.J.CN(Y).C(B$):.J.0..". RUBRIEK IS MAX"
CN(Y)"POS..":.3350..0>.A$(I,Y)."-".H(BL$
,J).B$:SA.0:.3290.K0H.A$(I,Y).B$:SA.0:.3
290.Z0R..I.RN.3270..0\..620..1F..". ";G(
18);"FOUTE KEUZE":.P.1.700:.P:.3290.61P.
.G(147):. " FILE SCHRIJVEN...".]1Z.." NA
AR DISK OF TAPE (D/T) ";:.170.T1...B$."D
".DT.8:.3490..1...B$."T".DT.1:.3490..1..
.". FOUTE KEUZE":.3450..1...". NAAM FILE
";:.170.Y1...DT.1..1,1,1,B$:.3580..2...1
5,8,15:.1,8,2,"0:".B$.",S,W":.15,EN,ER$,
ET,ES..2...EN..63.3570.Z2J..:." FILE "B$
" BESTAAT AL":.". OVERSCHRIJVEN (J/N) ?
";.V2T.N$.B$:.170:.B$.."J".620..2...". F
ILE "N$" WORDT DUS OVERSCHREVEN....".I2.
. 1:. 1,8,2,"@0:".N$.",S,W":.3580.Y2...E
N..0.3680..2..R$.G(13):.1,RN;R$;..3...1,
OW$;R$;MW$;R$;IA;R$;..3..I..1..3..I.I.1.
73$..1,C$(I)R$;CN(I)R$;.F3...I.IA.3610.M
38..". SCHRIJVEN ";RN;" "MW$;:.T.1.RN..3
B...35)T".":.I.0.IA:.1,A$(T,I)R$;:.I:.1,
"X";R$;:.T..3L. 1: 15:.:.:SA.1:.620.X3V.
.15,EN,ER$,ET,ES:.EN.0....4`.." ";G(18);
ER$:.:." IN TRACK"ET" EN SECTOR"ES..4J.
1: 15:.100.84T..G(147):." FILE LEZEN..."
.^4~.." VAN DISK OF TAPE (D/T) ";:.170.U
4...B$."D".DT.8:.3750..4...B$."T".DT.1:.
3750..4...". FOUTE KEUZE":. 3710..4....F
4..." NAAM FILE";:.170..4...DT.1..1,1,0,
B$:.3790..5D..15,8,15:.1,8,2,"0:".B$.",S
,R..5N..1,RN..5X..DT.8..3670.:5...1,OW$,
MW$,IA:.DT.8..3670.N5..Y.IA.1:.A$(100,Y)
,C$(IA),M(3,Y),SC(2,IA),CN(IA)..5...". L
EZEN "RN" "MW$;:.I.0.IA..5...1,C$(I),CN(
I)..5...I:.T.1.RN..5....35)T".":.I.0.IA:
.1,A$(T,I):.I:.1,B$..5...B$.."X".."..DIS
K-DATA FOUT":...6...T..6.. 1: 15:.:.:TS.
0:.620.E6(..G(147)". DISK FILE VERWIJDER
EN..".R62.." NAAM VAN DE FILE ";:. 170:.
B$."".3920..6<..15,8,15:.15,"S:".B$"":.1
5,EN,ER$,ET,ES.D6F..:." ";ET;" FILES VER
WIJDERD": 15..6P..". VALIDATE DISK (J/N)
";:.170:.B$.."J".620.'7Z..15,8,15:.". V
ALIDATING...":.15,"V":.3670: 15.17D.. 62
0.Y7N..G(147)"... BEREKENEN TOTALEN/GEM.
"..7X..". EVEN GEDULD ....":PP.3:.PD.1.P
P.4:.4,4..7...I.1.2:.J.0.IA:SC(I,J).0:.J
:.I.U7...I.0.IA:.J.1.RN:.A$(J,IA.1).."S"
.4010..7...CN(I).0.4010..8 .X.E(A$(J,I))
:SC(1,I).SC(1,I).X..8...J:.I.#8...TS.1.4
040.H8...I.0.IA:SC(2,I)..(SC(1,I).TS):.I
.T8H..PP:.PP..8R..PP," ";TS"GESELECTEERD
E "MW$" UIT "RN:.PP..8...PP," **********
TOTAAL GEMIDDELDE"..8...PP," ----
------ ------ ----------":.PP..8..
.I.0.IA:.CN(I).0.4110.39..P$." ".C$(I).B
L$:P$.H(P$,13):P$.P$.D(SC(1,I)).BL$.[9..
P$.H(P$,25):P$.P$.D(SC(2,I)):.PP,P$.B9..
.I.S9...PP:.PD.1. 4.|9"..620..9,.."...
AFDRUK VOOR: OCCURRENCY".B96.."
DIRECTORY"..9@.."
TOTALEN/GEM."..:J..". 1 = NAAR PRINTER
STATUS IS".<:T.." 2 = NAAR SCH
ERM ";PD$.C:^..". MAAK UW KEU
ZE ";:.170:PD.E(B$)..:H..PD.1.PD$.".PR./
DIS ":. 620..:R..PD.2.PD$."PR/.DIS. ":.
620..:|.. 4190.A:... *** EXIT ***..:...
G(147)"... EINDE PROGRAMMA.."..:...SA.1.
4310..;...RN.0.4310.,;...". NOG ";RN;" "
;MW$;" NIET GESAVED".O;...". TOCH EINDE
? (J/N) ";:.170.`;B..B$."J".4310.I;L..62
0..;V..G(147);"......PRETTIG MET U TE HE
BBEN SAMENGEWERKT...".U;..." EN DE GR
OETJES VAN LEPPEP-SOFT....":...<..."....
LEES DE GEBRUIKERS-HANDLEIDING...":.62
0.U<...165,255,157,0,216,157,0,217,157,0
,218,157,0,219,232,208,239,230,255,96...
> CLICK IMAGE PREVIEW FOR FULL MODAL