CBM-128(3)
FILE INFORMATION
FILENAME(S): CBM-128(3)
FILE TYPE(S): PRG
FILE SIZE: 16.9K
FIRST SEEN: 2025-11-30 21:06:47
APPEARS ON: 1 disk(s)
FILE HASH
9a74aa3241eb04194566fb35587709055c47723387ce0e356cfcfc30c115d01d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ADRESSEN BEST | CBM-128(3) | PRG | DuncanTwain | 22 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 20 3B 20 64 00 4D 4F 44 45 B2 C2 28 D1 28 22 |. ; d.MODE..(.("|
00000010: 44 37 22 29 29 3A 8F 20 34 30 20 54 45 4B 45 4E |D7")):. 40 TEKEN|
00000020: 53 3A 4D 4F 44 45 3D 30 3B 20 38 30 20 54 45 4B |S:MODE=0; 80 TEK|
00000030: 45 4E 53 3A 4D 4F 44 45 3D 38 30 00 41 20 6E 00 |ENS:MODE=80.A n.|
00000040: 3A 00 57 20 78 00 8F 20 2A 53 54 41 52 54 41 44 |:.W x.. *STARTAD|
00000050: 52 45 53 53 45 4E 2A 00 84 20 82 00 49 54 B2 D1 |RESSEN*.. ..IT..|
00000060: 28 22 30 42 30 30 22 29 3A 8F 20 53 54 41 52 54 |("0B00"):. START|
00000070: 41 44 52 45 53 20 49 4E 49 54 49 41 4C 49 53 45 |ADRES INITIALISE|
00000080: 52 49 4E 47 00 B0 20 8C 00 53 45 B2 D1 28 22 31 |RING.. ..SE..("1|
00000090: 33 30 30 22 29 3A 8F 20 53 54 41 52 54 41 44 52 |300"):. STARTADR|
000000A0: 45 53 20 49 4E 56 4F 45 52 52 4F 55 54 49 4E 45 |ES INVOERROUTINE|
000000B0: 00 DD 20 96 00 53 49 B2 D1 28 22 31 34 43 30 22 |.. ..SI..("14C0"|
000000C0: 29 3A 8F 20 53 54 41 52 54 41 44 52 45 53 20 49 |):. STARTADRES I|
000000D0: 4E 50 55 54 23 2D 52 4F 55 54 49 4E 45 00 07 21 |NPUT#-ROUTINE..!|
000000E0: A0 00 53 53 B2 D1 28 22 31 35 34 30 22 29 3A 8F |..SS..("1540"):.|
000000F0: 20 53 54 41 52 54 41 44 52 45 53 20 5A 4F 45 4B | STARTADRES ZOEK|
00000100: 52 4F 55 54 49 4E 45 00 3E 21 AA 00 53 42 B2 D1 |ROUTINE.>!..SB..|
00000110: 28 22 4F 42 33 30 22 29 3A 8F 20 53 54 41 52 54 |("OB30"):. START|
00000120: 41 44 52 45 53 20 42 4C 4F 4B 56 45 52 53 43 48 |ADRES BLOKVERSCH|
00000130: 55 49 56 49 4E 47 53 52 4F 55 54 49 4E 45 00 44 |UIVINGSROUTINE.D|
00000140: 21 B4 00 3A 00 61 21 BE 00 8D 38 37 38 30 3A 8F |!..:.a!...8780:.|
00000150: 20 52 4F 55 54 49 4E 45 53 20 49 4E 4C 45 5A 45 | ROUTINES INLEZE|
00000160: 4E 00 67 21 C8 00 3A 00 7F 21 D2 00 9E 49 54 3A |N.g!..:..!...IT:|
00000170: 8F 20 49 4E 49 54 49 41 4C 49 53 45 52 45 4E 00 |. INITIALISEREN.|
00000180: 85 21 DC 00 3A 00 A2 21 E6 00 8F 20 2A 4E 55 4D |.!..:..!... *NUM|
00000190: 45 52 49 45 4B 45 4E 20 56 41 52 49 41 42 4C 45 |ERIEKEN VARIABLE|
000001A0: 4E 2A 00 BB 21 F0 00 43 53 B2 32 33 36 3A 8F 20 |N*..!..CS.236:. |
000001B0: 43 55 52 53 4F 52 4B 4F 4C 4F 4D 00 D4 21 FA 00 |CURSORKOLOM..!..|
000001C0: 43 5A B2 32 33 35 3A 8F 20 43 55 52 53 4F 52 52 |CZ.235:. CURSORR|
000001D0: 45 47 45 4C 00 FF 21 04 01 43 52 B2 D1 28 22 43 |EGEL..!..CR..("C|
000001E0: 43 36 43 22 29 3A 8F 20 43 55 52 53 4F 52 50 4C |C6C"):. CURSORPL|
000001F0: 41 41 54 53 49 4E 47 53 52 4F 55 54 49 4E 45 00 |AATSINGSROUTINE.|
00000200: 05 22 0E 01 3A 00 0B 22 18 01 3A 00 1F 22 22 01 |."..:.."..:.."".|
00000210: 8F 20 2A 53 54 55 55 52 54 45 4B 45 4E 53 2A 00 |. *STUURTEKENS*.|
00000220: 3F 22 2C 01 43 52 24 B2 C7 28 31 33 29 3A 8F 20 |?",.CR$..(13):. |
00000230: 43 41 52 52 49 41 47 45 20 52 45 54 55 52 4E 00 |CARRIAGE RETURN.|
00000240: 5D 22 36 01 48 4F 4D 45 24 B2 C7 28 31 39 29 3A |]"6.HOME$..(19):|
00000250: 8F 20 43 55 52 53 4F 52 20 48 4F 4D 45 00 77 22 |. CURSOR HOME.w"|
00000260: 40 01 43 4C 45 41 52 24 B2 C7 28 31 34 37 29 3A |@.CLEAR$..(147):|
00000270: 8F 20 43 4C 45 41 52 00 92 22 4A 01 55 50 24 B2 |. CLEAR.."J.UP$.|
00000280: C7 28 31 34 35 29 3A 8F 20 43 55 52 53 4F 52 20 |.(145):. CURSOR |
00000290: 55 50 00 AF 22 54 01 EB 57 4E 24 B2 C7 28 31 37 |UP.."T..WN$..(17|
000002A0: 29 3A 8F 20 43 55 52 53 4F 52 20 44 4F 57 4E 00 |):. CURSOR DOWN.|
000002B0: D0 22 5E 01 52 45 43 48 54 53 24 B2 C7 28 32 39 |."^.RECHTS$..(29|
000002C0: 29 3A 8F 20 43 55 52 53 4F 52 20 52 49 47 48 54 |):. CURSOR RIGHT|
000002D0: 00 F0 22 68 01 4C 49 4E 4B 53 24 B2 C7 28 31 35 |.."h.LINKS$..(15|
000002E0: 37 29 3A 8F 20 43 55 52 53 4F 52 20 4C 45 46 54 |7):. CURSOR LEFT|
000002F0: 00 0C 23 72 01 41 41 4E 24 B2 C7 28 31 38 29 3A |..#r.AAN$..(18):|
00000300: 8F 20 52 45 56 45 52 53 20 41 41 4E 00 29 23 7C |. REVERS AAN.)#||
00000310: 01 55 49 54 24 B2 C7 28 31 34 36 29 3A 8F 20 52 |.UIT$..(146):. R|
00000320: 45 56 45 52 53 20 55 49 54 00 2F 23 86 01 3A 00 |EVERS UIT./#..:.|
00000330: 35 23 90 01 3A 00 4C 23 9A 01 8F 20 2A 46 55 4E |5#..:.L#... *FUN|
00000340: 4B 54 49 45 54 4F 45 54 53 45 4E 2A 00 62 23 A4 |KTIETOETSEN*.b#.|
00000350: 01 46 31 24 B2 C7 28 31 33 33 29 3A AD 31 2C 46 |.F1$..(133):.1,F|
00000360: 31 24 00 78 23 AE 01 46 33 24 B2 C7 28 31 33 34 |1$.x#..F3$..(134|
00000370: 29 3A AD 33 2C 46 33 24 00 8E 23 B8 01 46 35 24 |):.3,F3$..#..F5$|
00000380: B2 C7 28 31 33 35 29 3A AD 35 2C 46 35 24 00 A4 |..(135):.5,F5$..|
00000390: 23 C2 01 46 37 24 B2 C7 28 31 33 36 29 3A AD 37 |#..F7$..(136):.7|
000003A0: 2C 46 37 24 00 BA 23 CC 01 46 32 24 B2 C7 28 31 |,F7$..#..F2$..(1|
000003B0: 33 37 29 3A AD 32 2C 46 32 24 00 D0 23 D6 01 46 |37):.2,F2$..#..F|
000003C0: 34 24 B2 C7 28 31 33 38 29 3A AD 34 2C 46 34 24 |4$..(138):.4,F4$|
000003D0: 00 E6 23 E0 01 46 36 24 B2 C7 28 31 33 39 29 3A |..#..F6$..(139):|
000003E0: AD 36 2C 46 36 24 00 FC 23 EA 01 46 38 24 B2 C7 |.6,F6$..#..F8$..|
000003F0: 28 31 34 30 29 3A AD 38 2C 46 38 24 00 02 24 F4 |(140):.8,F8$..$.|
00000400: 01 3A 00 08 24 FE 01 3A 00 1F 24 08 02 8F 20 2A |.:..$..:..$... *|
00000410: 41 4E 44 45 52 45 20 53 54 52 49 4E 47 53 2A 00 |ANDERE STRINGS*.|
00000420: 4E 24 12 02 41 24 B2 22 20 20 20 20 20 20 20 20 |N$..A$." |
00000430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000440: 20 22 3A 8F 20 32 35 20 53 50 41 43 45 53 00 81 | ":. 25 SPACES..|
00000450: 24 1C 02 53 50 24 B2 41 24 AA 41 24 AA 41 24 AA |$..SP$.A$.A$.A$.|
00000460: 41 24 AA 41 24 AA 41 24 AA 41 24 AA 41 24 AA 41 |A$.A$.A$.A$.A$.A|
00000470: 24 AA 41 24 3A 8F 20 32 35 30 20 53 50 41 43 45 |$.A$:. 250 SPACE|
00000480: 53 00 9B 24 26 02 4D 31 24 B2 22 45 53 47 44 52 |S..$&.M1$."ESGDR|
00000490: 56 22 3A 8F 20 4D 45 4E 55 20 31 00 D3 24 30 02 |V":. MENU 1..$0.|
000004A0: 4D 32 23 B2 46 31 24 AA 43 52 24 AA 52 45 43 48 |M2#.F1$.CR$.RECH|
000004B0: 54 53 24 AA 4C 49 4E 4B 53 24 AA 46 33 24 AA 46 |TS$.LINKS$.F3$.F|
000004C0: 35 24 AA 46 38 24 AA 46 37 24 3A 8F 20 4D 45 4E |5$.F8$.F7$:. MEN|
000004D0: 55 20 32 00 12 25 3A 02 4E 31 24 B2 22 30 31 32 |U 2..%:.N1$."012|
000004E0: 33 34 35 36 37 38 39 22 3A 8F 20 5A 55 49 56 45 |3456789":. ZUIVE|
000004F0: 52 20 4E 55 4D 45 52 49 45 4B 45 20 49 4E 56 4F |R NUMERIEKE INVO|
00000500: 45 52 20 28 48 45 4C 45 20 47 45 54 41 4C 4C 45 |ER (HELE GETALLE|
00000510: 4E 29 00 36 25 44 02 4E 55 24 B2 4E 31 24 AA 22 |N).6%D.NU$.N1$."|
00000520: 2B 2D 22 3A 8F 20 4E 55 4D 45 52 49 45 4B 45 20 |+-":. NUMERIEKE |
00000530: 49 4E 56 4F 45 52 00 75 25 4E 02 41 31 24 B2 22 |INVOER.u%N.A1$."|
00000540: 51 57 45 52 54 5A 55 49 4F 50 41 53 44 46 47 48 |QWERTZUIOPASDFGH|
00000550: 4A 4B 4C 59 58 43 56 42 4E 4D 51 57 45 52 54 5A |JKLYXCVBNMQWERTZ|
00000560: 55 49 4F 50 41 53 44 46 47 48 4A 4B 4C 59 58 43 |UIOPASDFGHJKLYXC|
00000570: 56 42 4E 4D 22 00 A4 25 58 02 41 31 24 B2 41 31 |VBNM"..%X.A1$.A1|
00000580: 24 AA 22 2C 3B 3A 23 27 5B 5D CD 20 3F 21 40 24 |$.",;:#'[]. ?!@$|
00000590: 25 26 3F 28 29 22 AA C7 38 33 34 29 AA 4E 55 24 |%&?()"..834).NU$|
000005A0: 3A 8F 20 3F 00 C5 25 62 02 53 4F 24 B2 22 2A 3C |:. ?..%b.SO$."*<|
000005B0: 3E 3F 22 3A 8F 20 53 50 45 43 49 41 4C 45 20 54 |>?":. SPECIALE T|
000005C0: 45 4B 45 4E 53 00 F4 25 6C 02 45 31 24 B2 46 31 |EKENS..%l.E1$.F1|
000005D0: 24 AA 46 37 24 3A 8F 20 42 45 45 49 4E 44 49 47 |$.F7$:. BEEINDIG|
000005E0: 45 4E 20 4D 45 54 20 27 46 31 27 20 45 4E 20 20 |EN MET 'F1' EN |
000005F0: 27 46 37 27 00 23 26 76 02 45 32 24 B2 EB 57 4E |'F7'.#&v.E2$..WN|
00000600: 24 AA 55 50 24 AA 43 52 24 AA 45 31 24 3A 8F 20 |$.UP$.CR$.E1$:. |
00000610: 2B 20 43 52 53 2C 44 4F 57 4E 2C 55 50 3B 46 31 |+ CRS,DOWN,UP;F1|
00000620: 3B 34 37 00 29 26 80 02 3A 00 2F 26 8A 02 3A 00 |;47.)&..:./&..:.|
00000630: 54 26 94 02 8F 20 2A 42 45 53 54 41 4E 44 53 50 |T&... *BESTANDSP|
00000640: 45 43 49 46 49 45 4B 45 20 56 41 52 49 41 42 45 |ECIFIEKE VARIABE|
00000650: 4C 45 4E 2A 00 83 26 9E 02 4A 46 B2 31 3A 8F 20 |LEN*..&..JF.1:. |
00000660: 4E 55 4D 4D 45 52 20 56 41 4E 20 49 4E 44 45 58 |NUMMER VAN INDEX|
00000670: 56 45 4C 44 20 28 3D 53 4C 45 55 54 45 4C 56 45 |VELD (=SLEUTELVE|
00000680: 4C 44 29 00 9D 26 A8 02 4A 4C B2 38 3A 8F 20 4C |LD)..&..JL.8:. L|
00000690: 45 4E 47 54 45 20 53 4C 45 55 54 45 4C 00 C5 26 |ENGTE SLEUTEL..&|
000006A0: B2 02 4E B2 31 3A 8F 20 56 4F 4C 47 45 4E 44 20 |..N.1:. VOLGEND |
000006B0: 54 45 20 42 45 53 43 48 52 49 4A 56 45 4E 20 52 |TE BESCHRIJVEN R|
000006C0: 45 43 4F 52 44 00 E7 26 BC 02 4E 45 B2 30 3A 8F |ECORD..&..NE.0:.|
000006D0: 20 45 43 48 54 20 41 41 4E 54 41 4C 20 44 41 54 | ECHT AANTAL DAT|
000006E0: 41 52 45 47 45 4C 53 00 00 27 C6 02 46 41 B2 37 |AREGELS..'..FA.7|
000006F0: 3A 8F 20 41 41 4E 54 41 4C 20 56 45 4C 44 45 4E |:. AANTAL VELDEN|
00000700: 00 1D 27 D0 02 44 50 B2 35 3A 8F 20 50 52 49 4E |..'..DP.5:. PRIN|
00000710: 54 45 52 50 41 52 41 4D 45 54 45 52 53 00 4B 27 |TERPARAMETERS.K'|
00000720: DA 02 41 B2 46 41 3A 49 44 46 50 B1 46 41 A7 41 |..A.FA:IDFP.FA.A|
00000730: B2 44 50 3A 8F 20 41 3D 41 41 4E 54 41 4C 20 4D |.DP:. A=AANTAL M|
00000740: 41 53 4B 45 52 56 45 4C 44 45 4E 00 51 27 E4 02 |ASKERVELDEN.Q'..|
00000750: 3A 00 57 27 EE 02 3A 00 70 27 F8 02 8F 20 2A 44 |:.W'..:.p'... *D|
00000760: 49 4D 45 4E 53 49 4F 4E 45 52 49 4E 47 45 4E 2A |IMENSIONERINGEN*|
00000770: 00 BA 27 02 03 86 49 24 28 46 41 29 2C 4E 49 24 |..'...I$(FA),NI$|
00000780: 28 46 41 29 2C 4C 49 28 46 41 29 2C 53 49 28 46 |(FA),LI(FA),SI(F|
00000790: 41 29 2C 5A 49 28 46 41 29 2C 45 5A 24 28 46 41 |A),ZI(FA),EZ$(FA|
000007A0: 29 2C 53 24 28 46 41 29 3A 8F 20 44 41 54 41 52 |),S$(FA):. DATAR|
000007B0: 45 47 45 4C 56 45 4C 44 45 4E 00 F9 27 0C 03 86 |EGELVELDEN..'...|
000007C0: 4D 4E 24 28 41 29 2C 4D 31 28 41 29 2C 4D 53 28 |MN$(A),M1(A),MS(|
000007D0: 41 29 2C 4D 5A 28 41 29 2C 4D 5A 24 28 41 29 2C |A),MZ(A),MZ$(A),|
000007E0: 4D 52 24 28 41 29 3A 8F 20 4D 41 53 4B 45 52 50 |MR$(A):. MASKERP|
000007F0: 41 52 41 4D 45 54 45 52 53 00 28 28 16 03 86 4A |ARAMETERS.((...J|
00000800: 46 24 28 39 39 39 29 2C 50 25 28 39 39 39 29 3A |F$(999),P%(999):|
00000810: 8F 20 49 4E 44 45 58 56 45 4C 44 2C 20 50 4F 49 |. INDEXVELD, POI|
00000820: 4E 54 45 52 56 45 4C 44 00 70 28 20 03 86 44 50 |NTERVELD.p( ..DP|
00000830: 28 44 50 29 2C 44 49 24 28 44 50 29 2C 44 4C 28 |(DP),DI$(DP),DL(|
00000840: 44 50 29 2C 44 53 28 44 50 29 2C 44 5A 28 44 50 |DP),DS(DP),DZ(DP|
00000850: 29 2C 44 45 24 28 44 50 29 3A 8F 20 50 52 49 4E |),DE$(DP):. PRIN|
00000860: 54 50 41 52 41 4D 45 54 45 52 56 45 4C 44 45 4E |TPARAMETERVELDEN|
00000870: 00 76 28 2A 03 3A 00 7C 28 34 03 3A 00 9B 28 3E |.v(*.:.|(4.:..(>|
00000880: 03 8F 20 2A 49 4E 56 4F 45 52 4D 41 53 4B 45 52 |.. *INVOERMASKER|
00000890: 20 44 45 46 49 4E 49 45 52 45 4E 00 D8 28 48 03 | DEFINIEREN..(H.|
000008A0: 4E 49 24 28 31 29 B2 22 56 4F 4F 52 4E 41 41 4D |NI$(1)."VOORNAAM|
000008B0: 20 3A 20 22 3A 4C 49 28 31 29 B2 31 35 3A 53 49 | : ":LI(1).15:SI|
000008C0: 28 31 29 B2 32 3A 5A 49 28 31 29 B2 33 3A 45 5A |(1).2:ZI(1).3:EZ|
000008D0: 24 28 31 29 B2 41 4C 24 00 17 29 52 03 4E 49 24 |$(1).AL$..)R.NI$|
000008E0: 28 32 29 B2 22 4E 41 41 4D 20 20 20 20 20 20 20 |(2)."NAAM |
000008F0: 3A 20 22 3A 4C 49 28 32 29 B2 31 35 3A 53 49 28 |: ":LI(2).15:SI(|
00000900: 32 29 B2 35 3A 5A 49 28 32 29 B2 35 3A 45 5A 24 |2).5:ZI(2).5:EZ$|
00000910: 28 32 29 B2 41 31 24 00 5A 29 5C 03 4E 49 24 28 |(2).A1$.Z)\.NI$(|
00000920: 33 29 B2 22 53 54 52 41 41 54 20 20 20 20 20 3A |3)."STRAAT :|
00000930: A0 22 3A 4C 49 28 33 29 B2 32 30 3A 53 49 28 33 |.":LI(3).20:SI(3|
00000940: 29 B2 32 3A 5A 49 28 33 29 B2 37 3A 45 5A 24 28 |).2:ZI(3).7:EZ$(|
00000950: 33 29 B2 41 31 24 AA 4E 55 24 00 98 29 66 03 4E |3).A1$.NU$..)f.N|
00000960: 49 24 28 34 29 B2 22 50 4F 53 54 43 4F 44 45 20 |I$(4)."POSTCODE |
00000970: 20 20 3A 20 22 3A 4C 49 28 34 29 B2 34 3A 53 49 | : ":LI(4).4:SI|
00000980: 28 34 29 B2 36 3A 5A 49 28 34 29 B2 39 3A 45 5A |(4).6:ZI(4).9:EZ|
00000990: 24 28 34 29 B2 4E 55 24 00 DC 29 70 03 4E 49 24 |$(4).NU$..)p.NI$|
000009A0: 28 35 29 B2 22 57 4F 4F 4E 50 4C 41 41 54 53 20 |(5)."WOONPLAATS |
000009B0: 3A 20 22 3A 4C 49 28 35 29 B2 32 30 3A 53 49 28 |: ":LI(5).20:SI(|
000009C0: 35 29 B2 32 3A 5A 49 28 35 29 B2 31 4C 3A 45 5A |5).2:ZI(5).1L:EZ|
000009D0: 24 28 35 29 B2 41 31 24 AA 4E 55 24 00 2A 2A 7A |$(5).A1$.NU$.**z|
000009E0: 03 4E 49 24 28 36 29 B2 22 54 45 4C 45 46 4F 4F |.NI$(6)."TELEFOO|
000009F0: 4E 20 20 20 3A 20 22 3A 4C 49 28 36 29 B2 31 35 |N : ":LI(6).15|
00000A00: 3A 53 49 28 36 29 B2 32 3A 5A 49 28 36 29 B2 31 |:SI(6).2:ZI(6).1|
00000A10: 33 3A 45 5A 24 28 36 29 B2 31 33 3A 45 5A 24 28 |3:EZ$(6).13:EZ$(|
00000A20: 36 29 B2 41 4C 24 AA 4E 55 24 00 6E 2A 84 03 4E |6).AL$.NU$.n*..N|
00000A30: 49 24 28 37 29 B2 22 44 49 56 45 52 53 45 4E 20 |I$(7)."DIVERSEN |
00000A40: 20 20 3A 20 22 3A 4C 49 28 37 29 B2 32 30 3A 53 | : ":LI(7).20:S|
00000A50: 49 28 37 29 B2 30 3A 5A 49 28 37 29 B2 31 35 3A |I(7).0:ZI(7).15:|
00000A60: 45 5A 24 28 37 29 B2 41 31 24 AA 4E 55 24 00 74 |EZ$(7).A1$.NU$.t|
00000A70: 2A 8E 03 3A 00 7A 2A 98 03 3A 00 9F 2A A2 03 8F |*..:.z*..:..*...|
00000A80: 20 2A 50 52 49 4E 54 45 52 50 41 52 41 4D 45 54 | *PRINTERPARAMET|
00000A90: 45 52 53 20 44 45 46 49 4E 49 45 52 45 4E 2A 00 |ERS DEFINIEREN*.|
00000AA0: E8 2A AC 03 44 49 24 28 31 29 B2 22 56 45 4C 44 |.*..DI$(1)."VELD|
00000AB0: 45 4E 20 4E 41 41 53 54 20 4F 46 20 4F 4E 44 45 |EN NAAST OF ONDE|
00000AC0: 52 20 45 4C 4B 41 41 52 20 20 20 20 20 3A 20 22 |R ELKAAR : "|
00000AD0: 3A 44 31 28 31 29 B2 31 3A 44 53 28 31 29 B2 30 |:D1(1).1:DS(1).0|
00000AE0: 3A 44 5A 28 31 29 B2 35 00 FA 2A B6 03 44 45 24 |:DZ(1).5..*..DE$|
00000AF0: 28 31 29 B2 22 4E 55 4E 55 22 00 43 2B C0 03 44 |(1)."NUNU".C+..D|
00000B00: 49 24 28 32 29 B2 22 56 45 4C 44 45 4E 20 4E 41 |I$(2)."VELDEN NA|
00000B10: 41 53 54 20 45 4C 4B 41 41 52 3A 20 56 45 4C 44 |AST ELKAAR: VELD|
00000B20: 41 46 53 54 41 4E 44 20 3A A0 22 3A 44 31 28 32 |AFSTAND :.":D1(2|
00000B30: 29 B2 31 3A 44 53 28 32 29 B2 30 3A 44 5A 28 32 |).1:DS(2).0:DZ(2|
00000B40: 29 B2 37 00 52 2B CA 03 44 45 24 28 32 29 B2 4E |).7.R+..DE$(2).N|
00000B50: 31 24 00 A6 2B D4 03 44 49 24 28 33 29 B2 22 44 |1$..+..DI$(3)."D|
00000B60: 41 54 41 52 45 47 45 4C 41 46 53 54 41 4E 44 20 |ATAREGELAFSTAND |
00000B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B80: 3A 20 22 3A 44 31 28 33 29 B2 31 3A 44 53 28 33 |: ":D1(3).1:DS(3|
00000B90: 29 B2 30 3A 44 5A 28 33 29 B2 39 3A 44 45 24 28 |).0:DZ(3).9:DE$(|
00000BA0: 33 29 B2 4E 31 24 00 FF 2B DE 03 44 49 24 28 34 |3).N1$..+..DI$(4|
00000BB0: 29 B2 22 50 52 49 4E 54 45 52 41 44 52 45 53 20 |)."PRINTERADRES |
00000BC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000BD0: 20 20 20 20 3A 20 22 3A 44 31 28 34 29 B2 31 3A | : ":D1(4).1:|
00000BE0: 44 53 28 34 29 B2 30 3A 44 5A 28 34 29 B2 31 35 |DS(4).0:DZ(4).15|
00000BF0: 3A 44 45 24 28 34 29 B2 22 33 34 35 36 37 22 00 |:DE$(4)."34567".|
00000C00: 53 2C E8 03 44 49 24 28 35 29 B2 22 53 45 43 55 |S,..DI$(5)."SECU|
00000C10: 4E 44 41 49 52 41 44 52 45 53 20 20 20 20 20 20 |NDAIRADRES |
00000C20: 20 20 20 20 20 20 20 20 20 20 20 20 3A 20 22 3A | : ":|
00000C30: 44 31 28 35 29 B2 33 3A 44 53 28 35 29 B2 30 3A |D1(5).3:DS(5).0:|
00000C40: 44 5A 28 35 29 B2 31 37 3A 44 45 24 28 35 29 B2 |DZ(5).17:DE$(5).|
00000C50: 4E 31 24 00 59 2C F2 03 3A 00 5F 2C FC 03 3A 00 |N1$.Y,..:._,..:.|
00000C60: 7E 2C 06 04 8F 20 2A 50 52 49 4E 54 45 52 53 54 |~,... *PRINTERST|
00000C70: 41 4E 44 41 41 52 44 57 41 41 52 44 45 2A 00 9C |ANDAARDWAARDE*..|
00000C80: 2C 10 04 44 50 28 31 29 B2 31 3A 8F 20 4F 4E 44 |,..DP(1).1:. OND|
00000C90: 45 52 45 4C 4B 41 41 52 20 3D 4A 41 00 BE 2C 1A |ERELKAAR =JA..,.|
00000CA0: 04 44 50 28 32 29 B2 33 3A 8F 20 4E 41 41 53 54 |.DP(2).3:. NAAST|
00000CB0: 45 4C 4B 41 41 52 20 41 46 53 54 41 4E 44 00 F6 |ELKAAR AFSTAND..|
00000CC0: 2C 24 04 44 50 28 33 29 B2 31 3A 8F 20 41 46 53 |,$.DP(3).1:. AFS|
00000CD0: 54 41 4E 44 20 54 55 53 53 45 4E 20 54 57 45 45 |TAND TUSSEN TWEE|
00000CE0: 20 44 41 54 41 52 45 47 45 4C 53 3D 20 45 45 4E | DATAREGELS= EEN|
00000CF0: 20 52 45 47 45 4C 00 21 2D 2E 04 44 50 28 34 29 | REGEL.!-..DP(4)|
00000D00: B2 34 3A 8F 20 50 52 49 4E 54 45 52 41 44 52 45 |.4:. PRINTERADRE|
00000D10: 53 20 3D 20 34 20 3D 20 53 54 41 4E 44 41 41 52 |S = 4 = STANDAAR|
00000D20: 44 00 61 2D 38 04 44 50 28 35 29 B2 37 3A 8F 20 |D.a-8.DP(5).7:. |
00000D30: 3D 20 47 52 4F 4F 54 2F 4B 4C 45 49 4E 53 43 48 |= GROOT/KLEINSCH|
00000D40: 52 49 46 54 20 4D 4F 44 55 53 20 42 49 4A 20 43 |RIFT MODUS BIJ C|
00000D50: 4F 4D 4D 4F 44 4F 52 45 2D 50 52 49 4E 54 45 52 |OMMODORE-PRINTER|
00000D60: 53 00 67 2D 42 04 3A 00 6D 2D 4C 04 3A 00 83 2D |S.g-B.:.m-L.:..-|
00000D70: 56 04 8F 20 2A 50 52 4F 47 52 41 4D 4D 41 53 54 |V.. *PROGRAMMAST|
00000D80: 41 52 54 00 A1 2D 60 04 8B 20 4D 4F 44 45 B2 30 |ART..-`.. MODE.0|
00000D90: A7 9B 30 2C 37 3A 9B 34 2C 37 3A 97 32 34 31 2C |..0,7:.4,7:.241,|
00000DA0: 31 00 BE 2D 6A 04 99 C7 28 31 34 29 C7 28 38 29 |1..-j...(14).(8)|
00000DB0: 3A 8F 20 47 52 4F 4F 54 2F 4B 4C 45 49 4E 00 C4 |:. GROOT/KLEIN..|
00000DC0: 2D 74 04 3A 00 CA 2D 7E 04 3A 00 E1 2D 88 04 8F |-t.:..-~.:..-...|
00000DD0: 20 2A 42 45 53 54 41 4E 44 49 4E 4C 45 5A 45 4E | *BESTANDINLEZEN|
00000DE0: 2A 00 FB 2D 92 04 FE 0D 23 32 2C 22 49 4E 46 4F |*..-....#2,"INFO|
00000DF0: 42 45 53 54 41 4E 2C 55 2C 52 22 00 02 2E 9C 04 |BESTAN,U,R".....|
00000E00: A0 32 00 08 2E A6 04 3A 00 30 2E B0 04 8B 44 24 |.2.....:.0....D$|
00000E10: B2 30 A7 31 32 34 30 3A 8F 20 47 45 45 4E 20 46 |.0.1240:. GEEN F|
00000E20: 4F 55 54 20 3D 3E 49 4E 46 4F 20 4C 45 5A 45 4E |OUT =>INFO LEZEN|
00000E30: 00 6B 2E BA 04 8B 44 24 B2 36 32 A7 20 8D 32 30 |.k....D$.62. .20|
00000E40: 31 30 3A 8D 32 33 32 30 3A 89 31 32 37 30 3A 8F |10:.2320:.1270:.|
00000E50: 20 27 46 49 4C 45 20 4E 4F 54 20 46 4F 55 4E 44 | 'FILE NOT FOUND|
00000E60: 27 3D 3E 41 41 4E 4D 41 4B 45 4E 00 A4 2E C4 04 |'=>AANMAKEN.....|
00000E70: 8D 20 31 37 35 30 3A CB 54 31 31 37 30 3A 8F 20 |. 1750:.T1170:. |
00000E80: 41 4E 44 45 52 20 46 4F 55 54 45 4E 20 55 49 54 |ANDER FOUTEN UIT|
00000E90: 47 45 56 45 4E 2C 20 4E 49 45 55 57 45 20 50 4F |GEVEN, NIEUWE PO|
00000EA0: 47 49 4E 47 00 AA 2E CE 04 3A 00 CD 2E D8 04 8D |GING.....:......|
00000EB0: 20 37 39 39 30 3A 8F 20 49 4E 4C 45 5A 45 4E 20 | 7990:. INLEZEN |
00000EC0: 56 41 4E 20 44 45 20 49 4E 46 4F 27 53 00 E8 2E |VAN DE INFO'S...|
00000ED0: E2 04 8D 20 37 38 37 30 3A 8F 20 49 4E 44 45 58 |... 7870:. INDEX|
00000EE0: 20 49 4E 4C 45 5A 45 4E 00 EE 2E EC 04 3A 00 15 | INLEZEN.....:..|
00000EF0: 2F F6 04 41 46 B2 30 3A 8F 20 56 45 52 41 4E 44 |/..AF.0:. VERAND|
00000F00: 45 52 49 4E 47 53 56 4C 41 47 20 49 4E 49 54 49 |ERINGSVLAG INITI|
00000F10: 41 4C 49 53 2E 00 1B 2F 00 05 3A 00 21 2F 0A 05 |ALIS.../..:.!/..|
00000F20: 3A 00 34 2F 14 05 8F 20 2A 2A 2A 20 4D 45 4E 55 |:.4/... *** MENU|
00000F30: 20 2A 2A 2A 00 41 2F 1E 05 99 43 4C 45 41 52 24 | ***.A/...CLEAR$|
00000F40: 3B 00 54 2F 28 05 8B 20 4D 4F 44 45 20 B2 30 20 |;.T/(.. MODE .0 |
00000F50: A7 20 FE 18 00 92 2F 32 05 99 3A 99 41 41 4E 24 |. ..../2..:.AAN$|
00000F60: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000F70: 20 20 20 20 20 4B 45 55 5A 45 20 4D 45 4E 55 20 | KEUZE MENU |
00000F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F90: 22 3B 00 CE 2F 3C 05 99 41 41 4E 24 22 20 20 20 |";../<..AAN$" |
00000FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FB0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 20 20 20 20 | ---------- |
00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 D8 | ";..|
00000FD0: 2F 46 05 99 3A 99 3A 99 00 0B 30 50 05 99 22 20 |/F..:.:...0P.." |
00000FE0: 20 22 41 41 4E 24 22 20 49 20 22 55 49 54 24 22 | "AAN$" I "UIT$"|
00000FF0: 20 20 20 49 4E 56 4F 45 52 45 4E 20 56 41 4E 20 | INVOEREN VAN |
00001000: 44 41 54 41 52 45 47 45 4C 53 22 00 40 30 5A 05 |DATAREGELS".@0Z.|
00001010: 99 22 20 20 20 22 41 41 4E 24 22 20 5A A0 22 55 |." "AAN$" Z."U|
00001020: 49 54 24 22 20 20 20 20 5A 4F 45 4B 45 4E 2C 20 |IT$" ZOEKEN, |
00001030: 57 49 4A 5A 49 47 45 4E 2C 20 57 49 53 53 45 4E |WIJZIGEN, WISSEN|
00001040: 00 7A 30 64 05 99 3A 99 22 20 20 22 41 41 4E 24 |.z0d..:." "AAN$|
00001050: 22 20 47 20 22 55 49 54 24 22 20 20 47 45 4F 52 |" G "UIT$" GEOR|
00001060: 44 45 4E 44 45 20 55 49 54 56 4F 45 52 20 56 41 |DENDE UITVOER VA|
00001070: 4E 20 42 45 53 54 41 4E 44 22 00 A8 30 6E 05 99 |N BESTAND"..0n..|
00001080: 3A 99 22 20 20 22 41 41 4E 24 22 20 50 20 22 55 |:." "AAN$" P "U|
00001090: 49 54 24 22 20 20 50 52 49 4E 54 45 52 50 41 52 |IT$" PRINTERPAR|
000010A0: 41 4D 45 54 45 52 53 22 00 D2 30 78 05 99 3A 99 |AMETERS"..0x..:.|
000010B0: 22 20 20 22 41 41 4E 24 22 20 52 A0 22 55 49 54 |" "AAN$" R."UIT|
000010C0: 24 22 20 20 52 45 4F 52 47 41 4E 49 53 41 54 49 |$" REORGANISATI|
000010D0: 45 22 00 05 31 82 05 99 3A 99 22 20 20 22 41 41 |E"..1...:." "AA|
000010E0: 4E 24 22 20 56 A0 22 55 49 54 24 22 20 20 56 45 |N$" V."UIT$" VE|
000010F0: 52 4C 41 54 45 4E 20 56 41 4E 20 50 52 4F 47 52 |RLATEN VAN PROGR|
00001100: 41 4D 4D 41 22 00 0F 31 8C 05 99 3A 99 3A 99 00 |AMMA"..1...:.:..|
00001110: 47 31 96 05 99 41 41 4E 24 22 20 20 20 20 20 20 |G1...AAN$" |
00001120: 20 20 20 20 20 20 20 20 20 20 20 20 55 57 20 4B | UW K|
00001130: 45 55 5A 45 20 3F 20 20 20 20 20 20 20 20 20 20 |EUZE ? |
00001140: 20 20 20 20 20 22 3B 00 7F 31 A0 05 99 41 41 4E | ";..1...AAN|
00001150: 24 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |$" |
00001160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001170: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 | ";.|
00001180: 8B 31 AA 05 FE 19 3A D5 20 FE 18 00 B2 31 B4 05 |.1....:. ....1..|
00001190: 99 41 41 4E 24 22 20 20 20 20 20 20 20 20 20 20 |.AAN$" |
000011A0: 20 20 20 20 20 20 20 20 4B 45 55 5A 45 20 4D 45 | KEUZE ME|
000011B0: 4E 55 00 D9 31 BE 05 99 41 41 4E 24 22 20 20 20 |NU..1...AAN$" |
000011C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2D | -|
000011D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E3 31 C8 05 99 3A |---------..1...:|
000011E0: 99 3A 99 00 12 32 D2 05 99 22 20 20 22 41 41 4E |.:...2..." "AAN|
000011F0: 24 22 20 49 20 22 55 49 54 24 22 20 20 49 4E 56 |$" I "UIT$" INV|
00001200: 4F 45 52 20 56 41 4E 20 44 41 54 41 20 52 45 47 |OER VAN DATA REG|
00001210: 45 4C 00 46 32 DC 05 99 3A 99 22 20 20 22 41 41 |EL.F2...:." "AA|
00001220: 4E 24 22 20 5A A0 22 55 49 54 24 22 20 20 5A 4F |N$" Z."UIT$" ZO|
00001230: 45 4B 45 4E 2C 20 57 49 4A 5A 49 47 45 4E 2C 20 |EKEN, WIJZIGEN, |
00001240: 57 49 53 53 45 4E 00 80 32 E6 05 99 3A 99 22 20 |WISSEN..2...:." |
00001250: 20 22 41 41 4E 24 22 20 47 20 22 55 49 54 24 22 | "AAN$" G "UIT$"|
00001260: 20 20 47 45 4F 52 44 45 4E 44 45 20 55 49 54 56 | GEORDENDE UITV|
00001270: 4F 45 52 20 56 41 4E 20 42 45 53 54 41 4E 44 22 |OER VAN BESTAND"|
00001280: 00 AE 32 F0 05 99 3A 99 22 20 20 22 41 41 4E 24 |..2...:." "AAN$|
00001290: 22 20 50 20 22 55 49 54 24 22 20 20 50 52 49 4E |" P "UIT$" PRIN|
000012A0: 54 45 52 50 41 52 41 4D 45 54 45 52 53 22 00 D8 |TERPARAMETERS"..|
000012B0: 32 FA 05 99 3A 99 22 20 20 22 41 41 4E 24 22 20 |2...:." "AAN$" |
000012C0: 52 A0 22 55 49 54 24 22 20 20 52 45 4F 52 47 41 |R."UIT$" REORGA|
000012D0: 4E 49 53 41 54 49 45 22 00 0B 33 04 06 99 3A 99 |NISATIE"..3...:.|
000012E0: 22 20 20 22 41 41 4E 24 22 20 56 A0 22 55 49 54 |" "AAN$" V."UIT|
000012F0: 24 22 20 20 56 45 52 4C 41 54 45 4E 20 56 41 4E |$" VERLATEN VAN|
00001300: 20 50 52 4F 47 52 41 4D 4D 41 22 00 15 33 0E 06 | PROGRAMMA"..3..|
00001310: 99 3A 99 3A 99 00 3C 33 18 06 99 41 41 4E 24 22 |.:.:..<3...AAN$"|
00001320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001330: 20 20 55 57 20 4B 45 55 5A 45 20 3F 00 47 33 22 | UW KEUZE ?.G3"|
00001340: 06 99 41 41 4E 24 22 00 4E 33 2C 06 FE 19 00 54 |..AAN$".N3,....T|
00001350: 33 36 06 3A 00 5C 33 40 06 49 B2 30 00 79 33 4A |36.:.\3@.I.0.y3J|
00001360: 06 9F B1 49 B2 30 3A A1 AD 41 24 3A 49 B2 88 28 |...I.0:..A$:I..(|
00001370: 4D 31 24 2C 41 24 29 3A A0 00 7F 33 54 06 3A 00 |M1$,A$):...3T.:.|
00001380: B0 33 5E 06 8B 20 49 B2 C3 28 4D 31 24 29 A7 31 |.3^.. I..(M1$).1|
00001390: 36 38 30 3A 8F 20 56 45 52 4C 41 54 45 4E 20 56 |680:. VERLATEN V|
000013A0: 41 4E 20 48 45 54 20 50 52 4F 47 52 41 4D 4D 41 |AN HET PROGRAMMA|
000013B0: 00 D2 33 68 06 91 20 49 20 8D 32 37 31 30 2C 33 |..3h.. I .2710,3|
000013C0: 36 36 30 2C 34 31 31 30 2C 35 32 35 30 2C 35 36 |660,4110,5250,56|
000013D0: 34 30 00 DD 33 72 06 CB 54 31 33 30 30 00 E3 33 |40..3r..T1300..3|
000013E0: 7C 06 3A 00 E9 33 86 06 3A 00 0A 34 90 06 8F 20 ||.:..3..:..4... |
000013F0: 2A 2A 2A 20 56 45 52 4C 41 54 45 4E 20 50 52 4F |*** VERLATEN PRO|
00001400: 47 52 41 4D 4D 41 20 2A 2A 2A 00 1A 34 9A 06 8B |GRAMMA ***..4...|
00001410: 20 41 46 B2 30 A7 31 37 32 30 00 37 34 A4 06 8D | AF.0.1720.74...|
00001420: 37 37 34 30 3A 8F 20 49 4E 44 45 58 20 56 41 53 |7740:. INDEX VAS|
00001430: 54 4C 45 47 47 45 4E 00 53 34 AE 06 8D 38 31 32 |TLEGGEN.S4...812|
00001440: 30 3A 8F 20 49 4E 46 4F 20 56 41 53 54 4C 45 47 |0:. INFO VASTLEG|
00001450: 47 45 4E 00 59 34 B8 06 80 00 5F 34 C2 06 3A 00 |GEN.Y4...._4..:.|
00001460: 65 34 CC 06 3A 00 7F 34 D6 06 8F 20 2A 2A 2A 20 |e4..:..4... *** |
00001470: 46 4F 55 54 4D 45 4C 44 49 4E 47 20 2A 2A 2A 00 |FOUTMELDING ***.|
00001480: 9D 34 E0 06 9E 43 52 2C 2C 32 34 2C 30 2C 30 3A |.4...CR,,24,0,0:|
00001490: 8F 43 52 53 2E 50 4C 41 41 54 53 45 4E 00 A6 34 |.CRS.PLAATSEN..4|
000014A0: EA 06 99 53 44 24 00 AF 34 F4 06 A1 AD 41 24 00 |...SD$..4....A$.|
000014B0: B5 34 FE 06 8E 00 BB 34 08 07 3A 00 C1 34 12 07 |.4.....4..:..4..|
000014C0: 3A 00 DF 34 1C 07 8F 20 2A 2A 2A 20 4D 41 53 4B |:..4... *** MASK|
000014D0: 45 52 20 4F 50 42 4F 55 57 45 4E 20 2A 2A 2A 00 |ER OPBOUWEN ***.|
000014E0: EB 34 26 07 81 49 B2 31 A4 4D 46 00 0E 35 30 07 |.4&..I.1.MF..50.|
000014F0: 3A 3A 9E 43 52 2C 2C 4D 5A 28 49 29 2C 4D 53 28 |::.CR,,MZ(I),MS(|
00001500: 49 29 2C 30 3A 8F 20 43 52 53 2E 53 45 54 00 33 |I),0:. CRS.SET.3|
00001510: 35 3A 07 3A 3A 99 4D 4E 28 49 29 3B C8 28 53 50 |5:.::.MN(I);.(SP|
00001520: 24 31 49 28 49 29 AB C3 28 49 24 28 49 29 29 AA |$1I(I)..(I$(I)).|
00001530: 31 29 3A 00 39 35 44 07 82 00 3F 35 4E 07 8E 00 |1):.95D...?5N...|
00001540: 45 35 58 07 3A 00 4B 35 62 07 3A 00 55 35 6C 07 |E5X.:.K5b.:.U5l.|
00001550: AB 32 30 31 30 00 6B 35 76 07 49 B2 31 3A 8F 20 |.2010.k5v.I.1:. |
00001560: 45 45 52 53 54 45 20 56 45 4C 44 00 88 35 80 07 |EERSTE VELD..5..|
00001570: 53 B2 C3 28 4D 4E 28 49 29 29 AA 4D 53 28 49 29 |S..(MN(I)).MS(I)|
00001580: 3A 8F 20 4B 4F 4C 4F 4D 00 B1 35 8A 07 9E 53 45 |:. KOLOM..5...SE|
00001590: 2C 53 2C 4D 5A 28 49 29 2C 4D 31 28 49 29 2C 2C |,S,MZ(I),M1(I),,|
000015A0: 4D 5A 24 28 49 29 2C 45 32 24 2C 4D 52 24 28 49 |MZ$(I),E2$,MR$(I|
000015B0: 29 00 D2 35 94 07 41 B2 C2 28 32 35 33 29 3A 8F |)..5..A..(253):.|
000015C0: 20 45 49 4E 44 54 45 4B 45 4E 20 49 4E 27 32 35 | EINDTEKEN IN'25|
000015D0: 33 27 00 F7 35 9E 07 8B 20 41 B2 31 34 35 AF 49 |3'..5... A.145.I|
000015E0: B1 31 A7 49 B2 49 AB 31 3A 89 31 39 32 30 3A 8F |.1.I.I.1:.1920:.|
000015F0: 20 43 52 53 2E 55 50 00 2A 36 A8 07 8B 28 41 B2 | CRS.UP.*6...(A.|
00001600: 31 37 B0 41 B2 31 33 29 AF 49 B3 4D 46 A7 49 B2 |17.A.13).I.MF.I.|
00001610: 49 AA 31 3A 89 31 39 32 30 3A 8F 20 43 52 53 2E |I.1:.1920:. CRS.|
00001620: 44 4F 57 4E 20 4F 46 20 43 52 00 49 36 B2 07 8B |DOWN OF CR.I6...|
00001630: 20 41 B2 31 33 33 B0 41 B2 31 33 36 A7 20 8E 3A | A.133.A.136. .:|
00001640: 8F 20 46 31 20 4F 46 46 37 00 53 36 BC 07 89 31 |. F1 OFF7.S6...1|
00001650: 39 32 30 00 59 36 C6 07 3A 00 5F 36 D0 07 3A 00 |920.Y6..:._6..:.|
00001660: 72 36 DA 07 8F 20 4D 41 53 4B 45 52 20 54 4F 4E |r6... MASKER TON|
00001670: 45 4E 00 83 36 E4 07 8B 20 4D 4F 44 45 B2 30 A7 |EN..6... MODE.0.|
00001680: 20 FE 18 00 BC 36 EE 07 99 43 4C 45 41 52 24 41 | ....6...CLEAR$A|
00001690: 41 4E 24 22 20 20 44 45 4D 4F 4E 53 54 52 41 54 |AN$" DEMONSTRAT|
000016A0: 49 45 20 56 41 4E 20 49 4E 56 4F 45 52 4D 41 53 |IE VAN INVOERMAS|
000016B0: 4B 45 52 20 20 20 22 55 49 54 24 3B 00 C8 36 F8 |KER "UIT$;..6.|
000016C0: 07 FE 19 20 D5 20 FE 18 00 F8 36 02 08 99 43 4C |... . ....6...CL|
000016D0: 45 41 52 24 41 41 4E 24 22 20 20 44 45 4D 4F 4E |EAR$AAN$" DEMON|
000016E0: 53 54 52 41 54 49 45 20 56 41 4E 20 49 4E 56 4F |STRATIE VAN INVO|
000016F0: 45 52 4D 41 53 4B 45 52 00 FF 36 0C 08 FE 19 00 |ERMASKER..6.....|
00001700: 05 37 16 08 3A 00 20 37 20 08 8F 20 3C 4D 41 53 |.7..:. 7 .. <MAS|
00001710: 4B 45 52 47 45 4E 2E 49 4E 49 54 49 41 4C 2E 3E |KERGEN.INITIAL.>|
00001720: 00 2A 37 2A 08 4D 46 B2 46 41 00 30 37 34 08 3A |.*7*.MF.FA.074.:|
00001730: 00 3D 37 3E 08 81 20 49 B2 31 A4 4D 46 00 83 37 |.=7>.. I.1.MF..7|
00001740: 48 08 3A 3A 4D 4E 24 28 49 29 B2 4E 49 24 28 49 |H.::MN$(I).NI$(I|
00001750: 29 3A 4D 31 28 49 29 B2 31 49 28 49 29 3A 4D 53 |):M1(I).1I(I):MS|
00001760: 28 49 29 B2 53 49 28 49 29 3A 4D 5A 28 49 29 B2 |(I).SI(I):MZ(I).|
00001770: 5A 49 28 49 29 3A 4D 5A 24 28 49 29 B2 45 5A 24 |ZI(I):MZ$(I).EZ$|
00001780: 28 49 29 00 89 37 52 08 82 00 8F 37 5C 08 3A 00 |(I)..7R....7\.:.|
00001790: A8 37 66 08 8D 31 38 32 30 3A 8F 20 4D 41 53 4B |.7f..1820:. MASK|
000017A0: 45 52 4F 50 42 4F 55 57 00 BA 37 70 08 8B 20 4D |EROPBOUW..7p.. M|
000017B0: 4F 44 45 B2 30 20 A7 20 FE 18 00 D3 37 7A 08 9E |ODE.0 . ....7z..|
000017C0: 43 52 2C 2C 32 32 2C 30 2C 30 3A 8F 20 43 55 52 |CR,,22,0,0:. CUR|
000017D0: 53 4F 52 00 04 38 84 08 99 41 41 4E 24 22 47 41 |SOR..8...AAN$"GA|
000017E0: 41 54 20 55 20 4D 45 54 20 44 49 54 20 49 4E 56 |AT U MET DIT INV|
000017F0: 4F 45 52 20 4D 41 53 4B 45 52 20 41 4B 4B 4F 4F |OER MASKER AKKOO|
00001800: 52 44 22 3B 00 2A 38 8E 08 99 22 28 4A 29 20 4F |RD";.*8..."(J) O|
00001810: 46 20 57 49 4C 54 20 55 20 4E 4F 47 20 57 49 4A |F WILT U NOG WIJ|
00001820: 5A 49 47 49 4E 47 45 4E 22 3B 00 4A 38 98 08 99 |ZIGINGEN";.J8...|
00001830: 22 41 41 4E 42 52 45 4E 47 45 4E 20 28 4E 29 20 |"AANBRENGEN (N) |
00001840: 3F 22 55 49 54 24 22 20 22 3B 00 57 38 A2 08 FE |?"UIT$" ";.W8...|
00001850: 19 3A 20 D5 20 FE 18 00 67 38 AC 08 41 24 B2 22 |.: . ...g8..A$."|
00001860: 4A 4E 22 3A 8F 20 3F 00 A7 38 B6 08 99 41 41 4E |JN":. ?..8...AAN|
00001870: 24 22 20 20 49 4E 56 4F 45 52 20 4D 41 53 4B 45 |$" INVOER MASKE|
00001880: 52 20 41 4B 4B 4F 4F 52 44 20 28 4A 29 20 4F 46 |R AKKOORD (J) OF|
00001890: 20 57 49 4C 54 20 55 20 4E 4F 47 20 57 49 4A 5A | WILT U NOG WIJZ|
000018A0: 49 47 49 4E 47 45 4E 00 C9 38 C0 08 99 22 20 20 |IGINGEN..8..." |
000018B0: 41 41 4E 42 52 45 4E 47 45 4E 20 28 4E 29 20 3F |AANBRENGEN (N) ?|
000018C0: 22 55 49 54 24 22 20 22 3B 00 D0 38 CA 08 FE 19 |"UIT$" ";..8....|
000018D0: 00 DF 38 D4 08 41 24 B2 22 4A 4E 22 3A 8F 3F 00 |..8..A$."JN":.?.|
000018E0: 02 39 DE 08 9E 53 45 2C C2 28 32 33 36 29 2C C2 |.9...SE,.(236),.|
000018F0: 28 32 33 35 29 2C 31 2C 2C 41 24 2C 43 52 24 2C |(235),1,,A$,CR$,|
00001900: 42 24 00 27 39 E8 08 8B 42 24 B2 22 4A 22 B0 42 |B$.'9...B$."J".B|
00001910: 24 B2 22 4A 22 A7 8E 3A 8F 20 42 45 53 54 41 4E |$."J"..:. BESTAN|
00001920: 44 4F 50 42 4F 55 57 00 31 39 F2 08 43 49 52 3A |DOPBOUW.19..CIR:|
00001930: 80 00 37 39 FC 08 3A 00 3D 39 06 09 3A 00 5C 39 |..79..:.=9..:.\9|
00001940: 10 09 8F 20 2A 2A 2A 20 42 45 53 54 41 4E 44 20 |... *** BESTAND |
00001950: 41 41 4E 4D 41 4B 45 4E 20 2A 2A 2A 00 67 39 1A |AANMAKEN ***.g9.|
00001960: 09 99 43 4C 45 41 52 00 6D 39 24 09 3A 00 8C 39 |..CLEAR.m9$.:..9|
00001970: 2E 09 8F 20 3E 52 45 43 4F 52 44 4C 45 4E 47 54 |... >RECORDLENGT|
00001980: 45 20 42 45 52 45 4B 45 4E 45 4E 3C 00 99 39 38 |E BEREKENEN<..98|
00001990: 09 81 20 49 B2 31 A4 46 41 00 AD 39 42 09 3A 3A |.. I.1.FA..9B.::|
000019A0: 52 31 B2 52 31 AA 31 49 28 49 29 AA 31 00 B3 39 |R1.R1.1I(I).1..9|
000019B0: 4C 09 82 00 B9 39 56 09 3A 00 FF 39 60 09 8B 20 |L....9V.:..9`.. |
000019C0: 52 31 B1 32 35 35 A7 99 22 4D 41 58 20 44 41 54 |R1.255.."MAX DAT|
000019D0: 41 20 52 45 47 45 4C 4C 45 4E 47 54 45 20 4F 56 |A REGELLENGTE OV|
000019E0: 45 52 53 43 48 52 45 44 45 4E 21 20 49 4E 4B 4F |ERSCHREDEN! INKO|
000019F0: 52 54 45 4E 2B 53 54 41 52 54 45 4E 22 3A 90 00 |RTEN+STARTEN":..|
00001A00: 05 3A 6A 09 3A 00 4D 3A 74 09 41 52 B2 B5 28 28 |.:j.:.M:t.AR..((|
00001A10: 28 35 37 30 AB 36 29 AC 32 35 34 29 AD 28 52 31 |(570.6).254).(R1|
00001A20: AA 4A 31 AA 31 AA 36 AA 31 29 29 3A 8F 20 4D 41 |.J1.1.6.1)):. MA|
00001A30: 58 20 41 41 4E 54 41 4C 20 44 41 54 41 52 45 47 |X AANTAL DATAREG|
00001A40: 45 4C 53 20 42 45 52 45 4B 45 4E 45 4E 00 75 3A |ELS BEREKENEN.u:|
00001A50: 7E 09 8B 41 52 B1 39 39 39 A7 41 52 B2 39 39 39 |~..AR.999.AR.999|
00001A60: 3A 8F 20 4D 41 58 2E 39 39 39 20 44 41 54 41 52 |:. MAX.999 DATAR|
00001A70: 45 47 45 4C 53 00 7B 3A 88 09 3A 00 97 3A 92 09 |EGELS.{:..:..:..|
00001A80: 8F 20 3E 47 45 42 52 55 49 4B 45 52 20 43 4F 52 |. >GEBRUIKER COR|
00001A90: 45 43 54 49 45 3F 3C 00 BC 3A 9C 09 41 24 B2 22 |ECTIE?<..:..A$."|
00001AA0: 4D 41 58 55 4D 41 41 4C 20 41 41 4E 54 41 4C 20 |MAXUMAAL AANTAL |
00001AB0: 44 41 54 41 20 52 45 47 45 4C 53 22 00 C8 3A A6 |DATA REGELS"..:.|
00001AC0: 09 99 41 24 3B 41 52 3B 00 ED 3A B0 09 9E 53 45 |..A$;AR;..:...SE|
00001AD0: 2C C3 28 41 24 29 AA 31 2C C2 28 32 35 33 29 2C |,.(A$).1,.(253),|
00001AE0: 34 2C 2C 4E 55 24 2C 43 52 24 2C 41 24 00 12 3B |4,,NU$,CR$,A$..;|
00001AF0: BA 09 8B C5 28 41 24 29 B1 41 52 4F C5 28 41 24 |....(A$).ARO.(A$|
00001B00: 29 B3 B2 31 A7 99 3A 99 55 50 24 3B 3A 89 32 34 |)..1..:.UP$;:.24|
00001B10: 36 30 00 18 3B C4 09 3A 00 25 3B CE 09 41 52 B2 |60..;..:.%;..AR.|
00001B20: C5 28 41 24 29 00 2B 3B D8 09 3A 00 43 3B E2 09 |.(A$).+;..:.C;..|
00001B30: 8F 20 3E 42 45 53 54 41 4E 44 4F 50 42 4F 55 57 |. >BESTANDOPBOUW|
00001B40: 45 4E 3C 00 5D 3B EC 09 FE 0D 23 32 22 49 4E 46 |EN<.];....#2"INF|
00001B50: 4F 42 45 53 54 41 4E 44 2C 55 2C 57 22 00 64 3B |OBESTAND,U,W".d;|
00001B60: F6 09 A0 32 00 86 3B 00 0A 8B 44 53 B3 B1 30 A7 |...2..;...DS..0.|
00001B70: 8D 31 37 35 30 3A 89 32 35 34 30 3A 8F 55 49 54 |.1750:.2540:.UIT|
00001B80: 56 4F 45 52 45 4E 00 8C 3B 0A 0A 3A 00 AE 3B 14 |VOEREN..;..:..;.|
00001B90: 0A 8D 38 31 32 30 3A 8F 20 49 4E 46 4F 42 45 53 |..8120:. INFOBES|
00001BA0: 54 41 4E 44 20 53 43 48 52 49 4A 56 45 4E 00 B4 |TAND SCHRIJVEN..|
00001BB0: 3B 1E 0A 3A 00 CD 3B 28 0A 8F A0 3E 52 45 43 4F |;..:..;(...>RECO|
00001BC0: 52 44 20 56 52 49 4A 47 45 56 45 4E 3C 00 D5 3B |RD VRIJGEVEN<..;|
00001BD0: 32 0A B2 FE 0D 00 F1 3B 3C 0A B2 23 33 2C 28 41 |2......;<..#3,(A|
00001BE0: 52 29 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 52 45 |R):. POSITIONERE|
00001BF0: 4E 00 18 3C 46 0A 99 23 33 2C C7 28 32 35 35 29 |N..<F..#3,.(255)|
00001C00: 3A 56 52 49 4A 47 41 56 45 54 45 4B 45 4E 20 53 |:VRIJGAVETEKEN S|
00001C10: 43 48 52 49 4A 56 45 4E 00 1F 3C 50 0A A0 33 00 |CHRIJVEN..<P..3.|
00001C20: 25 3C 5A 0A 3A 00 39 3C 64 0A 9F 31 2C 38 2C 31 |%<Z.:.9<d..1,8,1|
00001C30: 35 3A 84 31 2C 45 3A A0 31 00 6F 3C 6E 0A 8B 45 |5:.1,E:.1.o<n..E|
00001C40: B3 B1 30 AF 45 B3 B1 35 30 A7 8D 31 37 35 30 3A |..0.E..50..1750:|
00001C50: 99 22 44 49 53 4B 45 54 54 45 46 4F 55 54 21 20 |."DISKETTEFOUT! |
00001C60: 4E 49 45 55 57 45 20 53 54 41 52 54 22 3A 80 00 |NIEUWE START":..|
00001C70: 75 3C 78 0A 8E 00 7B 3C 82 0A 3A 00 81 3C 8C 0A |u<x...{<..:..<..|
00001C80: 3A 00 A6 3C 96 0A 8F 20 2A 2A 2A 20 49 4E 56 4F |:..<... *** INVO|
00001C90: 45 52 20 56 41 4E 20 44 41 54 41 20 52 45 47 45 |ER VAN DATA REGE|
00001CA0: 4C 53 20 2A 2A 2A 00 B2 3C A0 0A 99 43 4C 45 41 |LS ***..<...CLEA|
00001CB0: 52 24 00 C5 3C AA 0A 8D 38 35 33 30 3A 8F 20 49 |R$..<...8530:. I|
00001CC0: 4E 46 4F 27 53 00 CB 3C B4 0A 3A 00 EC 3C BE 0A |NFO'S..<..:..<..|
00001CD0: 8F 20 3E 4D 41 53 4B 45 52 47 45 4E 45 52 41 54 |. >MASKERGENERAT|
00001CE0: 4F 52 20 49 4E 49 54 49 41 4C 2E 3C 00 F6 3C C8 |OR INITIAL.<..<.|
00001CF0: 0A 4D 46 B2 46 41 00 FC 3C D2 0A 3A 00 07 3D DC |.MF.FA..<..:..=.|
00001D00: 0A 81 49 B2 31 A4 46 00 4D 3D E6 0A 3A 3A 4D 4E |..I.1.F.M=..::MN|
00001D10: 24 28 49 29 B2 4E 49 24 28 49 29 3A 4D 31 28 49 |$(I).NI$(I):M1(I|
00001D20: 29 B2 31 49 28 49 29 3A 4D 53 28 49 29 B2 53 49 |).1I(I):MS(I).SI|
00001D30: 28 49 29 3A 4D 5A 28 49 29 B2 5A 49 28 49 29 3A |(I):MZ(I).ZI(I):|
00001D40: 4D 5A 24 28 49 29 B2 45 5A 24 28 49 29 00 53 3D |MZ$(I).EZ$(I).S=|
00001D50: F0 0A 82 00 59 3D FA 0A 3A 00 99 3D 04 0B 8B 4E |....Y=..:..=...N|
00001D60: B1 41 52 A7 32 39 37 30 3A 8F 20 4D 41 58 2E 41 |.AR.2970:. MAX.A|
00001D70: 41 4E 54 41 4C 20 44 41 54 41 52 45 47 45 4C 53 |ANTAL DATAREGELS|
00001D80: 20 42 45 52 45 49 4B 54 20 28 3D 42 45 53 54 41 | BEREIKT (=BESTA|
00001D90: 4E 44 20 56 4F 4C 29 3F 3F 00 9F 3D 0E 0B 3A 00 |ND VOL)??..=..:.|
00001DA0: C0 3D 18 0B 8F 20 3E 4F 56 45 52 47 41 56 45 53 |.=... >OVERGAVES|
00001DB0: 54 52 49 4E 47 53 20 49 4E 49 54 49 41 4C 2E 3C |TRINGS INITIAL.<|
00001DC0: 00 CC 3D 22 0B 81 49 B2 31 A4 4D 46 00 E7 3D 2C |..="..I.1.MF..=,|
00001DD0: 0B 3A 3A 4D 52 24 28 49 29 B2 22 20 22 3A 49 24 |.::MR$(I)." ":I$|
00001DE0: 28 49 29 B2 22 20 22 00 ED 3D 36 0B 82 00 F3 3D |(I)." "..=6....=|
00001DF0: 40 0B 3A 00 0C 3E 4A 0B 8D 31 38 32 30 3A 8F 20 |@.:..>J..1820:. |
00001E00: 4D 41 53 4B 45 52 4F 50 42 4F 55 57 00 28 3E 54 |MASKEROPBOUW.(>T|
00001E10: 0B 8D 31 39 30 30 3A 8F 20 4D 41 53 4B 45 52 42 |..1900:. MASKERB|
00001E20: 45 53 54 55 52 49 4E 47 00 2E 3E 5E 0B 3A 00 55 |ESTURING..>^.:.U|
00001E30: 3E 68 0B 8B 41 B2 31 33 33 A7 33 31 32 30 3A 8F |>h..A.133.3120:.|
00001E40: 20 4D 45 54 20 41 53 43 20 31 20 42 45 45 49 4E | MET ASC 1 BEEIN|
00001E50: 44 49 47 45 4E 00 5B 3E 72 0B 3A 00 87 3E 7C 0B |DIGEN.[>r.:..>|.|
00001E60: 8D 33 31 36 30 3A 8F 20 44 41 54 41 52 45 47 45 |.3160:. DATAREGE|
00001E70: 4C 20 53 43 48 52 49 4A 56 45 4E 20 45 4E 20 49 |L SCHRIJVEN EN I|
00001E80: 4E 56 4F 45 52 45 4E 00 A4 3E 86 0B 89 32 38 32 |NVOEREN..>...282|
00001E90: 30 3A 8F 20 56 4F 4C 47 45 4E 44 45 20 49 4E 56 |0:. VOLGENDE INV|
00001EA0: 4F 45 52 3F 00 AA 3E 90 0B 3A 00 F0 3E 9A 0B 8B |OER?..>..:..>...|
00001EB0: 4E 45 B3 41 52 A7 33 30 35 30 3A 8F 20 4E 55 4D |NE.AR.3050:. NUM|
00001EC0: 4D 45 52 20 45 43 48 54 20 4B 4C 45 49 4E 44 45 |MER ECHT KLEINDE|
00001ED0: 52 20 44 41 4E 20 48 45 54 20 4D 41 58 2E 41 41 |R DAN HET MAX.AA|
00001EE0: 4E 54 41 4C 20 44 41 54 41 52 45 47 45 4C 53 3F |NTAL DATAREGELS?|
00001EF0: 00 04 3F A4 0B 8B 20 4D 4F 44 45 20 B2 20 30 20 |..?... MODE . 0 |
00001F00: A7 20 FE 18 00 39 3F AE 0B 99 48 4F 4D 45 24 3B |. ...9?...HOME$;|
00001F10: 41 41 4E 24 22 20 20 48 45 54 42 45 53 54 41 4E |AAN$" HETBESTAN|
00001F20: 44 20 49 53 20 56 4F 4C 20 21 21 21 21 21 21 21 |D IS VOL !!!!!!!|
00001F30: 21 20 20 22 55 49 54 24 3B 00 45 3F B8 0B FE 19 |! "UIT$;.E?....|
00001F40: 3A D5 20 FE 18 00 4B 3F C2 0B 3A 00 52 3F CC 0B |:. ...K?..:.R?..|
00001F50: FE 19 00 5C 3F D6 0B 89 33 31 30 30 00 62 3F E0 |...\?...3100.b?.|
00001F60: 0B 3A 00 71 3F EA 0B 8B 4D 4F 44 45 B2 30 A7 FE |.:.q?...MODE.0..|
00001F70: 18 00 A6 3F F4 0B 99 48 4F 4D 45 24 3B 41 41 4E |...?...HOME$;AAN|
00001F80: 24 22 20 20 4F 56 45 52 57 45 45 47 20 45 45 4E |$" OVERWEEG EEN|
00001F90: 20 52 45 4F 52 47 41 4E 49 53 41 54 49 45 20 20 | REORGANISATIE |
00001FA0: 22 55 49 54 24 3B 00 B1 3F FE 0B FE 19 3A D5 FE |"UIT$;..?....:..|
00001FB0: 18 00 E6 3F 08 0C 99 48 4F 4D 45 24 3B 41 41 4E |...?...HOME$;AAN|
00001FC0: 24 22 20 20 4F 56 45 52 57 45 45 47 20 45 45 4E |$" OVERWEEG EEN|
00001FD0: 20 52 45 4F 52 47 41 4E 49 53 41 54 49 45 20 20 | REORGANISATIE |
00001FE0: 22 55 49 54 24 3B 00 ED 3F 12 0C FE 19 00 02 40 |"UIT$;..?......@|
00001FF0: 1C 0C A1 41 24 3A 8B 41 24 B2 22 A0 22 A7 33 31 |...A$:.A$.".".31|
00002000: 30 30 00 08 40 26 0C 3A 00 0E 40 30 0C 8E 00 14 |00..@&.:..@0....|
00002010: 40 3A 0C 3A 00 1A 40 44 0C 3A 00 3C 40 4E 0C 8F |@:.:..@D.:.<@N..|
00002020: 20 2A 2A 2A 20 49 4E 56 4F 45 52 20 53 55 42 50 | *** INVOER SUBP|
00002030: 52 4F 47 52 41 4D 4D 41 20 2A 2A 2A 00 47 40 58 |ROGRAMMA ***.G@X|
00002040: 0C 41 24 B2 22 A0 22 00 4D 40 62 0C 3A 00 6D 40 |.A$.".".M@b.:.m@|
00002050: 6C 0C 8F 20 3E 45 45 4E 20 44 41 54 41 53 54 52 |l.. >EEN DATASTR|
00002060: 49 4E 47 20 41 41 4E 4D 41 4B 45 4E 3C 00 7A 40 |ING AANMAKEN<.z@|
00002070: 76 0C 81 20 49 B2 31 A4 4D 46 00 98 40 80 0C 3A |v.. I.1.MF..@..:|
00002080: 3A 8B 4D 52 24 28 49 29 B2 22 A0 22 A7 4D 52 24 |:.MR$(I).".".MR$|
00002090: 28 49 29 B2 C7 28 31 29 00 AF 40 8A 0C 3A 3A 41 |(I)..(1)..@..::A|
000020A0: 24 B2 41 24 AA 4D 52 24 28 49 29 AA 43 52 24 00 |$.A$.MR$(I).CR$.|
000020B0: B5 40 94 0C 82 00 BB 40 9E 0C 3A 00 C1 40 A8 0C |.@.....@..:..@..|
000020C0: 3A 00 E4 40 B2 0C 8F 20 2A 2A 2A 20 44 41 54 41 |:..@... *** DATA|
000020D0: 53 54 52 49 4E 47 20 53 43 48 52 49 4A 56 45 4E |STRING SCHRIJVEN|
000020E0: 20 2A 2A 2A 00 F7 40 BC 0C FE 0D 23 33 2C 42 45 | ***..@....#3,BE|
000020F0: 53 C0 44 2C 31 2C 22 00 12 41 C6 0C B2 23 33 2C |S.D,1,"..A...#3,|
00002100: 28 4E 29 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 52 |(N):. POSITIONER|
00002110: 45 4E 00 1E 41 D0 0C 99 23 33 2C 41 24 3B 00 26 |EN..A...#3,A$;.&|
00002120: 41 DA 0C A0 20 33 00 2C 41 E4 0C 3A 00 32 41 EE |A... 3.,A..:.2A.|
00002130: 0C 3A 00 58 41 F8 0C 8F 20 2A 2A 2A 20 49 4E 44 |.:.XA... *** IND|
00002140: 45 58 54 41 42 45 4C 20 41 4B 54 55 41 4C 49 53 |EXTABEL AKTUALIS|
00002150: 45 52 45 4E 20 2A 2A 2A 00 6B 41 02 0D 41 24 B2 |EREN ***.kA..A$.|
00002160: 22 3E 22 AA 4D 52 24 28 4A 46 29 00 8B 41 0C 0D |">".MR$(JF)..A..|
00002170: 9E 53 53 2C 2C 2C 2C 2C 41 24 2C 4A 46 24 28 30 |.SS,,,,,A$,JF$(0|
00002180: 29 2C 4A 46 24 28 31 29 2C 50 25 00 91 41 16 0D |),JF$(1),P%..A..|
00002190: 3A 00 9F 41 20 0D 8B 50 25 B2 30 A7 20 FE 18 00 |:..A ..P%.0. ...|
000021A0: BD 41 2A 0D 3A 3A 4A 46 24 28 4E 45 AA 31 29 B2 |.A*.::JF$(NE.1).|
000021B0: C8 28 4D 52 24 28 4A 46 29 2C 4A 4C 29 00 CE 41 |.(MR$(JF),JL)..A|
000021C0: 34 0D 3A 3A 50 25 28 4E 45 AA 31 29 B2 4E 00 D8 |4.::P%(NE.1).N..|
000021D0: 41 3E 0D FE 19 D5 FE 18 00 F6 41 48 0D 3A 3A 9E |A>........AH.::.|
000021E0: 53 42 2C 31 2C 2C 2C 2C 4A 46 24 28 30 29 2C 4A |SB,1,,,,JF$(0),J|
000021F0: 46 24 28 50 25 29 00 12 42 52 0D 3A 3A 9E 53 42 |F$(P%)..BR.::.SB|
00002200: 2C 31 2C 2C 2C 2C 50 25 28 30 29 2C 50 25 28 50 |,1,,,,P%(0),P%(P|
00002210: 25 29 00 2E 42 5C 0D 3A 3A 4A 46 24 28 50 25 29 |%)..B\.::JF$(P%)|
00002220: B2 C8 28 4D 52 24 28 4A 46 29 2C 4A 4C 29 00 3D |..(MR$(JF),JL).=|
00002230: 42 66 0D 3A 3A 50 25 28 50 25 29 B2 4E 00 44 42 |Bf.::P%(P%).N.DB|
00002240: 70 0D FE 19 00 4A 42 7A 0D 3A 00 6A 42 84 0D 41 |p....JBz.:.jB..A|
00002250: 46 B2 31 3A 8F 20 57 49 4A 5A 49 47 49 4E 47 20 |F.1:. WIJZIGING |
00002260: 55 49 54 47 45 56 4F 45 52 44 00 70 42 8E 0D 3A |UITGEVOERD.pB..:|
00002270: 00 9F 42 98 0D 4E B2 4E AA 31 3A 8F 20 50 4F 49 |..B..N.N.1:. POI|
00002280: 4E 54 45 52 20 4F 50 20 56 4F 4C 47 45 4E 44 45 |NTER OP VOLGENDE|
00002290: 20 52 45 43 4F 52 44 20 4F 50 48 4F 47 45 4E 00 | RECORD OPHOGEN.|
000022A0: CB 42 A2 0D 4E 45 B2 4E 45 AA 31 3A 8F 20 45 43 |.B..NE.NE.1:. EC|
000022B0: 48 54 20 44 41 54 41 20 52 45 47 45 4C 41 41 4E |HT DATA REGELAAN|
000022C0: 54 41 4C 20 4F 50 48 4F 47 45 4E 00 D1 42 AC 0D |TAL OPHOGEN..B..|
000022D0: 8E 00 D7 42 B6 0D 3A 00 DD 42 C0 0D 3A 00 03 43 |...B..:..B..:..C|
000022E0: CA 0D 8F 20 2A 2A 2A 20 50 4F 53 49 54 49 4F 4E |... *** POSITION|
000022F0: 45 52 45 4E 20 45 4E 20 49 4E 4C 45 5A 45 4E 20 |EREN EN INLEZEN |
00002300: 2A 2A 2A 00 17 43 D4 0D B2 23 33 2C 22 42 45 53 |***..C...#3,"BES|
00002310: 54 41 4E 44 2C 31 2C 00 32 43 DE 0D B2 23 33 2C |TAND,1,.2C...#3,|
00002320: 28 52 29 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 52 |(R):. POSITIONER|
00002330: 45 4E 00 38 43 E8 0D 3A 00 44 43 F2 0D 81 49 B2 |EN.8C..:.DC...I.|
00002340: 31 A4 46 41 00 59 43 FC 0D 3A 3A 9E 53 31 2C 2C |1.FA.YC..::.S1,,|
00002350: 33 2C 2C 2C 49 24 28 49 29 00 75 43 06 0E 3A 3A |3,,,I$(I).uC..::|
00002360: 8B 49 24 28 49 29 B2 C7 28 31 29 A7 49 24 28 49 |.I$(I)..(1).I$(I|
00002370: 29 B2 22 A0 22 00 7B 43 10 0E 82 00 81 43 1A 0E |).".".{C.....C..|
00002380: 3A 00 88 43 24 0E A0 33 00 8E 43 2E 0E 8E 00 94 |:..C$..3..C.....|
00002390: 43 38 0E 3A 00 9A 43 42 0E 3A 00 C0 43 4C 0E 8F |C8.:..CB.:..CL..|
000023A0: 20 2A 2A 2A 5A 4F 45 4B 45 4E 20 56 45 52 41 4E | ***ZOEKEN VERAN|
000023B0: 44 45 52 45 4E 20 57 49 53 53 45 4E 20 2A 2A 2A |DEREN WISSEN ***|
000023C0: 00 CC 43 56 0E 99 43 4C 45 41 52 24 00 F3 43 60 |..CV..CLEAR$..C`|
000023D0: 0E 8B 4E 45 B2 30 A7 34 30 38 30 3A 8F 20 41 41 |..NE.0.4080:. AA|
000023E0: 4E 54 41 4C 20 44 41 54 41 52 45 47 45 4C 53 20 |NTAL DATAREGELS |
000023F0: 3D 30 3F 00 0B 44 6A 0E 8D 38 32 34 30 3A 8F 20 |=0?..Dj..8240:. |
00002400: 5A 4F 45 4B 20 49 4E 46 4F 27 53 00 11 44 74 0E |ZOEK INFO'S..Dt.|
00002410: 3A 00 1B 44 7E 0E 4D 46 B2 46 41 00 21 44 88 0E |:..D~.MF.FA.!D..|
00002420: 3A 00 42 44 92 0E 8F 20 3E 4D 41 53 4B 45 52 47 |:.BD... >MASKERG|
00002430: 45 4E 45 52 41 54 4F 52 20 49 4E 49 54 49 41 4C |ENERATOR INITIAL|
00002440: 2E 3C 00 4E 44 9C 0E 81 49 B2 31 A4 4D 46 00 9A |.<.ND...I.1.MF..|
00002450: 44 A6 0E 3A 3A 4D 4E 24 28 49 29 B2 4E 49 24 28 |D..::MN$(I).NI$(|
00002460: 49 29 3A 4D 31 28 49 29 B2 31 49 28 49 29 AA 31 |I):M1(I).1I(I).1|
00002470: 3A 4D 53 28 49 29 B2 53 49 28 49 29 3A 4D 5A 28 |:MS(I).SI(I):MZ(|
00002480: 49 29 B2 5A 49 28 49 29 3A 4D 5A 24 28 49 29 B2 |I).ZI(I):MZ$(I).|
00002490: 45 5A 24 28 49 29 AA 53 4F 24 00 A0 44 B0 0E 3A |EZ$(I).SO$..D..:|
000024A0: 00 A6 44 BA 0E 82 00 AC 44 C4 0E 3A 00 CA 44 CE |..D.....D..:..D.|
000024B0: 0E 8F 20 3E 4F 56 45 52 47 41 56 45 53 54 52 49 |.. >OVERGAVESTRI|
000024C0: 4E 47 20 57 49 53 53 45 4E 3C 00 D7 44 D8 0E 81 |NG WISSEN<..D...|
000024D0: 20 49 B2 31 A4 4D 46 00 F2 44 E2 0E 3A 3A 4D 52 | I.1.MF..D..::MR|
000024E0: 24 28 49 29 B2 22 20 22 3A 49 24 28 49 29 B2 22 |$(I)." ":I$(I)."|
000024F0: 20 22 00 F8 44 EC 0E 82 00 FE 44 F6 0E 3A 00 1A | "..D.....D..:..|
00002500: 45 00 0F 8D 31 38 32 30 3A 8F 20 4D 41 53 4B 45 |E...1820:. MASKE|
00002510: 52 20 4F 50 42 4F 55 57 45 4E 00 34 45 0A 0F 53 |R OPBOUWEN.4E..S|
00002520: 55 42 31 39 30 30 3A 8F 20 4D 2E 42 45 53 54 55 |UB1900:. M.BESTU|
00002530: 52 49 4E 47 00 3A 45 14 0F 3A 00 5C 45 1E 0F 8B |RING.:E..:.\E...|
00002540: 41 B2 31 33 33 A7 34 30 38 30 3A 8F 20 4D 45 54 |A.133.4080:. MET|
00002550: 20 46 31 20 42 45 47 49 4E 4E 45 4E 00 62 45 28 | F1 BEGINNEN.bE(|
00002560: 0F 3A 00 80 45 32 0F 8F 20 3E 49 4E 44 45 58 42 |.:..E2.. >INDEXB|
00002570: 45 53 54 2E 20 44 4F 4F 52 5A 4F 45 4B 45 4E 3C |EST. DOORZOEKEN<|
00002580: 00 AD 45 3C 0F 50 25 B2 31 3A 8F 20 5A 4F 45 4B |..E<.P%.1:. ZOEK|
00002590: 45 4E 20 56 41 4E 41 46 20 45 45 52 53 54 45 20 |EN VANAF EERSTE |
000025A0: 49 4E 44 45 58 20 45 4C 45 4D 45 4E 54 00 DD 45 |INDEX ELEMENT..E|
000025B0: 46 0F 8B 50 25 B1 4E 45 A7 8D 38 32 34 30 3A 89 |F..P%.NE..8240:.|
000025C0: 33 36 38 30 3A 8F 20 42 45 53 54 41 4E 44 20 47 |3680:. BESTAND G|
000025D0: 52 45 4E 53 20 42 45 52 45 49 4B 54 3F 00 03 46 |RENS BEREIKT?..F|
000025E0: 50 0F 9E 53 53 2C 2C 2C 2C 2C 4D 52 24 28 4A 46 |P..SS,,,,,MR$(JF|
000025F0: 29 2C 4A 46 24 28 30 29 2C 4A 46 24 28 50 25 29 |),JF$(0),JF$(P%)|
00002600: 2C 50 25 00 29 46 5A 0F 8B 50 25 B2 30 A7 8D 38 |,P%.)FZ..P%.0..8|
00002610: 32 34 30 3A 89 33 36 38 30 3A 8F 20 4E 49 45 54 |240:.3680:. NIET|
00002620: 20 47 45 56 4F 4E 44 45 4E 00 2F 46 64 0F 3A 00 | GEVONDEN./Fd.:.|
00002630: 3C 46 6E 0F 52 B2 50 25 28 50 25 29 00 58 46 78 |<Fn.R.P%(P%).XFx|
00002640: 0F 8D 33 35 34 30 3A 8F 20 50 4F 53 49 54 49 45 |..3540:. POSITIE|
00002650: 20 49 4E 4C 45 5A 45 4E 00 5E 46 82 0F 3A 00 83 | INLEZEN.^F..:..|
00002660: 46 8C 0F 8F 20 3E 56 45 52 47 45 4C 49 4A 4B 49 |F... >VERGELIJKI|
00002670: 4E 47 20 56 41 4E 20 41 4C 4C 45 20 56 45 4C 44 |NG VAN ALLE VELD|
00002680: 45 4E 3C 00 90 46 96 0F 81 20 49 B2 31 A4 46 41 |EN<..F... I.1.FA|
00002690: 00 AE 46 A0 0F 3A 3A 9E 53 53 2C 2C 2C 2C 2C 4D |..F..::.SS,,,,,M|
000026A0: 52 24 28 49 29 2C 49 24 28 49 29 2C 46 25 00 EE |R$(I),I$(I),F%..|
000026B0: 46 AA 0F 3A 3A 8B 46 25 B3 B1 49 A7 8B 4D 52 24 |F..::.F%..I..MR$|
000026C0: 28 49 29 B3 B1 22 A0 22 A7 50 25 B2 50 25 AA 31 |(I)..".".P%.P%.1|
000026D0: 3A 89 33 39 31 30 3A 8F 20 4E 4F 54 20 46 4F 55 |:.3910:. NOT FOU|
000026E0: 4E 44 20 45 4E 20 3C 3E 20 4C 45 45 47 3F 00 F4 |ND EN <> LEEG?..|
000026F0: 46 B4 0F 82 00 FA 46 BE 0F 3A 00 0E 47 C8 0F 8D |F.....F..:..G...|
00002700: 20 36 32 39 30 3A 8F 20 4D 45 4E 55 20 32 00 14 | 6290:. MENU 2..|
00002710: 47 D2 0F 3A 00 3C 47 DC 0F 8B 20 49 B2 32 A7 50 |G..:.<G... I.2.P|
00002720: 25 B2 50 25 AA 31 3A 89 33 39 31 30 3A 8F 20 56 |%.P%.1:.3910:. V|
00002730: 45 52 44 45 52 20 5A 4F 45 4B 45 4E 00 62 47 E6 |ERDER ZOEKEN.bG.|
00002740: 0F 8B 49 B2 35 A7 33 36 38 30 3A 8F 20 5A 4F 45 |..I.5.3680:. ZOE|
00002750: 4B 45 4E 20 4F 50 4E 49 45 57 20 53 54 41 52 54 |KEN OPNIEW START|
00002760: 45 4E 00 68 47 F0 0F 8E 00 6E 47 FA 0F 3A 00 74 |EN.hG....nG..:.t|
00002770: 47 04 10 3A 00 94 47 0E 10 8F 20 2A 2A 2A 20 47 |G..:..G... *** G|
00002780: 45 4F 52 44 45 4E 44 45 20 55 49 54 56 4F 45 52 |EORDENDE UITVOER|
00002790: 20 2A 2A 2A 00 B2 47 18 10 53 46 B2 4A 46 3A 8F | ***..G..SF.JF:.|
000027A0: 20 49 4E 44 45 58 20 42 45 56 45 49 4C 49 47 49 | INDEX BEVEILIGI|
000027B0: 4E 47 00 C6 47 22 10 8B 20 4D 4F 44 45 20 49 53 |NG..G".. MODE IS|
000027C0: 20 30 A7 20 FE 18 00 01 48 2C 10 99 43 4C 45 41 | 0. ....H,..CLEA|
000027D0: 52 24 41 41 4E 24 22 20 20 20 47 45 4F 52 44 45 |R$AAN$" GEORDE|
000027E0: 4E 44 45 20 55 49 54 56 4F 45 52 20 56 41 4E 20 |NDE UITVOER VAN |
000027F0: 42 45 53 54 41 4E 44 20 20 20 22 20 55 49 54 24 |BESTAND " UIT$|
00002800: 3B 00 0D 48 36 10 FE 19 3A D5 20 FE 18 00 48 48 |;..H6...:. ...HH|
00002810: 40 10 99 43 4C 45 41 52 24 41 41 4E 24 22 20 20 |@..CLEAR$AAN$" |
00002820: 20 47 45 4F 52 44 45 4E 44 45 20 55 49 54 56 4F | GEORDENDE UITVO|
00002830: 45 52 20 56 41 4E 20 42 45 53 54 41 4E 44 20 20 |ER VAN BESTAND |
00002840: 20 22 20 55 49 54 24 3B 00 4F 48 4A 10 FE 19 00 | " UIT$;.OHJ....|
00002850: 55 48 54 10 3A 00 72 48 5E 10 8F 20 3E 53 4F 52 |UHT.:.rH^.. >SOR|
00002860: 54 45 45 52 56 45 4C 44 20 41 46 56 52 41 47 45 |TEERVELD AFVRAGE|
00002870: 4E 3C 00 81 48 68 10 9E 43 52 2C 2C 38 2C 30 2C |N<..Hh..CR,,8,0,|
00002880: 30 00 A3 48 72 10 41 24 B2 22 53 4F 52 54 45 52 |0..Hr.A$."SORTER|
00002890: 45 4E 20 4E 41 41 52 20 56 45 4C 44 4E 55 4D 4D |EN NAAR VELDNUMM|
000028A0: 45 52 22 00 D4 48 7C 10 99 41 24 3B 53 46 3B 22 |ER"..H|..A$;SF;"|
000028B0: 20 20 28 43 52 29 22 3B 3A 8F 20 53 54 41 4E 44 | (CR)";:. STAND|
000028C0: 41 41 52 44 57 41 41 52 44 45 3D 49 4E 44 45 58 |AARDWAARDE=INDEX|
000028D0: 56 45 4C 44 00 FB 48 86 10 9E 53 45 2C C3 28 41 |VELD..H...SE,.(A|
000028E0: 24 29 AA 31 2C 38 2C C3 28 C4 28 46 41 29 29 2C |$).1,8,.(.(FA)),|
000028F0: 2C 4E 55 24 2C 43 52 24 2C 41 24 00 08 49 90 10 |,NU$,CR$,A$..I..|
00002900: 4A 46 B2 C5 28 41 24 29 00 34 49 9A 10 8B 4A 46 |JF..(A$).4I...JF|
00002910: B3 31 B0 4A 46 B1 46 41 A7 34 31 33 30 3A 8F 20 |.1.JF.FA.4130:. |
00002920: 47 45 4C 44 49 47 20 53 4F 52 54 45 45 52 56 45 |GELDIG SORTEERVE|
00002930: 4C 44 20 3F 00 3A 49 A4 10 3A 00 49 49 AE 10 8B |LD ?.:I..:.II...|
00002940: 4D 4F 44 45 B2 30 A7 FE 18 00 84 49 B8 10 99 43 |MODE.0.....I...C|
00002950: 4C 45 41 52 24 41 41 4E 24 22 20 20 20 20 20 20 |LEAR$AAN$" |
00002960: 20 53 4F 52 54 45 45 52 4D 41 53 4B 45 52 20 20 | SORTEERMASKER |
00002970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 55 | "U|
00002980: 49 54 24 3B 00 9D 49 C2 10 9E 43 52 2C 2C 32 32 |IT$;..I...CR,,22|
00002990: 2C 30 2C 30 3A 8F 20 43 55 52 53 4F 52 00 D4 49 |,0,0:. CURSOR..I|
000029A0: CC 10 99 41 41 4E 24 22 46 31 20 3D 20 4D 45 4E |...AAN$"F1 = MEN|
000029B0: 55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |U |
000029C0: 46 37 20 3D 20 53 4F 52 54 45 52 45 4E 20 22 55 |F7 = SORTEREN "U|
000029D0: 49 54 24 3B 00 E0 49 D6 10 FE 19 3A D5 20 FE 18 |IT$;..I....:. ..|
000029E0: 00 0D 4A E0 10 99 43 4C 45 41 52 24 41 41 4E 24 |..J...CLEAR$AAN$|
000029F0: 22 20 20 20 20 20 20 20 53 4F 52 54 45 45 52 4D |" SORTEERM|
00002A00: 41 53 4B 45 52 20 20 22 55 49 54 24 22 00 26 4A |ASKER "UIT$".&J|
00002A10: EA 10 9E 43 52 2C 2C 32 33 2C 30 2C 30 3A 8F 20 |...CR,,23,0,0:. |
00002A20: 43 55 52 53 4F 52 00 5B 4A F4 10 99 41 41 4E 24 |CURSOR.[J...AAN$|
00002A30: 22 20 20 20 20 20 20 20 20 20 46 31 20 3D 4D 45 |" F1 =ME|
00002A40: 4E 55 20 20 20 20 20 20 46 37 20 3D 20 53 4F 52 |NU F7 = SOR|
00002A50: 54 45 52 45 4E 22 55 49 54 24 3B 00 61 4A FE 10 |TEREN"UIT$;.aJ..|
00002A60: 3A 00 68 4A 08 11 FE 19 00 8A 4A 12 11 3A 8F 20 |:.hJ......J..:. |
00002A70: 3E 4D 41 53 4B 45 52 47 45 4E 45 52 41 54 4F 52 |>MASKERGENERATOR|
00002A80: 20 49 4E 49 54 49 41 4C 2E 3C 00 94 4A 1C 11 4D | INITIAL.<..J..M|
00002A90: 46 B2 46 41 00 9A 4A 26 11 3A 00 A6 4A 30 11 81 |F.FA..J&.:..J0..|
00002AA0: 49 B2 31 A4 4D 46 00 F2 4A 3A 11 3A 3A 4D 4E 24 |I.1.MF..J:.::MN$|
00002AB0: 28 49 29 B2 4E 49 24 28 49 29 3A 4D 31 28 49 29 |(I).NI$(I):M1(I)|
00002AC0: B2 31 49 28 49 29 AA 31 3A 4D 24 28 49 29 B2 53 |.1I(I).1:M$(I).S|
00002AD0: 49 28 49 29 3A 4D 5A 28 49 29 B2 5A 49 28 49 29 |I(I):MZ(I).ZI(I)|
00002AE0: 3A 4D 5A 24 28 49 29 B2 45 5A 24 28 49 29 AA 53 |:MZ$(I).EZ$(I).S|
00002AF0: 4F 24 00 0D 4B 44 11 3A 3A 4D 52 24 28 49 29 B2 |O$..KD.::MR$(I).|
00002B00: 22 20 22 3A 49 24 28 49 29 B2 22 20 22 00 13 4B |" ":I$(I)." "..K|
00002B10: 4E 11 82 00 19 4B 58 11 3A 00 35 4B 62 11 8D 31 |N....KX.:.5Kb..1|
00002B20: 38 32 30 3A 8F 20 4D 41 53 4B 45 52 20 4F 50 42 |820:. MASKER OPB|
00002B30: 4F 55 57 45 4E 00 51 4B 6C 11 8D 31 39 30 30 3A |OUWEN.QKl..1900:|
00002B40: 8F 20 4D 41 53 4B 45 52 42 45 53 54 55 52 49 4E |. MASKERBESTURIN|
00002B50: 47 00 61 4B 76 11 8B 41 B2 31 33 33 A7 35 32 32 |G.aKv..A.133.522|
00002B60: 30 00 67 4B 80 11 3A 00 82 4B 8A 11 8F 3E 5A 4F |0.gK..:..K...>ZO|
00002B70: 45 4B 43 52 45 54 45 52 49 41 20 52 45 44 44 45 |EKCRETERIA REDDE|
00002B80: 4E 3C 00 8D 4B 94 11 81 49 B2 31 A4 41 00 A0 4B |N<..K...I.1.A..K|
00002B90: 9E 11 3A 3A 53 24 28 49 29 B2 4D 52 24 28 49 29 |..::S$(I).MR$(I)|
00002BA0: 00 A6 4B A8 11 82 00 AC 4B B2 11 3A 00 D5 4B BC |..K.....K..:..K.|
00002BB0: 11 FE 0D 23 33 2C 22 42 45 53 54 41 4E 44 2C 31 |...#3,"BESTAND,1|
00002BC0: 22 3A 8F 20 44 41 54 41 4B 41 4E 41 41 4C 20 4F |":. DATAKANAAL O|
00002BD0: 50 45 4E 45 4E 00 07 4C C6 11 8B 53 46 B2 4A 46 |PENEN..L...SF.JF|
00002BE0: A7 34 38 31 30 3A 8F 20 4F 55 44 20 49 4E 44 45 |.4810:. OUD INDE|
00002BF0: 58 56 45 4C 44 20 3D 20 4E 49 45 55 57 20 49 4E |XVELD = NIEUW IN|
00002C00: 44 45 58 56 45 4C 44 00 49 4C D0 11 8B 41 46 B2 |DEXVELD.IL...AF.|
00002C10: 31 A7 8D 37 37 34 30 3A 8F 20 57 49 4A 5A 49 4E |1..7740:. WIJZIN|
00002C20: 47 45 4E 3F 20 4A 41 20 44 41 4E 20 49 4E 44 45 |GEN? JA DAN INDE|
00002C30: 58 20 52 45 45 44 44 45 4E 20 44 4F 4F 52 20 56 |X REEDDEN DOOR V|
00002C40: 41 53 54 4C 45 47 47 45 4E 00 4F 4C DA 11 3A 00 |ASTLEGGEN.OL..:.|
00002C50: 62 4C E4 11 8F 3C 49 4E 44 45 58 54 41 42 45 4C |bL...<INDEXTABEL|
00002C60: 2E 3C 00 6E 4C EE 11 81 49 B2 31 A4 41 52 00 87 |.<.nL...I.1.AR..|
00002C70: 4C F8 11 3A 3A 50 25 28 49 29 B2 30 3A 4A 46 24 |L..::P%(I).0:JF$|
00002C80: 28 49 29 B2 22 A0 22 00 8D 4C 02 12 82 00 93 4C |(I)."."..L.....L|
00002C90: 0C 12 3A 00 C9 4C 16 12 8F 20 3E 49 4E 44 45 58 |..:..L... >INDEX|
00002CA0: 54 41 42 45 4C 20 4E 49 45 55 57 20 4F 50 42 4F |TABEL NIEUW OPBO|
00002CB0: 55 57 45 4E 20 28 49 4E 44 45 58 3D 53 4F 52 54 |UWEN (INDEX=SORT|
00002CC0: 45 45 52 56 45 4C 44 29 3C 00 F1 4C 20 12 4E 45 |EERVELD)<..L .NE|
00002CD0: B2 30 3A 4E 4E B2 4E 3A 4E B2 31 3A 8F 20 52 45 |.0:NN.N:N.1:. RE|
00002CE0: 44 44 45 4E 3B 4E 2C 4E 45 20 49 4E 49 54 49 41 |DDEN;N,NE INITIA|
00002CF0: 4C 00 F7 4C 2A 12 3A 00 05 4D 34 12 81 52 B2 31 |L..L*.:..M4..R.1|
00002D00: A4 4E 4E AB 31 00 1A 4D 3E 12 3A 3A B2 91 2C 28 |.NN.1..M>.::..,(|
00002D10: 52 29 3A 8F 20 50 4F 53 49 54 00 27 4D 48 12 3A |R):. POSIT.'MH.:|
00002D20: 3A A1 23 33 2C 41 24 00 60 4D 52 12 3A 3A 8B 41 |:.#3,A$.`MR.::.A|
00002D30: 24 B2 C7 28 32 35 35 29 B0 41 24 B2 22 20 22 A7 |$..(255).A$." ".|
00002D40: 4E B2 4E AA 31 3A 89 34 37 38 30 3A 8F 20 52 45 |N.N.1:.4780:. RE|
00002D50: 43 4F 52 44 20 56 52 49 4A 47 45 56 45 4E 20 3F |CORD VRIJGEVEN ?|
00002D60: 00 7D 4D 5C 12 3A 3A B2 23 33 2C 28 52 29 3A 8F |.}M\.::.#3,(R):.|
00002D70: 20 50 4F 53 49 54 49 4F 4E 45 52 45 4E 00 83 4D | POSITIONEREN..M|
00002D80: 66 12 3A 00 92 4D 70 12 3A 3A 81 49 31 B2 31 A4 |f.:..Mp.::.I1.1.|
00002D90: 46 41 00 AB 4D 7A 12 3A 3A 3A 3A 9E 53 49 2C 2C |FA..Mz.::::.SI,,|
00002DA0: 33 2C 2C 2C 4D 52 24 28 49 31 29 00 CD 4D 84 12 |3,,,MR$(I1)..M..|
00002DB0: 3A 3A 3A 3A 8B 4D 52 24 28 49 31 29 B2 C7 28 31 |::::.MR$(I1)..(1|
00002DC0: 29 A7 4D 52 24 28 49 31 29 B2 22 A0 22 00 D5 4D |).MR$(I1)."."..M|
00002DD0: 8E 12 3A 3A 82 00 DB 4D 98 12 3A 00 F8 4D A2 12 |..::...M..:..M..|
00002DE0: 3A 3A 8D 33 33 32 30 3A 8F 20 49 4E 44 45 58 20 |::.3320:. INDEX |
00002DF0: 49 4E 56 4F 45 52 45 4E 00 FE 4D AC 12 82 00 04 |INVOEREN..M.....|
00002E00: 4E B6 12 3A 00 11 4E C0 12 81 49 33 B2 49 A4 4E |N..:..N...I3.I.N|
00002E10: 45 00 24 4E CA 12 9F 35 2C 44 50 28 34 29 2C 44 |E.$N...5,DP(4),D|
00002E20: 50 28 35 29 00 2A 4E D4 12 3A 00 4E 4E DE 12 8F |P(5).*N..:.NN...|
00002E30: 20 3E 44 41 54 41 52 45 47 45 4C 53 20 47 45 53 | >DATAREGELS GES|
00002E40: 4F 52 54 45 45 52 44 20 4C 45 5A 45 4E 3C 00 69 |ORTEERD LEZEN<.i|
00002E50: 4E E8 12 3A 3A B2 23 33 2C 28 50 25 28 49 31 29 |N..::.#3,(P%(I1)|
00002E60: 29 3A 8F 20 50 4F 53 49 54 00 6F 4E F2 12 3A 00 |):. POSIT.oN..:.|
00002E70: 8E 4E FC 12 3A 3A 81 49 31 B2 31 A4 46 41 3A 53 |.N..::.I1.1.FA:S|
00002E80: 55 53 53 49 2C 2C 33 2C 2C 49 24 28 49 29 00 AE |USSI,,3,,I$(I)..|
00002E90: 4E 06 13 3A 3A 3A 3A 8B 49 53 28 49 31 29 B2 C7 |N..::::.IS(I1)..|
00002EA0: 28 31 29 A7 49 24 28 49 31 29 B2 22 20 22 00 B6 |(1).I$(I1)." "..|
00002EB0: 4E 10 13 3A 3A 82 00 BC 4E 1A 13 3A 00 E2 4E 24 |N..::...N..:..N$|
00002EC0: 13 3A 3A 8F 20 3E 56 45 52 47 45 4C 49 4A 4B 49 |.::. >VERGELIJKI|
00002ED0: 4E 47 20 4D 45 54 20 48 45 54 20 4D 41 53 4B 45 |NG MET HET MASKE|
00002EE0: 52 3C 00 F1 4E 2E 13 3A 3A 81 49 34 B2 31 A4 46 |R<..N..::.I4.1.F|
00002EF0: 41 00 18 4F 38 13 3A 3A 3A 3A 9E 53 53 2C 2C 2C |A..O8.::::.SS,,,|
00002F00: 2C 2C 53 24 28 49 34 29 2C 49 24 28 30 29 2C 49 |,,S$(I4),I$(0),I|
00002F10: 24 28 49 34 29 2C 46 25 00 3A 4F 42 13 3A 3A 3A |$(I4),F%.:OB.:::|
00002F20: 3A 8B 46 25 B3 B1 49 34 A7 8B 53 24 28 49 34 29 |:.F%..I4..S$(I4)|
00002F30: B3 B1 22 A0 22 A7 34 39 37 30 00 42 4F 4C 13 3A |..".".4970.BOL.:|
00002F40: 3A 82 00 48 4F 56 13 3A 00 5E 4F 60 13 3A 3A 8D |:..HOV.:.^O`.::.|
00002F50: 37 35 34 30 3A 8F 20 50 52 49 4E 54 45 4E 00 66 |7540:. PRINTEN.f|
00002F60: 4F 6A 13 82 49 33 00 6C 4F 74 13 3A 00 76 4F 7E |Oj..I3.lOt.:.vO~|
00002F70: 13 A0 35 2C A0 33 00 7C 4F 88 13 3A 00 9B 4F 92 |..5,.3.|O..:..O.|
00002F80: 13 8F 20 3E 4E 49 45 55 57 20 49 4E 44 45 58 20 |.. >NIEUW INDEX |
00002F90: 4F 56 45 52 4E 45 4D 45 4E 3F 3C 00 C5 4F 9C 13 |OVERNEMEN?<..O..|
00002FA0: 8B 53 46 B2 4A 46 A7 35 32 32 30 3A 8F 20 4F 55 |.SF.JF.5220:. OU|
00002FB0: 44 45 20 49 4E 44 45 58 20 4F 4E 56 45 52 41 4E |DE INDEX ONVERAN|
00002FC0: 44 45 52 44 3F 00 CB 4F A6 13 3A 00 D7 4F B0 13 |DERD?..O..:..O..|
00002FD0: 99 43 4C 45 41 52 24 00 EA 4F BA 13 9E 43 52 2C |.CLEAR$..O...CR,|
00002FE0: 2C 38 2C 30 2C 30 3A 9E 43 52 00 F0 4F C4 13 3A |,8,0,0:.CR..O..:|
00002FF0: 00 1D 50 CE 13 99 22 4D 4F 45 54 20 56 45 4C 44 |..P..."MOET VELD|
00003000: 4E 55 4D 4D 45 52 22 4A 46 22 4D 45 54 20 44 45 |NUMMER"JF"MET DE|
00003010: 20 41 41 4E 44 55 49 44 49 4E 47 3A 22 00 36 50 | AANDUIDING:".6P|
00003020: D8 13 99 22 2A 2A 2A 20 22 4E 49 24 28 4A 46 29 |..."*** "NI$(JF)|
00003030: 22 20 2A 2A 2A 22 00 57 50 E2 13 99 22 4E 49 45 |" ***".WP..."NIE|
00003040: 55 57 20 49 4E 44 45 58 56 45 4C 44 20 57 4F 52 |UW INDEXVELD WOR|
00003050: 44 20 3F 20 4E 22 3B 00 5D 50 0A 14 3A 00 6D 50 |D ? N";.]P..:.mP|
00003060: 14 14 42 24 B2 22 4A 4E 22 3A 8F 20 3F 00 90 50 |..B$."JN":. ?..P|
00003070: 1E 14 9E 53 45 2C C2 28 43 53 29 AB 31 2C C2 28 |...SE,.(CS).1,.(|
00003080: 43 5A 29 2C 31 2C 2C 42 24 2C 43 52 24 2C 41 24 |CZ),1,,B$,CR$,A$|
00003090: 00 AA 50 28 14 8B 20 41 24 B2 22 4A 22 B0 41 24 |..P(.. A$."J".A$|
000030A0: B2 22 4A 22 A7 20 35 32 31 30 00 CB 50 32 14 4A |."J". 5210..P2.J|
000030B0: 46 B2 53 46 3A 8F 20 49 4E 44 45 58 56 45 4C 44 |F.SF:. INDEXVELD|
000030C0: 20 57 45 45 52 20 48 41 4C 45 4E 00 E3 50 3C 14 | WEER HALEN..P<.|
000030D0: 8D 37 38 37 30 3A 8F 20 49 4E 44 45 58 20 4C 41 |.7870:. INDEX LA|
000030E0: 44 45 4E 00 F2 50 46 14 41 46 B2 30 3A 89 35 32 |DEN..PF.AF.0:.52|
000030F0: 32 30 00 F8 50 50 14 3A 00 01 51 5A 14 41 46 B2 |20..PP.:..QZ.AF.|
00003100: 31 00 07 51 64 14 8E 00 0D 51 6E 14 3A 00 13 51 |1..Qd....Qn.:..Q|
00003110: 78 14 3A 00 33 51 82 14 8F 20 2A 2A 2A 20 50 52 |x.:.3Q... *** PR|
00003120: 49 4E 54 45 52 50 41 52 41 4D 45 54 45 52 53 20 |INTERPARAMETERS |
00003130: 2A 2A 2A 00 3F 51 8C 14 99 43 4C 45 41 52 24 00 |***.?Q...CLEAR$.|
00003140: 51 51 96 14 8B 20 4D 4F 44 45 B2 30 20 A7 20 FE |QQ... MODE.0 . .|
00003150: 18 00 82 51 A0 14 99 41 41 4E 24 22 20 20 20 20 |...Q...AAN$" |
00003160: 20 20 20 50 52 49 4E 54 45 52 50 41 52 41 4D 45 | PRINTERPARAME|
00003170: 54 45 52 53 20 20 20 20 20 20 20 20 22 55 49 54 |TERS "UIT|
00003180: 24 3B 00 9B 51 AA 14 9E 43 52 2C 2C 32 30 2C 30 |$;..Q...CR,,20,0|
00003190: 2C 30 3A 8F 20 43 55 52 53 4F 52 00 D4 51 B4 14 |,0:. CURSOR..Q..|
000031A0: 99 41 41 4E 24 22 20 46 31 20 3D 20 4D 45 4E 55 |.AAN$" F1 = MENU|
000031B0: 20 20 46 37 20 3D 20 50 41 52 41 4D 45 54 45 52 | F7 = PARAMETER|
000031C0: 53 20 56 41 53 54 4C 45 47 47 45 4E 20 20 22 55 |S VASTLEGGEN "U|
000031D0: 49 54 24 3B 00 DE 51 BE 14 99 3A D5 FE 18 00 07 |IT$;..Q...:.....|
000031E0: 52 C8 14 99 41 41 4E 24 22 20 20 20 20 20 20 20 |R...AAN$" |
000031F0: 50 52 49 4E 54 45 52 50 41 52 41 4D 45 54 45 52 |PRINTERPARAMETER|
00003200: 53 22 55 49 54 24 3B 00 20 52 D2 14 9E 43 52 2C |S"UIT$;. R...CR,|
00003210: 2C 32 33 2C 30 2C 30 3A 8F 20 43 55 52 53 4F 52 |,23,0,0:. CURSOR|
00003220: 00 59 52 DC 14 99 41 41 4E 24 20 20 46 31 20 B2 |.YR...AAN$ F1 .|
00003230: 20 4D 45 4E 55 20 20 46 37 20 B2 20 50 41 52 41 | MENU F7 . PARA|
00003240: 4D 45 54 45 52 53 20 56 41 53 54 4C 45 47 47 45 |METERS VASTLEGGE|
00003250: 4E 20 20 22 55 49 54 24 3B 00 60 52 E6 14 FE 19 |N "UIT$;.`R....|
00003260: 00 66 52 F0 14 3A 00 87 52 FA 14 8F 20 3E 4D 41 |.fR..:..R... >MA|
00003270: 53 4B 45 52 47 45 4E 45 52 41 54 4F 52 20 49 4E |SKERGENERATOR IN|
00003280: 49 54 49 41 4C 2E 3C 00 91 52 04 15 4D 46 B2 44 |ITIAL.<..R..MF.D|
00003290: 50 00 97 52 0E 15 3A 00 A3 52 18 15 81 49 B2 31 |P..R..:..R...I.1|
000032A0: A4 4D 46 00 E9 52 22 15 3A 3A 4D 4E 24 28 49 29 |.MF..R".::MN$(I)|
000032B0: B2 44 49 24 28 49 29 3A 4D 31 28 49 29 B2 44 31 |.DI$(I):M1(I).D1|
000032C0: 28 49 29 3A 4D 53 28 49 29 B2 44 53 28 49 29 3A |(I):MS(I).DS(I):|
000032D0: 4D 5A 28 49 29 B2 44 5A 28 49 29 3A 4D 5A 24 28 |MZ(I).DZ(I):MZ$(|
000032E0: 49 29 B2 44 45 24 28 49 29 00 EF 52 2C 15 3A 00 |I).DE$(I)..R,.:.|
000032F0: 22 53 36 15 3A 3A 49 24 28 49 29 B2 C9 28 C4 28 |"S6.::I$(I)..(.(|
00003300: 44 50 28 49 29 29 2C C3 28 C4 28 44 50 28 49 29 |DP(I)),.(.(DP(I)|
00003310: 29 29 AB 31 29 3A 4D 52 24 28 49 29 B2 49 24 28 |)).1):MR$(I).I$(|
00003320: 49 29 00 28 53 40 15 82 00 2E 53 4A 15 3A 00 57 |I).(S@....SJ.:.W|
00003330: 53 54 15 49 24 28 31 29 B2 22 4E 22 3A 8B 44 50 |ST.I$(1)."N":.DP|
00003340: 28 31 29 B2 31 A7 49 24 28 31 29 B2 22 55 22 A7 |(1).1.I$(1)."U".|
00003350: 44 50 28 31 29 B2 31 00 5D 53 5E 15 3A 00 79 53 |DP(1).1.]S^.:.yS|
00003360: 68 15 8D 31 38 32 30 3A 8F 20 4D 41 53 4B 45 52 |h..1820:. MASKER|
00003370: 20 4F 50 42 4F 55 57 45 4E 00 95 53 72 15 8D 31 | OPBOUWEN..Sr..1|
00003380: 39 30 30 3A 8F 20 4D 41 53 4B 45 52 42 45 53 54 |900:. MASKERBEST|
00003390: 55 52 49 4E 47 00 AB 53 7C 15 8B 41 B2 31 33 33 |URING..S|..A.133|
000033A0: A7 35 36 31 30 3A 8F 20 46 31 3F 00 B1 53 86 15 |.5610:. F1?..S..|
000033B0: 3A 00 DB 53 90 15 8F 20 3E 4F 56 45 52 4E 41 4D |:..S... >OVERNAM|
000033C0: 45 20 56 41 4E 20 44 45 20 4E 49 45 55 57 45 20 |E VAN DE NIEUWE |
000033D0: 50 41 52 41 4D 45 54 45 52 53 3C 00 02 54 9A 15 |PARAMETERS<..T..|
000033E0: 8B 20 C5 20 28 4D 52 24 28 31 29 B2 22 55 22 B0 |. . (MR$(1)."U".|
000033F0: 4D 52 24 28 31 29 B2 22 55 22 A7 44 50 28 31 29 |MR$(1)."U".DP(1)|
00003400: B2 31 00 2D 54 A4 15 44 50 28 31 29 B2 30 3A 8B |.1.-T..DP(1).0:.|
00003410: 4D 52 24 28 31 29 B2 22 55 22 B0 4D 52 24 28 31 |MR$(1)."U".MR$(1|
00003420: 29 B2 22 55 22 A7 44 50 28 31 29 B2 31 00 33 54 |)."U".DP(1).1.3T|
00003430: AE 15 3A 00 3F 54 B8 15 81 49 B2 31 A4 44 50 00 |..:.?T...I.1.DP.|
00003440: 55 54 C2 15 3A 3A 44 50 28 49 29 B2 C5 28 4D 52 |UT..::DP(I)..(MR|
00003450: 24 28 49 29 29 00 5B 54 CC 15 82 00 61 54 D6 15 |$(I)).[T....aT..|
00003460: 3A 00 7F 54 E0 15 8D 38 31 31 30 3A 8F 20 49 4E |:..T...8110:. IN|
00003470: 46 4F 27 53 20 56 41 53 54 4C 45 47 47 45 4E 00 |FO'S VASTLEGGEN.|
00003480: 85 54 EA 15 8E 00 8B 54 F4 15 3A 00 91 54 FE 15 |.T.....T..:..T..|
00003490: 3A 00 AD 54 08 16 8F 20 2A 2A 2A 20 52 45 4F 52 |:..T... *** REOR|
000034A0: 47 41 4E 49 53 41 54 49 45 20 2A 2A 2A 00 B9 54 |GANISATIE ***..T|
000034B0: 12 16 99 43 4C 45 41 52 24 00 C9 54 1C 16 8B 4D |...CLEAR$..T...M|
000034C0: 4F 44 45 B2 30 20 A7 FE 18 00 F1 54 26 16 99 41 |ODE.0 .....T&..A|
000034D0: 41 4E 24 22 20 20 20 20 20 52 45 4F 52 47 41 4E |AN$" REORGAN|
000034E0: 49 53 41 54 49 45 20 20 20 20 20 22 55 49 54 24 |ISATIE "UIT$|
000034F0: 3B 00 0A 55 30 16 9E 43 52 2C 2C 32 32 2C 30 2C |;..U0..CR,,22,0,|
00003500: 30 3A 8F 20 43 55 52 53 4F 52 00 45 55 3A 16 99 |0:. CURSOR.EU:..|
00003510: 41 41 4E 24 22 20 46 31 20 3D 20 4D 45 4E 55 20 |AAN$" F1 = MENU |
00003520: 20 20 20 20 20 20 20 20 20 20 20 46 37 20 3D 20 | F7 = |
00003530: 52 45 4F 52 47 41 4E 49 53 41 54 49 45 20 20 22 |REORGANISATIE "|
00003540: 55 49 54 24 3B 00 51 55 44 16 FE 19 3A D5 20 FE |UIT$;.QUD...:. .|
00003550: 18 00 97 55 4E 16 99 41 41 4E 24 22 20 20 20 20 |...UN..AAN$" |
00003560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003580: 20 20 52 45 4F 52 47 41 4E 49 53 41 54 49 45 20 | REORGANISATIE |
00003590: 20 22 55 49 54 24 3B 00 B0 55 58 16 9E 43 52 2C | "UIT$;..UX..CR,|
000035A0: 2C 32 33 2C 30 2C 30 3A 8F 20 43 55 52 53 4F 52 |,23,0,0:. CURSOR|
000035B0: 00 F2 55 62 16 99 41 41 4E 24 22 20 20 20 20 20 |..Ub..AAN$" |
000035C0: 20 20 20 20 20 46 31 20 3D 20 4D 45 4E 55 20 20 | F1 = MENU |
000035D0: 20 20 20 20 20 20 20 20 46 37 20 3D 20 52 45 4F | F7 = REO|
000035E0: 52 47 41 4E 49 53 41 54 49 45 20 20 22 55 49 54 |RGANISATIE "UIT|
000035F0: 24 3B 00 F9 55 6C 16 FE 19 00 FF 55 76 16 3A 00 |$;..Ul.....Uv.:.|
00003600: 1A 56 80 16 8F 20 3E 49 4E 44 45 58 56 45 4C 44 |.V... >INDEXVELD|
00003610: 20 41 46 56 52 41 47 45 4E 3C 00 32 56 8A 16 9E | AFVRAGEN<.2V...|
00003620: 43 52 2C 2C 36 2C 30 2C 30 3A 8F 20 43 55 52 53 |CR,,6,0,0:. CURS|
00003630: 4F 52 00 5C 56 94 16 99 22 57 45 4C 4B 20 56 45 |OR.\V..."WELK VE|
00003640: 4C 44 20 4D 4F 45 54 20 53 4C 45 55 54 45 4C 56 |LD MOET SLEUTELV|
00003650: 45 4C 44 20 5A 49 4A 4E 22 3B 4A 46 00 80 56 9E |ELD ZIJN";JF..V.|
00003660: 16 9E 53 45 2C 33 37 2C 36 2C C3 28 C4 28 46 41 |..SE,37,6,.(.(FA|
00003670: 29 29 AB 31 2C 2C 4E 55 24 2C 45 31 24 2C 41 24 |)).1,,NU$,E1$,A$|
00003680: 00 9C 56 A8 16 8B 20 C2 28 32 35 33 29 B2 31 33 |..V... .(253).13|
00003690: 33 20 A7 36 32 36 30 3A 8F 20 46 31 00 AB 56 B2 |3 .6260:. F1..V.|
000036A0: 16 49 B2 B5 28 C5 28 41 24 29 29 00 B1 56 BC 16 |.I..(.(A$))..V..|
000036B0: 3A 00 E0 56 C6 16 8B 20 49 B3 31 20 B0 20 49 B1 |:..V... I.1 . I.|
000036C0: 41 20 A7 89 35 37 37 30 3A 8F 20 49 4E 44 45 58 |A ..5770:. INDEX|
000036D0: 56 45 4C 44 20 54 4F 45 47 45 53 54 41 41 4E 3F |VELD TOEGESTAAN?|
000036E0: 00 0E 57 D0 16 4A 46 B2 49 3A 8F 20 47 45 4C 44 |..W..JF.I:. GELD|
000036F0: 49 47 45 20 57 41 41 52 44 45 20 41 4C 53 20 49 |IGE WAARDE ALS I|
00003700: 4E 44 45 58 20 4F 56 45 52 4E 45 4D 45 4E 00 14 |NDEX OVERNEMEN..|
00003710: 57 DA 16 3A 00 30 57 E4 16 8F 20 3E 49 4E 44 45 |W..:.0W... >INDE|
00003720: 58 54 41 42 45 4C 20 49 4E 49 54 49 41 4C 2E 3C |XTABEL INITIAL.<|
00003730: 00 3F 57 EE 16 81 20 49 B2 31 20 A4 20 41 52 00 |.?W... I.1 . AR.|
00003740: 57 57 F8 16 3A 3A 4A 46 24 28 49 29 B2 22 22 3A |WW..::JF$(I)."":|
00003750: 50 25 28 49 29 B2 30 00 5D 57 02 17 82 00 63 57 |P%(I).0.]W....cW|
00003760: 0C 17 3A 00 7A 57 16 17 8F 20 3E 49 4E 44 45 58 |..:.zW... >INDEX|
00003770: 20 41 41 4E 4D 41 4B 45 4E 3C 00 96 57 20 17 4E | AANMAKEN<..W .N|
00003780: B2 31 3A 4E 45 B2 30 3A 8F 20 53 54 41 52 54 57 |.1:NE.0:. STARTW|
00003790: 41 41 52 44 45 4E 00 9C 57 2A 17 99 00 AE 57 34 |AARDEN..W*....W4|
000037A0: 17 FE 0D 23 33 2C 22 44 41 54 45 2C 31 22 00 B4 |...#3,"DATE,1"..|
000037B0: 57 3E 17 3A 00 CA 57 48 17 81 20 4C 52 B2 31 20 |W>.:..WH.. LR.1 |
000037C0: A4 20 41 52 3A 41 24 B2 22 22 00 FC 57 52 17 3A |. AR:A$.""..WR.:|
000037D0: 3A B2 23 33 2C 28 4C 52 29 3A B2 23 33 2C 28 4C |:.#3,(LR):.#3,(L|
000037E0: 52 29 3A 8F 20 32 2D 4D 41 41 4C 20 57 45 47 45 |R):. 2-MAAL WEGE|
000037F0: 4E 53 20 44 4F 53 2D 46 4F 55 54 21 00 09 58 5C |NS DOS-FOUT!..X\|
00003800: 17 3A 3A A1 23 33 2C 41 24 00 3F 58 66 17 3A 3A |.::.#3,A$.?Xf.::|
00003810: 8B 20 41 24 B2 C7 28 32 35 35 29 20 B0 20 41 24 |. A$..(255) . A$|
00003820: B2 22 22 20 A7 36 31 33 30 3A 8F 20 52 45 43 4F |."" .6130:. RECO|
00003830: 52 44 20 56 52 49 4A 47 45 47 45 56 45 4E 3F 00 |RD VRIJGEGEVEN?.|
00003840: 71 58 70 17 3A 3A B2 23 33 2C 28 4C 52 29 3A B2 |qXp.::.#3,(LR):.|
00003850: 23 33 2C 28 4C 52 29 3A 8F 20 32 2D 4D 41 41 4C |#3,(LR):. 2-MAAL|
00003860: 20 57 45 47 45 4E 53 20 44 4F 53 2D 46 4F 55 54 | WEGENS DOS-FOUT|
00003870: 21 00 7D 58 7A 17 3A 3A 41 24 B2 22 22 00 83 58 |!.}Xz.::A$.""..X|
00003880: 84 17 3A 00 94 58 8E 17 3A 3A 81 20 49 B2 31 20 |..:..X..::. I.1 |
00003890: A4 20 46 41 00 AC 58 98 17 3A 3A 3A 3A 9E 53 49 |. FA..X..::::.SI|
000038A0: 2C 2C 33 2C 2C 2C 4D 52 24 28 49 29 00 D4 58 A2 |,,3,,,MR$(I)..X.|
000038B0: 17 3A 3A 3A 3A 8B 44 53 B3 B1 30 20 A7 36 31 33 |.::::.DS..0 .613|
000038C0: 30 3A 8F 20 46 4F 55 54 20 4F 50 47 45 54 52 45 |0:. FOUT OPGETRE|
000038D0: 44 45 4E 3F 00 ED 58 AC 17 3A 3A 3A 3A 41 24 B2 |DEN?..X..::::A$.|
000038E0: 41 24 AA 4D 52 24 28 49 29 AA 43 52 24 00 F5 58 |A$.MR$(I).CR$..X|
000038F0: B6 17 3A 3A 82 00 FB 58 C0 17 3A 00 1B 59 CA 17 |..::...X..:..Y..|
00003900: 3A 3A B2 23 33 2C 28 4E 29 3A B2 23 33 2C 28 4E |::.#3,(N):.#3,(N|
00003910: 29 3A 8F 20 32 2D 4D 41 41 4C 21 00 28 59 D4 17 |):. 2-MAAL!.(Y..|
00003920: 3A 3A 98 33 2C 41 24 3B 00 4F 59 DE 17 3A 3A 8D |::.3,A$;.OY..::.|
00003930: 33 33 32 30 3A 8F 20 49 4E 44 45 58 49 4E 56 4F |3320:. INDEXINVO|
00003940: 45 52 20 53 55 42 50 52 4F 47 52 41 4D 4D 41 00 |ER SUBPROGRAMMA.|
00003950: 5B 59 E8 17 3A 3A 99 22 2E 22 3B 00 64 59 F2 17 |[Y..::.".";.dY..|
00003960: 82 20 4C 52 00 6A 59 FC 17 3A 00 8C 59 06 18 8F |. LR.jY..:..Y...|
00003970: 20 3E 4F 56 45 52 49 47 45 20 52 45 43 4F 52 44 | >OVERIGE RECORD|
00003980: 53 20 56 52 49 4A 47 45 56 45 4E 3C 00 9E 59 10 |S VRIJGEVEN<..Y.|
00003990: 18 8B 20 4E B1 41 52 20 A7 20 36 32 33 30 00 AD |.. N.AR . 6230..|
000039A0: 59 1A 18 81 20 49 B2 4E 20 A4 20 41 52 00 CD 59 |Y... I.N . AR..Y|
000039B0: 24 18 3A 3A B2 23 33 2C 28 49 29 3A B2 23 33 2C |$.::.#3,(I):.#3,|
000039C0: 28 49 29 3A 8F 20 32 2D 4D 41 41 4C 21 00 F1 59 |(I):. 2-MAAL!..Y|
000039D0: 2E 18 3A 3A 98 33 2C C7 28 32 35 35 29 3A 8F 20 |..::.3,.(255):. |
000039E0: 52 45 43 4F 52 44 53 20 56 52 49 4A 47 45 56 45 |RECORDS VRIJGEVE|
000039F0: 4E 00 FD 59 38 18 3A 3A 99 22 2A 22 3B 00 03 5A |N..Y8.::."*";..Z|
00003A00: 42 18 82 00 09 5A 4C 18 3A 00 11 5A 56 18 A0 20 |B....ZL.:..ZV.. |
00003A10: 33 00 17 5A 60 18 3A 00 20 5A 6A 18 41 46 B2 31 |3..Z`.:. Zj.AF.1|
00003A20: 00 26 5A 74 18 8E 00 2C 5A 7E 18 3A 00 32 5A 88 |.&Zt...,Z~.:.2Z.|
00003A30: 18 3A 00 44 5A 92 18 8F 20 2A 2A 2A 4D 45 4E 55 |.:.DZ... ***MENU|
00003A40: 32 2A 2A 2A 00 60 5A 9C 18 8D 20 38 33 38 30 3A |2***.`Z... 8380:|
00003A50: 8F 20 4D 45 4E 55 20 32 20 2D 20 49 4E 46 4F 53 |. MENU 2 - INFOS|
00003A60: 00 7B 5A A6 18 8D 20 31 38 32 30 3A 20 8F 20 4D |.{Z... 1820: . M|
00003A70: 41 53 4B 45 52 4F 50 42 4F 55 57 00 81 5A B0 18 |ASKEROPBOUW..Z..|
00003A80: 3A 00 9D 5A BA 18 8F 20 3E 43 4F 4D 4D 41 4E 44 |:..Z... >COMMAND|
00003A90: 4F 20 49 4E 47 45 56 4F 45 52 44 3F 3C 00 A5 5A |O INGEVOERD?<..Z|
00003AA0: C4 18 49 B2 30 00 C2 5A CE 18 9F B1 49 B2 30 3A |..I.0..Z....I.0:|
00003AB0: A1 AD 41 24 3A 49 B2 88 28 4D 32 24 2C 41 24 29 |..A$:I..(M2$,A$)|
00003AC0: 3A A0 00 C8 5A D8 18 3A 00 FA 5A E2 18 91 20 49 |:...Z..:..Z... I|
00003AD0: 20 89 20 36 34 30 30 2C 36 34 30 30 2C 36 34 34 | . 6400,6400,644|
00003AE0: 30 2C 36 35 31 30 2C 36 34 30 30 2C 37 34 36 30 |0,6510,6400,7460|
00003AF0: 2C 36 37 34 30 2C 37 30 36 30 00 04 5B EC 18 89 |,6740,7060..[...|
00003B00: 36 32 39 30 00 0A 5B F6 18 3A 00 10 5B 00 19 8E |6290..[..:..[...|
00003B10: 00 16 5B 0A 19 3A 00 1C 5B 14 19 3A 00 34 5B 1E |..[..:..[..:.4[.|
00003B20: 19 8F 20 2A 56 4F 4F 52 55 49 54 42 4C 41 44 45 |.. *VOORUITBLADE|
00003B30: 52 45 4E 2A 00 75 5B 28 19 8B 20 50 25 B2 4E 45 |REN*.u[(.. P%.NE|
00003B40: 20 A7 41 24 B2 45 49 4E 44 45 20 42 45 53 C0 44 | .A$.EINDE BES.D|
00003B50: 22 3A 47 4F 54 4F 36 35 39 30 3A 52 45 4D 20 45 |":GOTO6590:REM E|
00003B60: 49 4E 44 45 20 42 45 53 54 41 4E 44 20 42 45 52 |INDE BESTAND BER|
00003B70: 45 49 4B 54 3F 00 A4 5B 32 19 50 25 B2 50 25 AA |EIKT?..[2.P%.P%.|
00003B80: 31 3A 8F 20 50 4F 49 4E 54 45 52 20 4F 50 20 49 |1:. POINTER OP I|
00003B90: 4E 44 45 58 45 4C 45 4D 45 4E 54 20 56 45 52 48 |NDEXELEMENT VERH|
00003BA0: 4F 47 45 4E 00 B1 5B 3C 19 52 B2 50 25 28 50 25 |OGEN..[<.R.P%(P%|
00003BB0: 29 00 CA 5B 46 19 8D 33 35 34 30 3A 8F 20 50 4F |)..[F..3540:. PO|
00003BC0: 53 49 54 2E 2B 4C 45 5A 45 4E 00 D5 5B 50 19 89 |SIT.+LEZEN..[P..|
00003BD0: 20 36 33 31 30 00 DB 5B 5A 19 3A 00 E1 5B 64 19 | 6310..[Z.:..[d.|
00003BE0: 3A 00 F7 5B 6E 19 8F 20 2A 54 45 52 55 47 42 4C |:..[n.. *TERUGBL|
00003BF0: 41 44 45 52 45 4E 2A 00 36 5C 78 19 8B 20 50 25 |ADEREN*.6\x.. P%|
00003C00: B2 31 20 A7 41 24 B2 22 42 45 47 49 4E 20 42 45 |.1 .A$."BEGIN BE|
00003C10: 53 54 41 4E 44 22 3A 89 20 36 35 39 30 3A 8F 20 |STAND":. 6590:. |
00003C20: 42 45 47 49 4E 20 42 45 53 54 41 4E 44 20 42 45 |BEGIN BESTAND BE|
00003C30: 52 45 49 4B 54 3F 00 65 5C 82 19 50 25 B2 50 25 |REIKT?.e\..P%.P%|
00003C40: AB 31 3A 8F 20 50 4F 49 4E 54 45 52 20 4F 50 20 |.1:. POINTER OP |
00003C50: 49 4E 44 45 58 45 4C 45 4D 45 4E 54 20 56 45 52 |INDEXELEMENT VER|
00003C60: 4C 41 47 45 4E 00 72 5C 8C 19 52 B2 50 25 28 50 |LAGEN.r\..R.P%(P|
00003C70: 25 29 00 8C 5C 96 19 8D 20 33 35 34 30 3A 8F 20 |%)..\... 3540:. |
00003C80: 50 4F 53 49 54 2E 2B 4C 45 5A 45 4E 00 97 5C A0 |POSIT.+LEZEN..\.|
00003C90: 19 89 20 36 33 31 30 00 9D 5C AA 19 3A 00 A3 5C |.. 6310..\..:..\|
00003CA0: B4 19 3A 00 C4 5C BE 19 8F 20 2A 42 45 53 54 41 |..:..\... *BESTA|
00003CB0: 4E 44 45 49 4E 44 45 20 52 45 53 50 2E 20 42 45 |NDEINDE RESP. BE|
00003CC0: 47 49 4E 2A 00 D7 5C C8 19 8B 20 4D 4F 44 45 20 |GIN*..\... MODE |
00003CD0: B2 30 20 A7 20 FE 18 00 0C 5D D2 19 99 48 4F 4D |.0 . ....]...HOM|
00003CE0: 45 24 41 41 4E 24 22 20 20 20 20 20 20 20 20 20 |E$AAN$" |
00003CF0: 20 22 41 24 22 20 42 45 52 45 49 4B 54 20 21 21 | "A$" BEREIKT !!|
00003D00: 21 20 20 20 20 20 20 20 20 20 22 3B 00 18 5D DC |! ";..].|
00003D10: 19 FE 19 3A D5 20 FE 18 00 53 5D E6 19 99 48 4F |...:. ...S]...HO|
00003D20: 4D 45 24 41 41 4E 24 22 20 20 20 20 20 20 20 20 |ME$AAN$" |
00003D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003D40: 22 41 24 22 20 42 45 52 45 49 4B 54 20 21 21 21 |"A$" BEREIKT !!!|
00003D50: 20 22 3B 00 5A 5D F0 19 FE 19 00 71 5D FA 19 A1 | ";.Z].....q]...|
00003D60: 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 36 36 35 |A$:. A$."" . 665|
00003D70: 30 00 83 5D 04 1A 8B 20 4D 4F 44 45 B2 30 20 A7 |0..]... MODE.0 .|
00003D80: 20 FE 18 00 CA 5D 0E 1A 99 48 4F 4D 45 24 41 41 | ....]...HOME$AA|
00003D90: 4E 24 22 20 20 20 20 20 20 20 20 20 20 20 5A 4F |N$" ZO|
00003DA0: 45 4B 45 4E 2C 20 56 45 52 41 4E 44 45 52 45 4E |EKEN, VERANDEREN|
00003DB0: 2C 20 57 49 53 53 45 4E 20 20 20 20 20 20 20 20 |, WISSEN |
00003DC0: 20 20 20 22 3B 55 49 54 24 3B 00 D7 5D 18 1A FE | ";UIT$;..]...|
00003DD0: 19 3A 20 D5 20 FE 18 00 0F 5E 22 1A 99 48 4F 4D |.: . ....^"..HOM|
00003DE0: 45 24 41 41 4E 24 22 20 20 20 20 20 5A 4F 45 4B |E$AAN$" ZOEK|
00003DF0: 45 4E 2C 20 56 45 52 41 4E 44 45 52 45 4E 2C 20 |EN, VERANDEREN, |
00003E00: 57 49 53 53 45 4E 20 20 22 3B 55 49 54 24 3B 00 |WISSEN ";UIT$;.|
00003E10: 16 5E 2C 1A FE 19 00 2A 5E 36 1A 89 20 36 33 33 |.^,....*^6.. 633|
00003E20: 30 3A 8F 20 4D 45 4E 55 20 32 00 30 5E 40 1A 3A |0:. MENU 2.0^@.:|
00003E30: 00 36 5E 4A 1A 3A 00 45 5E 54 1A 8F 20 2A 57 49 |.6^J.:.E^T.. *WI|
00003E40: 53 53 45 4E 2A 00 58 5E 5E 1A 8B 20 4D 4F 44 45 |SSEN*.X^^.. MODE|
00003E50: 20 B2 30 20 A7 20 FE 18 00 78 5E 68 1A 9E 43 52 | .0 . ...x^h..CR|
00003E60: 2C 2C 32 32 2C 30 2C 30 3A 8F 20 43 52 53 2E 20 |,,22,0,0:. CRS. |
00003E70: 50 4C 41 41 54 53 45 4E 00 B5 5E 72 1A 99 41 41 |PLAATSEN..^r..AA|
00003E80: 4E 24 22 20 20 20 20 20 20 20 49 53 20 44 41 54 |N$" IS DAT|
00003E90: 20 4A 55 49 53 54 20 20 28 4A 2F 4E 29 20 3F 20 | JUIST (J/N) ? |
00003EA0: 20 20 20 20 20 22 55 49 54 24 3B C8 28 53 50 24 | "UIT$;.(SP$|
00003EB0: 2C 37 39 29 3B 00 C1 5E 7C 1A FE 19 3A D5 20 FE |,79);..^|...:. .|
00003EC0: 18 00 E1 5E 86 1A 9E 43 52 2C 2C 32 33 2C 30 2C |...^...CR,,23,0,|
00003ED0: 30 3A 8F 20 43 52 53 2E 20 50 4C 41 41 54 53 45 |0:. CRS. PLAATSE|
00003EE0: 4E 00 13 5F 90 1A 99 41 41 4E 24 22 20 49 53 20 |N.._...AAN$" IS |
00003EF0: 44 41 54 20 4A 55 49 53 54 20 20 28 4A 2F 4E 29 |DAT JUIST (J/N)|
00003F00: 20 3F 20 22 55 49 54 24 3B C8 28 53 50 24 2C 37 | ? "UIT$;.(SP$,7|
00003F10: 39 29 3B 00 1A 5F 9A 1A FE 19 00 3D 5F A4 1A A1 |9);.._.....=_...|
00003F20: 20 41 24 3A 8B 20 41 24 B3 B1 22 4A 22 20 AF 20 | A$:. A$.."J" . |
00003F30: 41 24 B3 B1 22 4E 22 A7 20 36 38 32 30 00 50 5F |A$.."N". 6820.P_|
00003F40: AE 1A 8B 20 41 24 B2 22 4E 22 20 A7 36 38 37 30 |... A$."N" .6870|
00003F50: 00 56 5F B8 1A 3A 00 87 5F C2 1A 8D 36 39 32 30 |.V_..:.._...6920|
00003F60: 3A 8F 20 52 45 43 4F 52 44 20 56 52 49 4A 47 45 |:. RECORD VRIJGE|
00003F70: 56 45 4E 2C 20 49 4E 44 45 58 49 4E 56 4F 45 52 |VEN, INDEXINVOER|
00003F80: 20 57 49 53 53 45 4E 00 CE 5F CC 1A 8B 20 50 25 | WISSEN.._... P%|
00003F90: B1 4E 45 20 A7 50 25 B2 4E 45 3A 8F 20 49 53 20 |.NE .P%.NE:. IS |
00003FA0: 50 25 20 41 43 48 54 45 52 20 48 45 54 20 45 49 |P% ACHTER HET EI|
00003FB0: 4E 44 45 20 56 41 4E 20 49 4E 44 45 58 2D 42 45 |NDE VAN INDEX-BE|
00003FC0: 53 54 41 4E 44 20 47 45 4C 45 47 45 4E 3F 00 E7 |STAND GELEGEN?..|
00003FD0: 5F D6 1A 89 36 33 30 30 3A 8F 20 45 49 4E 44 45 |_...6300:. EINDE|
00003FE0: 20 57 49 53 53 45 4E 00 ED 5F E0 1A 3A 00 F3 5F | WISSEN.._..:.._|
00003FF0: EA 1A 3A 00 0C 60 F4 1A 8F 20 2A 57 49 53 2D 53 |..:..`... *WIS-S|
00004000: 55 42 50 52 4F 47 52 41 4D 4D 41 2A 00 25 60 FE |UBPROGRAMMA*.%`.|
00004010: 1A 8F 20 3E 52 45 43 4F 52 44 20 56 52 49 4A 47 |.. >RECORD VRIJG|
00004020: 45 56 45 4E 3C 00 36 60 08 1B B2 23 33 22 44 41 |EVEN<.6`...#3"DA|
00004030: 54 41 2C 31 2C 22 00 51 60 12 1B B2 23 33 2C 28 |TA,1,".Q`...#3,(|
00004040: 52 29 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 52 45 |R):. POSITIONERE|
00004050: 4E 00 79 60 1C 1B 98 33 2C C7 28 32 35 35 29 3A |N.y`...3,.(255):|
00004060: 8F 20 56 52 49 4A 47 41 56 45 54 45 4B 45 4E 20 |. VRIJGAVETEKEN |
00004070: 53 43 48 52 49 4A 56 45 4E 00 81 60 26 1B A0 20 |SCHRIJVEN..`&.. |
00004080: 33 00 87 60 30 1B 3A 00 A2 60 3A 1B 8F 20 3E 49 |3..`0.:..`:.. >I|
00004090: 4E 44 49 43 45 53 20 4F 50 53 43 48 55 49 56 45 |NDICES OPSCHUIVE|
000040A0: 4E 3C 00 BE 60 44 1B 9E 53 42 2C 30 2C 2C 2C 2C |N<..`D..SB,0,,,,|
000040B0: 4A 46 24 28 30 29 2C 4A 46 24 28 50 25 29 00 D8 |JF$(0),JF$(P%)..|
000040C0: 60 4E 1B 9E 53 42 2C 30 2C 2C 2C 2C 50 25 28 30 |`N..SB,0,,,,P%(0|
000040D0: 29 2C 50 25 28 50 25 29 00 DE 60 58 1B 3A 00 00 |),P%(P%)..`X.:..|
000040E0: 61 62 1B 41 46 B2 31 3A 8F 20 56 45 52 41 4E 44 |ab.AF.1:. VERAND|
000040F0: 45 52 49 4E 47 20 55 49 54 47 45 56 4F 45 52 44 |ERING UITGEVOERD|
00004100: 00 29 61 6C 1B 4E 45 B2 4E 45 AB 31 3A 8F 20 41 |.)al.NE.NE.1:. A|
00004110: 41 4E 54 41 4C 20 44 41 54 41 52 45 47 45 4C 53 |ANTAL DATAREGELS|
00004120: 20 56 45 52 4C 41 47 45 4E 00 2F 61 76 1B 8E 00 | VERLAGEN./av...|
00004130: 35 61 80 1B 3A 00 3B 61 8A 1B 3A 00 4E 61 94 1B |5a..:.;a..:.Na..|
00004140: 8F 20 2A 56 45 52 41 4E 44 45 52 45 4E 2A 00 60 |. *VERANDEREN*.`|
00004150: 61 9E 1B 8B 20 4E B1 41 52 20 A7 20 37 32 37 30 |a... N.AR . 7270|
00004160: 00 66 61 A8 1B 3A 00 83 61 B2 1B 8D 38 36 36 30 |.fa..:..a...8660|
00004170: 3A 8F 20 56 45 52 41 4E 44 45 52 45 4E 20 49 4E |:. VERANDEREN IN|
00004180: 46 4F 53 00 89 61 BC 1B 3A 00 C6 61 C6 1B 8F 20 |FOS..a..:..a... |
00004190: 3E 4F 56 45 52 47 41 56 45 20 56 41 4E 20 54 45 |>OVERGAVE VAN TE|
000041A0: 20 56 45 52 41 4E 44 45 52 45 4E 20 52 45 47 45 | VERANDEREN REGE|
000041B0: 4C 20 41 41 4E 20 4D 41 53 4B 45 52 47 45 4E 45 |L AAN MASKERGENE|
000041C0: 52 41 54 4F 52 3C 00 D5 61 D0 1B 81 20 49 B2 31 |RATOR<..a... I.1|
000041D0: 20 A4 20 4D 46 00 02 62 DA 1B 3A 3A 4D 52 24 28 | . MF..b..::MR$(|
000041E0: 49 29 B2 49 24 28 49 29 3A 4D 4C 28 49 29 B2 4C |I).I$(I):ML(I).L|
000041F0: 49 28 49 29 3A 4D 5A 24 28 49 29 B2 45 5A 24 28 |I(I):MZ$(I).EZ$(|
00004200: 49 29 00 08 62 E4 1B 82 00 0E 62 EE 1B 3A 00 21 |I)..b.....b..:.!|
00004210: 62 F8 1B 8D 31 39 30 30 3A 8F 20 4D 41 53 4B 45 |b...1900:. MASKE|
00004220: 52 00 27 62 02 1C 3A 00 4D 62 0C 1C 8B 20 41 B2 |R.'b..:.Mb... A.|
00004230: 31 33 33 20 A7 37 34 31 30 3A 8F 20 4D 45 54 20 |133 .7410:. MET |
00004240: 46 31 20 42 45 45 49 4E 44 49 47 44 3F 00 53 62 |F1 BEEINDIGD?.Sb|
00004250: 16 1C 3A 00 70 62 20 1C 8D 36 39 32 30 3A 8F 20 |..:.pb ..6920:. |
00004260: 57 49 53 2D 53 55 42 50 52 4F 47 52 41 4D 4D 41 |WIS-SUBPROGRAMMA|
00004270: 00 8E 62 2A 1C 59 B2 50 25 3A 8F 20 50 4F 49 4E |..b*.Y.P%:. POIN|
00004280: 54 45 52 20 56 41 53 54 4C 45 47 47 45 4E 00 AF |TER VASTLEGGEN..|
00004290: 62 34 1C 8D 33 31 36 30 3A 20 8F 20 49 4E 56 4F |b4..3160: . INVO|
000042A0: 45 52 2D 53 55 42 50 52 4F 47 52 41 4D 4D 41 00 |ER-SUBPROGRAMMA.|
000042B0: C8 62 3E 1C 50 25 B2 59 3A 8F 20 50 4F 49 4E 54 |.b>.P%.Y:. POINT|
000042C0: 45 52 20 48 41 4C 45 4E 00 CE 62 48 1C 3A 00 EB |ER HALEN..bH.:..|
000042D0: 62 52 1C 89 37 34 31 30 3A 8F 20 45 49 4E 44 45 |bR..7410:. EINDE|
000042E0: 20 56 45 52 41 4E 44 45 52 45 4E 00 F1 62 5C 1C | VERANDEREN..b\.|
000042F0: 3A 00 30 63 66 1C 8B 20 4E 45 B3 41 52 20 A7 37 |:.0cf.. NE.AR .7|
00004300: 33 35 30 3A 8F 20 4E 55 4D 4D 45 52 20 45 43 48 |350:. NUMMER ECH|
00004310: 54 20 4B 4C 45 49 4E 45 52 20 41 4C 53 20 4D 41 |T KLEINER ALS MA|
00004320: 58 2E 41 41 4E 54 41 4C 20 52 45 47 45 4C 53 3F |X.AANTAL REGELS?|
00004330: 00 42 63 70 1C 8B 20 4D 4F 44 45 B2 30 20 A7 20 |.Bcp.. MODE.0 . |
00004340: FE 18 00 84 63 7A 1C 99 48 4F 4D 45 24 3B 41 41 |....cz..HOME$;AA|
00004350: 4E 24 22 20 20 20 20 20 20 20 20 20 20 20 20 48 |N$" H|
00004360: 45 54 20 42 45 53 54 41 4E 44 20 49 53 20 56 4F |ET BESTAND IS VO|
00004370: 4C 20 21 21 21 20 20 20 20 20 20 20 20 20 22 55 |L !!! "U|
00004380: 49 54 24 3B 00 90 63 84 1C FE 19 3A D5 20 FE 18 |IT$;..c....:. ..|
00004390: 00 00 00 |... |
. ; D.MODE.B(Q("D7")):. 40 TEKENS:MODE=0
; 80 TEKENS:MODE=80.A N.:.W X.. *STARTAD
RESSEN*.. ..IT.Q("0B00"):. STARTADRES IN
ITIALISERING.. ..SE.Q("1300"):. STARTADR
ES INVOERROUTINE.. ..SI.Q("14C0"):. STAR
TADRES INPUT#-ROUTINE..! .SS.Q("1540"):.
STARTADRES ZOEKROUTINE.>!..SB.Q("OB30")
:. STARTADRES BLOKVERSCHUIVINGSROUTINE.D
!..:.A!...8780:. ROUTINES INLEZEN.G!H.:.
!R..IT:. INITIALISEREN..!..:..!... *NUM
ERIEKEN VARIABLEN*..!..CS.236:. CURSORKO
LOM.T!..CZ.235:. CURSORREGEL..!..CR.Q("C
C6C"):. CURSORPLAATSINGSROUTINE.."..:.."
..:.."".. *STUURTEKENS*.?",.CR$.G(13):.
CARRIAGE RETURN.]"6.HOME$.G(19):. CURSOR
HOME.W"@.CLEAR$.G(147):. CLEAR.."J.UP$.
G(145):. CURSOR UP.."T..WN$.G(17):. CURS
OR DOWN.P"^.RECHTS$.G(29):. CURSOR RIGHT
.."H.LINKS$.G(157):. CURSOR LEFT..#R.AAN
$.G(18):. REVERS AAN.)#|.UIT$.G(146):. R
EVERS UIT./#..:.5#..:.L#... *FUNKTIETOET
SEN*.B#..F1$.G(133):.1,F1$.X#..F3$.G(134
):.3,F3$..#..F5$.G(135):.5,F5$..#B.F7$.G
(136):.7,F7$..#L.F2$.G(137):.2,F2$.P#V.F
4$.G(138):.4,F4$..#..F6$.G(139):.6,F6$..
#..F8$.G(140):.8,F8$..$..:..$..:..$... *
ANDERE STRINGS*.N$..A$."
":. 25 SPACES..$..SP$.A$.A$.A$.
A$.A$.A$.A$.A$.A$.A$:. 250 SPACES..$&.M1
$."ESGDRV":. MENU 1.S$0.M2#.F1$.CR$.RECH
TS$.LINKS$.F3$.F5$.F8$.F7$:. MENU 2..%:.
N1$."0123456789":. ZUIVER NUMERIEKE INVO
ER (HELE GETALLEN).6%D.NU$.N1$."+-":. NU
MERIEKE INVOER.U%N.A1$."QWERTZUIOPASDFGH
JKLYXCVBNMQWERTZUIOPASDFGHJKLYXCVBNM"..%
X.A1$.A1$.",;:#'[]M ?!@$%&?()".G834).NU$
:. ?.E%B.SO$."*<>?":. SPECIALE TEKENS..%
L.E1$.F1$.F7$:. BEEINDIGEN MET 'F1' EN
'F7'.#&V.E2$..WN$.UP$.CR$.E1$:. + CRS,DO
WN,UP;F1;47.)&..:./&..:.T&... *BESTANDSP
ECIFIEKE VARIABELEN*..&..JF.1:. NUMMER V
AN INDEXVELD (=SLEUTELVELD)..&..JL.8:. L
ENGTE SLEUTEL.E&..N.1:. VOLGEND TE BESCH
RIJVEN RECORD..&..NE.0:. ECHT AANTAL DAT
AREGELS..'F.FA.7:. AANTAL VELDEN..'P.DP.
5:. PRINTERPARAMETERS.K'Z.A.FA:IDFP.FA.A
.DP:. A=AANTAL MASKERVELDEN.Q'..:.W'..:.
P'... *DIMENSIONERINGEN*..'...I$(FA),NI$
(FA),LI(FA),SI(FA),ZI(FA),EZ$(FA),S$(FA)
:. DATAREGELVELDEN..'...MN$(A),M1(A),MS(
A),MZ(A),MZ$(A),MR$(A):. MASKERPARAMETER
S.((...JF$(999),P%(999):. INDEXVELD, POI
NTERVELD.P( ..DP(DP),DI$(DP),DL(DP),DS(D
P),DZ(DP),DE$(DP):. PRINTPARAMETERVELDEN
.V(*.:.|(4.:..(>.. *INVOERMASKER DEFINIE
REN.X(H.NI$(1)."VOORNAAM : ":LI(1).15:SI
(1).2:ZI(1).3:EZ$(1).AL$..)R.NI$(2)."NAA
M : ":LI(2).15:SI(2).5:ZI(2).5:EZ$
(2).A1$.Z)\.NI$(3)."STRAAT : ":LI(3)
.20:SI(3).2:ZI(3).7:EZ$(3).A1$.NU$..)F.N
I$(4)."POSTCODE : ":LI(4).4:SI(4).6:ZI
(4).9:EZ$(4).NU$..)P.NI$(5)."WOONPLAATS
: ":LI(5).20:SI(5).2:ZI(5).1L:EZ$(5).A1$
.NU$.**Z.NI$(6)."TELEFOON : ":LI(6).15
:SI(6).2:ZI(6).13:EZ$(6).13:EZ$(6).AL$.N
U$.N*..NI$(7)."DIVERSEN : ":LI(7).20:S
I(7).0:ZI(7).15:EZ$(7).A1$.NU$.T*..:.Z*.
.:..*... *PRINTERPARAMETERS DEFINIEREN*.
.*..DI$(1)."VELDEN NAAST OF ONDER ELKAAR
: ":D1(1).1:DS(1).0:DZ(1).5..*..DE$
(1)."NUNU".C+..DI$(2)."VELDEN NAAST ELKA
AR: VELDAFSTAND : ":D1(2).1:DS(2).0:DZ(2
).7.R+J.DE$(2).N1$..+T.DI$(3)."DATAREGEL
AFSTAND : ":D1(3).1:DS(3
).0:DZ(3).9:DE$(3).N1$..+..DI$(4)."PRINT
ERADRES : ":D1(4).1:
DS(4).0:DZ(4).15:DE$(4)."34567".S,..DI$(
5)."SECUNDAIRADRES : ":
D1(5).3:DS(5).0:DZ(5).17:DE$(5).N1$.Y,..
:._,..:.~,... *PRINTERSTANDAARDWAARDE*..
,..DP(1).1:. ONDERELKAAR =JA..,..DP(2).3
:. NAASTELKAAR AFSTAND..,$.DP(3).1:. AFS
TAND TUSSEN TWEE DATAREGELS= EEN REGEL.!
-..DP(4).4:. PRINTERADRES = 4 = STANDAAR
D.A-8.DP(5).7:. = GROOT/KLEINSCHRIFT MOD
US BIJ COMMODORE-PRINTERS.G-B.:.M-L.:..-
V.. *PROGRAMMASTART..-`.. MODE.0..0,7:.4
,7:.241,1..-J..G(14)G(8):. GROOT/KLEIN.D
-T.:.J-~.:..-... *BESTANDINLEZEN*..-....
#2,"INFOBESTAN,U,R"..... 2.....:.0....D$
.0.1240:. GEEN FOUT =>INFO LEZEN.K....D$
.62. .2010:.2320:.1270:. 'FILE NOT FOUND
'=>AANMAKEN...D.. 1750:KT1170:. ANDER FO
UTEN UITGEVEN, NIEUWE POGING...N.:.M.X..
7990:. INLEZEN VAN DE INFO'S...... 7870
:. INDEX INLEZEN.....:../..AF.0:. VERAND
ERINGSVLAG INITIALIS.../..:.!/..:.4/...
*** MENU ***.A/...CLEAR$;.T/(.. MODE .0
. ..../2..:.AAN$" KEU
ZE MENU ";.N/<..AAN$"
----------
";.X/F..:.:...0P.." "AAN$" I "UIT$"
INVOEREN VAN DATAREGELS".@0Z.." "AA
N$" Z "UIT$" ZOEKEN, WIJZIGEN, WISSEN
.Z0D..:." "AAN$" G "UIT$" GEORDENDE UI
TVOER VAN BESTAND"..0N..:." "AAN$" P "U
IT$" PRINTERPARAMETERS".R0X..:." "AAN$
" R "UIT$" REORGANISATIE"..1...:." "AA
N$" V "UIT$" VERLATEN VAN PROGRAMMA"..1
...:.:..G1...AAN$" UW K
EUZE ? ";.1 ..AAN$"
";.
.1....:U ....1...AAN$"
KEUZE MENU.Y1...AAN$" -
---------..1H..:.:...2R.." "AAN$" I "UI
T$" INVOER VAN DATA REGEL.F2...:." "AA
N$" Z "UIT$" ZOEKEN, WIJZIGEN, WISSEN..
2...:." "AAN$" G "UIT$" GEORDENDE UITV
OER VAN BESTAND"..2...:." "AAN$" P "UIT
$" PRINTERPARAMETERS".X2...:." "AAN$"
R "UIT$" REORGANISATIE"..3...:." "AAN$
" V "UIT$" VERLATEN VAN PROGRAMMA"..3..
.:.:..<3...AAN$" UW KEU
ZE ?.G3"..AAN$".N3,....T36.:.\3@.I.0.Y3J
...I.0:..A$:I..(M1$,A$): .3T.:..3^.. I.
C(M1$).1680:. VERLATEN VAN HET PROGRAMMA
.R3H.. I .2710,3660,4110,5250,5640..3R.K
T1300..3|.:..3..:..4... *** VERLATEN PRO
GRAMMA ***..4... AF.0.1720.74...7740:. I
NDEX VASTLEGGEN.S4...8120:. INFO VASTLEG
GEN.Y4...._4B.:.E4L.:.4V.. *** FOUTMELD
ING ***..4...CR,,24,0,0:.CRS.PLAATSEN..4
...SD$..4....A$..4.....4..:.A4..:..4...
*** MASKER OPBOUWEN ***..4&..I.1.MF..50.
::.CR,,MZ(I),MS(I),0:. CRS.SET.35:.::.MN
(I);H(SP$1I(I).C(I$(I)).1):.95D...?5N...
E5X.:.K5B.:.U5L..2010.K5V.I.1:. EERSTE V
ELD..5..S.C(MN(I)).MS(I):. KOLOM..5...SE
,S,MZ(I),M1(I),,MZ$(I),E2$,MR$(I).R5..A.
B(253):. EINDTEKEN IN'253'..5... A.145.I
.1.I.I.1:.1920:. CRS.UP.*6...(A.17.A.13)
.I.MF.I.I.1:.1920:. CRS.DOWN OF CR.I6...
A.133.A.136. .:. F1 OFF7.S6...1920.Y6F.
:._6P.:.R6Z.. MASKER TONEN..6... MODE.0.
....6...CLEAR$AAN$" DEMONSTRATIE VAN I
NVOERMASKER "UIT$;.H6.... U ....6...CL
EAR$AAN$" DEMONSTRATIE VAN INVOERMASKER
..6......7..:. 7 .. <MASKERGEN.INITIAL.>
.*7*.MF.FA.074.:.=7>.. I.1.MF..7H.::MN$(
I).NI$(I):M1(I).1I(I):MS(I).SI(I):MZ(I).
ZI(I):MZ$(I).EZ$(I)..7R....7\.:..7F..182
0:. MASKEROPBOUW..7P.. MODE.0 . ...S7Z..
CR,,22,0,0:. CURSOR..8...AAN$"GAAT U MET
DIT INVOER MASKER AKKOORD";.*8..."(J) O
F WILT U NOG WIJZIGINGEN";.J8..."AANBREN
GEN (N) ?"UIT$" ";.W8....: U ...G8..A$."
JN":. ?..8...AAN$" INVOER MASKER AKKOOR
D (J) OF WILT U NOG WIJZIGINGEN.I8..."
AANBRENGEN (N) ?"UIT$" ";.P8J.....8T.A$.
"JN":.?..9...SE,B(236),B(235),1,,A$,CR$,
B$.'9...B$."J".B$."J"..:. BESTANDOPBOUW.
19..CIR:..79..:.=9..:.\9... *** BESTAND
AANMAKEN ***.G9...CLEAR.M9$.:..9... >REC
ORDLENGTE BEREKENEN<..98.. I.1.FA..9B.::
R1.R1.1I(I).1..9L....9V.:..9`.. R1.255..
"MAX DATA REGELLENGTE OVERSCHREDEN! INKO
RTEN+STARTEN":...:J.:.M:T.AR..(((570.6).
254).(R1.J1.1.6.1)):. MAX AANTAL DATAREG
ELS BEREKENEN.U:~..AR.999.AR.999:. MAX.9
99 DATAREGELS.{:..:..:... >GEBRUIKER COR
ECTIE?<..:..A$."MAXUMAAL AANTAL DATA REG
ELS".H:...A$;AR;..:...SE,C(A$).1,B(253),
4,,NU$,CR$,A$..;...E(A$).AROE(A$)..1..:.
UP$;:.2460..;D.:.%;N.AR.E(A$).+;X.:.C;..
. >BESTANDOPBOUWEN<.];....#2"INFOBESTAND
,U,W".D;.. 2..;...DS..0..1750:.2540:.UIT
VOEREN..;..:..;...8120:. INFOBESTAND SCH
RIJVEN..;..:.M;(.. >RECORD VRIJGEVEN<.U;
2......;<..#3,(AR):. POSITIONEREN..<F..#
3,G(255):VRIJGAVETEKEN SCHRIJVEN..<P. 3.
%<Z.:.9<D..1,8,15:.1,E: 1.O<N..E..0.E..5
0..1750:."DISKETTEFOUT! NIEUWE START":..
U<X...{<..:..<..:..<... *** INVOER VAN D
ATA REGELS ***..< ..CLEAR$.E<...8530:. I
NFO'S.K<..:..<... >MASKERGENERATOR INITI
AL.<..<H.MF.FA..<R.:..=...I.1.F.M=..::MN
$(I).NI$(I):M1(I).1I(I):MS(I).SI(I):MZ(I
).ZI(I):MZ$(I).EZ$(I).S=....Y=..:..=...N
.AR.2970:. MAX.AANTAL DATAREGELS BEREIKT
(=BESTAND VOL)??..=..:..=... >OVERGAVES
TRINGS INITIAL.<.L="..I.1.MF..=,.::MR$(I
)." ":I$(I)." "..=6....=@.:..>J..1820:.
MASKEROPBOUW.(>T..1900:. MASKERBESTURING
..>^.:.U>H..A.133.3120:. MET ASC 1 BEEIN
DIGEN.[>R.:..>|..3160:. DATAREGEL SCHRIJ
VEN EN INVOEREN..>...2820:. VOLGENDE INV
OER?..>..:..>...NE.AR.3050:. NUMMER ECHT
KLEINDER DAN HET MAX.AANTAL DATAREGELS?
..?... MODE . 0 . ...9?...HOME$;AAN$" H
ETBESTAND IS VOL !!!!!!!! "UIT$;.E?....
:U ...K?B.:.R?L....\?V..3100.B?..:.Q?...
MODE.0.....?...HOME$;AAN$" OVERWEEG EEN
REORGANISATIE "UIT$;..?....:U....?...H
OME$;AAN$" OVERWEEG EEN REORGANISATIE
"UIT$;..?......@...A$:.A$." ".3100..@&.:
..@0....@:.:..@D.:.<@N.. *** INVOER SUBP
ROGRAMMA ***.G@X.A$." ".M@B.:.M@L.. >EEN
DATASTRING AANMAKEN<.Z@V.. I.1.MF..@..:
:.MR$(I)." ".MR$(I).G(1)..@..::A$.A$.MR$
(I).CR$..@.....@..:.A@..:..@... *** DATA
STRING SCHRIJVEN ***..@....#3,BES.D,1,".
.AF..#3,(N):. POSITIONEREN..AP..#3,A$;.&
AZ. 3.,A..:.2A..:.XA... *** INDEXTABEL
AKTUALISEREN ***.KA..A$.">".MR$(JF)..A..
.SS,,,,,A$,JF$(0),JF$(1),P%..A..:..A ..P
%.0. ....A*.::JF$(NE.1).H(MR$(JF),JL).NA
4.::P%(NE.1).N.XA>...U....AH.::.SB,1,,,,
JF$(0),JF$(P%)..BR.::.SB,1,,,,P%(0),P%(P
%)..B\.::JF$(P%).H(MR$(JF),JL).=BF.::P%(
P%).N.DBP....JBZ.:.JB..AF.1:. WIJZIGING
UITGEVOERD.PB..:..B..N.N.1:. POINTER OP
VOLGENDE RECORD OPHOGEN.KB..NE.NE.1:. EC
HT DATA REGELAANTAL OPHOGEN.QB....WB..:.
.B..:..CJ.. *** POSITIONEREN EN INLEZEN
***..CT..#3,"BESTAND,1,.2C...#3,(R):. PO
SITIONEREN.8C..:.DC...I.1.FA.YC..::.S1,,
3,,,I$(I).UC..::.I$(I).G(1).I$(I)." ".{C
.....C..:..C$. 3..C.....C8.:..CB.:..CL..
***ZOEKEN VERANDEREN WISSEN ***.LCV..CL
EAR$..C`..NE.0.4080:. AANTAL DATAREGELS
=0?..DJ..8240:. ZOEK INFO'S..DT.:..D~.MF
.FA.!D..:.BD... >MASKERGENERATOR INITIAL
.<.ND...I.1.MF..D..::MN$(I).NI$(I):M1(I)
.1I(I).1:MS(I).SI(I):MZ(I).ZI(I):MZ$(I).
EZ$(I).SO$. D..:..D.....DD.:.JDN.. >OVER
GAVESTRING WISSEN<.WDX.. I.1.MF..D..::MR
$(I)." ":I$(I)." "..D.....D..:..E...1820
:. MASKER OPBOUWEN.4E..SUB1900:. M.BESTU
RING.:E..:.\E...A.133.4080:. MET F1 BEGI
NNEN.BE(.:..E2.. >INDEXBEST. DOORZOEKEN<
..E<.P%.1:. ZOEKEN VANAF EERSTE INDEX EL
EMENT..EF..P%.NE..8240:.3680:. BESTAND G
RENS BEREIKT?..FP..SS,,,,,MR$(JF),JF$(0)
,JF$(P%),P%.)FZ..P%.0..8240:.3680:. NIET
GEVONDEN./FD.:.<FN.R.P%(P%).XFX..3540:.
POSITIE INLEZEN.^F..:..F... >VERGELIJKI
NG VAN ALLE VELDEN<..F... I.1.FA..F .::.
SS,,,,,MR$(I),I$(I),F%..F..::.F%..I..MR$
(I).." ".P%.P%.1:.3910:. NOT FOUND EN <>
LEEG?..F.....F..:..GH.. 6290:. MENU 2..
GR.:.<G... I.2.P%.P%.1:.3910:. VERDER ZO
EKEN.BG...I.5.3680:. ZOEKEN OPNIEW START
EN.HG....NG..:.TG..:..G... *** GEORDENDE
UITVOER ***..G..SF.JF:. INDEX BEVEILIGI
NG.FG".. MODE IS 0. ....H,..CLEAR$AAN$"
GEORDENDE UITVOER VAN BESTAND " UIT$
;..H6...:U ...HH@..CLEAR$AAN$" GEORDEN
DE UITVOER VAN BESTAND " UIT$;.OHJ....
UHT.:.RH^.. >SORTEERVELD AFVRAGEN<..HH..
CR,,8,0,0..HR.A$."SORTEREN NAAR VELDNUMM
ER".TH|..A$;SF;" (CR)";:. STANDAARDWAAR
DE=INDEXVELD..H...SE,C(A$).1,8,C(D(FA)),
,NU$,CR$,A$..I..JF.E(A$).4I...JF.1.JF.FA
.4130:. GELDIG SORTEERVELD ?.:I..:.II...
MODE.0.....I...CLEAR$AAN$" SORTEER
MASKER "UIT$;..IB..CR,,22
,0,0:. CURSOR.TIL..AAN$"F1 = MENU
F7 = SORTEREN "UIT$;..IV...:U ..
..J...CLEAR$AAN$" SORTEERMASKER "
UIT$".&J...CR,,23,0,0:. CURSOR.[J...AAN$
" F1 =MENU F7 = SORTEREN"UI
T$;.AJ..:.HJ......J..:. >MASKERGENERATOR
INITIAL.<..J..MF.FA..J&.:..J0..I.1.MF..
J:.::MN$(I).NI$(I):M1(I).1I(I).1:M$(I).S
I(I):MZ(I).ZI(I):MZ$(I).EZ$(I).SO$..KD.:
:MR$(I)." ":I$(I)." "..KN....KX.:.5KB..1
820:. MASKER OPBOUWEN.QKL..1900:. MASKER
BESTURING.AKV..A.133.5220.GK..:..K...>ZO
EKCRETERIA REDDEN<..K...I.1.A. K..::S$(I
).MR$(I)..K.....K..:.UK....#3,"BESTAND,1
":. DATAKANAAL OPENEN..LF..SF.JF.4810:.
OUD INDEXVELD = NIEUW INDEXVELD.ILP..AF.
1..7740:. WIJZINGEN? JA DAN INDEX REEDDE
N DOOR VASTLEGGEN.OLZ.:.BL...<INDEXTABEL
.<.NL...I.1.AR..L..::P%(I).0:JF$(I)." ".
.L.....L..:.IL... >INDEXTABEL NIEUW OPBO
UWEN (INDEX=SORTEERVELD)<..L .NE.0:NN.N:
N.1:. REDDEN;N,NE INITIAL..L*.:..M4..R.1
.NN.1..M>.::..,(R):. POSIT.'MH.::.#3,A$.
`MR.::.A$.G(255).A$." ".N.N.1:.4780:. RE
CORD VRIJGEVEN ?.}M\.::.#3,(R):. POSITIO
NEREN..MF.:..MP.::.I1.1.FA..MZ.::::.SI,,
3,,,MR$(I1).MM..::::.MR$(I1).G(1).MR$(I1
)." ".UM..::...M..:..M..::.3320:. INDEX
INVOEREN..M.....N..:..N...I3.I.NE.$NJ..5
,DP(4),DP(5).*NT.:.NN... >DATAREGELS GES
ORTEERD LEZEN<.IN..::.#3,(P%(I1)):. POSI
T.ON..:..N..::.I1.1.FA:SUSSI,,3,,I$(I)..
N..::::.IS(I1).G(1).I$(I1)." "..N..::...
N..:..N$.::. >VERGELIJKING MET HET MASKE
R<..N..::.I4.1.FA..O8.::::.SS,,,,,S$(I4)
,I$(0),I$(I4),F%.:OB.::::.F%..I4..S$(I4)
.." ".4970.BOL.::..HOV.:.^O`.::.7540:. P
RINTEN.FOJ..I3.LOT.:.VO~. 5, 3.|O..:..O.
.. >NIEUW INDEX OVERNEMEN?<.EO...SF.JF.5
220:. OUDE INDEX ONVERANDERD?.KO..:.WO..
.CLEAR$..O...CR,,8,0,0:.CR..OD.:..PN.."M
OET VELDNUMMER"JF"MET DE AANDUIDING:".6P
X.."*** "NI$(JF)" ***".WP..."NIEUW INDEX
VELD WORD ? N";.]P..:.MP..B$."JN":. ?..P
...SE,B(CS).1,B(CZ),1,,B$,CR$,A$..P(.. A
$."J".A$."J". 5210.KP2.JF.SF:. INDEXVELD
WEER HALEN..P<..7870:. INDEX LADEN..PF.
AF.0:.5220..PP.:..QZ.AF.1..QD....QN.:..Q
X.:.3Q... *** PRINTERPARAMETERS ***.?Q..
.CLEAR$.QQ... MODE.0 . ....Q ..AAN$"
PRINTERPARAMETERS "UIT$;..Q...
CR,,20,0,0:. CURSOR.TQ...AAN$" F1 = MENU
F7 = PARAMETERS VASTLEGGEN "UIT$;..Q.
..:U....RH..AAN$" PRINTERPARAMETER
S"UIT$;. RR..CR,,23,0,0:. CURSOR.YR...AA
N$ F1 . MENU F7 . PARAMETERS VASTLEGGE
N "UIT$;.`R.....FR..:..R... >MASKERGENE
RATOR INITIAL.<..R..MF.DP..R..:..R...I.1
.MF..R".::MN$(I).DI$(I):M1(I).D1(I):MS(I
).DS(I):MZ(I).DZ(I):MZ$(I).DE$(I)..R,.:.
"S6.::I$(I).I(D(DP(I)),C(D(DP(I))).1):MR
$(I).I$(I).(S@....SJ.:.WST.I$(1)."N":.DP
(1).1.I$(1)."U".DP(1).1.]S^.:.YSH..1820:
. MASKER OPBOUWEN..SR..1900:. MASKERBEST
URING..S|..A.133.5610:. F1?..S..:..S...
>OVERNAME VAN DE NIEUWE PARAMETERS<..T..
. E (MR$(1)."U".MR$(1)."U".DP(1).1.-T..D
P(1).0:.MR$(1)."U".MR$(1)."U".DP(1).1.3T
..:.?T...I.1.DP.UTB.::DP(I).E(MR$(I)).[T
L...ATV.:.T...8110:. INFO'S VASTLEGGEN.
.T.....T..:..T..:..T... *** REORGANISATI
E ***..T...CLEAR$.IT...MODE.0 .....T&..A
AN$" REORGANISATIE "UIT$;..U0..C
R,,22,0,0:. CURSOR.EU:..AAN$" F1 = MENU
F7 = REORGANISATIE "UIT$;.QU
D...:U ....UN..AAN$"
REORGANISATIE "UIT$;.
.UX..CR,,23,0,0:. CURSOR..UB..AAN$"
F1 = MENU F7 = REORGANISAT
IE "UIT$;..UL.....UV.:..V... >INDEXVELD
AFVRAGEN<.2V...CR,,6,0,0:. CURSOR.\V...
"WELK VELD MOET SLEUTELVELD ZIJN";JF..V.
..SE,37,6,C(D(FA)).1,,NU$,E1$,A$..V... B
(253).133 .6260:. F1..V..I..(E(A$))..V..
:..VF.. I.1 . I.A ..5770:. INDEXVELD TOE
GESTAAN?..WP.JF.I:. GELDIGE WAARDE ALS I
NDEX OVERNEMEN..WZ.:.0W... >INDEXTABEL I
NITIAL.<.?W... I.1 . AR.WW..::JF$(I)."":
P%(I).0.]W....CW..:.ZW... >INDEX AANMAKE
N<..W .N.1:NE.0:. STARTWAARDEN..W*....W4
...#3,"DATE,1"..W>.:.JWH.. LR.1 . AR:A$.
""..WR.::.#3,(LR):.#3,(LR):. 2-MAAL WEGE
NS DOS-FOUT!..X\.::.#3,A$.?XF.::. A$.G(2
55) . A$."" .6130:. RECORD VRIJGEGEVEN?.
QXP.::.#3,(LR):.#3,(LR):. 2-MAAL WEGENS
DOS-FOUT!.}XZ.::A$.""..X..:..X..::. I.1
. FA..X..::::.SI,,3,,,MR$(I).TX..::::.DS
..0 .6130:. FOUT OPGETREDEN?..X..::::A$.
A$.MR$(I).CR$..X..::...X..:..YJ.::.#3,(N
):.#3,(N):. 2-MAAL!.(YT.::.3,A$;.OY..::.
3320:. INDEXINVOER SUBPROGRAMMA.[Y..::."
.";.DY... LR.JY..:..Y... >OVERIGE RECORD
S VRIJGEVEN<..Y... N.AR . 6230..Y... I.N
. AR.MY$.::.#3,(I):.#3,(I):. 2-MAAL!..Y
..::.3,G(255):. RECORDS VRIJGEVEN..Y8.::
."*";..ZB....ZL.:..ZV. 3..Z`.:. ZJ.AF.1
.&ZT...,Z~.:.2Z..:.DZ... ***MENU2***.`Z.
.. 8380:. MENU 2 - INFOS.{Z... 1820: . M
ASKEROPBOUW..Z..:..Z... >COMMANDO INGEVO
ERD?<..ZD.I.0.BZN...I.0:..A$:I..(M2$,A$)
: .HZX.:..Z... I . 6400,6400,6440,6510,6
400,7460,6740,7060..[...6290..[..:..[...
..[..:..[..:.4[... *VOORUITBLADEREN*.U[(
.. P%.NE .A$.EINDE BES.D":GOTO6590:REM E
INDE BESTAND BEREIKT?..[2.P%.P%.1:. POIN
TER OP INDEXELEMENT VERHOGEN..[<.R.P%(P%
).J[F..3540:. POSIT.+LEZEN.U[P.. 6310..[
Z.:..[D.:..[N.. *TERUGBLADEREN*.6\X.. P%
.1 .A$."BEGIN BESTAND":. 6590:. BEGIN BE
STAND BEREIKT?.E\..P%.P%.1:. POINTER OP
INDEXELEMENT VERLAGEN.R\..R.P%(P%)..\...
3540:. POSIT.+LEZEN..\ .. 6310..\..:..\
..:.D\... *BESTANDEINDE RESP. BEGIN*.W\H
.. MODE .0 . ....]R..HOME$AAN$"
"A$" BEREIKT !!! ";..]....:U ..
.S]...HOME$AAN$"
"A$" BEREIKT !!! ";.Z].....Q]...A$:. A$.
"" . 6650..]... MODE.0 . ...J]...HOME$AA
N$" ZOEKEN, VERANDEREN, WISSEN
";UIT$;.W]....: U ....^"..HOM
E$AAN$" ZOEKEN, VERANDEREN, WISSEN
";UIT$;..^,....*^6.. 6330:. MENU 2.0^@.:
.6^J.:.E^T.. *WISSEN*.X^^.. MODE .0 . ..
.X^H..CR,,22,0,0:. CRS. PLAATSEN..^R..AA
N$" IS DAT JUIST (J/N) ? "UI
T$;H(SP$,79);.A^|...:U ....^...CR,,23,0,
0:. CRS. PLAATSEN.._...AAN$" IS DAT JUIS
T (J/N) ? "UIT$;H(SP$,79);.._.....=_...
A$:. A$.."J" . A$.."N". 6820.P_... A$."
N" .6870.V_..:.._B..6920:. RECORD VRIJGE
VEN, INDEXINVOER WISSEN.N_L.. P%.NE .P%.
NE:. IS P% ACHTER HET EINDE VAN INDEX-BE
STAND GELEGEN?.._V..6300:. EINDE WISSEN.
._..:.._..:..`... *WIS-SUBPROGRAMMA*.%`.
.. >RECORD VRIJGEVEN<.6`...#3"DATA,1,".Q
`...#3,(R):. POSITIONEREN.Y`...3,G(255):
. VRIJGAVETEKEN SCHRIJVEN..`&. 3..`0.:.
.`:.. >INDICES OPSCHUIVEN<..`D..SB,0,,,,
JF$(0),JF$(P%).X`N..SB,0,,,,P%(0),P%(P%)
..`X.:..AB.AF.1:. VERANDERING UITGEVOERD
.)AL.NE.NE.1:. AANTAL DATAREGELS VERLAGE
N./AV...5A..:.;A..:.NA... *VERANDEREN*.`
A... N.AR . 7270.FA..:..A...8660:. VERAN
DEREN INFOS..A..:.FAF.. >OVERGAVE VAN TE
VERANDEREN REGEL AAN MASKERGENERATOR<.U
AP.. I.1 . MF..BZ.::MR$(I).I$(I):ML(I).L
I(I):MZ$(I).EZ$(I)..B.....B..:.!B...1900
:. MASKER.'B..:.MB... A.133 .7410:. MET
F1 BEEINDIGD?.SB..:.PB ..6920:. WIS-SUBP
ROGRAMMA..B*.Y.P%:. POINTER VASTLEGGEN..
B4..3160: . INVOER-SUBPROGRAMMA.HB>.P%.Y
:. POINTER HALEN.NBH.:..BR..7410:. EINDE
VERANDEREN..B\.:.0CF.. NE.AR .7350:. NU
MMER ECHT KLEINER ALS MAX.AANTAL REGELS?
.BCP.. MODE.0 . ....CZ..HOME$;AAN$"
HET BESTAND IS VOL !!! "U
IT$;..C....:U .....
> CLICK IMAGE PREVIEW FOR FULL MODAL