VERSIE CBM (3)
FILE INFORMATION
FILENAME(S): VERSIE CBM (3)
FILE TYPE(S): PRG
FILE SIZE: 13.3K
FIRST SEEN: 2025-11-30 21:06:47
APPEARS ON: 1 disk(s)
FILE HASH
e39d4801b5529dd5d6b9656b47b3c8f41ed4b3eab5108d303465954bb6e3fe7d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ADRESSEN BEST | VERSIE CBM (3) | PRG | DuncanTwain | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 3B 1C 64 00 4D 4F 44 45 B2 C2 28 85 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 1C 6E 00 |ENS:MODE=80.A.n.|
00000040: 3A 00 57 1C 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 1C 82 00 49 54 B2 85 |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 1C 8C 00 53 45 B2 85 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 1C 96 00 53 49 B2 85 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 1D |NPUT#-ROUTINE...|
000000E0: A0 00 53 53 B2 85 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 1D AA 00 53 42 B2 85 |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: 1D B4 00 3A 00 61 1D 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 1D C8 00 3A 00 7F 1D 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 1D DC 00 3A 00 A2 1D 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 1D 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 1D 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 1D 04 01 43 52 B2 85 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 1E 0E 01 3A 00 0B 1E 18 01 3A 00 1F 1E 22 01 |....:.....:...".|
00000210: 8F 20 2A 53 54 55 55 52 54 45 4B 45 4E 53 2A 00 |. *STUURTEKENS*.|
00000220: 3F 1E 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 1E 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 1E |. 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 1E 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 1E 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 1E 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 1E 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 1F 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 1F 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 1F 86 01 3A 00 |EVERS UIT./...:.|
00000330: 35 1F 90 01 3A 00 4C 1F 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 1F 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 1F 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 1F 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: 1F 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 1F 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 1F 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 1F E0 01 46 36 24 B2 C7 28 31 33 39 29 3A |.....F6$..(139):|
000003E0: AD 36 2C 46 36 24 00 FC 1F 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 20 F4 |(140):.8,F8$.. .|
00000400: 01 3A 00 08 20 FE 01 3A 00 1F 20 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 20 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: 20 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 20 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 20 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 21 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 21 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 21 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 21 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 21 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 21 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 22 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 22 80 02 3A 00 2F 22 8A 02 3A 00 |;47.)"..:./"..:.|
00000630: 54 22 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 22 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 22 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 22 |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 22 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 23 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 23 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 23 |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 23 E4 02 |ASKERVELDEN.Q#..|
00000750: 3A 00 57 23 EE 02 3A 00 70 23 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 23 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 23 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 24 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 24 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 24 2A 03 3A 00 7C 24 34 03 3A 00 9B 24 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 24 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 25 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 25 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 25 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 25 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 26 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 26 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: 26 8E 03 3A 00 7A 26 98 03 3A 00 9F 26 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 26 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 26 B6 03 44 45 24 |:DZ(1).5..&..DE$|
00000AF0: 28 31 29 B2 22 4E 55 4E 55 22 00 43 27 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 27 CA 03 44 45 24 28 32 29 B2 4E |).7.R'..DE$(2).N|
00000B50: 31 24 00 A6 27 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 27 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 28 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 28 F2 03 3A 00 5F 28 FC 03 3A 00 |N1$.Y(..:._(..:.|
00000C60: 7E 28 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: 28 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 28 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: 28 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 29 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 29 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 29 42 04 3A 00 6D 29 4C 04 3A 00 83 29 |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 29 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 29 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: 29 74 04 3A 00 CA 29 7E 04 3A 00 E1 29 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 29 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 2A 9C 04 |BESTAN,U,R"..*..|
00000E00: A0 32 00 08 2A A6 04 3A 00 30 2A 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 2A 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 2A 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 2A CE 04 3A 00 CD 2A 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 2A |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 2A EC 04 3A 00 15 | INLEZEN..*..:..|
00000EF0: 2B 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 2B 00 05 3A 00 21 2B 0A 05 |ALIS...+..:.!+..|
00000F20: 3A 00 34 2B 14 05 8F 20 2A 2A 2A 20 4D 45 4E 55 |:.4+... *** MENU|
00000F30: 20 2A 2A 2A 00 41 2B 1E 05 99 43 4C 45 41 52 24 | ***.A+...CLEAR$|
00000F40: 3B 00 54 2B 28 05 8B 20 4D 4F 44 45 20 B2 30 20 |;.T+(.. MODE .0 |
00000F50: A7 20 FE 18 00 92 2B 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 2B 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: 2B 46 05 99 3A 99 3A 99 00 0B 2C 50 05 99 22 20 |+F..:.:...,P.." |
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 2C 5A 05 |DATAREGELS".@,Z.|
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 2C 64 05 99 3A 99 22 20 20 22 41 41 4E 24 |.z,d..:." "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 2C 6E 05 99 |N BESTAND"..,n..|
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 2C 78 05 99 3A 99 |AMETERS"..,x..:.|
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 2D 82 05 99 3A 99 22 20 20 22 41 41 |E"..-...:." "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 2D 8C 05 99 3A 99 3A 99 00 |AMMA"..-...:.:..|
00001110: 47 2D 96 05 99 41 41 4E 24 22 20 20 20 20 20 20 |G-...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 2D A0 05 99 41 41 4E | ";..-...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 2D AA 05 FE 19 3A D5 20 FE 18 00 B2 2D B4 05 |.-....:. ....-..|
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 2D BE 05 99 41 41 4E 24 22 20 20 20 |NU..-...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 2D C8 05 99 3A |---------..-...:|
000011E0: 99 3A 99 00 12 2E D2 05 99 22 20 20 22 41 41 4E |.:......." "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 2E DC 05 99 3A 99 22 20 20 22 41 41 |EL.F....:." "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 2E E6 05 99 3A 99 22 20 |WISSEN......:." |
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 2E F0 05 99 3A 99 22 20 20 22 41 41 4E 24 |......:." "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: 2E FA 05 99 3A 99 22 20 20 22 41 41 4E 24 22 20 |....:." "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 2F 04 06 99 3A 99 |NISATIE"../...:.|
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 2F 0E 06 | PROGRAMMA"../..|
00001310: 99 3A 99 3A 99 00 3C 2F 18 06 99 41 41 4E 24 22 |.:.:..</...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 2F 22 | UW KEUZE ?.G/"|
00001340: 06 99 41 41 4E 24 22 00 4E 2F 2C 06 FE 19 00 54 |..AAN$".N/,....T|
00001350: 2F 36 06 3A 00 5C 2F 40 06 49 B2 30 00 79 2F 4A |/6.:.\/@.I.0.y/J|
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 2F 54 06 3A 00 |M1$,A$):.../T.:.|
00001380: B0 2F 5E 06 8B 20 49 B2 C3 28 4D 31 24 29 A7 31 |./^.. 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 2F 68 06 91 20 49 20 8D 32 37 31 30 2C 33 |../h.. 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 2F 72 06 CB 54 31 33 30 30 00 E3 2F |40../r..T1300../|
000013E0: 7C 06 3A 00 E9 2F 86 06 3A 00 0A 30 90 06 8F 20 ||.:../..:..0... |
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 30 9A 06 8B |GRAMMA ***..0...|
00001410: 20 41 46 B2 30 A7 31 37 32 30 00 37 30 A4 06 8D | AF.0.1720.70...|
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 30 AE 06 8D 38 31 32 |TLEGGEN.S0...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 30 B8 06 80 00 5F 30 C2 06 3A 00 |GEN.Y0...._0..:.|
00001460: 65 30 CC 06 3A 00 7F 30 D6 06 8F 20 2A 2A 2A 20 |e0..:..0... *** |
00001470: 46 4F 55 54 4D 45 4C 44 49 4E 47 20 2A 2A 2A 00 |FOUTMELDING ***.|
00001480: 9D 30 E0 06 9E 43 52 2C 2C 32 34 2C 30 2C 30 3A |.0...CR,,24,0,0:|
00001490: 8F 43 52 53 2E 50 4C 41 41 54 53 45 4E 00 A6 30 |.CRS.PLAATSEN..0|
000014A0: EA 06 99 53 44 24 00 AF 30 F4 06 A1 AD 41 24 00 |...SD$..0....A$.|
000014B0: B5 30 FE 06 8E 00 BB 30 08 07 3A 00 C1 30 12 07 |.0.....0..:..0..|
000014C0: 3A 00 DF 30 1C 07 8F 20 2A 2A 2A 20 4D 41 53 4B |:..0... *** MASK|
000014D0: 45 52 20 4F 50 42 4F 55 57 45 4E 20 2A 2A 2A 00 |ER OPBOUWEN ***.|
000014E0: EB 30 26 07 81 49 B2 31 A4 4D 46 00 0E 31 30 07 |.0&..I.1.MF..10.|
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: 31 3A 07 3A 3A 99 4D 4E 28 49 29 3B C8 28 53 50 |1:.::.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 31 44 07 82 00 3F 31 4E 07 8E 00 |1):.91D...?1N...|
00001540: 45 31 58 07 3A 00 4B 31 62 07 3A 00 55 31 6C 07 |E1X.:.K1b.:.U1l.|
00001550: AB 32 30 31 30 00 6B 31 76 07 49 B2 31 3A 8F 20 |.2010.k1v.I.1:. |
00001560: 45 45 52 53 54 45 20 56 45 4C 44 00 88 31 80 07 |EERSTE VELD..1..|
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 31 8A 07 9E 53 45 |:. KOLOM..1...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 31 94 07 41 B2 C2 28 32 35 33 29 3A 8F |)..1..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 31 9E 07 8B 20 41 B2 31 34 35 AF 49 |3'..1... 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 32 A8 07 8B 28 41 B2 | CRS.UP.*2...(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 32 B2 07 8B |DOWN OF CR.I2...|
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 32 BC 07 89 31 |. F1 OFF7.S2...1|
00001650: 39 32 30 00 59 32 C6 07 3A 00 5F 32 D0 07 3A 00 |920.Y2..:._2..:.|
00001660: 72 32 DA 07 8F 20 4D 41 53 4B 45 52 20 54 4F 4E |r2... MASKER TON|
00001670: 45 4E 00 83 32 E4 07 8B 20 4D 4F 44 45 B2 30 A7 |EN..2... MODE.0.|
00001680: 20 FE 18 00 BC 32 EE 07 99 43 4C 45 41 52 24 41 | ....2...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 32 F8 |KER "UIT$;..2.|
000016C0: 07 FE 19 20 D5 20 FE 18 00 F8 32 02 08 99 43 4C |... . ....2...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 32 0C 08 FE 19 00 |ERMASKER..2.....|
00001700: 05 33 16 08 3A 00 20 33 20 08 8F 20 3C 4D 41 53 |.3..:. 3 .. <MAS|
00001710: 4B 45 52 47 45 4E 2E 49 4E 49 54 49 41 4C 2E 3E |KERGEN.INITIAL.>|
00001720: 00 2A 33 2A 08 4D 46 B2 46 41 00 30 33 34 08 3A |.*3*.MF.FA.034.:|
00001730: 00 3D 33 3E 08 81 20 49 B2 31 A4 4D 46 00 83 33 |.=3>.. I.1.MF..3|
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 33 52 08 82 00 8F 33 5C 08 3A 00 |(I)..3R....3\.:.|
00001790: A8 33 66 08 8D 31 38 32 30 3A 8F 20 4D 41 53 4B |.3f..1820:. MASK|
000017A0: 45 52 4F 50 42 4F 55 57 00 BA 33 70 08 8B 20 4D |EROPBOUW..3p.. M|
000017B0: 4F 44 45 B2 30 20 A7 20 FE 18 00 D3 33 7A 08 9E |ODE.0 . ....3z..|
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 34 84 08 99 41 41 4E 24 22 47 41 |SOR..4...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 34 8E 08 99 22 28 4A 29 20 4F |RD";.*4..."(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 34 98 08 99 |ZIGINGEN";.J4...|
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 34 A2 08 FE |?"UIT$" ";.W4...|
00001850: 19 3A 20 D5 20 FE 18 00 67 34 AC 08 41 24 B2 22 |.: . ...g4..A$."|
00001860: 4A 4E 22 3A 8F 20 3F 00 A7 34 B6 08 99 41 41 4E |JN":. ?..4...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 34 C0 08 99 22 20 20 |IGINGEN..4..." |
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 34 CA 08 FE 19 |"UIT$" ";..4....|
000018D0: 00 DF 34 D4 08 41 24 B2 22 4A 4E 22 3A 8F 3F 00 |..4..A$."JN":.?.|
000018E0: 02 35 DE 08 9E 53 45 2C C2 28 32 33 36 29 2C C2 |.5...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 35 E8 08 8B 42 24 B2 22 4A 22 B0 42 |B$.'5...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 35 F2 08 43 49 52 3A |DOPBOUW.15..CIR:|
00001930: 80 00 37 35 FC 08 3A 00 3D 35 06 09 3A 00 5C 35 |..75..:.=5..:.\5|
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 35 1A |AANMAKEN ***.g5.|
00001960: 09 99 43 4C 45 41 52 00 6D 35 24 09 3A 00 8C 35 |..CLEAR.m5$.:..5|
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 35 38 |E BEREKENEN<..58|
00001990: 09 81 20 49 B2 31 A4 46 41 00 AD 35 42 09 3A 3A |.. I.1.FA..5B.::|
000019A0: 52 31 B2 52 31 AA 31 49 28 49 29 AA 31 00 B3 35 |R1.R1.1I(I).1..5|
000019B0: 4C 09 82 00 B9 35 56 09 3A 00 FF 35 60 09 8B 20 |L....5V.:..5`.. |
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 36 6A 09 3A 00 4D 36 74 09 41 52 B2 B5 28 28 |.6j.:.M6t.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 36 |ELS BEREKENEN.u6|
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 36 88 09 3A 00 97 36 92 09 |EGELS.{6..:..6..|
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 36 9C 09 41 24 B2 22 |ECTIE?<..6..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 36 A6 |DATA REGELS"..6.|
00001AC0: 09 99 41 24 3B 41 52 3B 00 ED 36 B0 09 9E 53 45 |..A$;AR;..6...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 37 |4,,NU$,CR$,A$..7|
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 37 C4 09 3A 00 25 37 CE 09 41 52 B2 |60..7..:.%7..AR.|
00001B20: C5 28 41 24 29 00 2B 37 D8 09 3A 00 43 37 E2 09 |.(A$).+7..:.C7..|
00001B30: 8F 20 3E 42 45 53 54 41 4E 44 4F 50 42 4F 55 57 |. >BESTANDOPBOUW|
00001B40: 45 4E 3C 00 5D 37 EC 09 FE 0D 23 32 22 49 4E 46 |EN<.]7....#2"INF|
00001B50: 4F 42 45 53 54 41 4E 44 2C 55 2C 57 22 00 64 37 |OBESTAND,U,W".d7|
00001B60: F6 09 A0 32 00 86 37 00 0A 8B 44 53 B3 B1 30 A7 |...2..7...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 37 0A 0A 3A 00 AE 37 14 |VOEREN..7..:..7.|
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: 37 1E 0A 3A 00 CD 37 28 0A 8F A0 3E 52 45 43 4F |7..:..7(...>RECO|
00001BC0: 52 44 20 56 52 49 4A 47 45 56 45 4E 3C 00 D5 37 |RD VRIJGEVEN<..7|
00001BD0: 32 0A B2 FE 0D 00 F1 37 3C 0A B2 23 33 2C 28 41 |2......7<..#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 38 46 0A 99 23 33 2C C7 28 32 35 35 29 |N..8F..#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 38 50 0A A0 33 00 |CHRIJVEN..8P..3.|
00001C20: 25 38 5A 0A 3A 00 39 38 64 0A 9F 31 2C 38 2C 31 |%8Z.:.98d..1,8,1|
00001C30: 35 3A 84 31 2C 45 3A A0 31 00 6F 38 6E 0A 8B 45 |5:.1,E:.1.o8n..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 38 78 0A 8E 00 7B 38 82 0A 3A 00 81 38 8C 0A |u8x...{8..:..8..|
00001C80: 3A 00 A6 38 96 0A 8F 20 2A 2A 2A 20 49 4E 56 4F |:..8... *** 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 38 A0 0A 99 43 4C 45 41 |LS ***..8...CLEA|
00001CB0: 52 24 00 C5 38 AA 0A 8D 38 35 33 30 3A 8F 20 49 |R$..8...8530:. I|
00001CC0: 4E 46 4F 27 53 00 CB 38 B4 0A 3A 00 EC 38 BE 0A |NFO'S..8..:..8..|
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 38 C8 |OR INITIAL.<..8.|
00001CF0: 0A 4D 46 B2 46 41 00 FC 38 D2 0A 3A 00 07 39 DC |.MF.FA..8..:..9.|
00001D00: 0A 81 49 B2 31 A4 46 00 4D 39 E6 0A 3A 3A 4D 4E |..I.1.F.M9..::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 39 |MZ$(I).EZ$(I).S9|
00001D50: F0 0A 82 00 59 39 FA 0A 3A 00 99 39 04 0B 8B 4E |....Y9..:..9...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 39 0E 0B 3A 00 |ND VOL)??..9..:.|
00001DA0: C0 39 18 0B 8F 20 3E 4F 56 45 52 47 41 56 45 53 |.9... >OVERGAVES|
00001DB0: 54 52 49 4E 47 53 20 49 4E 49 54 49 41 4C 2E 3C |TRINGS INITIAL.<|
00001DC0: 00 CC 39 22 0B 81 49 B2 31 A4 4D 46 00 E7 39 2C |..9"..I.1.MF..9,|
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 39 36 0B 82 00 F3 39 |(I)." "..96....9|
00001DF0: 40 0B 3A 00 0C 3A 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 3A 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 3A 5E 0B 3A 00 55 |ESTURING..:^.:.U|
00001E30: 3A 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 3A 72 0B 3A 00 87 3A 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 3A 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 3A 90 0B 3A 00 F0 3A 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 3B A4 0B 8B 20 4D 4F 44 45 20 B2 20 30 20 |..;... MODE . 0 |
00001F00: A7 20 FE 18 00 39 3B 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 3B B8 0B FE 19 |! "UIT$;.E;....|
00001F40: 3A D5 20 FE 18 00 4B 3B C2 0B 3A 00 52 3B CC 0B |:. ...K;..:.R;..|
00001F50: FE 19 00 5C 3B D6 0B 89 33 31 30 30 00 62 3B E0 |...\;...3100.b;.|
00001F60: 0B 3A 00 71 3B EA 0B 8B 4D 4F 44 45 B2 30 A7 FE |.:.q;...MODE.0..|
00001F70: 18 00 A6 3B 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 3B FE 0B FE 19 3A D5 FE |"UIT$;..;....:..|
00001FB0: 18 00 E6 3B 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 3B 12 0C FE 19 00 02 3C |"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 3C 26 0C 3A 00 0E 3C 30 0C 8E 00 14 |00..<&.:..<0....|
00002010: 3C 3A 0C 3A 00 1A 3C 44 0C 3A 00 3C 3C 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 3C 58 |ROGRAMMA ***.G<X|
00002040: 0C 41 24 B2 22 A0 22 00 4D 3C 62 0C 3A 00 6D 3C |.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 3C |ING AANMAKEN<.z<|
00002070: 76 0C 81 20 49 B2 31 A4 4D 46 00 98 3C 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 3C 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: B6 3C 94 0C 58 54 00 BC 3C 9E 0C 3A 00 C2 3C A8 |.<..XT..<..:..<.|
000020C0: 0C 3A 00 E5 3C B2 0C 8F 20 2A 2A 2A 20 44 41 54 |.:..<... *** DAT|
000020D0: 41 53 54 52 49 4E 47 20 53 43 48 52 49 4A 56 45 |ASTRING SCHRIJVE|
000020E0: 4E 20 2A 2A 2A 00 F8 3C BC 0C FE 0D 23 33 2C 42 |N ***..<....#3,B|
000020F0: 45 53 C0 44 2C 31 2C 22 00 13 3D C6 0C B2 23 33 |ES.D,1,"..=...#3|
00002100: 2C 28 4E 29 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 |,(N):. POSITIONE|
00002110: 52 45 4E 00 1F 3D D0 0C 99 23 33 2C 41 24 3B 00 |REN..=...#3,A$;.|
00002120: 27 3D DA 0C A0 20 33 00 2D 3D E4 0C 3A 00 33 3D |'=... 3.-=..:.3=|
00002130: EE 0C 3A 00 59 3D F8 0C 8F 20 2A 2A 2A 20 49 4E |..:.Y=... *** IN|
00002140: 44 45 58 54 41 42 45 4C 20 41 4B 54 55 41 4C 49 |DEXTABEL AKTUALI|
00002150: 53 45 52 45 4E 20 2A 2A 2A 00 6C 3D 02 0D 41 24 |SEREN ***.l=..A$|
00002160: B2 22 3E 22 AA 4D 52 24 28 4A 46 29 00 8C 3D 0C |.">".MR$(JF)..=.|
00002170: 0D 9E 53 53 2C 2C 2C 2C 2C 41 24 2C 4A 46 24 28 |..SS,,,,,A$,JF$(|
00002180: 30 29 2C 4A 46 24 28 31 29 2C 50 25 00 92 3D 16 |0),JF$(1),P%..=.|
00002190: 0D 3A 00 A0 3D 20 0D 8B 50 25 B2 30 A7 20 FE 18 |.:..= ..P%.0. ..|
000021A0: 00 BE 3D 2A 0D 3A 3A 4A 46 24 28 4E 45 AA 31 29 |..=*.::JF$(NE.1)|
000021B0: B2 C8 28 4D 52 24 28 4A 46 29 2C 4A 4C 29 00 CF |..(MR$(JF),JL)..|
000021C0: 3D 34 0D 3A 3A 50 25 28 4E 45 AA 31 29 B2 4E 00 |=4.::P%(NE.1).N.|
000021D0: D9 3D 3E 0D FE 19 D5 FE 18 00 F7 3D 48 0D 3A 3A |.=>........=H.::|
000021E0: 9E 53 42 2C 31 2C 2C 2C 2C 4A 46 24 28 30 29 2C |.SB,1,,,,JF$(0),|
000021F0: 4A 46 24 28 50 25 29 00 13 3E 52 0D 3A 3A 9E 53 |JF$(P%)..>R.::.S|
00002200: 42 2C 31 2C 2C 2C 2C 50 25 28 30 29 2C 50 25 28 |B,1,,,,P%(0),P%(|
00002210: 50 25 29 00 2F 3E 5C 0D 3A 3A 4A 46 24 28 50 25 |P%)./>\.::JF$(P%|
00002220: 29 B2 C8 28 4D 52 24 28 4A 46 29 2C 4A 4C 29 00 |)..(MR$(JF),JL).|
00002230: 3E 3E 66 0D 3A 3A 50 25 28 50 25 29 B2 4E 00 45 |>>f.::P%(P%).N.E|
00002240: 3E 70 0D FE 19 00 4B 3E 7A 0D 3A 00 6B 3E 84 0D |>p....K>z.:.k>..|
00002250: 41 46 B2 31 3A 8F 20 57 49 4A 5A 49 47 49 4E 47 |AF.1:. WIJZIGING|
00002260: 20 55 49 54 47 45 56 4F 45 52 44 00 71 3E 8E 0D | UITGEVOERD.q>..|
00002270: 3A 00 A0 3E 98 0D 4E B2 4E AA 31 3A 8F 20 50 4F |:..>..N.N.1:. PO|
00002280: 49 4E 54 45 52 20 4F 50 20 56 4F 4C 47 45 4E 44 |INTER OP VOLGEND|
00002290: 45 20 52 45 43 4F 52 44 20 4F 50 48 4F 47 45 4E |E RECORD OPHOGEN|
000022A0: 00 CC 3E A2 0D 4E 45 B2 4E 45 AA 31 3A 8F 20 45 |..>..NE.NE.1:. E|
000022B0: 43 48 54 20 44 41 54 41 20 52 45 47 45 4C 41 41 |CHT DATA REGELAA|
000022C0: 4E 54 41 4C 20 4F 50 48 4F 47 45 4E 00 D2 3E AC |NTAL OPHOGEN..>.|
000022D0: 0D 8E 00 D8 3E B6 0D 3A 00 DE 3E C0 0D 3A 00 04 |....>..:..>..:..|
000022E0: 3F CA 0D 8F 20 2A 2A 2A 20 50 4F 53 49 54 49 4F |?... *** POSITIO|
000022F0: 4E 45 52 45 4E 20 45 4E 20 49 4E 4C 45 5A 45 4E |NEREN EN INLEZEN|
00002300: 20 2A 2A 2A 00 18 3F D4 0D B2 23 33 2C 22 42 45 | ***..?...#3,"BE|
00002310: 53 54 41 4E 44 2C 31 2C 00 33 3F DE 0D B2 23 33 |STAND,1,.3?...#3|
00002320: 2C 28 52 29 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 |,(R):. POSITIONE|
00002330: 52 45 4E 00 39 3F E8 0D 3A 00 45 3F F2 0D 81 49 |REN.9?..:.E?...I|
00002340: B2 31 A4 46 41 00 5A 3F FC 0D 3A 3A 9E 53 31 2C |.1.FA.Z?..::.S1,|
00002350: 2C 33 2C 2C 2C 49 24 28 49 29 00 76 3F 06 0E 3A |,3,,,I$(I).v?..:|
00002360: 3A 8B 49 24 28 49 29 B2 C7 28 31 29 A7 49 24 28 |:.I$(I)..(1).I$(|
00002370: 49 29 B2 22 A0 22 00 7C 3F 10 0E 82 00 82 3F 1A |I).".".|?.....?.|
00002380: 0E 3A 00 8C 3F 24 0E 4C 4F 53 45 33 00 92 3F 2E |.:..?$.LOSE3..?.|
00002390: 0E 8E 00 98 3F 38 0E 3A 00 9E 3F 42 0E 3A 00 C4 |....?8.:..?B.:..|
000023A0: 3F 4C 0E 8F 20 2A 2A 2A 5A 4F 45 4B 45 4E 20 56 |?L.. ***ZOEKEN V|
000023B0: 45 52 41 4E 44 45 52 45 4E 20 57 49 53 53 45 4E |ERANDEREN WISSEN|
000023C0: 20 2A 2A 2A 00 D0 3F 56 0E 99 43 4C 45 41 52 24 | ***..?V..CLEAR$|
000023D0: 00 F7 3F 60 0E 8B 4E 45 B2 30 A7 34 30 38 30 3A |..?`..NE.0.4080:|
000023E0: 8F 20 41 41 4E 54 41 4C 20 44 41 54 41 52 45 47 |. AANTAL DATAREG|
000023F0: 45 4C 53 20 3D 30 3F 00 0F 40 6A 0E 8D 38 32 34 |ELS =0?..@j..824|
00002400: 30 3A 8F 20 5A 4F 45 4B 20 49 4E 46 4F 27 53 00 |0:. ZOEK INFO'S.|
00002410: 15 40 74 0E 3A 00 1F 40 7E 0E 4D 46 B2 46 41 00 |.@t.:..@~.MF.FA.|
00002420: 25 40 88 0E 3A 00 46 40 92 0E 8F 20 3E 4D 41 53 |%@..:.F@... >MAS|
00002430: 4B 45 52 47 45 4E 45 52 41 54 4F 52 20 49 4E 49 |KERGENERATOR INI|
00002440: 54 49 41 4C 2E 3C 00 52 40 9C 0E 81 49 B2 31 A4 |TIAL.<.R@...I.1.|
00002450: 4D 46 00 9E 40 A6 0E 3A 3A 4D 4E 24 28 49 29 B2 |MF..@..::MN$(I).|
00002460: 4E 49 24 28 49 29 3A 4D 31 28 49 29 B2 31 49 28 |NI$(I):M1(I).1I(|
00002470: 49 29 AA 31 3A 4D 53 28 49 29 B2 53 49 28 49 29 |I).1:MS(I).SI(I)|
00002480: 3A 4D 5A 28 49 29 B2 5A 49 28 49 29 3A 4D 5A 24 |:MZ(I).ZI(I):MZ$|
00002490: 28 49 29 B2 45 5A 24 28 49 29 AA 53 4F 24 00 A4 |(I).EZ$(I).SO$..|
000024A0: 40 B0 0E 3A 00 AA 40 BA 0E 82 00 B0 40 C4 0E 3A |@..:..@.....@..:|
000024B0: 00 CE 40 CE 0E 8F 20 3E 4F 56 45 52 47 41 56 45 |..@... >OVERGAVE|
000024C0: 53 54 52 49 4E 47 20 57 49 53 53 45 4E 3C 00 DB |STRING WISSEN<..|
000024D0: 40 D8 0E 81 20 49 B2 31 A4 4D 46 00 F6 40 E2 0E |@... I.1.MF..@..|
000024E0: 3A 3A 4D 52 24 28 49 29 B2 22 20 22 3A 49 24 28 |::MR$(I)." ":I$(|
000024F0: 49 29 B2 22 20 22 00 FC 40 EC 0E 82 00 02 41 F6 |I)." "..@.....A.|
00002500: 0E 3A 00 1E 41 00 0F 8D 31 38 32 30 3A 8F 20 4D |.:..A...1820:. M|
00002510: 41 53 4B 45 52 20 4F 50 42 4F 55 57 45 4E 00 38 |ASKER OPBOUWEN.8|
00002520: 41 0A 0F 53 55 42 31 39 30 30 3A 8F 20 4D 2E 42 |A..SUB1900:. M.B|
00002530: 45 53 54 55 52 49 4E 47 00 3E 41 14 0F 3A 00 60 |ESTURING.>A..:.`|
00002540: 41 1E 0F 8B 41 B2 31 33 33 A7 34 30 38 30 3A 8F |A...A.133.4080:.|
00002550: 20 4D 45 54 20 46 31 20 42 45 47 49 4E 4E 45 4E | MET F1 BEGINNEN|
00002560: 00 66 41 28 0F 3A 00 84 41 32 0F 8F 20 3E 49 4E |.fA(.:..A2.. >IN|
00002570: 44 45 58 42 45 53 54 2E 20 44 4F 4F 52 5A 4F 45 |DEXBEST. DOORZOE|
00002580: 4B 45 4E 3C 00 B1 41 3C 0F 50 25 B2 31 3A 8F 20 |KEN<..A<.P%.1:. |
00002590: 5A 4F 45 4B 45 4E 20 56 41 4E 41 46 20 45 45 52 |ZOEKEN VANAF EER|
000025A0: 53 54 45 20 49 4E 44 45 58 20 45 4C 45 4D 45 4E |STE INDEX ELEMEN|
000025B0: 54 00 E1 41 46 0F 8B 50 25 B1 4E 45 A7 8D 38 32 |T..AF..P%.NE..82|
000025C0: 34 30 3A 89 33 36 38 30 3A 8F 20 42 45 53 54 41 |40:.3680:. BESTA|
000025D0: 4E 44 20 47 52 45 4E 53 20 42 45 52 45 49 4B 54 |ND GRENS BEREIKT|
000025E0: 3F 00 07 42 50 0F 9E 53 53 2C 2C 2C 2C 2C 4D 52 |?..BP..SS,,,,,MR|
000025F0: 24 28 4A 46 29 2C 4A 46 24 28 30 29 2C 4A 46 24 |$(JF),JF$(0),JF$|
00002600: 28 50 25 29 2C 50 25 00 2D 42 5A 0F 8B 50 25 B2 |(P%),P%.-BZ..P%.|
00002610: 30 A7 8D 38 32 34 30 3A 89 33 36 38 30 3A 8F 20 |0..8240:.3680:. |
00002620: 4E 49 45 54 20 47 45 56 4F 4E 44 45 4E 00 33 42 |NIET GEVONDEN.3B|
00002630: 64 0F 3A 00 40 42 6E 0F 52 B2 50 25 28 50 25 29 |d.:.@Bn.R.P%(P%)|
00002640: 00 5C 42 78 0F 8D 33 35 34 30 3A 8F 20 50 4F 53 |.\Bx..3540:. POS|
00002650: 49 54 49 45 20 49 4E 4C 45 5A 45 4E 00 62 42 82 |ITIE INLEZEN.bB.|
00002660: 0F 3A 00 87 42 8C 0F 8F 20 3E 56 45 52 47 45 4C |.:..B... >VERGEL|
00002670: 49 4A 4B 49 4E 47 20 56 41 4E 20 41 4C 4C 45 20 |IJKING VAN ALLE |
00002680: 56 45 4C 44 45 4E 3C 00 94 42 96 0F 81 20 49 B2 |VELDEN<..B... I.|
00002690: 31 A4 46 41 00 B2 42 A0 0F 3A 3A 9E 53 53 2C 2C |1.FA..B..::.SS,,|
000026A0: 2C 2C 2C 4D 52 24 28 49 29 2C 49 24 28 49 29 2C |,,,MR$(I),I$(I),|
000026B0: 46 25 00 F2 42 AA 0F 3A 3A 8B 46 25 B3 B1 49 A7 |F%..B..::.F%..I.|
000026C0: 8B 4D 52 24 28 49 29 B3 B1 22 A0 22 A7 50 25 B2 |.MR$(I)..".".P%.|
000026D0: 50 25 AA 31 3A 89 33 39 31 30 3A 8F 20 4E 4F 54 |P%.1:.3910:. NOT|
000026E0: 20 46 4F 55 4E 44 20 45 4E 20 3C 3E 20 4C 45 45 | FOUND EN <> LEE|
000026F0: 47 3F 00 F8 42 B4 0F 82 00 FE 42 BE 0F 3A 00 12 |G?..B.....B..:..|
00002700: 43 C8 0F 8D 20 36 32 39 30 3A 8F 20 4D 45 4E 55 |C... 6290:. MENU|
00002710: 20 32 00 18 43 D2 0F 3A 00 40 43 DC 0F 8B 20 49 | 2..C..:.@C... I|
00002720: B2 32 A7 50 25 B2 50 25 AA 31 3A 89 33 39 31 30 |.2.P%.P%.1:.3910|
00002730: 3A 8F 20 56 45 52 44 45 52 20 5A 4F 45 4B 45 4E |:. VERDER ZOEKEN|
00002740: 00 66 43 E6 0F 8B 49 B2 35 A7 33 36 38 30 3A 8F |.fC...I.5.3680:.|
00002750: 20 5A 4F 45 4B 45 4E 20 4F 50 4E 49 45 57 20 53 | ZOEKEN OPNIEW S|
00002760: 54 41 52 54 45 4E 00 6C 43 F0 0F 8E 00 72 43 FA |TARTEN.lC....rC.|
00002770: 0F 3A 00 78 43 04 10 3A 00 98 43 0E 10 8F 20 2A |.:.xC..:..C... *|
00002780: 2A 2A 20 47 45 4F 52 44 45 4E 44 45 20 55 49 54 |** GEORDENDE UIT|
00002790: 56 4F 45 52 20 2A 2A 2A 00 B6 43 18 10 53 46 B2 |VOER ***..C..SF.|
000027A0: 4A 46 3A 8F 20 49 4E 44 45 58 20 42 45 56 45 49 |JF:. INDEX BEVEI|
000027B0: 4C 49 47 49 4E 47 00 CA 43 22 10 8B 20 4D 4F 44 |LIGING..C".. MOD|
000027C0: 45 20 49 53 20 30 A7 20 FE 18 00 05 44 2C 10 99 |E IS 0. ....D,..|
000027D0: 43 4C 45 41 52 24 41 41 4E 24 22 20 20 20 47 45 |CLEAR$AAN$" GE|
000027E0: 4F 52 44 45 4E 44 45 20 55 49 54 56 4F 45 52 20 |ORDENDE UITVOER |
000027F0: 56 41 4E 20 42 45 53 54 41 4E 44 20 20 20 22 20 |VAN BESTAND " |
00002800: 55 49 54 24 3B 00 11 44 36 10 FE 19 3A D5 20 FE |UIT$;..D6...:. .|
00002810: 18 00 4C 44 40 10 99 43 4C 45 41 52 24 41 41 4E |..LD@..CLEAR$AAN|
00002820: 24 22 20 20 20 47 45 4F 52 44 45 4E 44 45 20 55 |$" GEORDENDE U|
00002830: 49 54 56 4F 45 52 20 56 41 4E 20 42 45 53 54 41 |ITVOER VAN BESTA|
00002840: 4E 44 20 20 20 22 20 55 49 54 24 3B 00 53 44 4A |ND " UIT$;.SDJ|
00002850: 10 FE 19 00 59 44 54 10 3A 00 76 44 5E 10 8F 20 |....YDT.:.vD^.. |
00002860: 3E 53 4F 52 54 45 45 52 56 45 4C 44 20 41 46 56 |>SORTEERVELD AFV|
00002870: 52 41 47 45 4E 3C 00 85 44 68 10 9E 43 52 2C 2C |RAGEN<..Dh..CR,,|
00002880: 38 2C 30 2C 30 00 A7 44 72 10 41 24 B2 22 53 4F |8,0,0..Dr.A$."SO|
00002890: 52 54 45 52 45 4E 20 4E 41 41 52 20 56 45 4C 44 |RTEREN NAAR VELD|
000028A0: 4E 55 4D 4D 45 52 22 00 D8 44 7C 10 99 41 24 3B |NUMMER"..D|..A$;|
000028B0: 53 46 3B 22 20 20 28 43 52 29 22 3B 3A 8F 20 53 |SF;" (CR)";:. S|
000028C0: 54 41 4E 44 41 41 52 44 57 41 41 52 44 45 3D 49 |TANDAARDWAARDE=I|
000028D0: 4E 44 45 58 56 45 4C 44 00 FF 44 86 10 9E 53 45 |NDEXVELD..D...SE|
000028E0: 2C C3 28 41 24 29 AA 31 2C 38 2C C3 28 C4 28 46 |,.(A$).1,8,.(.(F|
000028F0: 41 29 29 2C 2C 4E 55 24 2C 43 52 24 2C 41 24 00 |A)),,NU$,CR$,A$.|
00002900: 0C 45 90 10 4A 46 B2 C5 28 41 24 29 00 38 45 9A |.E..JF..(A$).8E.|
00002910: 10 8B 4A 46 B3 31 B0 4A 46 B1 46 41 A7 34 31 33 |..JF.1.JF.FA.413|
00002920: 30 3A 8F 20 47 45 4C 44 49 47 20 53 4F 52 54 45 |0:. GELDIG SORTE|
00002930: 45 52 56 45 4C 44 20 3F 00 3E 45 A4 10 3A 00 4D |ERVELD ?.>E..:.M|
00002940: 45 AE 10 8B 4D 4F 44 45 B2 30 A7 FE 18 00 88 45 |E...MODE.0.....E|
00002950: B8 10 99 43 4C 45 41 52 24 41 41 4E 24 22 20 20 |...CLEAR$AAN$" |
00002960: 20 20 20 20 20 53 4F 52 54 45 45 52 4D 41 53 4B | SORTEERMASK|
00002970: 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ER |
00002980: 20 20 22 55 49 54 24 3B 00 A0 45 C2 10 9E 52 2C | "UIT$;..E...R,|
00002990: 2C 32 32 2C 30 2C 30 3A 8F 20 43 55 52 53 4F 52 |,22,0,0:. CURSOR|
000029A0: 00 D7 45 CC 10 99 41 41 4E 24 22 46 31 20 3D 20 |..E...AAN$"F1 = |
000029B0: 4D 45 4E 55 20 20 20 20 20 20 20 20 20 20 20 20 |MENU |
000029C0: 20 20 20 46 37 20 3D 20 53 4F 52 54 45 52 45 4E | F7 = SORTEREN|
000029D0: 20 22 55 49 54 24 3B 00 E3 45 D6 10 FE 19 3A D5 | "UIT$;..E....:.|
000029E0: 20 FE 18 00 10 46 E0 10 99 43 4C 45 41 52 24 41 | ....F...CLEAR$A|
000029F0: 41 4E 24 22 20 20 20 20 20 20 20 53 4F 52 54 45 |AN$" SORTE|
00002A00: 45 52 4D 41 53 4B 45 52 20 20 22 55 49 54 24 22 |ERMASKER "UIT$"|
00002A10: 00 29 46 EA 10 9E 43 52 2C 2C 32 33 2C 30 2C 30 |.)F...CR,,23,0,0|
00002A20: 3A 8F 20 43 55 52 53 4F 52 00 5E 46 F4 10 99 41 |:. CURSOR.^F...A|
00002A30: 41 4E 24 22 20 20 20 20 20 20 20 20 20 46 31 20 |AN$" F1 |
00002A40: 3D 4D 45 4E 55 20 20 20 20 20 20 46 37 20 3D 20 |=MENU F7 = |
00002A50: 53 4F 52 54 45 52 45 4E 22 55 49 54 24 3B 00 64 |SORTEREN"UIT$;.d|
00002A60: 46 FE 10 3A 00 6B 46 08 11 FE 19 00 8D 46 12 11 |F..:.kF......F..|
00002A70: 3A 8F 20 3E 4D 41 53 4B 45 52 47 45 4E 45 52 41 |:. >MASKERGENERA|
00002A80: 54 4F 52 20 49 4E 49 54 49 41 4C 2E 3C 00 97 46 |TOR INITIAL.<..F|
00002A90: 1C 11 4D 46 B2 46 41 00 9D 46 26 11 3A 00 A9 46 |..MF.FA..F&.:..F|
00002AA0: 30 11 81 49 B2 31 A4 4D 46 00 F5 46 3A 11 3A 3A |0..I.1.MF..F:.::|
00002AB0: 4D 4E 24 28 49 29 B2 4E 49 24 28 49 29 3A 4D 31 |MN$(I).NI$(I):M1|
00002AC0: 28 49 29 B2 31 49 28 49 29 AA 31 3A 4D 24 28 49 |(I).1I(I).1:M$(I|
00002AD0: 29 B2 53 49 28 49 29 3A 4D 5A 28 49 29 B2 5A 49 |).SI(I):MZ(I).ZI|
00002AE0: 28 49 29 3A 4D 5A 24 28 49 29 B2 45 5A 24 28 49 |(I):MZ$(I).EZ$(I|
00002AF0: 29 AA 53 4F 24 00 10 47 44 11 3A 3A 4D 52 24 28 |).SO$..GD.::MR$(|
00002B00: 49 29 B2 22 20 22 3A 49 24 28 49 29 B2 22 20 22 |I)." ":I$(I)." "|
00002B10: 00 16 47 4E 11 82 00 1C 47 58 11 3A 00 38 47 62 |..GN....GX.:.8Gb|
00002B20: 11 8D 31 38 32 30 3A 8F 20 4D 41 53 4B 45 52 20 |..1820:. MASKER |
00002B30: 4F 50 42 4F 55 57 45 4E 00 54 47 6C 11 8D 31 39 |OPBOUWEN.TGl..19|
00002B40: 30 30 3A 8F 20 4D 41 53 4B 45 52 42 45 53 54 55 |00:. MASKERBESTU|
00002B50: 52 49 4E 47 00 64 47 76 11 8B 41 B2 31 33 33 A7 |RING.dGv..A.133.|
00002B60: 35 32 32 30 00 6A 47 80 11 3A 00 85 47 8A 11 8F |5220.jG..:..G...|
00002B70: 3E 5A 4F 45 4B 43 52 45 54 45 52 49 41 20 52 45 |>ZOEKCRETERIA RE|
00002B80: 44 44 45 4E 3C 00 90 47 94 11 81 49 B2 31 A4 41 |DDEN<..G...I.1.A|
00002B90: 00 A3 47 9E 11 3A 3A 53 24 28 49 29 B2 4D 52 24 |..G..::S$(I).MR$|
00002BA0: 28 49 29 00 A9 47 A8 11 82 00 AF 47 B2 11 3A 00 |(I)..G.....G..:.|
00002BB0: D8 47 BC 11 FE 0D 23 33 2C 22 42 45 53 54 41 4E |.G....#3,"BESTAN|
00002BC0: 44 2C 31 22 3A 8F 20 44 41 54 41 4B 41 4E 41 41 |D,1":. DATAKANAA|
00002BD0: 4C 20 4F 50 45 4E 45 4E 00 0A 48 C6 11 8B 53 46 |L OPENEN..H...SF|
00002BE0: B2 4A 46 A7 34 38 31 30 3A 8F 20 4F 55 44 20 49 |.JF.4810:. OUD I|
00002BF0: 4E 44 45 58 56 45 4C 44 20 3D 20 4E 49 45 55 57 |NDEXVELD = NIEUW|
00002C00: 20 49 4E 44 45 58 56 45 4C 44 00 4C 48 D0 11 8B | INDEXVELD.LH...|
00002C10: 41 46 B2 31 A7 8D 37 37 34 30 3A 8F 20 57 49 4A |AF.1..7740:. WIJ|
00002C20: 5A 49 4E 47 45 4E 3F 20 4A 41 20 44 41 4E 20 49 |ZINGEN? JA DAN I|
00002C30: 4E 44 45 58 20 52 45 45 44 44 45 4E 20 44 4F 4F |NDEX REEDDEN DOO|
00002C40: 52 20 56 41 53 54 4C 45 47 47 45 4E 00 52 48 DA |R VASTLEGGEN.RH.|
00002C50: 11 3A 00 65 48 E4 11 8F 3C 49 4E 44 45 58 54 41 |.:.eH...<INDEXTA|
00002C60: 42 45 4C 2E 3C 00 71 48 EE 11 81 49 B2 31 A4 41 |BEL.<.qH...I.1.A|
00002C70: 52 00 8A 48 F8 11 3A 3A 50 25 28 49 29 B2 30 3A |R..H..::P%(I).0:|
00002C80: 4A 46 24 28 49 29 B2 22 A0 22 00 90 48 02 12 82 |JF$(I)."."..H...|
00002C90: 00 96 48 0C 12 3A 00 CC 48 16 12 8F 20 3E 49 4E |..H..:..H... >IN|
00002CA0: 44 45 58 54 41 42 45 4C 20 4E 49 45 55 57 20 4F |DEXTABEL NIEUW O|
00002CB0: 50 42 4F 55 57 45 4E 20 28 49 4E 44 45 58 3D 53 |PBOUWEN (INDEX=S|
00002CC0: 4F 52 54 45 45 52 56 45 4C 44 29 3C 00 F4 48 20 |ORTEERVELD)<..H |
00002CD0: 12 4E 45 B2 30 3A 4E 4E B2 4E 3A 4E B2 31 3A 8F |.NE.0:NN.N:N.1:.|
00002CE0: 20 52 45 44 44 45 4E 3B 4E 2C 4E 45 20 49 4E 49 | REDDEN;N,NE INI|
00002CF0: 54 49 41 4C 00 FA 48 2A 12 3A 00 08 49 34 12 81 |TIAL..H*.:..I4..|
00002D00: 52 B2 31 A4 4E 4E AB 31 00 1D 49 3E 12 3A 3A B2 |R.1.NN.1..I>.::.|
00002D10: 91 2C 28 52 29 3A 8F 20 50 4F 53 49 54 00 2A 49 |.,(R):. POSIT.*I|
00002D20: 48 12 3A 3A A1 23 33 2C 41 24 00 63 49 52 12 3A |H.::.#3,A$.cIR.:|
00002D30: 3A 8B 41 24 B2 C7 28 32 35 35 29 B0 41 24 B2 22 |:.A$..(255).A$."|
00002D40: 20 22 A7 4E B2 4E AA 31 3A 89 34 37 38 30 3A 8F | ".N.N.1:.4780:.|
00002D50: 20 52 45 43 4F 52 44 20 56 52 49 4A 47 45 56 45 | RECORD VRIJGEVE|
00002D60: 4E 20 3F 00 80 49 5C 12 3A 3A B2 23 33 2C 28 52 |N ?..I\.::.#3,(R|
00002D70: 29 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 52 45 4E |):. POSITIONEREN|
00002D80: 00 86 49 66 12 3A 00 95 49 70 12 3A 3A 81 49 31 |..If.:..Ip.::.I1|
00002D90: B2 31 A4 46 41 00 AE 49 7A 12 3A 3A 3A 3A 9E 53 |.1.FA..Iz.::::.S|
00002DA0: 49 2C 2C 33 2C 2C 2C 4D 52 24 28 49 31 29 00 D0 |I,,3,,,MR$(I1)..|
00002DB0: 49 84 12 3A 3A 3A 3A 8B 4D 52 24 28 49 31 29 B2 |I..::::.MR$(I1).|
00002DC0: C7 28 31 29 A7 4D 52 24 28 49 31 29 B2 22 A0 22 |.(1).MR$(I1)."."|
00002DD0: 00 D8 49 8E 12 3A 3A 82 00 DE 49 98 12 3A 00 FB |..I..::...I..:..|
00002DE0: 49 A2 12 3A 3A 8D 33 33 32 30 3A 8F 20 49 4E 44 |I..::.3320:. IND|
00002DF0: 45 58 20 49 4E 56 4F 45 52 45 4E 00 01 4A AC 12 |EX INVOEREN..J..|
00002E00: 82 00 07 4A B6 12 3A 00 14 4A C0 12 81 49 33 B2 |...J..:..J...I3.|
00002E10: 49 A4 4E 45 00 27 4A CA 12 9F 35 2C 44 50 28 34 |I.NE.'J...5,DP(4|
00002E20: 29 2C 44 50 28 35 29 00 2D 4A D4 12 3A 00 51 4A |),DP(5).-J..:.QJ|
00002E30: DE 12 8F 20 3E 44 41 54 41 52 45 47 45 4C 53 20 |... >DATAREGELS |
00002E40: 47 45 53 4F 52 54 45 45 52 44 20 4C 45 5A 45 4E |GESORTEERD LEZEN|
00002E50: 3C 00 6C 4A E8 12 3A 3A B2 23 33 2C 28 50 25 28 |<.lJ..::.#3,(P%(|
00002E60: 49 31 29 29 3A 8F 20 50 4F 53 49 54 00 72 4A F2 |I1)):. POSIT.rJ.|
00002E70: 12 3A 00 91 4A FC 12 3A 3A 81 49 31 B2 31 A4 46 |.:..J..::.I1.1.F|
00002E80: 41 3A 53 55 53 53 49 2C 2C 33 2C 2C 49 24 28 49 |A:SUSSI,,3,,I$(I|
00002E90: 29 00 B1 4A 06 13 3A 3A 3A 3A 8B 49 53 28 49 31 |)..J..::::.IS(I1|
00002EA0: 29 B2 C7 28 31 29 A7 49 24 28 49 31 29 B2 22 20 |)..(1).I$(I1)." |
00002EB0: 22 00 B9 4A 10 13 3A 3A 82 00 BF 4A 1A 13 3A 00 |"..J..::...J..:.|
00002EC0: E5 4A 24 13 3A 3A 8F 20 3E 56 45 52 47 45 4C 49 |.J$.::. >VERGELI|
00002ED0: 4A 4B 49 4E 47 20 4D 45 54 20 48 45 54 20 4D 41 |JKING MET HET MA|
00002EE0: 53 4B 45 52 3C 00 F4 4A 2E 13 3A 3A 81 49 34 B2 |SKER<..J..::.I4.|
00002EF0: 31 A4 46 41 00 1B 4B 38 13 3A 3A 3A 3A 9E 53 53 |1.FA..K8.::::.SS|
00002F00: 2C 2C 2C 2C 2C 53 24 28 49 34 29 2C 49 24 28 30 |,,,,,S$(I4),I$(0|
00002F10: 29 2C 49 24 28 49 34 29 2C 46 25 00 3D 4B 42 13 |),I$(I4),F%.=KB.|
00002F20: 3A 3A 3A 3A 8B 46 25 B3 B1 49 34 A7 8B 53 24 28 |::::.F%..I4..S$(|
00002F30: 49 34 29 B3 B1 22 A0 22 A7 34 39 37 30 00 45 4B |I4)..".".4970.EK|
00002F40: 4C 13 3A 3A 82 00 4B 4B 56 13 3A 00 61 4B 60 13 |L.::..KKV.:.aK`.|
00002F50: 3A 3A 8D 37 35 34 30 3A 8F 20 50 52 49 4E 54 45 |::.7540:. PRINTE|
00002F60: 4E 00 69 4B 6A 13 82 49 33 00 6F 4B 74 13 3A 00 |N.iKj..I3.oKt.:.|
00002F70: 79 4B 7E 13 A0 35 2C A0 33 00 7F 4B 88 13 3A 00 |yK~..5,.3..K..:.|
00002F80: 9E 4B 92 13 8F 20 3E 4E 49 45 55 57 20 49 4E 44 |.K... >NIEUW IND|
00002F90: 45 58 20 4F 56 45 52 4E 45 4D 45 4E 3F 3C 00 C8 |EX OVERNEMEN?<..|
00002FA0: 4B 9C 13 8B 53 46 B2 4A 46 A7 35 32 32 30 3A 8F |K...SF.JF.5220:.|
00002FB0: 20 4F 55 44 45 20 49 4E 44 45 58 20 4F 4E 56 45 | OUDE INDEX ONVE|
00002FC0: 52 41 4E 44 45 52 44 3F 00 CE 4B A6 13 3A 00 DA |RANDERD?..K..:..|
00002FD0: 4B B0 13 99 43 4C 45 41 52 24 00 ED 4B BA 13 9E |K...CLEAR$..K...|
00002FE0: 43 52 2C 2C 38 2C 30 2C 30 3A 9E 43 52 00 F3 4B |CR,,8,0,0:.CR..K|
00002FF0: C4 13 3A 00 20 4C CE 13 99 22 4D 4F 45 54 20 56 |..:. L..."MOET V|
00003000: 45 4C 44 4E 55 4D 4D 45 52 22 4A 46 22 4D 45 54 |ELDNUMMER"JF"MET|
00003010: 20 44 45 20 41 41 4E 44 55 49 44 49 4E 47 3A 22 | DE AANDUIDING:"|
00003020: 00 39 4C D8 13 99 22 2A 2A 2A 20 22 4E 49 24 28 |.9L..."*** "NI$(|
00003030: 4A 46 29 22 20 2A 2A 2A 22 00 5A 4C E2 13 99 22 |JF)" ***".ZL..."|
00003040: 4E 49 45 55 57 20 49 4E 44 45 58 56 45 4C 44 20 |NIEUW INDEXVELD |
00003050: 57 4F 52 44 20 3F 20 4E 22 3B 00 60 4C 0A 14 3A |WORD ? N";.`L..:|
00003060: 00 70 4C 14 14 42 24 B2 22 4A 4E 22 3A 8F 20 3F |.pL..B$."JN":. ?|
00003070: 00 93 4C 1E 14 9E 53 45 2C C2 28 43 53 29 AB 31 |..L...SE,.(CS).1|
00003080: 2C C2 28 43 5A 29 2C 31 2C 2C 42 24 2C 43 52 24 |,.(CZ),1,,B$,CR$|
00003090: 2C 41 24 00 AD 4C 28 14 8B 20 41 24 B2 22 4A 22 |,A$..L(.. A$."J"|
000030A0: B0 41 24 B2 22 4A 22 A7 20 35 32 31 30 00 CE 4C |.A$."J". 5210..L|
000030B0: 32 14 4A 46 B2 53 46 3A 8F 20 49 4E 44 45 58 56 |2.JF.SF:. INDEXV|
000030C0: 45 4C 44 20 57 45 45 52 20 48 41 4C 45 4E 00 E6 |ELD WEER HALEN..|
000030D0: 4C 3C 14 8D 37 38 37 30 3A 8F 20 49 4E 44 45 58 |L<..7870:. INDEX|
000030E0: 20 4C 41 44 45 4E 00 F5 4C 46 14 41 46 B2 30 3A | LADEN..LF.AF.0:|
000030F0: 89 35 32 32 30 00 FB 4C 50 14 3A 00 04 4D 5A 14 |.5220..LP.:..MZ.|
00003100: 41 46 B2 31 00 0A 4D 64 14 8E 00 10 4D 6E 14 3A |AF.1..Md....Mn.:|
00003110: 00 16 4D 78 14 3A 00 36 4D 82 14 8F 20 2A 2A 2A |..Mx.:.6M... ***|
00003120: 20 50 52 49 4E 54 45 52 50 41 52 41 4D 45 54 45 | PRINTERPARAMETE|
00003130: 52 53 20 2A 2A 2A 00 42 4D 8C 14 99 43 4C 45 41 |RS ***.BM...CLEA|
00003140: 52 24 00 54 4D 96 14 8B 20 4D 4F 44 45 B2 30 20 |R$.TM... MODE.0 |
00003150: A7 20 FE 18 00 85 4D A0 14 99 41 41 4E 24 22 20 |. ....M...AAN$" |
00003160: 20 20 20 20 20 20 50 52 49 4E 54 45 52 50 41 52 | PRINTERPAR|
00003170: 41 4D 45 54 45 52 53 20 20 20 20 20 20 20 20 22 |AMETERS "|
00003180: 55 49 54 24 3B 00 9D 4D AA 14 9E 52 2C 2C 32 30 |UIT$;..M...R,,20|
00003190: 2C 30 2C 30 3A 8F 20 43 55 52 53 4F 52 00 D6 4D |,0,0:. CURSOR..M|
000031A0: B4 14 99 41 41 4E 24 22 20 46 31 20 3D 20 4D 45 |...AAN$" F1 = ME|
000031B0: 4E 55 20 20 46 37 20 3D 20 50 41 52 41 4D 45 54 |NU F7 = PARAMET|
000031C0: 45 52 53 20 56 41 53 54 4C 45 47 47 45 4E 20 20 |ERS VASTLEGGEN |
000031D0: 22 55 49 54 24 3B 00 E0 4D BE 14 99 3A D5 FE 18 |"UIT$;..M...:...|
000031E0: 00 09 4E C8 14 99 41 41 4E 24 22 20 20 20 20 20 |..N...AAN$" |
000031F0: 20 20 50 52 49 4E 54 45 52 50 41 52 41 4D 45 54 | PRINTERPARAMET|
00003200: 45 52 53 22 55 49 54 24 3B 00 22 4E D2 14 9E 43 |ERS"UIT$;."N...C|
00003210: 52 2C 2C 32 33 2C 30 2C 30 3A 8F 20 43 55 52 53 |R,,23,0,0:. CURS|
00003220: 4F 52 00 5B 4E DC 14 99 41 41 4E 24 20 20 46 31 |OR.[N...AAN$ F1|
00003230: 20 B2 20 4D 45 4E 55 20 20 46 37 20 B2 20 50 41 | . MENU F7 . PA|
00003240: 52 41 4D 45 54 45 52 53 20 56 41 53 54 4C 45 47 |RAMETERS VASTLEG|
00003250: 47 45 4E 20 20 22 55 49 54 24 3B 00 62 4E E6 14 |GEN "UIT$;.bN..|
00003260: FE 19 00 68 4E F0 14 3A 00 89 4E FA 14 8F 20 3E |...hN..:..N... >|
00003270: 4D 41 53 4B 45 52 47 45 4E 45 52 41 54 4F 52 20 |MASKERGENERATOR |
00003280: 49 4E 49 54 49 41 4C 2E 3C 00 93 4E 04 15 4D 46 |INITIAL.<..N..MF|
00003290: B2 44 50 00 99 4E 0E 15 3A 00 A5 4E 18 15 81 49 |.DP..N..:..N...I|
000032A0: B2 31 A4 4D 46 00 EB 4E 22 15 3A 3A 4D 4E 24 28 |.1.MF..N".::MN$(|
000032B0: 49 29 B2 44 49 24 28 49 29 3A 4D 31 28 49 29 B2 |I).DI$(I):M1(I).|
000032C0: 44 31 28 49 29 3A 4D 53 28 49 29 B2 44 53 28 49 |D1(I):MS(I).DS(I|
000032D0: 29 3A 4D 5A 28 49 29 B2 44 5A 28 49 29 3A 4D 5A |):MZ(I).DZ(I):MZ|
000032E0: 24 28 49 29 B2 44 45 24 28 49 29 00 F1 4E 2C 15 |$(I).DE$(I)..N,.|
000032F0: 3A 00 24 4F 36 15 3A 3A 49 24 28 49 29 B2 C9 28 |:.$O6.::I$(I)..(|
00003300: C4 28 44 50 28 49 29 29 2C C3 28 C4 28 44 50 28 |.(DP(I)),.(.(DP(|
00003310: 49 29 29 29 AB 31 29 3A 4D 52 24 28 49 29 B2 49 |I))).1):MR$(I).I|
00003320: 24 28 49 29 00 2A 4F 40 15 82 00 30 4F 4A 15 3A |$(I).*O@...0OJ.:|
00003330: 00 59 4F 54 15 49 24 28 31 29 B2 22 4E 22 3A 8B |.YOT.I$(1)."N":.|
00003340: 44 50 28 31 29 B2 31 A7 49 24 28 31 29 B2 22 55 |DP(1).1.I$(1)."U|
00003350: 22 A7 44 50 28 31 29 B2 31 00 5F 4F 5E 15 3A 00 |".DP(1).1._O^.:.|
00003360: 7B 4F 68 15 8D 31 38 32 30 3A 8F 20 4D 41 53 4B |{Oh..1820:. MASK|
00003370: 45 52 20 4F 50 42 4F 55 57 45 4E 00 97 4F 72 15 |ER OPBOUWEN..Or.|
00003380: 8D 31 39 30 30 3A 8F 20 4D 41 53 4B 45 52 42 45 |.1900:. MASKERBE|
00003390: 53 54 55 52 49 4E 47 00 AD 4F 7C 15 8B 41 B2 31 |STURING..O|..A.1|
000033A0: 33 33 A7 35 36 31 30 3A 8F 20 46 31 3F 00 B3 4F |33.5610:. F1?..O|
000033B0: 86 15 3A 00 DD 4F 90 15 8F 20 3E 4F 56 45 52 4E |..:..O... >OVERN|
000033C0: 41 4D 45 20 56 41 4E 20 44 45 20 4E 49 45 55 57 |AME VAN DE NIEUW|
000033D0: 45 20 50 41 52 41 4D 45 54 45 52 53 3C 00 04 50 |E PARAMETERS<..P|
000033E0: 9A 15 8B 20 C5 20 28 4D 52 24 28 31 29 B2 22 55 |... . (MR$(1)."U|
000033F0: 22 B0 4D 52 24 28 31 29 B2 22 55 22 A7 44 50 28 |".MR$(1)."U".DP(|
00003400: 31 29 B2 31 00 2F 50 A4 15 44 50 28 31 29 B2 30 |1).1./P..DP(1).0|
00003410: 3A 8B 4D 52 24 28 31 29 B2 22 55 22 B0 4D 52 24 |:.MR$(1)."U".MR$|
00003420: 28 31 29 B2 22 55 22 A7 44 50 28 31 29 B2 31 00 |(1)."U".DP(1).1.|
00003430: 35 50 AE 15 3A 00 41 50 B8 15 81 49 B2 31 A4 44 |5P..:.AP...I.1.D|
00003440: 50 00 57 50 C2 15 3A 3A 44 50 28 49 29 B2 C5 28 |P.WP..::DP(I)..(|
00003450: 4D 52 24 28 49 29 29 00 5D 50 CC 15 82 00 63 50 |MR$(I)).]P....cP|
00003460: D6 15 3A 00 81 50 E0 15 8D 38 31 31 30 3A 8F 20 |..:..P...8110:. |
00003470: 49 4E 46 4F 27 53 20 56 41 53 54 4C 45 47 47 45 |INFO'S VASTLEGGE|
00003480: 4E 00 87 50 EA 15 8E 00 8D 50 F4 15 3A 00 93 50 |N..P.....P..:..P|
00003490: FE 15 3A 00 AF 50 08 16 8F 20 2A 2A 2A 20 52 45 |..:..P... *** RE|
000034A0: 4F 52 47 41 4E 49 53 41 54 49 45 20 2A 2A 2A 00 |ORGANISATIE ***.|
000034B0: BB 50 12 16 99 43 4C 45 41 52 24 00 CB 50 1C 16 |.P...CLEAR$..P..|
000034C0: 8B 4D 4F 44 45 B2 30 20 A7 FE 18 00 F3 50 26 16 |.MODE.0 .....P&.|
000034D0: 99 41 41 4E 24 22 20 20 20 20 20 52 45 4F 52 47 |.AAN$" REORG|
000034E0: 41 4E 49 53 41 54 49 45 20 20 20 20 20 22 55 49 |ANISATIE "UI|
000034F0: 54 24 3B 00 0C 51 30 16 9E 43 52 2C 2C 32 32 2C |T$;..Q0..CR,,22,|
00003500: 30 2C 30 3A 8F 20 43 55 52 53 4F 52 00 00 00 |0,0:. CURSOR... |
..;.D.MODE.B(.("D7")):. 40 TEKENS:MODE=0
; 80 TEKENS:MODE=80.A.N.:.W.X.. *STARTAD
RESSEN*.....IT..("0B00"):. STARTADRES IN
ITIALISERING.....SE..("1300"):. STARTADR
ES INVOERROUTINE.....SI..("14C0"):. STAR
TADRES INPUT#-ROUTINE... .SS..("1540"):.
STARTADRES ZOEKROUTINE.>...SB..("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..("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..:.:...,P.." "AAN$" I "UIT$"
INVOEREN VAN DATAREGELS".@,Z.." "AA
N$" Z "UIT$" ZOEKEN, WIJZIGEN, WISSEN
.Z,D..:." "AAN$" G "UIT$" GEORDENDE UI
TVOER VAN BESTAND"..,N..:." "AAN$" P "U
IT$" PRINTERPARAMETERS".R,X..:." "AAN$
" R "UIT$" REORGANISATIE"..-...:." "AA
N$" V "UIT$" VERLATEN VAN PROGRAMMA"..-
...:.:..G-...AAN$" UW K
EUZE ? ";.- ..AAN$"
";.
.-....:U ....-...AAN$"
KEUZE MENU.Y-...AAN$" -
---------..-H..:.:....R.." "AAN$" I "UI
T$" INVOER VAN DATA REGEL.F....:." "AA
N$" Z "UIT$" ZOEKEN, WIJZIGEN, WISSEN..
....:." "AAN$" G "UIT$" GEORDENDE UITV
OER VAN BESTAND"......:." "AAN$" P "UIT
$" PRINTERPARAMETERS".X....:." "AAN$"
R "UIT$" REORGANISATIE"../...:." "AAN$
" V "UIT$" VERLATEN VAN PROGRAMMA"../..
.:.:..</...AAN$" UW KEU
ZE ?.G/"..AAN$".N/,....T/6.:.\/@.I.0.Y/J
...I.0:..A$:I..(M1$,A$): ./T.:../^.. I.
C(M1$).1680:. VERLATEN VAN HET PROGRAMMA
.R/H.. I .2710,3660,4110,5250,5640../R.K
T1300../|.:../..:..0... *** VERLATEN PRO
GRAMMA ***..0... AF.0.1720.70...7740:. I
NDEX VASTLEGGEN.S0...8120:. INFO VASTLEG
GEN.Y0...._0B.:.E0L.:.0V.. *** FOUTMELD
ING ***..0...CR,,24,0,0:.CRS.PLAATSEN..0
...SD$..0....A$..0.....0..:.A0..:..0...
*** MASKER OPBOUWEN ***..0&..I.1.MF..10.
::.CR,,MZ(I),MS(I),0:. CRS.SET.31:.::.MN
(I);H(SP$1I(I).C(I$(I)).1):.91D...?1N...
E1X.:.K1B.:.U1L..2010.K1V.I.1:. EERSTE V
ELD..1..S.C(MN(I)).MS(I):. KOLOM..1...SE
,S,MZ(I),M1(I),,MZ$(I),E2$,MR$(I).R1..A.
B(253):. EINDTEKEN IN'253'..1... A.145.I
.1.I.I.1:.1920:. CRS.UP.*2...(A.17.A.13)
.I.MF.I.I.1:.1920:. CRS.DOWN OF CR.I2...
A.133.A.136. .:. F1 OFF7.S2...1920.Y2F.
:._2P.:.R2Z.. MASKER TONEN..2... MODE.0.
....2...CLEAR$AAN$" DEMONSTRATIE VAN I
NVOERMASKER "UIT$;.H2.... U ....2...CL
EAR$AAN$" DEMONSTRATIE VAN INVOERMASKER
..2......3..:. 3 .. <MASKERGEN.INITIAL.>
.*3*.MF.FA.034.:.=3>.. I.1.MF..3H.::MN$(
I).NI$(I):M1(I).1I(I):MS(I).SI(I):MZ(I).
ZI(I):MZ$(I).EZ$(I)..3R....3\.:..3F..182
0:. MASKEROPBOUW..3P.. MODE.0 . ...S3Z..
CR,,22,0,0:. CURSOR..4...AAN$"GAAT U MET
DIT INVOER MASKER AKKOORD";.*4..."(J) O
F WILT U NOG WIJZIGINGEN";.J4..."AANBREN
GEN (N) ?"UIT$" ";.W4....: U ...G4..A$."
JN":. ?..4...AAN$" INVOER MASKER AKKOOR
D (J) OF WILT U NOG WIJZIGINGEN.I4..."
AANBRENGEN (N) ?"UIT$" ";.P4J.....4T.A$.
"JN":.?..5...SE,B(236),B(235),1,,A$,CR$,
B$.'5...B$."J".B$."J"..:. BESTANDOPBOUW.
15..CIR:..75..:.=5..:.\5... *** BESTAND
AANMAKEN ***.G5...CLEAR.M5$.:..5... >REC
ORDLENGTE BEREKENEN<..58.. I.1.FA..5B.::
R1.R1.1I(I).1..5L....5V.:..5`.. R1.255..
"MAX DATA REGELLENGTE OVERSCHREDEN! INKO
RTEN+STARTEN":...6J.:.M6T.AR..(((570.6).
254).(R1.J1.1.6.1)):. MAX AANTAL DATAREG
ELS BEREKENEN.U6~..AR.999.AR.999:. MAX.9
99 DATAREGELS.{6..:..6... >GEBRUIKER COR
ECTIE?<..6..A$."MAXUMAAL AANTAL DATA REG
ELS".H6...A$;AR;..6...SE,C(A$).1,B(253),
4,,NU$,CR$,A$..7...E(A$).AROE(A$)..1..:.
UP$;:.2460..7D.:.%7N.AR.E(A$).+7X.:.C7..
. >BESTANDOPBOUWEN<.]7....#2"INFOBESTAND
,U,W".D7.. 2..7...DS..0..1750:.2540:.UIT
VOEREN..7..:..7...8120:. INFOBESTAND SCH
RIJVEN..7..:.M7(.. >RECORD VRIJGEVEN<.U7
2......7<..#3,(AR):. POSITIONEREN..8F..#
3,G(255):VRIJGAVETEKEN SCHRIJVEN..8P. 3.
%8Z.:.98D..1,8,15:.1,E: 1.O8N..E..0.E..5
0..1750:."DISKETTEFOUT! NIEUWE START":..
U8X...{8..:..8..:..8... *** INVOER VAN D
ATA REGELS ***..8 ..CLEAR$.E8...8530:. I
NFO'S.K8..:..8... >MASKERGENERATOR INITI
AL.<..8H.MF.FA..8R.:..9...I.1.F.M9..::MN
$(I).NI$(I):M1(I).1I(I):MS(I).SI(I):MZ(I
).ZI(I):MZ$(I).EZ$(I).S9....Y9..:..9...N
.AR.2970:. MAX.AANTAL DATAREGELS BEREIKT
(=BESTAND VOL)??..9..:..9... >OVERGAVES
TRINGS INITIAL.<.L9"..I.1.MF..9,.::MR$(I
)." ":I$(I)." "..96....9@.:..: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$..<..XT..<..:.B<..:..<... *** DAT
ASTRING SCHRIJVEN ***..<....#3,BES.D,1,"
..=F..#3,(N):. POSITIONEREN..=P..#3,A$;.
'=Z. 3.-=..:.3=..:.Y=... *** INDEXTABEL
AKTUALISEREN ***.L=..A$.">".MR$(JF)..=.
..SS,,,,,A$,JF$(0),JF$(1),P%..=..:. = ..
P%.0. ....=*.::JF$(NE.1).H(MR$(JF),JL).O
=4.::P%(NE.1).N.Y=>...U....=H.::.SB,1,,,
,JF$(0),JF$(P%)..>R.::.SB,1,,,,P%(0),P%(
P%)./>\.::JF$(P%).H(MR$(JF),JL).>>F.::P%
(P%).N.E>P....K>Z.:.K>..AF.1:. WIJZIGING
UITGEVOERD.Q>..:. >..N.N.1:. POINTER OP
VOLGENDE RECORD OPHOGEN.L>..NE.NE.1:. E
CHT DATA REGELAANTAL OPHOGEN.R>....X>..:
..>..:..?J.. *** POSITIONEREN EN INLEZEN
***..?T..#3,"BESTAND,1,.3?...#3,(R):. P
OSITIONEREN.9?..:.E?...I.1.FA.Z?..::.S1,
,3,,,I$(I).V?..::.I$(I).G(1).I$(I)." ".|
?.....?..:..?$.LOSE3..?.....?8.:..?B.:.D
?L.. ***ZOEKEN VERANDEREN WISSEN ***.P?V
..CLEAR$..?`..NE.0.4080:. AANTAL DATAREG
ELS =0?..@J..8240:. ZOEK INFO'S..@T.:..@
~.MF.FA.%@..:.F@... >MASKERGENERATOR INI
TIAL.<.R@...I.1.MF..@..::MN$(I).NI$(I):M
1(I).1I(I).1:MS(I).SI(I):MZ(I).ZI(I):MZ$
(I).EZ$(I).SO$..@..:..@.....@D.:.N@N.. >
OVERGAVESTRING WISSEN<..@X.. I.1.MF..@..
::MR$(I)." ":I$(I)." "..@.....A..:..A...
1820:. MASKER OPBOUWEN.8A..SUB1900:. M.B
ESTURING.>A..:.`A...A.133.4080:. MET F1
BEGINNEN.FA(.:..A2.. >INDEXBEST. DOORZOE
KEN<..A<.P%.1:. ZOEKEN VANAF EERSTE INDE
X ELEMENT..AF..P%.NE..8240:.3680:. BESTA
ND GRENS BEREIKT?..BP..SS,,,,,MR$(JF),JF
$(0),JF$(P%),P%.-BZ..P%.0..8240:.3680:.
NIET GEVONDEN.3BD.:.@BN.R.P%(P%).\BX..35
40:. POSITIE INLEZEN.BB..:..B... >VERGEL
IJKING VAN ALLE VELDEN<..B... I.1.FA..B
.::.SS,,,,,MR$(I),I$(I),F%..B..::.F%..I.
.MR$(I).." ".P%.P%.1:.3910:. NOT FOUND E
N <> LEEG?..B.....B..:..CH.. 6290:. MENU
2..CR.:.@C... I.2.P%.P%.1:.3910:. VERDE
R ZOEKEN.FC...I.5.3680:. ZOEKEN OPNIEW S
TARTEN.LC....RC..:.XC..:..C... *** GEORD
ENDE UITVOER ***..C..SF.JF:. INDEX BEVEI
LIGING.JC".. MODE IS 0. ....D,..CLEAR$AA
N$" GEORDENDE UITVOER VAN BESTAND "
UIT$;..D6...:U ...LD@..CLEAR$AAN$" GEO
RDENDE UITVOER VAN BESTAND " UIT$;.SDJ
....YDT.:.VD^.. >SORTEERVELD AFVRAGEN<..
DH..CR,,8,0,0..DR.A$."SORTEREN NAAR VELD
NUMMER".XD|..A$;SF;" (CR)";:. STANDAARD
WAARDE=INDEXVELD..D...SE,C(A$).1,8,C(D(F
A)),,NU$,CR$,A$..E..JF.E(A$).8E...JF.1.J
F.FA.4130:. GELDIG SORTEERVELD ?.>E..:.M
E...MODE.0.....E...CLEAR$AAN$" SOR
TEERMASKER "UIT$;. EB..R,
,22,0,0:. CURSOR.WEL..AAN$"F1 = MENU
F7 = SORTEREN "UIT$;..EV...:U
....F...CLEAR$AAN$" SORTEERMASKER
"UIT$".)F...CR,,23,0,0:. CURSOR.^F...A
AN$" F1 =MENU F7 = SORTEREN
"UIT$;.DF..:.KF......F..:. >MASKERGENERA
TOR INITIAL.<..F..MF.FA..F&.:..F0..I.1.M
F..F:.::MN$(I).NI$(I):M1(I).1I(I).1:M$(I
).SI(I):MZ(I).ZI(I):MZ$(I).EZ$(I).SO$..G
D.::MR$(I)." ":I$(I)." "..GN....GX.:.8GB
..1820:. MASKER OPBOUWEN.TGL..1900:. MAS
KERBESTURING.DGV..A.133.5220.JG..:..G...
>ZOEKCRETERIA REDDEN<..G...I.1.A..G..::S
$(I).MR$(I)..G.....G..:.XG....#3,"BESTAN
D,1":. DATAKANAAL OPENEN..HF..SF.JF.4810
:. OUD INDEXVELD = NIEUW INDEXVELD.LHP..
AF.1..7740:. WIJZINGEN? JA DAN INDEX REE
DDEN DOOR VASTLEGGEN.RHZ.:.EH...<INDEXTA
BEL.<.QH...I.1.AR..H..::P%(I).0:JF$(I)."
"..H.....H..:.LH... >INDEXTABEL NIEUW O
PBOUWEN (INDEX=SORTEERVELD)<..H .NE.0:NN
.N:N.1:. REDDEN;N,NE INITIAL..H*.:..I4..
R.1.NN.1..I>.::..,(R):. POSIT.*IH.::.#3,
A$.CIR.::.A$.G(255).A$." ".N.N.1:.4780:.
RECORD VRIJGEVEN ?..I\.::.#3,(R):. POSI
TIONEREN..IF.:..IP.::.I1.1.FA..IZ.::::.S
I,,3,,,MR$(I1).PI..::::.MR$(I1).G(1).MR$
(I1)." ".XI..::...I..:..I..::.3320:. IND
EX INVOEREN..J.....J..:..J...I3.I.NE.'JJ
..5,DP(4),DP(5).-JT.:.QJ... >DATAREGELS
GESORTEERD LEZEN<.LJ..::.#3,(P%(I1)):. P
OSIT.RJ..:..J..::.I1.1.FA:SUSSI,,3,,I$(I
)..J..::::.IS(I1).G(1).I$(I1)." "..J..::
...J..:..J$.::. >VERGELIJKING MET HET MA
SKER<..J..::.I4.1.FA..K8.::::.SS,,,,,S$(
I4),I$(0),I$(I4),F%.=KB.::::.F%..I4..S$(
I4).." ".4970.EKL.::..KKV.:.AK`.::.7540:
. PRINTEN.IKJ..I3.OKT.:.YK~. 5, 3.K..:.
.K... >NIEUW INDEX OVERNEMEN?<.HK...SF.J
F.5220:. OUDE INDEX ONVERANDERD?.NK..:.Z
K...CLEAR$..K...CR,,8,0,0:.CR..KD.:. LN.
."MOET VELDNUMMER"JF"MET DE AANDUIDING:"
.9LX.."*** "NI$(JF)" ***".ZL..."NIEUW IN
DEXVELD WORD ? N";.`L..:.PL..B$."JN":. ?
..L...SE,B(CS).1,B(CZ),1,,B$,CR$,A$..L(.
. A$."J".A$."J". 5210.NL2.JF.SF:. INDEXV
ELD WEER HALEN..L<..7870:. INDEX LADEN..
LF.AF.0:.5220..LP.:..MZ.AF.1..MD....MN.:
..MX.:.6M... *** PRINTERPARAMETERS ***.B
M...CLEAR$.TM... MODE.0 . ....M ..AAN$"
PRINTERPARAMETERS "UIT$;..M
...R,,20,0,0:. CURSOR.VM...AAN$" F1 = ME
NU F7 = PARAMETERS VASTLEGGEN "UIT$;..
M...:U....NH..AAN$" PRINTERPARAMET
ERS"UIT$;."NR..CR,,23,0,0:. CURSOR.[N...
AAN$ F1 . MENU F7 . PARAMETERS VASTLEG
GEN "UIT$;.BN.....HN..:..N... >MASKERGE
NERATOR INITIAL.<..N..MF.DP..N..:..N...I
.1.MF..N".::MN$(I).DI$(I):M1(I).D1(I):MS
(I).DS(I):MZ(I).DZ(I):MZ$(I).DE$(I)..N,.
:.$O6.::I$(I).I(D(DP(I)),C(D(DP(I))).1):
MR$(I).I$(I).*O@...0OJ.:.YOT.I$(1)."N":.
DP(1).1.I$(1)."U".DP(1).1._O^.:.{OH..182
0:. MASKER OPBOUWEN..OR..1900:. MASKERBE
STURING..O|..A.133.5610:. F1?..O..:..O..
. >OVERNAME VAN DE NIEUWE PARAMETERS<..P
... E (MR$(1)."U".MR$(1)."U".DP(1).1./P.
.DP(1).0:.MR$(1)."U".MR$(1)."U".DP(1).1.
5P..:.AP...I.1.DP.WPB.::DP(I).E(MR$(I)).
]PL...CPV.:..P...8110:. INFO'S VASTLEGGE
N..P.....P..:..P..:..P... *** REORGANISA
TIE ***..P...CLEAR$.KP...MODE.0 .....P&.
.AAN$" REORGANISATIE "UIT$;..Q0.
.CR,,22,0,0:. CURSOR...
> CLICK IMAGE PREVIEW FOR FULL MODAL