DPP TEXTALL
FILE INFORMATION
FILENAME(S): DPP TEXTALL
FILE TYPE(S): PRG
FILE SIZE: 17.5K
FIRST SEEN: 2025-12-02 00:13:48
APPEARS ON: 1 disk(s)
FILE HASH
08ce3ba84292d579332d8ae33cfc98cdbdf30125544ad3d7f2ae9cabc0013938
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HVH TEST | DPP TEXTALL | PRG | earthshaker | 15 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 96 00 8F 20 2A 53 54 41 52 54 41 44 |....... *STARTAD|
00000010: 52 45 53 2A 00 3C 08 A0 00 53 45 B2 34 39 31 35 |RES*.<...SE.4915|
00000020: 32 3A 8F 20 53 54 41 52 54 41 44 52 45 53 20 49 |2:. STARTADRES I|
00000030: 4E 56 4F 45 52 52 4F 55 54 49 4E 45 00 6B 08 AA |NVOERROUTINE.k..|
00000040: 00 53 49 B2 34 39 31 35 32 AA 32 AC 32 35 36 3A |.SI.49152.2.256:|
00000050: 8F 20 53 54 41 52 54 41 44 52 45 53 20 49 4E 50 |. STARTADRES INP|
00000060: 55 54 23 2D 52 4F 55 54 49 4E 45 00 97 08 B4 00 |UT#-ROUTINE.....|
00000070: 53 53 B2 34 39 31 35 32 AA 34 AC 32 35 36 3A 8F |SS.49152.4.256:.|
00000080: 20 53 54 41 52 54 41 44 52 45 53 20 5A 4F 45 4B | STARTADRES ZOEK|
00000090: 52 4F 55 54 49 4E 45 00 D1 08 BE 00 53 42 B2 34 |ROUTINE.....SB.4|
000000A0: 39 31 35 32 AA 36 AC 32 35 36 3A 8F 20 53 54 41 |9152.6.256:. STA|
000000B0: 52 54 41 44 52 45 53 20 42 4C 4F 4B 56 45 52 53 |RTADRES BLOKVERS|
000000C0: 43 48 55 49 56 49 4E 47 53 20 52 4F 55 54 49 4E |CHUIVINGS ROUTIN|
000000D0: 45 00 D7 08 C8 00 3A 00 F5 08 CD 00 8D 20 39 30 |E.....:...... 90|
000000E0: 30 30 3A 8F 20 52 4F 55 54 49 4E 45 53 20 49 4E |00:. ROUTINES IN|
000000F0: 4C 45 5A 45 4E 00 FB 08 D2 00 3A 00 18 09 DC 00 |LEZEN.....:.....|
00000100: 8F 20 2A 4E 55 4D 45 52 49 45 4B 45 20 56 41 52 |. *NUMERIEKE VAR|
00000110: 49 41 42 45 4C 45 4E 2A 00 31 09 E6 00 43 53 B2 |IABELEN*.1...CS.|
00000120: 32 31 31 3A 8F 20 43 55 52 53 4F 52 4B 4F 4C 4F |211:. CURSORKOLO|
00000130: 4D 00 4A 09 F0 00 43 5A B2 32 31 34 3A 8F 20 43 |M.J...CZ.214:. C|
00000140: 55 52 53 4F 52 52 45 47 45 4C 00 70 09 FA 00 43 |URSORREGEL.p...C|
00000150: 52 B2 35 38 36 34 30 3A 8F 20 43 55 52 53 4F 52 |R.58640:. CURSOR|
00000160: 50 4C 41 41 54 53 49 4E 47 52 4F 55 54 49 4E 45 |PLAATSINGROUTINE|
00000170: 00 76 09 04 01 3A 00 7C 09 0E 01 3A 00 90 09 18 |.v...:.|...:....|
00000180: 01 8F 20 2A 53 54 55 55 52 54 45 4B 45 4E 53 2A |.. *STUURTEKENS*|
00000190: 00 B0 09 22 01 43 52 24 B2 C7 28 31 33 29 3A 8F |...".CR$..(13):.|
000001A0: 20 43 41 52 52 49 41 47 45 20 52 45 54 55 52 4E | CARRIAGE RETURN|
000001B0: 00 CE 09 2C 01 48 4F 4D 45 24 B2 C7 28 31 39 29 |...,.HOME$..(19)|
000001C0: 3A 8F 20 43 55 52 53 4F 52 20 48 4F 4D 45 00 E8 |:. CURSOR HOME..|
000001D0: 09 36 01 43 4C 45 41 52 24 B2 C7 28 31 34 37 29 |.6.CLEAR$..(147)|
000001E0: 3A 8F 20 43 4C 45 41 52 00 03 0A 40 01 55 50 24 |:. CLEAR...@.UP$|
000001F0: B2 C7 28 31 34 35 29 3A 8F 20 43 55 52 53 4F 52 |..(145):. CURSOR|
00000200: 20 55 50 00 21 0A 4A 01 44 4F 57 4E 24 B2 C7 28 | UP.!.J.DOWN$..(|
00000210: 31 37 29 3A 8F 20 43 55 52 53 4F 52 20 44 4F 57 |17):. CURSOR DOW|
00000220: 4E 00 42 0A 54 01 52 45 43 48 54 53 24 B2 C7 28 |N.B.T.RECHTS$..(|
00000230: 31 39 29 3A 8F 20 43 55 52 53 4F 52 20 52 49 47 |19):. CURSOR RIG|
00000240: 48 54 00 62 0A 5E 01 4C 49 4E 4B 53 24 B2 C7 28 |HT.b.^.LINKS$..(|
00000250: 31 35 37 29 3A 8F 20 43 55 52 53 4F 52 20 4C 45 |157):. CURSOR LE|
00000260: 46 54 00 7E 0A 68 01 41 41 4E 24 B2 C7 28 31 38 |FT.~.h.AAN$..(18|
00000270: 29 3A 8F 20 52 45 56 45 52 53 20 41 41 4E 00 9B |):. REVERS AAN..|
00000280: 0A 72 01 55 49 54 24 B2 C7 28 31 34 36 29 3A 8F |.r.UIT$..(146):.|
00000290: 20 52 45 56 45 52 53 20 55 49 54 00 A1 0A 7C 01 | REVERS UIT...|.|
000002A0: 3A 00 A7 0A 86 01 3A 00 BE 0A 90 01 8F 20 2A 46 |:.....:...... *F|
000002B0: 55 4E 43 54 49 45 54 4F 45 54 53 45 4E 2A 00 CD |UNCTIETOETSEN*..|
000002C0: 0A 9A 01 46 31 24 B2 C7 28 31 33 33 29 00 DC 0A |...F1$..(133)...|
000002D0: A4 01 46 33 24 B2 C7 28 31 33 34 29 00 EB 0A AE |..F3$..(134)....|
000002E0: 01 46 35 24 B2 C7 28 31 33 35 29 00 FA 0A B8 01 |.F5$..(135).....|
000002F0: 46 37 24 B2 C7 28 31 33 36 29 00 09 0B C2 01 46 |F7$..(136).....F|
00000300: 32 24 B2 C7 28 31 33 37 29 00 18 0B CC 01 46 34 |2$..(137).....F4|
00000310: 24 B2 C7 28 31 33 38 29 00 27 0B D6 01 46 36 24 |$..(138).'...F6$|
00000320: B2 C7 28 31 33 39 29 00 36 0B E0 01 46 38 24 B2 |..(139).6...F8$.|
00000330: C7 28 31 34 30 29 00 3C 0B EA 01 3A 00 42 0B F4 |.(140).<...:.B..|
00000340: 01 3A 00 59 0B FE 01 8F 20 2A 41 4E 44 45 52 45 |.:.Y.... *ANDERE|
00000350: 20 53 54 52 49 4E 47 53 2A 00 87 0B 08 02 41 24 | STRINGS*.....A$|
00000360: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000370: 20 20 20 20 20 20 20 20 20 20 20 22 3A 8F 20 32 | ":. 2|
00000380: 35 20 53 41 43 45 53 00 BA 0B 12 02 53 50 24 B2 |5 SACES.....SP$.|
00000390: 41 24 AA 41 24 AA 41 24 AA 41 24 AA 41 24 AA 41 |A$.A$.A$.A$.A$.A|
000003A0: 24 AA 41 24 AA 41 24 AA 41 24 AA 41 24 3A 8F 20 |$.A$.A$.A$.A$:. |
000003B0: 32 35 30 20 53 50 41 43 45 53 00 D4 0B 1C 02 4D |250 SPACES.....M|
000003C0: 31 24 B2 22 45 53 47 44 52 56 22 3A 8F 20 4D 45 |1$."ESGDRV":. ME|
000003D0: 4E 55 20 31 00 0C 0C 26 02 4D 32 24 B2 46 31 24 |NU 1...&.M2$.F1$|
000003E0: AA 43 52 24 AA 52 45 43 48 54 53 24 AA 4C 49 4E |.CR$.RECHTS$.LIN|
000003F0: 4B 53 24 AA 46 33 24 AA 46 35 24 AA 46 38 24 AA |KS$.F3$.F5$.F8$.|
00000400: 46 37 24 3A 8F 20 4D 45 4E 55 20 32 00 4B 0C 30 |F7$:. MENU 2.K.0|
00000410: 02 4E 31 24 B2 22 30 31 32 33 34 35 36 37 38 39 |.N1$."0123456789|
00000420: 22 3A 8F 20 5A 55 49 56 45 52 20 4E 55 4D 45 52 |":. ZUIVER NUMER|
00000430: 49 45 4B 45 20 49 4E 56 4F 45 52 20 28 48 45 4C |IEKE INVOER (HEL|
00000440: 45 20 47 45 54 41 4C 4C 45 4E 29 00 70 0C 3A 02 |E GETALLEN).p.:.|
00000450: 4E 55 24 B2 4E 31 24 AA 22 2B 2D 2E 22 3A 8F 20 |NU$.N1$."+-.":. |
00000460: 4E 55 4D 45 52 49 45 4B 45 20 49 4E 56 4F 45 52 |NUMERIEKE INVOER|
00000470: 00 96 0C 44 02 81 20 49 B2 36 35 A4 39 35 3A 41 |...D.. I.65.95:A|
00000480: 31 24 B2 41 31 24 AA C7 28 49 29 AA C7 28 49 AA |1$.A1$..(I)..(I.|
00000490: 31 32 38 29 3A 82 00 BD 0C 4E 02 41 31 24 B2 41 |128):....N.A1$.A|
000004A0: 31 24 AA 22 20 21 23 24 25 26 27 28 29 2B 2C 2D |1$." !#$%&'()+,-|
000004B0: 2E 2F 3A 3B 3D 40 22 AA C7 28 33 34 29 00 EB 0C |./:;=@"..(34)...|
000004C0: 58 02 41 31 24 B2 41 31 24 AA 4E 55 24 3A 53 4F |X.A1$.A1$.NU$:SO|
000004D0: 24 B2 22 2A 3C 3E 3F 22 3A 8F 20 41 4C 50 48 41 |$."*<>?":. ALPHA|
000004E0: 4E 55 4D 2E 20 49 4E 56 4F 45 52 00 14 0D 62 02 |NUM. INVOER...b.|
000004F0: 45 31 24 B2 46 31 24 AA 46 37 24 3A 8F 20 45 49 |E1$.F1$.F7$:. EI|
00000500: 4E 44 45 20 4D 45 54 20 27 46 31 27 20 45 4E 20 |NDE MET 'F1' EN |
00000510: 27 46 37 27 00 44 0D 6C 02 45 32 24 B2 44 4F 57 |'F7'.D.l.E2$.DOW|
00000520: 4E 24 AA 55 50 24 AA 43 52 24 AA 45 31 24 3A 8F |N$.UP$.CR$.E1$:.|
00000530: 20 2B 43 52 53 2E 20 44 4F 57 4E 2C 55 50 3B 46 | +CRS. DOWN,UP;F|
00000540: 31 3B 46 37 00 4A 0D 76 02 3A 00 50 0D 80 02 3A |1;F7.J.v.:.P...:|
00000550: 00 75 0D 8A 02 8F 20 2A 42 45 53 54 41 4E 44 53 |.u.... *BESTANDS|
00000560: 50 45 43 49 46 49 45 4B 45 20 56 41 52 49 41 42 |PECIFIEKE VARIAB|
00000570: 45 4C 45 4E 2A 00 A4 0D 94 02 4A 46 B2 31 3A 8F |ELEN*.....JF.1:.|
00000580: 20 4E 55 4D 4D 45 52 20 56 41 4E 20 49 4E 44 45 | NUMMER VAN INDE|
00000590: 58 56 45 4C 44 20 28 3D 53 4C 45 55 54 45 4C 56 |XVELD (=SLEUTELV|
000005A0: 45 4C 44 29 00 C2 0D 9E 02 4A 4C B2 38 3A 8F 20 |ELD).....JL.8:. |
000005B0: 4C 45 4E 47 54 45 20 53 4C 45 55 54 45 4C 56 45 |LENGTE SLEUTELVE|
000005C0: 4C 44 00 EB 0D A8 02 4E B2 31 3A 8F 20 56 4F 4C |LD.....N.1:. VOL|
000005D0: 47 45 4E 44 45 20 54 45 20 42 45 53 43 48 52 49 |GENDE TE BESCHRI|
000005E0: 4A 56 45 4E 20 52 45 43 4F 52 44 00 0D 0E B2 02 |JVEN RECORD.....|
000005F0: 4E 45 B2 30 3A 8F 20 45 43 48 54 20 41 41 4E 54 |NE.0:. ECHT AANT|
00000600: 41 4C 20 44 41 54 41 52 45 47 45 4C 53 00 26 0E |AL DATAREGELS.&.|
00000610: BC 02 46 41 B2 37 3A 8F 20 41 41 4E 54 41 4C 20 |..FA.7:. AANTAL |
00000620: 56 45 4C 44 45 4E 00 43 0E C6 02 44 50 B2 35 3A |VELDEN.C...DP.5:|
00000630: 8F 20 50 52 49 4E 54 45 52 50 41 52 41 4D 45 54 |. PRINTERPARAMET|
00000640: 45 52 53 00 71 0E D0 02 41 B2 46 41 3A 8B 44 50 |ERS.q...A.FA:.DP|
00000650: B1 46 41 A7 41 B2 44 50 3A 8F 20 41 3D 41 41 4E |.FA.A.DP:. A=AAN|
00000660: 54 41 4C 20 4D 41 53 4B 45 52 20 56 45 4C 44 45 |TAL MASKER VELDE|
00000670: 4E 00 77 0E DA 02 3A 00 7D 0E E4 02 3A 00 96 0E |N.w...:.}...:...|
00000680: EE 02 8F 20 2A 44 49 4D 45 4E 53 49 4F 4E 45 52 |... *DIMENSIONER|
00000690: 49 4E 47 45 4E 2A 00 E1 0E F8 02 86 49 24 28 46 |INGEN*......I$(F|
000006A0: 41 29 2C 4E 49 24 28 46 41 29 2C 4C 49 28 46 41 |A),NI$(FA),LI(FA|
000006B0: 29 2C 53 49 28 46 41 29 2C 5A 49 28 46 41 29 2C |),SI(FA),ZI(FA),|
000006C0: 45 5A 24 28 46 41 29 2C 53 24 28 46 41 29 3A 8F |EZ$(FA),S$(FA):.|
000006D0: 20 44 41 54 41 20 52 45 47 45 4C 56 45 4C 44 45 | DATA REGELVELDE|
000006E0: 4E 00 20 0F 02 03 86 4D 4E 24 28 41 29 2C 4D 4C |N. ....MN$(A),ML|
000006F0: 28 41 29 2C 4D 53 28 41 29 2C 4D 5A 28 41 29 2C |(A),MS(A),MZ(A),|
00000700: 4D 5A 24 28 41 29 2C 4D 52 24 28 41 29 3A 8F 20 |MZ$(A),MR$(A):. |
00000710: 4D 41 53 4B 45 52 50 41 52 41 4D 45 54 45 52 53 |MASKERPARAMETERS|
00000720: 00 4F 0F 0C 03 86 4A 46 24 28 39 39 39 29 2C 50 |.O....JF$(999),P|
00000730: 25 28 39 39 39 29 3A 8F 20 49 4E 44 45 58 56 45 |%(999):. INDEXVE|
00000740: 4C 44 2C 20 50 4F 49 4E 54 45 52 56 45 4C 44 00 |LD, POINTERVELD.|
00000750: 93 0F 16 03 86 44 50 28 44 50 29 2C 44 49 24 28 |.....DP(DP),DI$(|
00000760: 44 50 29 2C 44 53 28 44 50 29 2C 44 5A 28 44 50 |DP),DS(DP),DZ(DP|
00000770: 29 2C 44 45 24 28 44 50 29 3A 8F 20 50 52 49 4E |),DE$(DP):. PRIN|
00000780: 54 45 52 20 50 41 52 41 4D 45 54 45 52 56 45 4C |TER PARAMETERVEL|
00000790: 44 45 4E 00 99 0F 20 03 3A 00 9F 0F 2A 03 3A 00 |DEN... .:...*.:.|
000007A0: BF 0F 34 03 8F 20 2A 49 4E 56 4F 45 52 4D 41 53 |..4.. *INVOERMAS|
000007B0: 4B 45 52 20 44 45 46 49 4E 49 45 52 45 4E 2A 00 |KER DEFINIEREN*.|
000007C0: FC 0F 3E 03 4E 49 24 28 31 29 B2 22 56 4F 4F 52 |..>.NI$(1)."VOOR|
000007D0: 4E 41 41 4D 20 3A 20 22 3A 4C 49 28 31 29 B2 31 |NAAM : ":LI(1).1|
000007E0: 35 3A 53 49 28 31 29 B2 32 3A 5A 49 28 31 29 B2 |5:SI(1).2:ZI(1).|
000007F0: 33 3A 45 5A 24 28 31 29 B2 41 31 24 00 35 10 48 |3:EZ$(1).A1$.5.H|
00000800: 03 4E 49 24 28 32 29 B2 22 4E 41 41 4D 20 3A 20 |.NI$(2)."NAAM : |
00000810: 22 3A 4C 31 28 32 29 B2 31 35 3A 53 49 28 32 29 |":L1(2).15:SI(2)|
00000820: B2 35 3A 5A 49 28 32 29 B2 35 3A 45 5A 24 28 32 |.5:ZI(2).5:EZ$(2|
00000830: 29 B2 41 31 24 00 74 10 52 03 4E 49 24 28 33 29 |).A1$.t.R.NI$(3)|
00000840: B2 22 53 54 52 41 41 54 20 3A 20 22 3A 4C 49 28 |."STRAAT : ":LI(|
00000850: 33 29 B2 32 30 3A 53 49 28 33 29 B2 32 3A 5A 49 |3).20:SI(3).2:ZI|
00000860: 28 33 29 B2 37 3A 45 5A 24 28 33 29 B2 41 31 24 |(3).7:EZ$(3).A1$|
00000870: AA 4E 55 24 00 B0 10 5C 03 4E 49 24 28 34 29 B2 |.NU$...\.NI$(4).|
00000880: 22 50 4F 53 54 43 4F 44 45 20 3A 20 22 3A 4C 49 |"POSTCODE : ":LI|
00000890: 28 34 29 B2 34 3A 53 49 28 34 29 B2 36 3A 5A 49 |(4).4:SI(4).6:ZI|
000008A0: 28 34 29 B2 39 3A 45 5A 24 28 34 29 B2 4E 55 24 |(4).9:EZ$(4).NU$|
000008B0: 00 F4 10 66 03 4E 49 24 28 35 29 B2 22 57 4F 4F |...f.NI$(5)."WOO|
000008C0: 4E 50 4C 41 41 54 53 20 3A 20 22 3A 4C 49 28 35 |NPLAATS : ":LI(5|
000008D0: 29 B2 32 30 3A 53 49 28 35 29 B2 32 3A 5A 49 28 |).20:SI(5).2:ZI(|
000008E0: 35 29 B2 31 31 3A 45 5A 24 28 35 29 B2 41 31 24 |5).11:EZ$(5).A1$|
000008F0: AA 4E 55 24 00 36 11 70 03 4E 49 24 28 36 29 B2 |.NU$.6.p.NI$(6).|
00000900: 22 54 45 4C 45 46 4F 4F 4E 20 3A 20 22 3A 4C 49 |"TELEFOON : ":LI|
00000910: 28 36 29 B2 31 35 3A 53 49 28 36 29 B2 32 3A 5A |(6).15:SI(6).2:Z|
00000920: 49 28 36 29 B2 31 33 3A 45 5A 24 28 36 29 B2 41 |I(6).13:EZ$(6).A|
00000930: 31 24 AA 4E 55 24 00 78 11 7A 03 4E 49 24 28 37 |1$.NU$.x.z.NI$(7|
00000940: 29 B2 22 44 49 56 45 52 53 45 4E 20 3A 20 22 3A |)."DIVERSEN : ":|
00000950: 4C 49 28 37 29 B2 32 30 3A 53 49 28 37 29 B2 30 |LI(7).20:SI(7).0|
00000960: 3A 5A 49 28 37 29 B2 31 35 3A 45 5A 24 28 37 29 |:ZI(7).15:EZ$(7)|
00000970: B2 41 31 24 AA 4E 55 24 00 7E 11 84 03 3A 00 84 |.A1$.NU$.~...:..|
00000980: 11 8E 03 3A 00 A8 11 98 03 8F 20 2A 50 52 49 4E |...:...... *PRIN|
00000990: 54 45 52 50 41 52 41 4D 45 54 45 52 53 20 44 46 |TERPARAMETERS DF|
000009A0: 49 4E 49 45 52 45 4E 2A 00 ED 11 A2 03 44 49 24 |INIEREN*.....DI$|
000009B0: 28 31 29 B2 22 56 45 4C 44 45 4E 20 4E 41 41 53 |(1)."VELDEN NAAS|
000009C0: 54 2D 20 4F 46 20 4F 4E 44 45 52 20 45 4C 4B 41 |T- OF ONDER ELKA|
000009D0: 41 52 20 3A 22 3A 44 4C 28 31 29 B2 31 3A 44 53 |AR :":DL(1).1:DS|
000009E0: 28 31 29 B2 30 3A 44 5A 28 31 29 B2 35 00 FC 11 |(1).0:DZ(1).5...|
000009F0: AC 03 44 45 24 B2 22 4E 55 4E 55 22 00 44 12 B6 |..DE$."NUNU".D..|
00000A00: 03 44 49 24 28 32 29 B2 22 56 45 4C 44 45 4E 20 |.DI$(2)."VELDEN |
00000A10: 4E 41 41 53 54 20 45 4C 4B 41 41 52 3A 20 56 45 |NAAST ELKAAR: VE|
00000A20: 4C 44 41 46 53 54 41 4E 44 20 3A 22 3A 44 4C 28 |LDAFSTAND :":DL(|
00000A30: 32 29 B2 31 3A 44 53 28 32 29 B2 30 3A 44 5A 28 |2).1:DS(2).0:DZ(|
00000A40: 32 29 B2 37 00 53 12 C0 03 44 45 24 28 32 29 B2 |2).7.S...DE$(2).|
00000A50: 4E 31 24 00 96 12 CA 03 44 49 24 28 33 29 B2 22 |N1$.....DI$(3)."|
00000A60: 44 41 54 41 52 45 47 45 4C 41 46 53 54 41 4E 44 |DATAREGELAFSTAND|
00000A70: 20 3A 22 3A 44 4C 28 33 29 B2 31 3A 44 53 28 33 | :":DL(3).1:DS(3|
00000A80: 29 B2 30 3A 44 5A 28 33 29 B2 39 3A 44 45 24 28 |).0:DZ(3).9:DE$(|
00000A90: 33 29 B2 4E 31 24 00 DA 12 D4 03 44 49 24 28 34 |3).N1$.....DI$(4|
00000AA0: 29 B2 22 50 52 49 4E 54 45 52 41 44 52 45 53 20 |)."PRINTERADRES |
00000AB0: 3A 22 3A 44 4C 28 34 29 B2 31 3A 44 53 28 34 29 |:":DL(4).1:DS(4)|
00000AC0: B2 30 3A 44 5A 28 34 29 B2 31 35 3A 44 45 24 28 |.0:DZ(4).15:DE$(|
00000AD0: 34 29 B2 22 33 34 35 36 37 22 00 1C 13 DE 03 44 |4)."34567".....D|
00000AE0: 45 24 28 35 29 B2 22 53 45 43 4F 4E 44 41 49 52 |E$(5)."SECONDAIR|
00000AF0: 41 44 52 45 53 20 3A 22 3A 44 4C 28 35 29 B2 33 |ADRES :":DL(5).3|
00000B00: 3A 44 53 28 35 29 B2 30 3A 44 5A 28 35 29 B2 31 |:DS(5).0:DZ(5).1|
00000B10: 37 3A 44 45 24 28 35 29 B2 4E 31 24 00 22 13 E8 |7:DE$(5).N1$."..|
00000B20: 03 3A 00 42 13 FC 03 8F 20 2A 50 52 49 4E 54 45 |.:.B.... *PRINTE|
00000B30: 52 53 54 41 4E 44 41 41 52 44 57 41 41 52 44 45 |RSTANDAARDWAARDE|
00000B40: 4E 2A 00 60 13 06 04 44 50 28 31 29 B2 31 3A 8F |N*.`...DP(1).1:.|
00000B50: 20 4F 4E 44 45 52 45 4C 4B 41 41 52 20 3D 4A 41 | ONDERELKAAR =JA|
00000B60: 00 82 13 10 04 44 50 28 32 29 B2 33 3A 8F 20 4E |.....DP(2).3:. N|
00000B70: 41 41 53 54 45 4C 4B 41 41 52 20 41 46 53 54 41 |AASTELKAAR AFSTA|
00000B80: 4E 44 00 B6 13 1A 04 44 50 28 33 29 B2 31 3A 8F |ND.....DP(3).1:.|
00000B90: 20 41 46 53 54 41 4E 44 20 56 41 4E 20 54 57 45 | AFSTAND VAN TWE|
00000BA0: 45 20 44 41 54 41 52 45 47 45 4C 53 20 3D 20 31 |E DATAREGELS = 1|
00000BB0: 20 52 45 47 45 4C 00 E1 13 24 04 44 50 28 34 29 | REGEL...$.DP(4)|
00000BC0: B2 34 3A 8F 20 50 52 49 4E 54 45 52 41 44 52 45 |.4:. PRINTERADRE|
00000BD0: 53 20 3D 20 34 20 3D 20 53 54 41 4E 44 41 41 52 |S = 4 = STANDAAR|
00000BE0: 44 00 21 14 2E 04 44 50 28 35 29 B2 37 3A 8F 20 |D.!...DP(5).7:. |
00000BF0: 3D 20 47 52 4F 4F 54 2F 4B 4C 45 49 4E 53 43 48 |= GROOT/KLEINSCH|
00000C00: 52 49 46 54 2D 4D 4F 44 55 53 20 42 49 4A 20 43 |RIFT-MODUS BIJ C|
00000C10: 4F 4D 4D 4F 44 4F 52 45 20 50 52 49 4E 54 45 52 |OMMODORE PRINTER|
00000C20: 53 00 27 14 38 04 3A 00 2D 14 42 04 3A 00 44 14 |S.'.8.:.-.B.:.D.|
00000C30: 4C 04 8F 20 2A 50 52 4F 47 52 41 4D 4D 41 53 54 |L.. *PROGRAMMAST|
00000C40: 41 52 54 2A 00 7C 14 56 04 97 35 33 32 38 30 2C |ART*.|.V..53280,|
00000C50: 36 3A 97 35 33 32 38 31 2C 31 34 3A 99 C7 28 31 |6:.53281,14:..(1|
00000C60: 34 29 C7 28 38 29 3A 8F 20 4B 4C 45 55 52 20 2B |4).(8):. KLEUR +|
00000C70: 20 47 52 4F 4F 54 2F 4B 4C 45 49 4E 00 82 14 60 | GROOT/KLEIN...`|
00000C80: 04 3A 00 88 14 6A 04 3A 00 A0 14 74 04 8F 20 2A |.:...j.:...t.. *|
00000C90: 42 45 53 54 41 4E 44 20 49 4E 4C 45 5A 45 4E 2A |BESTAND INLEZEN*|
00000CA0: 00 C9 14 7E 04 9F 31 2C 38 2C 31 35 2C 22 49 30 |...~..1,8,15,"I0|
00000CB0: 22 3A 8F 20 4B 41 4E 41 41 4C 20 31 35 20 41 4C |":. KANAAL 15 AL|
00000CC0: 54 49 4A 44 20 4F 50 45 4E 00 CF 14 88 04 3A 00 |TIJD OPEN.....:.|
00000CD0: EC 14 92 04 9F 32 2C 38 2C 32 2C 22 49 4E 46 4F |.....2,8,2,"INFO|
00000CE0: 42 45 53 54 41 4E 44 2C 55 2C 52 22 00 0A 15 9C |BESTAND,U,R"....|
00000CF0: 04 8D 31 36 31 30 3A 20 8F 20 46 4F 55 54 4B 41 |..1610: . FOUTKA|
00000D00: 4E 41 41 4C 20 4C 45 5A 45 4E 00 11 15 A6 04 A0 |NAAL LEZEN......|
00000D10: 32 00 17 15 B0 04 3A 00 3F 15 BA 04 8B 45 B2 30 |2.....:.?....E.0|
00000D20: A7 31 32 35 30 3A 8F 20 47 45 45 4E 20 46 4F 55 |.1250:. GEEN FOU|
00000D30: 54 20 3D 3E 49 4E 46 4F 53 20 4C 45 5A 45 4E 00 |T =>INFOS LEZEN.|
00000D40: 79 15 C4 04 8B 45 B2 36 32 A7 8D 31 39 39 39 30 |y....E.62..19990|
00000D50: 3A 8D 32 32 30 30 3A 89 31 32 38 30 3A 8F 20 27 |:.2200:.1280:. '|
00000D60: 46 49 4C 45 20 4E 4F 54 20 46 4F 55 4E 44 27 3D |FILE NOT FOUND'=|
00000D70: 3E 41 41 4E 4D 41 4B 45 4E 00 B2 15 CE 04 8D 20 |>AANMAKEN...... |
00000D80: 31 36 36 30 3A 89 31 31 37 30 3A 8F 20 41 4E 44 |1660:.1170:. AND|
00000D90: 45 52 45 20 46 4F 55 54 20 20 2C 55 49 54 56 4F |ERE FOUT ,UITVO|
00000DA0: 45 52 45 4E 2C 4E 49 45 55 57 45 20 50 4F 47 49 |EREN,NIEUWE POGI|
00000DB0: 4E 47 00 B8 15 D8 04 3A 00 D7 15 E2 04 8D 20 37 |NG.....:...... 7|
00000DC0: 34 35 30 3A 8F 20 49 4E 4C 45 5A 45 4E 20 56 41 |450:. INLEZEN VA|
00000DD0: 4E 20 49 4E 46 4F 53 00 F2 15 EC 04 8D 20 37 33 |N INFOS...... 73|
00000DE0: 33 30 3A 8F 20 49 4E 44 45 58 20 49 4E 4C 45 5A |30:. INDEX INLEZ|
00000DF0: 45 4E 00 F8 15 F6 04 3A 00 1C 16 00 05 41 46 B2 |EN.....:.....AF.|
00000E00: 30 3A 8F 20 57 49 4A 5A 49 47 49 4E 47 53 46 4C |0:. WIJZIGINGSFL|
00000E10: 41 47 20 49 4E 49 54 49 41 4C 49 53 00 22 16 0A |AG INITIALIS."..|
00000E20: 05 3A 00 28 16 14 05 3A 00 3C 16 1E 05 8F 20 2A |.:.(...:.<.... *|
00000E30: 2A 2A 4D 45 4E 55 45 20 31 2A 2A 2A 00 49 16 28 |**MENUE 1***.I.(|
00000E40: 05 99 43 4C 45 41 52 24 3B 00 7F 16 32 05 99 41 |..CLEAR$;...2..A|
00000E50: 41 4E 24 22 20 20 20 20 20 20 20 20 20 20 20 4B |AN$" K|
00000E60: 45 55 5A 45 4D 45 4E 55 20 20 20 20 20 20 20 20 |EUZEMENU |
00000E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 | ";.|
00000E80: AF 16 3C 05 99 41 41 4E 24 22 20 20 20 20 20 20 |..<..AAN$" |
00000E90: 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 20 20 | --------- |
00000EA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00000EB0: B9 16 46 05 99 3A 99 3A 99 00 EA 16 50 05 99 22 |..F..:.:....P.."|
00000EC0: 20 20 22 41 41 4E 24 22 20 45 20 22 55 49 54 24 | "AAN$" E "UIT$|
00000ED0: 22 20 20 20 49 4E 56 4F 45 52 20 56 41 4E 20 44 |" INVOER VAN D|
00000EE0: 41 54 41 52 45 47 45 4C 53 22 00 20 17 5A 05 99 |ATAREGELS". .Z..|
00000EF0: 3A 99 22 20 20 22 41 41 4E 24 22 20 53 20 22 55 |:." "AAN$" S "U|
00000F00: 49 54 24 22 20 20 20 5A 4F 45 4B 45 4E 2C 20 57 |IT$" ZOEKEN, W|
00000F10: 49 4A 5A 49 47 45 4E 2C 20 57 49 53 53 45 4E 22 |IJZIGEN, WISSEN"|
00000F20: 00 5B 17 64 05 99 3A 99 22 20 20 22 41 41 4E 24 |.[.d..:." "AAN$|
00000F30: 22 20 47 20 22 55 49 54 24 22 20 20 20 47 45 4F |" G "UIT$" GEO|
00000F40: 52 44 45 4E 44 45 20 55 49 54 56 4F 45 52 20 56 |RDENDE UITVOER V|
00000F50: 41 4E 20 42 45 53 54 41 4E 44 22 00 8A 17 6E 05 |AN BESTAND"...n.|
00000F60: 99 3A 99 22 20 20 22 41 41 4E 24 22 20 44 20 22 |.:." "AAN$" D "|
00000F70: 55 49 54 24 22 20 20 20 50 52 49 4E 54 45 52 50 |UIT$" PRINTERP|
00000F80: 41 52 41 4D 45 54 45 52 53 22 00 B5 17 78 05 99 |ARAMETERS"...x..|
00000F90: 3A 99 22 20 20 22 41 41 4E 24 22 20 52 20 22 55 |:." "AAN$" R "U|
00000FA0: 49 54 24 22 20 20 20 52 45 4F 52 47 41 4E 49 53 |IT$" REORGANIS|
00000FB0: 41 54 49 45 22 00 E9 17 82 05 99 3A 99 22 20 20 |ATIE"......:." |
00000FC0: 22 41 41 4E 24 22 20 56 20 22 55 49 54 24 22 20 |"AAN$" V "UIT$" |
00000FD0: 20 20 56 45 52 4C 41 54 45 4E 20 56 41 4E 20 50 | VERLATEN VAN P|
00000FE0: 52 4F 47 52 41 4D 4D 41 22 00 F3 17 8C 05 99 3A |ROGRAMMA"......:|
00000FF0: 99 3A 99 00 27 18 96 05 99 41 41 4E 24 22 20 20 |.:..'....AAN$" |
00001000: 20 20 20 20 20 20 20 20 20 55 57 20 4B 45 55 5A | UW KEUZ|
00001010: 45 20 3F 20 20 20 20 20 20 20 20 20 20 20 20 20 |E ? |
00001020: 20 20 20 20 20 22 3B 00 5B 18 A0 05 99 20 41 41 | ";.[.... AA|
00001030: 4E 24 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |N$" |
00001040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001050: 20 20 20 20 20 20 20 20 20 20 22 00 61 18 AA 05 | ".a...|
00001060: 3A 00 8A 18 B4 05 A1 41 24 3A 81 20 49 B2 31 A4 |:......A$:. I.1.|
00001070: C3 28 4D 31 24 29 3A 8B CA 28 4D 31 24 2C 49 2C |.(M1$):..(M1$,I,|
00001080: 31 29 B2 41 24 A7 31 34 39 30 00 96 18 BE 05 82 |1).A$.1490......|
00001090: 3A 89 31 34 36 30 00 9C 18 C8 05 3A 00 C4 18 D2 |:.1460.....:....|
000010A0: 05 8B 49 B2 C3 28 4D 31 24 29 A7 31 35 34 30 3A |..I..(M1$).1540:|
000010B0: 8F 20 56 45 52 4C 41 54 45 4E 20 56 41 4E 20 50 |. VERLATEN VAN P|
000010C0: 52 4F 47 2E 00 E4 18 DC 05 91 49 8D 32 36 31 30 |ROG.......I.2610|
000010D0: 2C 33 34 34 30 2C 33 39 34 30 2C 34 39 36 30 2C |,3440,3940,4960,|
000010E0: 35 32 39 30 00 EE 18 E6 05 89 31 33 31 30 00 F4 |5290......1310..|
000010F0: 18 F0 05 3A 00 FA 18 FA 05 3A 00 1D 19 04 06 8F |...:.....:......|
00001100: 20 2A 2A 2A 56 45 52 4C 41 54 45 4E 20 56 41 4E | ***VERLATEN VAN|
00001110: 20 50 52 4F 47 52 41 4D 4D 41 2A 2A 2A 00 2C 19 | PROGRAMMA***.,.|
00001120: 0E 06 8B 41 46 B2 30 A7 31 35 38 30 00 49 19 18 |...AF.0.1580.I..|
00001130: 06 8D 37 32 30 30 3A 8F 20 49 4E 44 45 58 20 56 |..7200:. INDEX V|
00001140: 41 53 54 4C 45 47 47 45 4E 00 5A 19 22 06 8D 37 |ASTLEGGEN.Z."..7|
00001150: 35 38 30 3A 8F 20 49 4E 46 4F 00 63 19 2C 06 A0 |580:. INFO.c.,..|
00001160: 31 3A 80 00 69 19 36 06 3A 00 6F 19 40 06 3A 00 |1:..i.6.:.o.@.:.|
00001170: 88 19 4A 06 8F 20 2A 46 4F 55 54 4B 41 4E 41 41 |..J.. *FOUTKANAA|
00001180: 4C 20 4C 45 5A 45 4E 2A 00 9A 19 54 06 84 31 2C |L LEZEN*...T..1,|
00001190: 45 2C 45 24 2C 45 31 2C 45 32 00 A0 19 5E 06 8E |E,E$,E1,E2...^..|
000011A0: 00 A6 19 68 06 3A 00 AC 19 72 06 3A 00 CA 19 7C |...h.:...r.:...||
000011B0: 06 8F 20 2A 46 4F 55 54 4D 45 4C 44 49 4E 47 20 |.. *FOUTMELDING |
000011C0: 20 55 49 54 47 45 56 45 4E 2A 00 EF 19 86 06 97 | UITGEVEN*......|
000011D0: 43 53 2C 30 3A 97 43 5A 2C 32 34 3A 9E 43 52 3A |CS,0:.CZ,24:.CR:|
000011E0: 8F 20 43 52 53 2E 20 50 4C 41 41 54 53 45 4E 00 |. CRS. PLAATSEN.|
000011F0: FF 19 90 06 99 45 3B 45 24 3B 45 31 3B 45 32 00 |.....E;E$;E1;E2.|
00001200: 16 1A 9A 06 A1 41 24 3A 8B 20 41 24 B2 22 22 20 |.....A$:. A$."" |
00001210: A7 20 31 36 39 30 00 1C 1A A4 06 8E 00 22 1A AE |. 1690......."..|
00001220: 06 3A 00 28 1A B8 06 3A 00 3D 1A C2 06 8F 20 2A |.:.(...:.=.... *|
00001230: 50 4F 53 49 54 49 4F 4E 45 52 45 4E 2A 00 4D 1A |POSITIONEREN*.M.|
00001240: CC 06 48 42 B2 B5 28 52 AD 32 35 36 29 00 5D 1A |..HB..(R.256).].|
00001250: D6 06 4C 42 B2 52 AB 48 42 AC 32 35 36 00 7E 1A |..LB.R.HB.256.~.|
00001260: E0 06 98 31 2C 22 50 22 AA C7 28 33 29 AA C7 28 |...1,"P"..(3)..(|
00001270: 4C 42 29 AA C7 28 48 42 29 AA C7 28 31 29 00 84 |LB)..(HB)..(1)..|
00001280: 1A EA 06 8E 00 99 1A F4 06 8F 20 2A 4D 41 53 4B |.......... *MASK|
00001290: 45 52 4F 50 42 4F 55 57 2A 00 A5 1A FE 06 81 49 |EROPBOUW*......I|
000012A0: B2 31 A4 4D 46 00 BA 1A 08 07 8F 20 2A 4D 41 53 |.1.MF...... *MAS|
000012B0: 4B 45 52 4F 50 42 4F 55 57 2A 00 C6 1A 12 07 81 |KEROPBOUW*......|
000012C0: 49 B2 31 A4 4D 46 00 EE 1A 1C 07 3A 3A 97 43 53 |I.1.MF.....::.CS|
000012D0: 2C 4D 53 28 49 29 3A 97 43 5A 2C 4D 5A 28 49 29 |,MS(I):.CZ,MZ(I)|
000012E0: 3A 9E 43 52 3A 8F 20 43 52 53 2E 53 45 54 00 1C |:.CR:. CRS.SET..|
000012F0: 1B 26 07 3A 3A 99 4D 4E 24 28 49 29 3B 49 24 28 |.&.::.MN$(I);I$(|
00001300: 49 29 3B C8 28 28 53 50 24 2C 4C 49 28 49 29 AB |I);.((SP$,LI(I).|
00001310: C3 28 49 24 28 49 29 29 AA 31 29 3B 00 22 1B 30 |.(I$(I)).1);.".0|
00001320: 07 82 00 28 1B 3A 07 8E 00 2E 1B 44 07 3A 00 34 |...(.:.....D.:.4|
00001330: 1B 4E 07 3A 00 4C 1B 58 07 8F 20 2A 4D 41 53 4B |.N.:.L.X.. *MASK|
00001340: 45 52 42 45 53 54 55 52 49 4E 47 2A 00 64 1B 62 |ERBESTURING*.d.b|
00001350: 07 49 B2 31 3A 8F 20 2A 20 45 45 52 53 54 45 20 |.I.1:. * EERSTE |
00001360: 56 45 4C 44 00 82 1B 6C 07 53 B2 C3 28 4D 4E 24 |VELD...l.S..(MN$|
00001370: 28 49 29 29 AA 4D 53 28 49 29 3A 8F 20 4B 4F 4C |(I)).MS(I):. KOL|
00001380: 4F 4D 00 AA 1B 76 07 9E 53 45 2C 53 2C 4D 5A 28 |OM...v..SE,S,MZ(|
00001390: 49 29 2C 4D 4C 28 49 29 2C 4D 5A 24 28 49 29 2C |I),ML(I),MZ$(I),|
000013A0: 45 32 24 2C 4D 52 24 28 49 29 00 CC 1B 80 07 41 |E2$,MR$(I).....A|
000013B0: B2 C2 28 32 35 33 29 3A 8F 20 45 49 4E 44 54 45 |..(253):. EINDTE|
000013C0: 4B 45 4E 20 49 4E 20 27 32 35 33 27 00 F1 1B 8A |KEN IN '253'....|
000013D0: 07 8B 41 B2 31 34 35 AF 49 B1 31 A7 49 B2 49 AB |..A.145.I.1.I.I.|
000013E0: 31 3A 89 31 39 30 30 3A 8F 20 43 52 53 2E 20 55 |1:.1900:. CRS. U|
000013F0: 50 00 25 1C 94 07 8B 28 41 B2 31 37 B0 41 B2 31 |P.%....(A.17.A.1|
00001400: 33 29 AF 49 B3 4D 46 A7 49 B2 49 AA 31 3A 89 31 |3).I.MF.I.I.1:.1|
00001410: 39 30 30 3A 8F 20 43 52 53 2E 20 44 4F 57 4E 20 |900:. CRS. DOWN |
00001420: 4F 46 20 43 52 00 43 1C 9E 07 8B 41 B2 31 33 33 |OF CR.C....A.133|
00001430: B0 41 B2 31 33 36 A7 8E 3A 8F 20 46 31 20 4F 46 |.A.136..:. F1 OF|
00001440: 20 46 37 00 4D 1C A8 07 89 31 39 30 30 00 53 1C | F7.M....1900.S.|
00001450: B2 07 3A 00 59 1C BC 07 3A 00 6E 1C C6 07 8F 20 |..:.Y...:.n.... |
00001460: 2A 4D 41 53 4B 45 52 20 54 4F 4E 45 4E 2A 00 AA |*MASKER TONEN*..|
00001470: 1C D0 07 99 43 4C 45 41 52 24 41 41 4E 24 22 20 |....CLEAR$AAN$" |
00001480: 20 20 20 44 45 4D 4F 4E 53 54 52 41 54 49 45 20 | DEMONSTRATIE |
00001490: 56 41 4E 20 49 4E 56 4F 45 52 4D 41 53 4B 45 52 |VAN INVOERMASKER|
000014A0: 20 20 20 20 20 22 55 49 54 24 00 B0 1C DA 07 3A | "UIT$.....:|
000014B0: 00 CB 1C E4 07 8F 20 3C 4D 41 53 4B 45 52 47 45 |...... <MASKERGE|
000014C0: 4E 2E 49 4E 49 54 49 41 4C 2E 3E 00 D5 1C EE 07 |N.INITIAL.>.....|
000014D0: 4D 46 B2 46 41 00 DB 1C F8 07 3A 00 E7 1C 02 08 |MF.FA.....:.....|
000014E0: 81 49 B2 31 A4 4D 46 00 2D 1D 0C 08 3A 3A 4D 4E |.I.1.MF.-...::MN|
000014F0: 24 28 49 29 B2 4E 49 24 28 49 29 3A 4D 4C 28 49 |$(I).NI$(I):ML(I|
00001500: 29 B2 4C 49 28 49 29 3A 4D 53 28 49 29 B2 53 49 |).LI(I):MS(I).SI|
00001510: 28 49 29 3A 4D 5A 28 49 29 B2 5A 49 28 49 29 3A |(I):MZ(I).ZI(I):|
00001520: 4D 5A 24 28 49 29 B2 45 5A 24 28 49 29 00 33 1D |MZ$(I).EZ$(I).3.|
00001530: 16 08 82 00 39 1D 20 08 3A 00 52 1D 2A 08 8D 31 |....9. .:.R.*..1|
00001540: 38 30 30 3A 8F 20 4D 41 53 4B 45 52 4F 50 42 4F |800:. MASKEROPBO|
00001550: 55 57 00 70 1D 34 08 97 43 53 2C 30 3A 97 43 5A |UW.p.4..CS,0:.CZ|
00001560: 2C 32 32 3A 9E 43 52 3A 8F 20 43 55 52 53 4F 52 |,22:.CR:. CURSOR|
00001570: 00 9D 1D 3E 08 99 41 41 4E 24 22 47 41 41 54 20 |...>..AAN$"GAAT |
00001580: 55 20 4D 45 54 20 44 49 54 20 49 4E 56 4F 45 52 |U MET DIT INVOER|
00001590: 4D 41 53 4B 45 52 20 20 20 20 20 22 3B 00 CB 1D |MASKER ";...|
000015A0: 48 08 99 22 41 43 43 4F 4F 52 44 20 28 4A 29 20 |H.."ACCOORD (J) |
000015B0: 4F 46 20 57 49 4C 54 20 55 20 56 45 52 41 4E 44 |OF WILT U VERAND|
000015C0: 45 52 49 4E 47 45 4E 20 20 22 3B 00 EC 1D 52 08 |ERINGEN ";...R.|
000015D0: 99 22 41 41 4E 42 52 45 4E 47 45 4E 20 28 4E 29 |."AANBRENGEN (N)|
000015E0: 20 3F 22 55 49 54 24 22 20 20 22 3B 00 FA 1D 5C | ?"UIT$" ";...\|
000015F0: 08 41 24 B2 22 4A 4A 4E 4E 22 00 1B 1E 66 08 9E |.A$."JJNN"...f..|
00001600: 53 45 2C C2 28 32 31 31 29 2C C2 28 32 31 34 2C |SE,.(211),.(214,|
00001610: 31 2C 41 24 2C 43 52 24 2C 42 24 00 42 1E 70 08 |1,A$,CR$,B$.B.p.|
00001620: 8B 42 24 B2 22 4A 22 B0 42 24 B2 22 4A 22 A7 51 |.B$."J".B$."J".Q|
00001630: 8E 3A 8F 20 4F 50 42 4F 55 57 20 42 45 53 54 41 |.:. OPBOUW BESTA|
00001640: 4E 44 00 4A 1E 7A 08 9C 3A 80 00 50 1E 84 08 3A |ND.J.z..:..P...:|
00001650: 00 56 1E 8E 08 3A 00 73 1E 98 08 8F 20 2A 2A 2A |.V...:.s.... ***|
00001660: 42 45 53 54 41 4E 44 20 41 41 4E 4D 41 4B 45 4E |BESTAND AANMAKEN|
00001670: 2A 2A 2A 00 7F 1E A2 08 99 43 4C 45 41 52 24 00 |***......CLEAR$.|
00001680: 85 1E AC 08 3A 00 A4 1E B6 08 8F 20 3E 52 45 43 |....:...... >REC|
00001690: 4F 52 44 4C 45 4E 47 54 45 20 42 45 52 45 4B 45 |ORDLENGTE BEREKE|
000016A0: 4E 45 4E 3C 00 B0 1E C0 08 81 49 B2 31 A4 46 41 |NEN<......I.1.FA|
000016B0: 00 C4 1E CA 08 3A 3A 52 4C B2 52 4C AA 4C 49 28 |.....::RL.RL.LI(|
000016C0: 31 29 AA 31 00 CA 1E D4 08 82 00 D0 1E DE 08 3A |1).1...........:|
000016D0: 00 17 1F E8 08 8B 52 B1 32 35 35 A7 99 22 4D 41 |......R.255.."MA|
000016E0: 58 2E 41 41 4E 54 41 4C 20 44 41 54 41 52 45 47 |X.AANTAL DATAREG|
000016F0: 45 4C 53 20 4F 56 45 52 53 43 48 52 45 44 45 4E |ELS OVERSCHREDEN|
00001700: 21 20 49 4E 4B 4F 52 54 45 4E 20 2B 20 53 54 41 |! INKORTEN + STA|
00001710: 52 45 54 4E 22 3A 53 00 1D 1F F2 08 3A 00 64 1F |RETN":S.....:.d.|
00001720: FC 08 41 52 B2 B5 28 28 35 37 30 AB 36 29 AC 32 |..AR..((570.6).2|
00001730: 35 34 29 AD 28 52 4C AA 4A 4C AA 31 AA 36 AA 31 |54).(RL.JL.1.6.1|
00001740: 29 29 3A 8F 20 4D 41 58 2E 41 41 4E 54 41 4C 20 |)):. MAX.AANTAL |
00001750: 44 41 54 41 52 45 47 45 4C 53 20 42 45 52 45 4B |DATAREGELS BEREK|
00001760: 45 4E 45 4E 00 8D 1F 06 09 8B 20 41 52 B1 39 39 |ENEN...... AR.99|
00001770: 39 A7 41 52 B2 39 39 39 3A 8F 20 4D 41 58 2E 39 |9.AR.999:. MAX.9|
00001780: 39 39 20 44 41 54 41 52 45 47 45 4C 53 00 93 1F |99 DATAREGELS...|
00001790: 10 09 3A 00 B0 1F 1A 09 8F 20 3E 47 45 42 52 55 |..:...... >GEBRU|
000017A0: 49 4B 45 52 20 43 4F 52 52 45 43 54 49 45 3F 3C |IKER CORRECTIE?<|
000017B0: 00 D2 1F 24 09 41 24 B2 22 4D 41 58 49 4D 41 41 |...$.A$."MAXIMAA|
000017C0: 4C 20 41 41 4E 54 41 4C 20 52 45 47 45 4C 53 3A |L AANTAL REGELS:|
000017D0: 20 22 00 DD 1F 2E 09 99 41 24 3B 41 52 00 01 20 | "......A$;AR.. |
000017E0: 38 09 9E 53 45 2C C3 28 41 24 29 AA 31 2C C2 28 |8..SE,.(A$).1,.(|
000017F0: 32 31 34 29 2C 34 2C 4E 55 24 2C 43 52 24 2C 41 |214),4,NU$,CR$,A|
00001800: 24 00 27 20 42 09 8B C5 28 41 24 29 B1 41 52 B0 |$.' B...(A$).AR.|
00001810: C5 28 41 24 29 B3 B2 31 A7 99 3A 99 55 50 24 3B |.(A$)..1..:.UP$;|
00001820: 3A 89 20 32 33 34 30 00 2D 20 4C 09 3A 00 3A 20 |:. 2340.- L.:.: |
00001830: 56 09 41 52 B2 C5 28 41 24 29 00 40 20 60 09 3A |V.AR..(A$).@ `.:|
00001840: 00 59 20 6A 09 8F 20 3E 42 45 53 54 41 4E 44 20 |.Y j.. >BESTAND |
00001850: 41 41 4E 4D 41 4B 45 4E 3C 00 76 20 74 09 9F 32 |AANMAKEN<.v t..2|
00001860: 2C 38 2C 32 2C 22 49 4E 46 4F 42 45 53 54 41 4E |,8,2,"INFOBESTAN|
00001870: 44 2C 55 2C 57 22 00 93 20 7E 09 8D 31 36 31 30 |D,U,W".. ~..1610|
00001880: 3A 8F 20 46 4F 55 54 4B 41 4E 41 41 4C 20 4C 45 |:. FOUTKANAAL LE|
00001890: 5A 45 4E 00 9B 20 88 09 A0 20 32 00 BC 20 92 09 |ZEN.. ... 2.. ..|
000018A0: 8B 45 B3 B1 30 A7 8D 31 36 36 30 3A 89 32 34 32 |.E..0..1660:.242|
000018B0: 30 3A 8F 20 55 49 54 47 45 56 45 4E 00 C2 20 9C |0:. UITGEVEN.. .|
000018C0: 09 3A 00 E4 20 A6 09 8D 37 35 38 30 3A 8F 20 49 |.:.. ...7580:. I|
000018D0: 4E 46 4F 42 45 53 54 41 4E 44 20 53 43 48 52 49 |NFOBESTAND SCHRI|
000018E0: 4A 56 45 4E 00 EA 20 B0 09 3A 00 04 21 BA 09 8F |JVEN.. ..:..!...|
000018F0: 20 3E 52 45 43 4F 52 44 53 20 56 52 49 4A 47 45 | >RECORDS VRIJGE|
00001900: 56 45 4E 3C 00 2E 21 C4 09 9F 33 2C 38 2C 33 2C |VEN<..!...3,8,3,|
00001910: 22 44 41 54 49 2C 4C 2C 22 AA C7 28 52 4C 29 3A |"DATI,L,"..(RL):|
00001920: 8F 20 52 45 43 4F 52 44 4C 45 4E 47 54 45 00 48 |. RECORDLENGTE.H|
00001930: 21 CE 09 52 B2 41 52 3A 8F 20 41 41 4E 54 41 4C |!..R.AR:. AANTAL|
00001940: 20 52 45 43 4F 52 44 53 00 61 21 D8 09 8D 31 37 | RECORDS.a!...17|
00001950: 33 30 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 52 45 |30:. POSITIONERE|
00001960: 4E 00 8B 21 E2 09 98 33 2C C7 28 32 35 35 29 3A |N..!...3,.(255):|
00001970: 8F 20 56 52 49 4A 47 41 56 45 20 54 45 4B 45 4E |. VRIJGAVE TEKEN|
00001980: 53 20 53 43 48 52 49 4A 56 45 4E 00 92 21 EC 09 |S SCHRIJVEN..!..|
00001990: A0 33 00 98 21 F6 09 3A 00 B1 21 00 0A 8D 31 36 |.3..!..:..!...16|
000019A0: 31 30 3A 8F 20 46 4F 55 54 45 4E 20 4C 45 5A 45 |10:. FOUTEN LEZE|
000019B0: 4E 00 E8 21 0A 0A 8B 45 B3 B1 30 AF 45 B3 B1 35 |N..!...E..0.E..5|
000019C0: 30 A7 8D 31 36 36 30 3A 99 22 44 49 53 4B 45 54 |0..1660:."DISKET|
000019D0: 54 45 46 4F 55 54 20 21 20 4E 49 45 55 57 45 20 |TEFOUT ! NIEUWE |
000019E0: 53 54 41 52 54 22 3A 80 00 EE 21 14 0A 8E 00 F4 |START":...!.....|
000019F0: 21 1E 0A 3A 00 FA 21 28 0A 3A 00 1C 22 32 0A 8F |!..:..!(.:.."2..|
00001A00: 20 2A 2A 2A 49 4E 56 4F 45 52 20 56 41 4E 20 44 | ***INVOER VAN D|
00001A10: 41 54 41 52 45 47 45 4C 53 2A 2A 2A 00 28 22 3C |ATAREGELS***.("<|
00001A20: 0A 99 43 4C 45 41 52 24 00 3A 22 46 0A 8D 37 38 |..CLEAR$.:"F..78|
00001A30: 36 30 3A 8F 20 49 4E 46 4F 53 00 40 22 50 0A 3A |60:. INFOS.@"P.:|
00001A40: 00 61 22 5A 0A 8F 20 3E 4D 41 53 4B 45 52 47 45 |.a"Z.. >MASKERGE|
00001A50: 4E 45 52 41 54 4F 52 20 49 4E 49 54 49 41 4C 2E |NERATOR INITIAL.|
00001A60: 3C 00 6B 22 64 0A 4D 46 B2 46 41 00 71 22 6E 0A |<.k"d.MF.FA.q"n.|
00001A70: 3A 00 7D 22 78 0A 81 49 B2 31 A4 4D 46 00 C3 22 |:.}"x..I.1.MF.."|
00001A80: 82 0A 3A 3A 4D 4E 24 28 49 29 B2 4E 49 24 28 49 |..::MN$(I).NI$(I|
00001A90: 29 3A 4D 4C 28 49 29 B2 4C 49 28 49 29 3A 4D 53 |):ML(I).LI(I):MS|
00001AA0: 28 49 29 B2 53 49 28 49 29 3A 4D 5A 28 49 29 B2 |(I).SI(I):MZ(I).|
00001AB0: 5A 49 28 49 29 3A 4D 5A 24 28 49 29 B2 45 5A 24 |ZI(I):MZ$(I).EZ$|
00001AC0: 28 49 29 00 C9 22 8C 0A 82 00 CF 22 96 0A 3A 00 |(I).."....."..:.|
00001AD0: 0F 23 A0 0A 8B 4E B1 41 52 A7 32 38 37 30 3A 8F |.#...N.AR.2870:.|
00001AE0: 20 4D 41 58 2E 41 41 4E 54 41 4C 20 44 41 54 41 | MAX.AANTAL DATA|
00001AF0: 52 45 47 45 4C 53 20 42 45 52 45 49 4B 54 20 28 |REGELS BEREIKT (|
00001B00: 3D 42 45 53 54 41 4E 44 20 56 4F 4C 20 29 3F 00 |=BESTAND VOL )?.|
00001B10: 15 23 AA 0A 3A 00 36 23 B4 0A 8F 20 3E 4F 56 45 |.#..:.6#... >OVE|
00001B20: 52 47 41 56 45 53 54 52 49 4E 47 53 20 49 4E 49 |RGAVESTRINGS INI|
00001B30: 54 49 41 4C 2E 3C 00 42 23 BE 0A 81 49 B2 31 A4 |TIAL.<.B#...I.1.|
00001B40: 4D 46 00 5D 23 C8 0A 3A 3A 4D 52 24 28 49 29 B2 |MF.]#..::MR$(I).|
00001B50: 22 20 22 3A 49 24 28 49 29 B2 22 20 22 00 63 23 |" ":I$(I)." ".c#|
00001B60: D2 0A 82 00 69 23 DC 0A 3A 00 82 23 E6 0A 8D 31 |....i#..:..#...1|
00001B70: 38 30 30 3A 8F 20 4D 41 53 4B 45 52 4F 50 42 4F |800:. MASKEROPBO|
00001B80: 55 57 00 9E 23 F0 0A 8D 31 38 38 30 3A 8F 20 4D |UW..#...1880:. M|
00001B90: 41 53 4B 45 52 42 45 53 54 55 52 49 4E 47 00 A4 |ASKERBESTURING..|
00001BA0: 23 FA 0A 3A 00 C8 23 04 0B 8B 41 B2 31 33 33 A7 |#..:..#...A.133.|
00001BB0: 32 39 34 30 3A 8F 20 4D 45 54 20 46 31 20 42 45 |2940:. MET F1 BE|
00001BC0: 45 49 4E 44 49 47 44 3F 00 CE 23 0E 0B 3A 00 FE |EINDIGD?..#..:..|
00001BD0: 23 18 0B 8D 32 39 38 30 3A 8F 20 44 41 54 41 52 |#...2980:. DATAR|
00001BE0: 45 47 45 4C 20 53 43 48 52 49 4A 56 45 4E 2C 20 |EGEL SCHRIJVEN, |
00001BF0: 49 4E 44 45 58 20 49 4E 56 4F 45 52 45 4E 00 1C |INDEX INVOEREN..|
00001C00: 24 22 0B 89 32 37 32 30 3A 8F 20 56 4F 4C 47 45 |$"..2720:. VOLGE|
00001C10: 4E 44 45 20 49 4E 56 4F 45 52 20 3F 00 22 24 2C |NDE INVOER ?."$,|
00001C20: 0B 3A 00 5D 24 36 0B 8B 4E 45 B3 41 52 A7 32 39 |.:.]$6..NE.AR.29|
00001C30: 31 30 3A 8F 20 4E 55 4D 4D 45 52 20 45 43 48 54 |10:. NUMMER ECHT|
00001C40: 20 4B 4C 45 49 4E 45 52 20 41 4C 53 20 4D 41 58 | KLEINER ALS MAX|
00001C50: 2E 52 45 47 45 4C 41 41 4E 54 41 4C 3F 00 9B 24 |.REGELAANTAL?..$|
00001C60: 40 0B 99 48 4F 50 4D 45 24 3B 41 41 4E 24 22 20 |@..HOPME$;AAN$" |
00001C70: 20 20 20 48 45 54 20 42 45 53 54 41 4E 44 20 49 | HET BESTAND I|
00001C80: 53 20 56 4F 4C 20 21 21 21 20 20 20 20 20 20 20 |S VOL !!! |
00001C90: 20 20 20 20 20 22 55 49 54 24 3B 00 A5 24 4A 0B | "UIT$;..$J.|
00001CA0: 89 32 39 32 30 00 AB 24 54 0B 3A 00 E1 24 5E 0B |.2920..$T.:..$^.|
00001CB0: 99 48 4F 4D 45 24 3B 41 41 4E 24 22 20 20 4F 56 |.HOME$;AAN$" OV|
00001CC0: 45 52 57 45 45 47 20 45 45 4E 20 52 45 4F 52 47 |ERWEEG EEN REORG|
00001CD0: 41 4E 49 53 41 54 49 45 20 20 20 22 55 49 54 24 |ANISATIE "UIT$|
00001CE0: 3B 00 F5 24 68 0B A1 41 24 3A 8B 41 24 B2 22 22 |;..$h..A$:.A$.""|
00001CF0: A7 32 39 32 30 00 FB 24 72 0B 3A 00 01 25 7C 0B |.2920..$r.:..%|.|
00001D00: 8E 00 07 25 86 0B 3A 00 0D 25 90 0B 3A 00 28 25 |...%..:..%..:.(%|
00001D10: 9A 0B 8F 20 2A 49 4E 56 4F 45 52 53 55 42 50 52 |... *INVOERSUBPR|
00001D20: 4F 47 52 41 4D 4D 41 2A 00 33 25 A4 0B 41 24 B2 |OGRAMMA*.3%..A$.|
00001D30: 22 20 22 00 39 25 AE 0B 3A 00 59 25 B8 0B 8F 20 |" ".9%..:.Y%... |
00001D40: 3E 45 45 4E 20 44 41 54 41 53 54 52 49 4E 47 20 |>EEN DATASTRING |
00001D50: 41 41 4E 4D 41 4B 45 4E 3C 00 65 25 C2 0B 81 49 |AANMAKEN<.e%...I|
00001D60: B2 31 A4 4D 46 00 83 25 CC 0B 3A 3A 8B 4D 52 24 |.1.MF..%..::.MR$|
00001D70: 28 49 29 B2 22 20 22 A7 4D 52 24 28 49 29 B2 C7 |(I)." ".MR$(I)..|
00001D80: 28 31 29 00 9A 25 D6 0B 3A 3A 41 24 B2 41 24 AA |(1)..%..::A$.A$.|
00001D90: 4D 52 24 28 49 29 AA 43 52 24 00 A0 25 E0 0B 82 |MR$(I).CR$..%...|
00001DA0: 00 A6 25 EA 0B 3A 00 AC 25 F4 0B 3A 00 CA 25 FE |..%..:..%..:..%.|
00001DB0: 0B 8F 20 2A 44 41 54 41 53 54 52 49 4E 47 20 20 |.. *DATASTRING |
00001DC0: 53 43 48 52 49 4A 56 45 4E 2A 00 D2 25 08 0C 52 |SCHRIJVEN*..%..R|
00001DD0: B2 4E 00 EA 25 12 0C 9F 33 2C 38 2C 33 2C 22 42 |.N..%...3,8,3,"B|
00001DE0: 45 53 54 41 4E 44 2C 4C 2C 22 00 03 26 1C 0C 8D |ESTAND,L,"..&...|
00001DF0: 31 37 33 30 3A 8F 20 50 4F 53 49 54 49 4F 4E 45 |1730:. POSITIONE|
00001E00: 52 45 4E 00 0E 26 26 0C 98 33 2C 41 24 3B 00 15 |REN..&&..3,A$;..|
00001E10: 26 30 0C A0 33 00 1B 26 3A 0C 3A 00 21 26 44 0C |&0..3..&:.:.!&D.|
00001E20: 3A 00 41 26 4E 0C 8F 20 2A 49 4E 44 45 58 54 41 |:.A&N.. *INDEXTA|
00001E30: 42 45 4C 20 41 43 54 55 41 4C 49 53 45 52 45 4E |BEL ACTUALISEREN|
00001E40: 2A 00 54 26 58 0C 41 24 B2 22 3E 22 AA 4D 52 24 |*.T&X.A$.">".MR$|
00001E50: 28 4A 46 29 00 69 26 62 0C 9E 53 53 2C 41 24 2C |(JF).i&b..SS,A$,|
00001E60: 4A 46 24 28 31 29 2C 50 25 00 9C 26 6C 0C 8B 50 |JF$(1),P%..&l..P|
00001E70: 25 B2 30 A7 4A 46 24 28 4E 45 AA 31 29 B2 C8 28 |%.0.JF$(NE.1)..(|
00001E80: 4D 52 24 28 4A 46 29 2C 4A 4C 29 3A 50 25 28 4E |MR$(JF),JL):P%(N|
00001E90: 45 AA 31 29 B2 4E 3A 89 33 32 34 30 00 A2 26 76 |E.1).N:.3240..&v|
00001EA0: 0C 3A 00 B4 26 80 0C 9E 53 42 2C 31 2C 4A 46 24 |.:..&...SB,1,JF$|
00001EB0: 28 50 25 29 00 C5 26 8A 0C 9E 53 42 2C 31 2C 50 |(P%)..&...SB,1,P|
00001EC0: 25 28 50 25 29 00 CB 26 94 0C 3A 00 EE 26 9E 0C |%(P%)..&..:..&..|
00001ED0: 4A 46 24 28 50 25 29 B2 C8 28 4D 52 24 28 4A 46 |JF$(P%)..(MR$(JF|
00001EE0: 29 2C 4A 4C 29 3A 50 25 28 50 25 29 B2 4E 00 0F |),JL):P%(P%).N..|
00001EF0: 27 A8 0C 41 46 B2 31 3A 8F 20 57 49 4A 5A 49 47 |'..AF.1:. WIJZIG|
00001F00: 49 4E 47 20 41 41 4E 47 45 42 52 41 43 48 54 00 |ING AANGEBRACHT.|
00001F10: 15 27 B2 0C 3A 00 44 27 BC 0C 4E B2 4E AA 31 3A |.'..:.D'..N.N.1:|
00001F20: 8F 20 50 4F 49 4E 54 45 52 20 4F 50 20 56 4F 4C |. POINTER OP VOL|
00001F30: 47 45 4E 44 20 52 45 43 4F 52 44 20 56 45 52 48 |GEND RECORD VERH|
00001F40: 4F 47 45 4E 00 72 27 C6 0C 4E 45 B2 4E 45 AA 31 |OGEN.r'..NE.NE.1|
00001F50: 3A 8F 20 45 43 48 54 20 41 41 4E 54 41 4C 20 44 |:. ECHT AANTAL D|
00001F60: 41 54 41 52 45 47 45 4C 53 20 56 45 52 48 4F 47 |ATAREGELS VERHOG|
00001F70: 45 4E 00 78 27 D0 0C 8E 00 7E 27 DA 0C 3A 00 84 |EN.x'....~'..:..|
00001F80: 27 E4 0C 3A 00 A4 27 EE 0C 8F 20 2A 50 4F 53 49 |'..:..'... *POSI|
00001F90: 54 49 4F 4E 45 52 45 4E 20 45 4E 20 49 4E 4C 45 |TIONEREN EN INLE|
00001FA0: 5A 45 4E 2A 00 BC 27 F8 0C 9F 33 2C 38 2C 33 2C |ZEN*..'...3,8,3,|
00001FB0: 22 42 45 53 54 41 4E 44 2C 4C 2C 22 00 D5 27 02 |"BESTAND,L,"..'.|
00001FC0: 0D 8D 31 37 33 30 3A 8F 20 50 4F 53 49 54 49 4F |..1730:. POSITIO|
00001FD0: 4E 45 52 45 4E 00 DB 27 0C 0D 3A 00 E7 27 16 0D |NEREN..'..:..'..|
00001FE0: 81 49 B2 31 A4 46 41 00 F9 27 20 0D 3A 3A 9E 53 |.I.1.FA..' .::.S|
00001FF0: 49 2C 33 2C 49 24 28 49 29 00 15 28 2A 0D 3A 3A |I,3,I$(I)..(*.::|
00002000: 8B 49 24 28 49 29 B2 C7 28 31 29 A7 49 24 28 49 |.I$(I)..(1).I$(I|
00002010: 29 B2 22 20 22 00 1B 28 34 0D 82 00 21 28 3E 0D |)." "..(4...!(>.|
00002020: 3A 00 28 28 48 0D A0 33 00 2E 28 52 0D 8E 00 34 |:.((H..3..(R...4|
00002030: 28 5C 0D 3A 00 3A 28 66 0D 3A 00 5E 28 70 0D 8F |(\.:.:(f.:.^(p..|
00002040: 20 2A 2A 5A 4F 45 4B 45 4E 2C 20 57 49 4A 5A 49 | **ZOEKEN, WIJZI|
00002050: 47 45 4E 2C 20 57 49 53 53 45 4E 2A 2A 2A 00 6A |GEN, WISSEN***.j|
00002060: 28 7A 0D 99 43 4C 45 41 52 24 00 90 28 84 0D 8B |(z..CLEAR$..(...|
00002070: 4E 45 B2 30 A7 33 39 31 30 3A 8F 20 41 41 4E 54 |NE.0.3910:. AANT|
00002080: 41 4C 44 41 54 41 52 45 47 45 4C 53 3D 30 20 3F |ALDATAREGELS=0 ?|
00002090: 00 A6 28 8E 0D 8D 37 37 30 30 3A 8F 20 5A 4F 45 |..(...7700:. ZOE|
000020A0: 4B 49 4E 46 4F 53 00 AC 28 98 0D 3A 00 B6 28 A2 |KINFOS..(..:..(.|
000020B0: 0D 4D 46 B2 46 41 00 BC 28 AC 0D 3A 00 DD 28 B6 |.MF.FA..(..:..(.|
000020C0: 0D 8F 20 3E 4D 41 53 4B 45 52 47 45 4E 45 52 41 |.. >MASKERGENERA|
000020D0: 54 4F 52 20 49 4E 49 54 49 41 4C 2E 3C 00 E9 28 |TOR INITIAL.<..(|
000020E0: C0 0D 81 49 B2 31 A4 4D 46 00 33 29 CA 0D 3A 3A |...I.1.MF.3)..::|
000020F0: 4D 4E 24 28 49 29 B2 4E 49 24 28 49 29 3A 4D 4C |MN$(I).NI$(I):ML|
00002100: 28 49 29 B2 4C 49 28 49 29 3A 4D 53 28 49 29 B2 |(I).LI(I):MS(I).|
00002110: 53 49 28 49 29 3A 4D 5A 28 49 29 B2 5A 49 28 49 |SI(I):MZ(I).ZI(I|
00002120: 29 3A 4D 5A 24 28 49 29 B2 45 5A 24 28 49 29 AA |):MZ$(I).EZ$(I).|
00002130: 53 4F 24 00 4F 29 D4 0D 3A 53 28 49 29 B2 53 49 |SO$.O)..:S(I).SI|
00002140: 28 49 29 3A 4D 5A 28 49 29 B2 5A 49 28 49 29 00 |(I):MZ(I).ZI(I).|
00002150: 55 29 DE 0D 82 00 5B 29 E8 0D 3A 00 7A 29 F2 0D |U)....[)..:.z)..|
00002160: 8F 20 3E 4F 56 45 52 47 41 56 45 53 54 52 49 4E |. >OVERGAVESTRIN|
00002170: 47 53 20 57 49 53 53 45 4E 3C 00 86 29 FC 0D 81 |GS WISSEN<..)...|
00002180: 49 B2 31 A4 4D 46 00 A1 29 06 0E 3A 3A 4D 52 24 |I.1.MF..)..::MR$|
00002190: 28 49 29 B2 22 20 22 3A 49 24 28 49 29 B2 22 20 |(I)." ":I$(I)." |
000021A0: 22 00 A7 29 10 0E 82 00 AD 29 1A 0E 3A 00 C9 29 |"..).....)..:..)|
000021B0: 24 0E 8D 31 38 30 30 3A 8F 20 4D 41 53 4B 45 52 |$..1800:. MASKER|
000021C0: 20 4F 50 42 4F 55 57 45 4E 00 E6 29 2E 0E 8D 31 | OPBOUWEN..)...1|
000021D0: 38 38 30 3A 8F 20 4D 41 53 4B 45 52 20 42 45 53 |880:. MASKER BES|
000021E0: 54 55 52 49 4E 47 00 EC 29 38 0E 3A 00 11 2A 42 |TURING..)8.:..*B|
000021F0: 0E 8B 41 B2 31 33 33 A7 33 39 31 30 3A 8F 20 4D |..A.133.3910:. M|
00002200: 45 54 20 46 31 20 20 42 45 45 49 4E 44 49 47 44 |ET F1 BEEINDIGD|
00002210: 3F 00 17 2A 4C 0E 3A 00 37 2A 56 0E 8F 20 3E 49 |?..*L.:.7*V.. >I|
00002220: 4E 44 45 58 42 45 53 54 41 4E 44 20 44 4F 4F 52 |NDEXBESTAND DOOR|
00002230: 5A 4F 45 4B 45 4E 3C 00 63 2A 6A 0E 50 25 B2 31 |ZOEKEN<.c*j.P%.1|
00002240: 3A 8F 20 5A 4F 45 4B 45 4E 20 56 41 4E 41 46 20 |:. ZOEKEN VANAF |
00002250: 45 45 52 53 54 45 20 49 4E 44 45 58 45 4C 45 4D |EERSTE INDEXELEM|
00002260: 45 4E 54 00 93 2A 74 0E 8B 50 25 B1 4E 45 A7 8D |ENT..*t..P%.NE..|
00002270: 37 37 30 30 3A 89 33 34 36 30 3A 8F 20 45 49 4E |7700:.3460:. EIN|
00002280: 44 45 20 42 45 53 54 41 4E 44 20 42 45 52 45 49 |DE BESTAND BEREI|
00002290: 4B 54 3F 00 AE 2A 79 0E 9E 53 53 2C 4D 52 24 28 |KT?..*y..SS,MR$(|
000022A0: 4A 46 29 2C 4A 46 24 28 50 25 29 2C 50 25 00 D5 |JF),JF$(P%),P%..|
000022B0: 2A 7E 0E 8B 50 25 B2 30 A7 8D 37 37 30 30 3A 89 |*~..P%.0..7700:.|
000022C0: 33 34 36 30 3A 8F 20 4E 49 45 54 20 47 45 56 4F |3460:. NIET GEVO|
000022D0: 4E 44 45 4E 3F 00 DB 2A 88 0E 3A 00 E8 2A 92 0E |NDEN?..*..:..*..|
000022E0: 52 B2 50 25 28 50 25 29 00 03 2B 9C 0E 8D 33 33 |R.P%(P%)..+...33|
000022F0: 32 30 3A 8F 20 50 4F 53 49 54 2E 2B 49 4E 4C 45 |20:. POSIT.+INLE|
00002300: 5A 45 4E 00 09 2B A6 0E 3A 00 2E 2B B0 0E 8F 20 |ZEN..+..:..+... |
00002310: 3E 56 45 52 47 45 4C 49 4A 4B 49 4E 47 20 56 41 |>VERGELIJKING VA|
00002320: 4E 20 41 4C 4C 45 20 56 45 4C 44 45 4E 3C 00 3A |N ALLE VELDEN<.:|
00002330: 2B BA 0E 81 49 B2 31 A4 46 41 00 5B 2B C4 0E 3A |+...I.1.FA.[+..:|
00002340: 3A 9E 53 53 2C 4D 52 24 28 49 29 2C 4D 52 24 28 |:.SS,MR$(I),MR$(|
00002350: 49 29 2C 49 24 28 49 29 2C 46 25 00 9B 2B CE 0E |I),I$(I),F%..+..|
00002360: 3A 3A 8B 46 25 B3 B1 49 A7 8B 4D 52 24 28 49 29 |::.F%..I..MR$(I)|
00002370: B3 B1 22 20 22 A7 50 25 B2 50 25 AA 31 3A 89 33 |.." ".P%.P%.1:.3|
00002380: 37 30 30 3A 8F 20 4E 4F 54 2D 46 4F 55 4E 44 20 |700:. NOT-FOUND |
00002390: 45 4E 20 3C 3E 20 4C 45 45 47 3F 00 A1 2B D8 0E |EN <> LEEG?..+..|
000023A0: 82 00 A7 2B E2 0E 3A 00 BA 2B EC 0E 8D 35 39 30 |...+..:..+...590|
000023B0: 30 3A 8F 20 4D 45 4E 55 20 32 00 C0 2B 28 0F 3A |0:. MENU 2..+(.:|
000023C0: 00 E6 2B 32 0F 8B 49 B2 32 A7 50 25 B2 50 25 AA |..+2..I.2.P%.P%.|
000023D0: 31 3A 89 33 37 30 30 3A 8F 20 56 45 52 44 45 52 |1:.3700:. VERDER|
000023E0: 5A 4F 45 4B 45 4E 00 0D 2C 3C 0F 8B 49 B2 35 A7 |ZOEKEN..,<..I.5.|
000023F0: 33 34 36 30 3A 8F 20 5A 4F 45 4B 45 4E 20 4F 50 |3460:. ZOEKEN OP|
00002400: 4E 49 45 55 57 20 53 54 41 52 54 45 4E 00 13 2C |NIEUW STARTEN..,|
00002410: 46 0F 8E 00 19 2C 50 0F 3A 00 1F 2C 5A 0F 3A 00 |F....,P.:..,Z.:.|
00002420: 3C 2C 64 0F 8F 20 2A 2A 47 45 4F 52 44 45 4E 44 |<,d.. **GEORDEND|
00002430: 45 20 55 49 54 56 4F 45 52 2A 2A 2A 00 59 2C 6E |E UITVOER***.Y,n|
00002440: 0F 53 46 B2 4A 46 3A 8F 20 49 4E 44 45 58 20 42 |.SF.JF:. INDEX B|
00002450: 45 56 45 49 4C 49 47 45 4E 00 97 2C 78 0F 99 43 |EVEILIGEN..,x..C|
00002460: 4C 45 41 52 24 41 41 4E 24 22 20 20 20 20 20 20 |LEAR$AAN$" |
00002470: 47 45 4F 52 44 45 4E 44 45 20 55 49 54 56 4F 45 |GEORDENDE UITVOE|
00002480: 52 20 56 41 4E 20 42 45 53 54 41 4E 44 20 20 20 |R VAN BESTAND |
00002490: 20 22 55 49 54 24 3B 00 9D 2C 82 0F 3A 00 BA 2C | "UIT$;..,..:..,|
000024A0: 8C 0F 8F 20 3E 53 4F 52 54 45 45 52 56 45 4C 44 |... >SORTEERVELD|
000024B0: 20 41 46 56 52 41 47 45 4E 3C 00 CE 2C 96 0F 97 | AFVRAGEN<..,...|
000024C0: 43 53 2C 30 3A 97 43 5A 2C 38 3A 9E 43 52 00 F1 |CS,0:.CZ,8:.CR..|
000024D0: 2C A0 0F 41 24 B2 22 53 4F 52 54 45 52 45 4E 20 |,..A$."SORTEREN |
000024E0: 4E 41 41 52 20 56 45 4C 44 20 4E 55 4D 4D 45 52 |NAAR VELD NUMMER|
000024F0: 22 00 23 2D AA 0F 99 41 24 3B 53 46 3B 22 20 20 |".#-...A$;SF;" |
00002500: 28 43 52 29 22 3B 3A 8F 20 53 54 41 4E 44 41 41 |(CR)";:. STANDAA|
00002510: 52 44 57 41 41 52 44 45 3D 20 49 4E 44 45 58 56 |RDWAARDE= INDEXV|
00002520: 45 4C 44 00 4E 2D B4 0F 9E 53 45 2C C3 28 41 24 |ELD.N-...SE,.(A$|
00002530: 29 AA 31 2C C2 28 32 31 34 29 2C C3 28 C4 28 46 |).1,.(214),.(.(F|
00002540: 41 29 29 2C 4E 55 24 2C 43 52 24 2C 41 24 00 5B |A)),NU$,CR$,A$.[|
00002550: 2D BE 0F 4A 46 B2 C5 28 41 24 29 00 86 2D C8 0F |-..JF..(A$)..-..|
00002560: 8B 4A 46 B3 31 B0 4A 46 B1 46 41 A7 33 39 36 30 |.JF.1.JF.FA.3960|
00002570: 3A 8F 20 47 45 4C 44 49 47 20 53 4F 52 54 45 45 |:. GELDIG SORTEE|
00002580: 52 56 45 4C 44 3F 00 8C 2D D2 0F 3A 00 C6 2D DC |RVELD?..-..:..-.|
00002590: 0F 99 43 4C 45 41 52 24 41 41 4E 24 22 20 20 20 |..CLEAR$AAN$" |
000025A0: 20 20 20 20 20 20 20 20 53 4F 52 54 45 45 52 4D | SORTEERM|
000025B0: 41 53 4B 45 52 20 20 20 20 20 20 20 20 20 20 20 |ASKER |
000025C0: 22 55 49 54 24 3B 00 E4 2D E6 0F 97 43 53 2C 30 |"UIT$;..-...CS,0|
000025D0: 3A 97 43 5A 2C 32 32 3A 9E 43 52 3A 8F 20 43 55 |:.CZ,22:.CR:. CU|
000025E0: 52 53 4F 52 00 15 2E F0 0F 99 41 41 4E 24 22 20 |RSOR......AAN$" |
000025F0: 20 46 31 20 3D 20 4D 45 4E 55 20 20 20 20 20 20 | F1 = MENU |
00002600: 46 37 20 3D 20 53 4F 52 54 45 52 45 4E 20 20 22 |F7 = SORTEREN "|
00002610: 55 49 54 24 3B 00 1B 2E FA 0F 3A 00 3B 2E 04 10 |UIT$;.....:.;...|
00002620: 8F 20 3E 4D 41 53 4B 45 52 47 45 4E 45 52 41 54 |. >MASKERGENERAT|
00002630: 4F 52 20 49 4E 49 54 41 4C 2E 3C 00 45 2E 0E 10 |OR INITAL.<.E...|
00002640: 4D 46 B2 46 41 00 4B 2E 18 10 3A 00 57 2E 22 10 |MF.FA.K...:.W.".|
00002650: 81 49 B2 31 A4 4D 46 00 A3 2E 2C 10 3A 3A 4D 4E |.I.1.MF...,.::MN|
00002660: 24 28 49 29 B2 4E 49 24 28 49 29 3A 4D 4C 28 49 |$(I).NI$(I):ML(I|
00002670: 29 B2 4C 49 28 49 29 AA 31 3A 4D 53 28 49 29 B2 |).LI(I).1:MS(I).|
00002680: 53 49 28 49 29 3A 4D 5A 28 49 29 B2 5A 49 28 49 |SI(I):MZ(I).ZI(I|
00002690: 29 3A 4D 5A 24 28 49 29 B2 45 5A 24 28 49 29 AA |):MZ$(I).EZ$(I).|
000026A0: 53 4F 24 00 BE 2E 36 10 3A 3A 4D 52 24 28 49 29 |SO$...6.::MR$(I)|
000026B0: B2 22 20 22 3A 49 24 28 49 29 B2 22 20 22 00 C4 |." ":I$(I)." "..|
000026C0: 2E 40 10 82 00 CA 2E 4A 10 3A 00 E6 2E 54 10 8D |.@.....J.:...T..|
000026D0: 31 38 30 30 3A 8F 20 4D 41 53 4B 45 52 20 4F 50 |1800:. MASKER OP|
000026E0: 42 4F 55 57 45 4E 00 03 2F 5E 10 8D 31 38 38 30 |BOUWEN../^..1880|
000026F0: 3A 8F 20 4D 41 53 4B 45 52 20 42 45 53 54 55 52 |:. MASKER BESTUR|
00002700: 49 4E 47 00 13 2F 68 10 8B 41 B2 31 33 33 A7 34 |ING../h..A.133.4|
00002710: 39 33 30 00 19 2F 72 10 3A 00 35 2F 7C 10 8F 20 |930../r.:.5/|.. |
00002720: 3E 5A 4F 45 4B 43 52 49 54 45 52 49 41 20 52 45 |>ZOEKCRITERIA RE|
00002730: 44 44 45 4E 3C 00 41 2F 86 10 81 49 B2 31 A4 46 |DDEN<.A/...I.1.F|
00002740: 41 00 54 2F 90 10 3A 3A 53 24 28 49 29 B2 4D 52 |A.T/..::S$(I).MR|
00002750: 24 28 49 29 00 5A 2F 9A 10 82 00 60 2F A4 10 3A |$(I).Z/....`/..:|
00002760: 00 8B 2F AE 10 9F 33 2C 38 2C 33 2C 22 42 45 53 |../...3,8,3,"BES|
00002770: 54 41 4E 44 2C 4C 22 3A 8F 20 44 41 54 41 4B 41 |TAND,L":. DATAKA|
00002780: 4E 41 41 4C 20 4F 50 45 4E 45 4E 00 BD 2F B8 10 |NAAL OPENEN../..|
00002790: 8B 53 46 B2 4A 46 A7 34 35 35 30 3A 8F 20 4F 55 |.SF.JF.4550:. OU|
000027A0: 44 20 20 49 4E 44 45 58 56 45 4C 44 3D 4E 49 45 |D INDEXVELD=NIE|
000027B0: 55 57 20 49 4E 44 45 58 56 45 4C 44 3F 00 00 30 |UW INDEXVELD?..0|
000027C0: C2 10 8B 41 B2 31 A7 8D 20 37 32 30 30 3A 8F 20 |...A.1.. 7200:. |
000027D0: 57 49 4A 5A 49 47 49 4E 47 45 4E 3F 20 4A 41 2C |WIJZIGINGEN? JA,|
000027E0: 44 41 4E 20 49 4E 44 45 58 20 52 45 44 44 45 4E |DAN INDEX REDDEN|
000027F0: 20 44 4F 4F 52 20 56 41 53 54 4C 45 47 47 45 4E | DOOR VASTLEGGEN|
00002800: 00 06 30 CC 10 3A 00 22 30 D6 10 8F 20 3E 49 4E |..0..:."0... >IN|
00002810: 44 45 58 54 41 42 45 4C 20 49 4E 49 54 49 41 4C |DEXTABEL INITIAL|
00002820: 2E 3C 00 2E 30 E0 10 81 49 B2 31 A4 41 52 00 47 |.<..0...I.1.AR.G|
00002830: 30 EA 10 3A 3A 50 25 28 49 29 B2 30 3A 4A 46 24 |0..::P%(I).0:JF$|
00002840: 28 49 29 B2 22 20 22 00 4D 30 F4 10 82 00 53 30 |(I)." ".M0....S0|
00002850: FE 10 3A 00 89 30 08 11 8F 20 3E 49 4E 44 45 58 |..:..0... >INDEX|
00002860: 54 41 42 45 4C 20 4E 49 45 55 57 20 4F 50 42 4F |TABEL NIEUW OPBO|
00002870: 55 57 45 4E 20 28 49 4E 44 45 58 3D 53 4F 52 54 |UWEN (INDEX=SORT|
00002880: 45 45 52 56 45 4C 44 29 3C 00 B4 30 1C 11 4E 45 |EERVELD)<..0..NE|
00002890: B2 30 3A 4E 4E B2 4E 3A 4E B2 31 3A 8F 20 4E 20 |.0:NN.N:N.1:. N |
000028A0: 52 45 44 44 45 4E 3B 20 4E 2C 4E 45 20 49 4E 49 |REDDEN; N,NE INI|
000028B0: 54 41 4C 2E 00 BA 30 26 11 3A 00 C7 30 30 11 81 |TAL...0&.:..00..|
000028C0: 52 B2 31 A4 4E AB 31 00 DC 30 3A 11 3A 3A 8D 31 |R.1.N.1..0:.::.1|
000028D0: 37 33 30 3A 8F 20 50 4F 53 49 54 2E 00 E9 30 44 |730:. POSIT...0D|
000028E0: 11 3A 3A A1 23 33 2C 41 24 00 21 31 4E 11 3A 3A |.::.#3,A$.!1N.::|
000028F0: 8B 41 24 B2 C7 28 32 35 35 29 B0 41 24 B2 22 20 |.A$..(255).A$." |
00002900: 22 A7 4E B2 4E AA 31 3A 89 34 35 32 30 3A 8F 20 |".N.N.1:.4520:. |
00002910: 52 45 43 4F 52 44 20 56 52 49 4A 47 45 56 45 4E |RECORD VRIJGEVEN|
00002920: 3F 00 3C 31 58 11 3A 3A 8D 31 37 33 30 3A 8F 20 |?.<1X.::.1730:. |
00002930: 50 4F 53 49 54 49 4F 4E 45 52 45 4E 00 42 31 62 |POSITIONEREN.B1b|
00002940: 11 3A 00 51 31 6C 11 3A 3A 81 49 31 B2 31 A4 46 |.:.Q1l.::.I1.1.F|
00002950: 41 00 67 31 76 11 3A 3A 3A 3A 9E 53 49 2C 33 2C |A.g1v.::::.SI,3,|
00002960: 4D 52 24 28 49 31 29 00 89 31 80 11 3A 3A 3A 3A |MR$(I1)..1..::::|
00002970: 8B 4D 52 24 28 49 31 29 B2 C7 28 31 29 A7 4D 52 |.MR$(I1)..(1).MR|
00002980: 24 28 49 31 29 B2 22 20 22 00 91 31 8A 11 3A 3A |$(I1)." "..1..::|
00002990: 82 00 97 31 94 11 3A 00 B4 31 9E 11 3A 3A 8D 33 |...1..:..1..::.3|
000029A0: 31 35 30 3A 8F 20 49 4E 44 45 58 20 49 4E 56 4F |150:. INDEX INVO|
000029B0: 45 52 45 4E 00 BA 31 A8 11 82 00 C0 31 B2 11 3A |EREN..1.....1..:|
000029C0: 00 E4 31 BC 11 8F 20 3E 44 41 54 41 52 45 47 45 |..1... >DATAREGE|
000029D0: 4C 53 20 47 45 53 4F 52 54 45 45 52 44 20 4C 45 |LS GESORTEERD LE|
000029E0: 5A 45 4E 3C 00 F7 31 C6 11 9F 35 2C 44 50 28 34 |ZEN<..1...5,DP(4|
000029F0: 29 2C 44 50 28 35 29 00 FD 31 D0 11 3A 00 0A 32 |),DP(5)..1..:..2|
00002A00: DA 11 81 49 33 B2 31 A4 4E 45 00 19 32 E4 11 3A |...I3.1.NE..2..:|
00002A10: 3A 52 B2 50 25 28 31 33 29 00 2E 32 EE 11 3A 3A |:R.P%(13)..2..::|
00002A20: 8D 31 37 33 30 3A 8F 20 50 4F 53 49 54 2E 00 34 |.1730:. POSIT..4|
00002A30: 32 F8 11 3A 00 50 32 02 12 3A 3A 81 49 31 B2 31 |2..:.P2..::.I1.1|
00002A40: A4 46 41 3A 9E 53 49 2C 33 2C 49 24 28 49 31 29 |.FA:.SI,3,I$(I1)|
00002A50: 00 70 32 0C 12 3A 3A 3A 3A 8B 49 24 28 49 31 29 |.p2..::::.I$(I1)|
00002A60: B2 C7 28 31 29 A7 49 24 28 49 31 29 B2 22 20 22 |..(1).I$(I1)." "|
00002A70: 00 78 32 16 12 3A 3A 82 00 7E 32 20 12 3A 00 A0 |.x2..::..~2 .:..|
00002A80: 32 2A 12 3A 3A 8F 20 3E 56 45 52 47 45 4C 49 4A |2*.::. >VERGELIJ|
00002A90: 4B 49 4E 47 20 4D 45 54 20 4D 41 53 4B 45 52 3C |KING MET MASKER<|
00002AA0: 00 B0 32 34 12 3A 3A 81 20 49 34 B2 31 A4 46 41 |..24.::. I4.1.FA|
00002AB0: 00 CD 32 3E 12 3A 3A 3A 3A 9E 53 53 2C 53 24 28 |..2>.::::.SS,S$(|
00002AC0: 49 34 29 2C 49 24 28 31 34 29 2C 46 25 00 F1 32 |I4),I$(14),F%..2|
00002AD0: 48 12 3A 3A 3A 3A 8B 46 25 B3 B1 49 34 A7 8B 53 |H.::::.F%..I4..S|
00002AE0: 24 28 49 34 29 B3 B1 22 20 22 20 A7 20 34 37 32 |$(I4).." " . 472|
00002AF0: 30 00 F9 32 52 12 3A 3A 82 00 FF 32 5C 12 3A 00 |0..2R.::...2\.:.|
00002B00: 17 33 66 12 3A 3A 8D 36 39 39 30 3A 8F 20 41 46 |.3f.::.6990:. AF|
00002B10: 44 52 55 4B 4B 45 4E 00 20 33 70 12 82 20 49 33 |DRUKKEN. 3p.. I3|
00002B20: 00 26 33 7A 12 3A 00 30 33 84 12 A0 35 3A A0 33 |.&3z.:.03...5:.3|
00002B30: 00 36 33 8E 12 3A 00 56 33 98 12 8F 20 3E 4E 49 |.63..:.V3... >NI|
00002B40: 45 55 57 45 20 49 4E 44 45 58 20 4F 56 45 52 4E |EUWE INDEX OVERN|
00002B50: 45 4D 45 4E 3F 3C 00 80 33 A2 12 8B 53 46 B2 4A |EMEN?<..3...SF.J|
00002B60: 46 A7 34 39 33 30 3A 8F 20 4F 55 44 45 20 49 4E |F.4930:. OUDE IN|
00002B70: 44 45 58 20 4F 4E 47 45 57 49 4A 5A 49 47 44 3F |DEX ONGEWIJZIGD?|
00002B80: 00 86 33 AC 12 3A 00 92 33 B6 12 99 43 4C 45 41 |..3..:..3...CLEA|
00002B90: 52 24 00 A6 33 C0 12 97 43 53 2C 30 3A 97 43 5A |R$..3...CS,0:.CZ|
00002BA0: 2C 38 3A 9E 43 52 00 C8 33 CA 12 99 22 4D 4F 45 |,8:.CR..3..."MOE|
00002BB0: 54 20 56 45 4C 44 20 4E 55 4D 4D 45 52 22 4A 46 |T VELD NUMMER"JF|
00002BC0: 22 4D 45 54 20 44 45 22 00 EF 33 D4 12 99 3A 99 |"MET DE"..3...:.|
00002BD0: 22 41 41 4E 44 55 49 44 49 4E 47 20 27 22 4E 49 |"AANDUIDING '"NI|
00002BE0: 24 28 4A 46 29 22 27 20 20 4E 49 45 55 57 22 00 |$(JF)"' NIEUW".|
00002BF0: 0E 34 DE 12 99 3A 99 22 49 4E 44 45 58 56 45 4C |.4...:."INDEXVEL|
00002C00: 44 20 57 4F 52 44 45 4E 20 3F 20 4E 22 3B 00 14 |D WORDEN ? N";..|
00002C10: 34 E8 12 3A 00 22 34 F2 12 42 24 B2 22 4A CA 4E |4..:."4..B$."J.N|
00002C20: CE 22 00 46 34 FC 12 9E 53 45 2C C2 28 32 31 31 |.".F4...SE,.(211|
00002C30: 29 AB 31 2C C2 28 32 31 34 29 2C 31 2C 42 24 2C |).1,.(214),1,B$,|
00002C40: 43 52 24 2C 41 24 00 5F 34 06 13 8B 20 41 24 B2 |CR$,A$._4... A$.|
00002C50: 22 4A 22 B0 41 24 B2 22 CA 22 A7 34 39 32 30 00 |"J".A$.".".4920.|
00002C60: 7E 34 10 13 4A 46 B2 53 46 3A 8F 20 49 4E 44 45 |~4..JF.SF:. INDE|
00002C70: 58 56 45 4C 44 20 48 45 52 48 41 4C 45 4E 00 96 |XVELD HERHALEN..|
00002C80: 34 1A 13 8D 37 33 33 30 3A 8F 20 49 4E 44 45 58 |4...7330:. INDEX|
00002C90: 20 4C 41 44 45 4E 00 A5 34 24 13 41 46 B2 30 3A | LADEN..4$.AF.0:|
00002CA0: 89 34 39 33 30 00 AB 34 2E 13 3A 00 B4 34 38 13 |.4930..4..:..48.|
00002CB0: 41 46 B2 31 00 BA 34 42 13 8E 00 C0 34 4C 13 3A |AF.1..4B....4L.:|
00002CC0: 00 C6 34 56 13 3A 00 E5 34 60 13 8F 20 2A 2A 2A |..4V.:..4`.. ***|
00002CD0: 50 52 49 4E 54 45 52 20 50 41 52 41 4D 45 54 45 |PRINTER PARAMETE|
00002CE0: 52 53 2A 2A 2A 00 F1 34 6A 13 99 43 4C 45 41 52 |RS***..4j..CLEAR|
00002CF0: 24 00 29 35 74 13 99 41 41 4E 24 22 20 20 20 20 |$.)5t..AAN$" |
00002D00: 20 20 20 20 20 20 20 20 50 52 49 4E 54 45 52 50 | PRINTERP|
00002D10: 41 52 41 4D 45 54 45 52 53 20 20 20 20 20 20 20 |ARAMETERS |
00002D20: 20 20 20 22 55 49 54 24 3B 00 47 35 7E 13 97 43 | "UIT$;.G5~..C|
00002D30: 53 2C 30 3A 97 43 5A 2C 32 32 3A 9E 43 52 3A 8F |S,0:.CZ,22:.CR:.|
00002D40: 20 43 55 52 53 4F 52 00 80 35 88 13 99 41 41 4E | CURSOR..5...AAN|
00002D50: 24 22 20 46 31 20 3D 20 4D 45 4E 55 20 20 20 46 |$" F1 = MENU F|
00002D60: 37 20 3D 20 50 41 52 41 4D 45 54 45 52 53 20 56 |7 = PARAMETERS V|
00002D70: 41 53 54 4C 45 47 47 45 4E 20 22 55 49 54 24 3B |ASTLEGGEN "UIT$;|
00002D80: 00 86 35 92 13 3A 00 A7 35 9C 13 8F 20 3E 4D 41 |..5..:..5... >MA|
00002D90: 53 4B 45 52 47 45 4E 45 52 41 54 4F 52 20 49 4E |SKERGENERATOR IN|
00002DA0: 49 54 49 41 4C 2E 3C 00 B1 35 A6 13 4D 46 B2 44 |ITIAL.<..5..MF.D|
00002DB0: 50 00 B7 35 B0 13 3A 00 C3 35 BA 13 81 49 B2 31 |P..5..:..5...I.1|
00002DC0: A4 4D 46 00 09 36 C4 13 3A 3A 4D 4E 24 28 49 29 |.MF..6..::MN$(I)|
00002DD0: B2 44 49 24 28 49 29 3A 4D 4C 28 49 29 B2 44 4C |.DI$(I):ML(I).DL|
00002DE0: 28 49 29 3A 4D 53 28 49 29 B2 44 53 28 49 29 3A |(I):MS(I).DS(I):|
00002DF0: 4D 5A 28 49 29 B2 44 5A 28 49 29 3A 4D 5A 24 28 |MZ(I).DZ(I):MZ$(|
00002E00: 49 29 B2 44 45 24 28 49 29 00 0F 36 CE 13 3A 00 |I).DE$(I)..6..:.|
00002E10: 41 36 D8 13 3A 3A 49 24 28 49 29 B2 C9 28 C4 28 |A6..::I$(I)..(.(|
00002E20: 44 50 28 49 29 29 2C C3 28 C4 28 44 50 28 49 29 |DP(I)),.(.(DP(I)|
00002E30: 29 29 AB 31 3A 4D 52 24 28 49 29 B2 49 24 28 49 |)).1:MR$(I).I$(I|
00002E40: 29 00 47 36 E2 13 82 00 4D 36 EC 13 3A 00 7B 36 |).G6....M6..:.{6|
00002E50: F6 13 49 24 28 31 29 B2 22 4E 22 3A 8B 44 50 28 |..I$(1)."N":.DP(|
00002E60: 31 29 B2 31 A7 49 24 28 31 29 B2 22 55 22 3A 4D |1).1.I$(1)."U":M|
00002E70: 52 24 28 31 29 B2 49 24 28 31 29 00 81 36 00 14 |R$(1).I$(1)..6..|
00002E80: 3A 00 9D 36 0A 14 8D 31 38 30 30 3A 8F 20 4D 41 |:..6...1800:. MA|
00002E90: 53 4B 45 52 20 4F 50 42 4F 55 57 45 4E 00 BA 36 |SKER OPBOUWEN..6|
00002EA0: 14 14 8D 31 38 38 30 3A 8F 20 4D 41 53 4B 45 52 |...1880:. MASKER|
00002EB0: 20 42 45 53 54 55 52 49 4E 47 00 D0 36 1E 14 8B | BESTURING..6...|
00002EC0: 41 B2 31 33 33 A7 35 32 36 30 3A 8F 20 46 31 3F |A.133.5260:. F1?|
00002ED0: 00 D6 36 28 14 3A 00 FA 36 32 14 8F 20 3E 4E 49 |..6(.:..62.. >NI|
00002EE0: 45 55 57 45 20 50 41 52 41 4D 45 54 45 52 53 20 |EUWE PARAMETERS |
00002EF0: 4F 56 45 52 4E 45 4D 45 4E 3C 00 3E 37 3C 14 8B |OVERNEMEN<.>7<..|
00002F00: C5 28 4D 52 24 28 35 29 29 B1 32 35 35 A7 4D 52 |.(MR$(5)).255.MR|
00002F10: 24 28 35 29 B2 49 24 28 35 29 3A 89 35 31 33 30 |$(5).I$(5):.5130|
00002F20: 3A 8F 20 53 45 43 4F 4E 44 41 49 52 2D 41 44 52 |:. SECONDAIR-ADR|
00002F30: 2E 20 4D 41 58 49 4D 41 41 4C 20 32 35 35 00 69 |. MAXIMAAL 255.i|
00002F40: 37 46 14 44 50 28 31 29 B2 30 3A 8B 4D 52 24 28 |7F.DP(1).0:.MR$(|
00002F50: 31 29 B2 22 55 22 B0 4D 52 24 28 31 29 B2 22 D5 |1)."U".MR$(1).".|
00002F60: 22 A7 44 50 28 31 29 B2 31 00 6F 37 50 14 3A 00 |".DP(1).1.o7P.:.|
00002F70: 7B 37 5A 14 81 49 B2 32 A4 44 50 00 91 37 64 14 |{7Z..I.2.DP..7d.|
00002F80: 3A 3A 44 50 28 49 29 B2 C5 28 4D 52 24 28 49 29 |::DP(I)..(MR$(I)|
00002F90: 29 00 97 37 6E 14 82 00 9D 37 78 14 3A 00 A7 37 |)..7n....7x.:..7|
00002FA0: 82 14 8D 37 35 37 30 00 AD 37 8C 14 8E 00 B3 37 |...7570..7.....7|
00002FB0: 96 14 3A 00 B9 37 A0 14 3A 00 D2 37 AA 14 8F 20 |..:..7..:..7... |
00002FC0: 2A 2A 52 45 4F 52 47 41 4E 49 53 41 54 49 45 2A |**REORGANISATIE*|
00002FD0: 2A 2A 00 DE 37 B4 14 99 43 4C 45 41 52 24 00 15 |**..7...CLEAR$..|
00002FE0: 38 BE 14 99 41 41 4E 24 22 20 20 20 20 20 20 20 |8...AAN$" |
00002FF0: 20 20 20 20 20 20 52 45 4F 52 47 41 4E 49 53 41 | REORGANISA|
00003000: 54 49 45 20 20 20 20 20 20 20 20 20 20 20 20 20 |TIE |
00003010: 22 55 49 54 24 00 33 38 C8 14 97 43 53 2C 30 3A |"UIT$.38...CS,0:|
00003020: 97 43 5A 2C 32 32 3A 9E 43 52 3A 8F 20 43 55 52 |.CZ,22:.CR:. CUR|
00003030: 53 4F 52 00 6A 38 D2 14 99 41 41 4E 24 22 20 46 |SOR.j8...AAN$" F|
00003040: 31 20 3D 20 4D 45 4E 55 20 20 20 20 20 20 20 20 |1 = MENU |
00003050: 20 46 37 20 3D 20 52 45 4F 52 47 41 4E 49 53 41 | F7 = REORGANISA|
00003060: 54 49 45 20 22 55 49 54 24 3B 00 70 38 E6 14 3A |TIE "UIT$;.p8..:|
00003070: 00 8B 38 F0 14 8F 20 3E 49 4E 44 45 58 56 45 4C |..8... >INDEXVEL|
00003080: 44 20 41 46 56 52 41 47 45 4E 3C 00 A8 38 FA 14 |D AFVRAGEN<..8..|
00003090: 97 43 53 2C 30 3A 97 43 5A 2C 36 3A 9E 43 52 3A |.CS,0:.CZ,6:.CR:|
000030A0: 8F 20 43 55 52 53 4F 52 00 D2 38 04 15 99 22 57 |. CURSOR..8..."W|
000030B0: 45 4C 4B 20 56 45 4C 44 20 4D 4F 45 54 20 53 4C |ELK VELD MOET SL|
000030C0: 45 55 54 45 4C 56 45 4C 44 20 5A 49 4A 4E 22 3B |EUTELVELD ZIJN";|
000030D0: 4A 46 00 F5 38 0E 15 9E 53 45 2C 33 38 2C 36 2C |JF..8...SE,38,6,|
000030E0: C3 28 C4 28 46 41 29 29 AB 31 2C 4E 55 24 2C 45 |.(.(FA)).1,NU$,E|
000030F0: 31 24 2C 41 24 00 0F 39 18 15 8B C2 28 32 35 33 |1$,A$..9....(253|
00003100: 29 B2 31 33 33 A7 35 38 37 30 3A 8F 20 46 31 00 |).133.5870:. F1.|
00003110: 1E 39 22 15 49 B2 B5 28 C5 28 41 24 29 29 00 24 |.9".I..(.(A$)).$|
00003120: 39 2C 15 3A 00 4F 39 36 15 8B 49 B3 31 B0 49 B1 |9,.:.O96..I.1.I.|
00003130: 46 41 A7 35 33 37 30 3A 8F 20 49 4E 44 45 58 56 |FA.5370:. INDEXV|
00003140: 45 4C 44 20 54 4F 45 47 45 53 54 41 41 4E 3F 00 |ELD TOEGESTAAN?.|
00003150: 7F 39 40 15 4A 46 B2 31 3A 8F 20 47 45 4C 44 49 |.9@.JF.1:. GELDI|
00003160: 47 45 20 20 57 41 41 52 44 45 20 20 41 4C 53 20 |GE WAARDE ALS |
00003170: 49 4E 44 45 58 20 4F 56 45 52 4E 45 4D 45 4E 00 |INDEX OVERNEMEN.|
00003180: 85 39 4A 15 3A 00 A1 39 54 15 8F 20 3E 49 4E 44 |.9J.:..9T.. >IND|
00003190: 45 58 54 41 42 45 4C 20 49 4E 49 54 49 41 4C 2E |EXTABEL INITIAL.|
000031A0: 3C 00 AD 39 5E 15 81 49 B2 31 A4 41 52 00 C6 39 |<..9^..I.1.AR..9|
000031B0: 68 15 3A 3A 4A 46 24 28 49 29 B2 22 20 22 3A 50 |h.::JF$(I)." ":P|
000031C0: 25 28 49 29 B2 30 00 CC 39 72 15 82 00 D2 39 7C |%(I).0..9r....9||
000031D0: 15 3A 00 E9 39 86 15 8F 20 3E 49 4E 44 45 58 20 |.:..9... >INDEX |
000031E0: 41 41 4E 4D 41 4B 45 4E 3C 00 05 3A 90 15 4E B2 |AANMAKEN<..:..N.|
000031F0: 31 3A 4E 45 B2 30 3A 8F 20 53 54 41 52 54 57 41 |1:NE.0:. STARTWA|
00003200: 41 52 44 45 4E 00 0B 3A 9A 15 99 00 22 3A A4 15 |ARDEN..:....":..|
00003210: 9F 33 2C 38 2C 33 2C 22 42 45 53 54 41 4E 44 2C |.3,8,3,"BESTAND,|
00003220: 4C 22 00 28 3A AE 15 3A 00 3C 3A B8 15 81 4C 52 |L".(:..:.<:...LR|
00003230: B2 31 A4 41 52 3A 41 24 B2 22 20 22 00 59 3A C2 |.1.AR:A$." ".Y:.|
00003240: 15 3A 3A 52 B2 4C 52 3A 8D 31 37 33 30 3A 8D 31 |.::R.LR:.1730:.1|
00003250: 37 33 30 3A 8F 20 32 2A 21 00 66 3A CC 15 3A 3A |730:. 2*!.f:..::|
00003260: A1 23 33 2C 41 24 00 99 3A D6 15 3A 3A 8B 41 24 |.#3,A$..:..::.A$|
00003270: B2 C7 28 32 35 35 29 B0 41 24 B2 22 20 22 A7 35 |..(255).A$." ".5|
00003280: 37 34 30 3A 8F 20 52 45 43 4F 52 44 20 56 52 49 |740:. RECORD VRI|
00003290: 4A 47 45 47 45 56 45 4E 3F 00 B5 3A E0 15 3A 3A |JGEGEVEN?..:..::|
000032A0: 8D 31 37 33 30 3A 8D 31 37 33 30 3A 8F 20 32 2D |.1730:.1730:. 2-|
000032B0: 4D 41 41 4C 21 00 C2 3A EA 15 3A 3A 41 24 B2 22 |MAAL!..:..::A$."|
000032C0: 20 22 00 C8 3A F4 15 3A 00 D6 3A FE 15 3A 3A 81 | "..:..:..:..::.|
000032D0: 49 B2 31 A4 46 41 00 EB 3A 08 16 3A 3A 3A 3A 9E |I.1.FA..:..::::.|
000032E0: 53 49 2C 33 2C 4D 52 24 28 49 29 00 F9 3A 12 16 |SI,3,MR$(I)..:..|
000032F0: 3A 3A 3A 3A 84 31 2C 46 4B 00 21 3B 1C 16 3A 3A |::::.1,FK.!;..::|
00003300: 3A 3A 8B 46 4B B3 B1 30 A7 35 37 34 30 3A 8F 20 |::.FK..0.5740:. |
00003310: 46 4F 55 54 20 4F 50 47 45 54 52 45 44 45 4E 20 |FOUT OPGETREDEN |
00003320: 3F 00 3A 3B 26 16 3A 3A 3A 3A 41 24 B2 41 24 AA |?.:;&.::::A$.A$.|
00003330: 4D 52 24 28 49 29 AA 43 52 24 00 42 3B 30 16 3A |MR$(I).CR$.B;0.:|
00003340: 3A 82 00 48 3B 3A 16 3A 00 64 3B 44 16 3A 3A 52 |:..H;:.:.d;D.::R|
00003350: B2 4E 3A 8D 31 37 33 30 3A 8D 31 37 33 30 3A 8F |.N:.1730:.1730:.|
00003360: 20 32 2A 21 00 71 3B 4E 16 3A 3A 98 33 2C 41 24 | 2*!.q;N.::.3,A$|
00003370: 3B 00 98 3B 58 16 3A 3A 8D 33 31 35 30 3A 8F 20 |;..;X.::.3150:. |
00003380: 49 4E 44 45 58 49 4E 56 4F 45 52 20 53 55 42 50 |INDEXINVOER SUBP|
00003390: 52 4F 47 52 41 4D 4D 41 00 A4 3B 62 16 3A 3A 99 |ROGRAMMA..;b.::.|
000033A0: 22 2E 22 3B 00 AC 3B 6C 16 82 4C 52 00 B2 3B 76 |".";..;l..LR..;v|
000033B0: 16 3A 00 D4 3B 80 16 8F 20 3E 4F 56 45 52 49 47 |.:..;... >OVERIG|
000033C0: 45 20 52 45 43 4F 52 44 53 20 56 52 49 4A 47 45 |E RECORDS VRIJGE|
000033D0: 56 45 4E 3C 00 E4 3B 8A 16 8B 4E B1 41 52 A7 20 |VEN<..;...N.AR. |
000033E0: 35 38 34 30 00 F0 3B 94 16 81 49 B2 4E A4 41 52 |5840..;...I.N.AR|
000033F0: 00 0C 3C 9E 16 3A 3A 52 B2 49 3A 8D 31 37 33 30 |..<..::R.I:.1730|
00003400: 3A 8D 31 37 33 30 3A 8F 20 32 2A 21 00 30 3C A8 |:.1730:. 2*!.0<.|
00003410: 16 3A 3A 98 33 2C C7 28 32 35 35 29 3A 8F 20 52 |.::.3,.(255):. R|
00003420: 45 43 4F 52 44 53 20 56 52 49 4A 47 45 56 45 4E |ECORDS VRIJGEVEN|
00003430: 00 3C 3C B2 16 3A 3A 99 22 2A 22 3B 00 42 3C BC |.<<..::."*";.B<.|
00003440: 16 82 00 48 3C C6 16 3A 00 4F 3C D0 16 A0 33 00 |...H<..:.O<...3.|
00003450: 55 3C DA 16 3A 00 5E 3C E4 16 41 46 B2 31 00 64 |U<..:.^<..AF.1.d|
00003460: 3C EE 16 8E 00 6A 3C F8 16 3A 00 70 3C 02 17 3A |<....j<..:.p<..:|
00003470: 00 83 3C 0C 17 8F 20 2A 2A 2A 4D 45 4E 55 20 32 |..<... ***MENU 2|
00003480: 2A 2A 2A 00 9E 3C 16 17 8D 37 37 38 30 3A 8F 20 |***..<...7780:. |
00003490: 4D 45 4E 55 20 32 20 2D 20 49 4E 46 4F 53 00 B7 |MENU 2 - INFOS..|
000034A0: 3C 20 17 8D 31 38 30 30 3A 8F 20 4D 41 53 4B 45 |< ..1800:. MASKE|
000034B0: 52 4F 50 42 4F 55 57 00 BD 3C 2A 17 3A 00 D9 3C |ROPBOUW..<*.:..<|
000034C0: 34 17 8F 20 3E 43 4F 4D 4D 41 4E 44 4F 20 49 4E |4.. >COMMANDO IN|
000034D0: 47 45 56 4F 45 52 44 3F 3C 00 E1 3C 3E 17 A1 41 |GEVOERD?<..<>..A|
000034E0: 24 00 E7 3C 48 17 3A 00 F7 3C 52 17 81 49 B2 31 |$..<H.:..<R..I.1|
000034F0: A4 C3 28 4D 32 24 29 00 11 3D 5C 17 3A 3A 8B CA |..(M2$)..=\.::..|
00003500: 28 4D 32 24 2C 49 2C 31 29 B2 41 24 A7 36 30 33 |(M2$,I,1).A$.603|
00003510: 30 00 17 3D 66 17 82 00 1D 3D 70 17 3A 00 41 3D |0..=f....=p.:.A=|
00003520: 7A 17 89 35 39 35 30 3A 8F 20 47 45 45 4E 20 43 |z..5950:. GEEN C|
00003530: 4F 4D 4D 41 4E 44 4F 20 49 4E 47 45 56 4F 45 52 |OMMANDO INGEVOER|
00003540: 44 00 47 3D 84 17 3A 00 76 3D 8E 17 91 49 89 36 |D.G=..:.v=...I.6|
00003550: 30 36 30 2C 36 30 36 30 2C 36 31 30 30 2C 36 31 |060,6060,6100,61|
00003560: 37 30 2C 36 30 36 30 2C 36 39 31 30 2C 36 33 32 |70,6060,6910,632|
00003570: 30 2C 36 35 39 30 00 80 3D 98 17 89 35 39 30 30 |0,6590..=...5900|
00003580: 00 86 3D A2 17 3A 00 8C 3D AC 17 8E 00 92 3D B6 |..=..:..=.....=.|
00003590: 17 3A 00 98 3D C0 17 3A 00 B0 3D CA 17 8F 20 2A |.:..=..:..=... *|
000035A0: 56 4F 52 52 55 49 54 42 4C 41 44 45 52 45 4E 2A |VORRUITBLADEREN*|
000035B0: 00 ED 3D D4 17 8B 50 25 B2 4E 45 A7 41 24 B2 22 |..=...P%.NE.A$."|
000035C0: 45 49 4E 44 45 20 42 45 53 54 41 4E 44 22 3A 89 |EINDE BESTAND":.|
000035D0: 35 39 35 30 3A 8F 20 45 49 4E 44 45 20 42 45 53 |5950:. EINDE BES|
000035E0: 54 41 4E 44 20 42 45 52 45 49 4B 54 3F 00 1C 3E |TAND BEREIKT?..>|
000035F0: DE 17 50 25 B2 50 25 AA 31 3A 8F 20 50 4F 49 4E |..P%.P%.1:. POIN|
00003600: 54 45 52 20 4F 50 20 49 4E 44 45 58 45 4C 45 4D |TER OP INDEXELEM|
00003610: 45 4E 54 20 56 45 52 48 4F 47 45 4E 00 29 3E E8 |ENT VERHOGEN.)>.|
00003620: 17 52 B2 50 25 28 50 25 29 00 42 3E F2 17 8D 33 |.R.P%(P%).B>...3|
00003630: 33 32 30 3A 8F 20 50 4F 53 49 54 2E 2B 4C 45 5A |320:. POSIT.+LEZ|
00003640: 45 4E 00 4C 3E FC 17 89 35 39 32 30 00 52 3E 06 |EN.L>...5920.R>.|
00003650: 18 3A 00 58 3E 10 18 3A 00 6E 3E 1A 18 8F 20 2A |.:.X>..:.n>... *|
00003660: 54 45 52 55 47 42 4C 41 44 45 52 45 4E 2A 00 AB |TERUGBLADEREN*..|
00003670: 3E 24 18 8B 50 25 B2 31 A7 41 24 B2 22 42 45 47 |>$..P%.1.A$."BEG|
00003680: 49 4E 20 42 45 53 54 41 4E 44 22 3A 89 36 32 35 |IN BESTAND":.625|
00003690: 30 3A 8F 20 42 45 47 49 4E 20 42 45 53 54 41 4E |0:. BEGIN BESTAN|
000036A0: 44 20 20 42 45 52 45 49 4B 54 3F 00 D9 3E 2E 18 |D BEREIKT?..>..|
000036B0: 50 25 B2 50 25 AB 31 3A 8F 20 50 4F 49 4E 54 45 |P%.P%.1:. POINTE|
000036C0: 52 20 4F 50 20 49 4E 44 45 58 45 4C 45 4D 45 4E |R OP INDEXELEMEN|
000036D0: 54 20 56 45 4C 41 47 45 4E 00 E6 3E 38 18 52 B2 |T VELAGEN..>8.R.|
000036E0: 50 25 28 50 25 29 00 FF 3E 42 18 8D 33 33 32 30 |P%(P%)..>B..3320|
000036F0: 3A 8F 20 50 4F 53 49 54 2E 2B 4C 45 5A 45 4E 00 |:. POSIT.+LEZEN.|
00003700: 09 3F 4C 18 89 35 39 32 30 00 0F 3F 56 18 3A 00 |.?L..5920..?V.:.|
00003710: 15 3F 60 18 3A 00 36 3F 6A 18 8F 20 2A 42 45 47 |.?`.:.6?j.. *BEG|
00003720: 49 4E 20 52 45 53 50 20 45 49 4E 44 45 20 42 45 |IN RESP EINDE BE|
00003730: 53 54 41 4E 44 2A 00 6F 3F 74 18 99 48 4F 4D 45 |STAND*.o?t..HOME|
00003740: 24 41 41 4E 24 22 20 20 20 20 20 20 20 22 41 24 |$AAN$" "A$|
00003750: 22 20 42 45 52 45 49 4B 54 20 21 21 21 20 20 20 |" BEREIKT !!! |
00003760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00003770: 83 3F 7E 18 A1 41 34 3A 8B 41 34 B2 22 22 A7 36 |.?~..A4:.A4."".6|
00003780: 32 37 30 00 C1 3F 88 18 99 48 4F 4D 45 24 41 41 |270..?...HOME$AA|
00003790: 4E 24 22 20 20 20 20 20 20 20 5A 4F 45 4B 45 4E |N$" ZOEKEN|
000037A0: 2C 20 57 49 4A 5A 49 47 45 4E 2C 20 57 49 53 53 |, WIJZIGEN, WISS|
000037B0: 45 4E 20 20 20 20 20 20 20 20 20 22 55 49 54 24 |EN "UIT$|
000037C0: 3B 00 D4 3F 92 18 89 35 39 35 30 3A 8F 20 4D 45 |;..?...5950:. ME|
000037D0: 4E 55 20 32 00 DA 3F 9C 18 3A 00 E0 3F A6 18 3A |NU 2..?..:..?..:|
000037E0: 00 EF 3F B0 18 8F 20 2A 57 49 53 53 45 4E 2A 00 |..?... *WISSEN*.|
000037F0: 13 40 BA 18 97 43 53 2C 30 3A 97 43 5A 2C 32 32 |.@...CS,0:.CZ,22|
00003800: 3A 9E 43 52 3A 8F 20 43 52 53 2E 50 4C 41 41 54 |:.CR:. CRS.PLAAT|
00003810: 53 45 4E 00 56 40 C4 18 99 41 41 4E 24 22 20 20 |SEN.V@...AAN$" |
00003820: 20 20 20 20 20 20 49 53 20 44 41 54 20 4A 55 49 | IS DAT JUI|
00003830: 53 54 20 28 4A 2F 4E 29 20 3F 20 20 20 20 20 20 |ST (J/N) ? |
00003840: 20 20 20 20 20 20 22 55 49 54 24 3B C8 28 53 50 | "UIT$;.(SP|
00003850: 24 2C 38 30 29 3B 00 78 40 CE 18 A1 41 24 3A 8B |$,80);.x@...A$:.|
00003860: 41 24 B3 B1 22 4A 22 AF 41 24 B3 B1 22 4E 22 54 |A$.."J".A$.."N"T|
00003870: 45 48 4E 20 36 33 35 30 00 89 40 D8 18 8B 41 24 |EHN 6350..@...A$|
00003880: B2 22 4E 22 A7 36 34 30 30 00 8F 40 E2 18 3A 00 |."N".6400..@..:.|
00003890: C0 40 EC 18 8D 36 34 35 30 3A 8F 20 52 45 43 4F |.@...6450:. RECO|
000038A0: 52 44 20 56 52 49 4A 47 45 56 45 4E 2C 20 49 4E |RD VRIJGEVEN, IN|
000038B0: 44 45 58 49 4E 56 4F 45 52 20 57 49 53 53 45 4E |DEXINVOER WISSEN|
000038C0: 00 03 41 F6 18 8B 50 25 B1 4E 45 A7 50 25 B2 4E |..A...P%.NE.P%.N|
000038D0: 45 3A 8F 20 53 54 41 41 54 20 50 25 20 41 43 48 |E:. STAAT P% ACH|
000038E0: 54 45 52 20 48 45 54 20 45 49 4E 44 45 20 56 41 |TER HET EINDE VA|
000038F0: 4E 20 48 45 54 20 49 4E 44 45 58 42 45 53 54 41 |N HET INDEXBESTA|
00003900: 4E 44 3F 00 1C 41 00 19 89 35 39 31 30 3A 8F 20 |ND?..A...5910:. |
00003910: 45 49 4E 44 45 20 57 49 53 53 45 4E 00 22 41 0A |EINDE WISSEN."A.|
00003920: 19 3A 00 28 41 14 19 3A 00 41 41 1E 19 8F 20 2A |.:.(A..:.AA... *|
00003930: 57 49 53 2D 53 55 42 50 52 4F 47 52 41 4D 4D 41 |WIS-SUBPROGRAMMA|
00003940: 2A 00 5A 41 28 19 8F 20 3E 52 45 43 4F 52 44 20 |*.ZA(.. >RECORD |
00003950: 56 52 49 4A 47 45 56 45 4E 3C 00 72 41 32 19 9F |VRIJGEVEN<.rA2..|
00003960: 33 2C 38 2C 33 2C 22 42 45 53 54 41 4E 44 2C 4C |3,8,3,"BESTAND,L|
00003970: 2C 22 00 8B 41 3C 19 8D 31 37 33 30 3A 8F 20 50 |,"..A<..1730:. P|
00003980: 4F 53 49 54 49 4F 4E 45 52 45 4E 00 B3 41 46 19 |OSITIONEREN..AF.|
00003990: 98 33 2C C7 28 32 35 35 29 3A 8F 20 56 52 49 4A |.3,.(255):. VRIJ|
000039A0: 47 41 56 45 54 45 4B 45 4E 20 53 43 48 52 49 4A |GAVETEKEN SCHRIJ|
000039B0: 56 45 4E 00 BA 41 50 19 A0 33 00 C0 41 5A 19 3A |VEN..AP..3..AZ.:|
000039C0: 00 E7 41 64 19 8F 20 3E 49 4E 44 49 43 45 53 20 |..Ad.. >INDICES |
000039D0: 4E 41 41 52 20 56 4F 52 45 4E 20 56 45 52 50 4C |NAAR VOREN VERPL|
000039E0: 41 41 54 53 45 4E 3C 00 F9 41 6E 19 9E 53 42 2C |AATSEN<..An..SB,|
000039F0: 30 2C 4A 46 24 28 50 25 29 00 08 42 78 19 9E 53 |0,JF$(P%)..Bx..S|
00003A00: 42 2C 50 25 28 50 25 29 00 0E 42 82 19 3A 00 2E |B,P%(P%)..B..:..|
00003A10: 42 8C 19 41 46 B2 31 3A 8F 20 57 49 4A 5A 49 47 |B..AF.1:. WIJZIG|
00003A20: 49 4E 47 20 55 49 54 47 45 56 4F 45 52 44 00 57 |ING UITGEVOERD.W|
00003A30: 42 96 19 4E 45 B2 4E 45 AB 31 3A 8F 20 41 41 4E |B..NE.NE.1:. AAN|
00003A40: 54 41 4C 20 44 41 54 41 52 45 47 45 4C 53 20 56 |TAL DATAREGELS V|
00003A50: 45 52 4C 41 47 45 4E 00 5D 42 A0 19 8E 00 63 42 |ERLAGEN.]B....cB|
00003A60: AA 19 3A 00 69 42 B4 19 3A 00 7A 42 BE 19 8F 20 |..:.iB..:.zB... |
00003A70: 2A 57 49 4A 5A 49 47 45 4E 2A 00 89 42 C8 19 8B |*WIJZIGEN*..B...|
00003A80: 4E B1 41 52 A7 36 38 30 30 00 8F 42 D2 19 3A 00 |N.AR.6800..B..:.|
00003A90: AA 42 DC 19 8D 37 39 33 30 3A 8F 20 57 49 4A 5A |.B...7930:. WIJZ|
00003AA0: 49 47 45 4E 20 49 4E 46 4F 53 00 B0 42 E6 19 3A |IGEN INFOS..B..:|
00003AB0: 00 F1 42 F0 19 8F 20 3E 4F 56 45 52 47 41 56 45 |..B... >OVERGAVE|
00003AC0: 20 56 41 4E 20 44 45 20 54 45 20 56 45 52 41 4E | VAN DE TE VERAN|
00003AD0: 44 45 52 45 4E 20 52 45 47 45 4C 53 20 41 41 4E |DEREN REGELS AAN|
00003AE0: 20 4D 41 53 4B 45 52 47 45 4E 45 52 41 54 4F 52 | MASKERGENERATOR|
00003AF0: 3C 00 FD 42 FA 19 81 49 B2 31 A4 4D 46 00 2A 43 |<..B...I.1.MF.*C|
00003B00: 04 1A 3A 3A 4D 52 24 28 49 29 B2 49 24 28 49 29 |..::MR$(I).I$(I)|
00003B10: 3A 4D 4C 28 49 29 B2 4C 49 28 49 29 3A 4D 5A 24 |:ML(I).LI(I):MZ$|
00003B20: 28 49 29 B2 45 5A 24 28 49 29 00 30 43 0E 1A 82 |(I).EZ$(I).0C...|
00003B30: 00 36 43 18 1A 3A 00 49 43 22 1A 8D 31 38 38 30 |.6C..:.IC"..1880|
00003B40: 3A 8F 20 4D 41 53 4B 45 52 00 4F 43 2C 1A 3A 00 |:. MASKER.OC,.:.|
00003B50: 73 43 36 1A 8B 41 B2 31 33 33 A7 36 38 36 30 3A |sC6..A.133.6860:|
00003B60: 8F 20 4D 45 54 20 46 31 20 42 45 45 49 4E 44 49 |. MET F1 BEEINDI|
00003B70: 47 44 3F 00 79 43 40 1A 3A 00 96 43 4A 1A 8D 36 |GD?.yC@.:..CJ..6|
00003B80: 34 35 30 3A 8F 20 57 49 53 2D 53 55 42 50 52 4F |450:. WIS-SUBPRO|
00003B90: 47 52 41 4D 4D 41 00 B4 43 54 1A 59 B2 50 25 3A |GRAMMA..CT.Y.P%:|
00003BA0: 8F 20 50 4F 49 4E 54 45 52 20 56 41 53 54 4C 45 |. POINTER VASTLE|
00003BB0: 47 47 45 4E 00 D4 43 5E 1A 8D 32 39 38 30 3A 8F |GGEN..C^..2980:.|
00003BC0: 20 49 4E 56 4F 45 52 2D 53 55 42 50 52 4F 47 52 | INVOER-SUBPROGR|
00003BD0: 41 4D 4D 41 00 ED 43 68 1A 50 25 B2 59 3A 8F 20 |AMMA..Ch.P%.Y:. |
00003BE0: 50 4F 49 4E 54 45 52 20 48 41 4C 45 4E 00 F3 43 |POINTER HALEN..C|
00003BF0: 72 1A 3A 00 0E 44 7C 1A 89 36 38 36 30 3A 8F 20 |r.:..D|..6860:. |
00003C00: 45 49 4E 44 45 20 57 49 4A 5A 49 47 45 4E 00 14 |EINDE WIJZIGEN..|
00003C10: 44 86 1A 3A 00 56 44 90 1A 8B 20 4E 45 B3 41 52 |D..:.VD... NE.AR|
00003C20: A7 36 38 34 30 3A 8F 20 4E 55 4D 4D 45 52 20 45 |.6840:. NUMMER E|
00003C30: 43 48 54 20 4B 4C 45 49 4E 45 52 20 41 4C 53 20 |CHT KLEINER ALS |
00003C40: 4D 41 58 2E 41 41 4E 54 41 4C 20 44 41 54 41 52 |MAX.AANTAL DATAR|
00003C50: 45 47 45 4C 53 3F 00 95 44 9A 1A 99 48 4F 4D 45 |EGELS?..D...HOME|
00003C60: 24 3B 41 41 4E 24 22 20 20 20 20 20 20 20 20 20 |$;AAN$" |
00003C70: 20 48 45 54 20 20 42 45 53 54 41 4E 44 20 20 49 | HET BESTAND I|
00003C80: 53 20 56 4F 4C 20 21 21 21 20 20 20 20 20 20 22 |S VOL !!! "|
00003C90: 55 49 54 24 3B 00 9F 44 A4 1A 89 36 38 35 30 00 |UIT$;..D...6850.|
00003CA0: A5 44 AE 1A 3A 00 E1 44 B8 1A 99 48 4F 4D 45 24 |.D..:..D...HOME$|
00003CB0: 3B 41 41 4E 24 22 20 57 49 4A 20 41 44 56 49 53 |;AAN$" WIJ ADVIS|
00003CC0: 45 52 45 4E 20 45 45 4E 20 52 45 4F 52 47 41 4E |EREN EEN REORGAN|
00003CD0: 49 53 41 54 49 45 20 21 21 21 20 22 55 49 54 24 |ISATIE !!! "UIT$|
00003CE0: 3B 00 F5 44 C2 1A A1 41 24 3A 8B 41 24 B2 22 22 |;..D...A$:.A$.""|
00003CF0: A7 36 38 35 30 00 FB 44 CC 1A 3A 00 16 45 D6 1A |.6850..D..:..E..|
00003D00: 8D 37 37 38 30 3A 8F 20 4D 45 4E 55 20 32 20 2D |.7780:. MENU 2 -|
00003D10: 20 49 4E 46 4F 53 00 31 45 E0 1A 89 35 39 35 30 | INFOS.1E...5950|
00003D20: 3A 8F 20 43 4F 4D 4D 41 4E 44 4F 49 4E 56 4F 45 |:. COMMANDOINVOE|
00003D30: 52 00 37 45 EA 1A 3A 00 3D 45 F4 1A 3A 00 62 45 |R.7E..:.=E..:.bE|
00003D40: FE 1A 8F 20 2A 41 46 44 52 55 4B 4B 45 4E 20 56 |... *AFDRUKKEN V|
00003D50: 41 4E 20 41 43 54 55 45 4C 45 20 52 45 47 45 4C |AN ACTUELE REGEL|
00003D60: 53 2A 00 75 45 08 1B 9F 35 2C 44 50 28 34 29 2C |S*.uE...5,DP(4),|
00003D70: 44 50 28 35 29 00 89 45 12 1B 8D 36 39 39 30 3A |DP(5)..E...6990:|
00003D80: 8F 20 50 52 49 4E 54 45 4E 00 90 45 1C 1B A0 35 |. PRINTEN..E...5|
00003D90: 00 96 45 26 1B 3A 00 A0 45 30 1B 89 35 39 35 30 |..E&.:..E0..5950|
00003DA0: 00 A6 45 3A 1B 3A 00 AC 45 44 1B 3A 00 C7 45 4E |..E:.:..ED.:..EN|
00003DB0: 1B 8F 20 2A 50 52 49 4E 54 20 53 55 42 50 52 4F |.. *PRINT SUBPRO|
00003DC0: 47 52 41 4D 4D 41 2A 00 E3 45 58 1B 8F 20 3E 53 |GRAMMA*..EX.. >S|
00003DD0: 4F 52 54 45 45 52 56 45 4C 44 20 50 52 49 4E 54 |ORTEERVELD PRINT|
00003DE0: 45 4E 3C 00 F2 45 62 1B 98 35 2C 49 24 28 4A 46 |EN<..Eb..5,I$(JF|
00003DF0: 29 3B 00 08 46 6C 1B 8B 44 50 28 31 29 B2 31 A7 |);..Fl..DP(1).1.|
00003E00: 98 35 3A 89 37 30 36 30 00 27 46 76 1B 98 35 2C |.5:.7060.'Fv..5,|
00003E10: C8 28 53 50 24 2C 44 50 28 32 29 29 3B 3A 8F 20 |.(SP$,DP(2));:. |
00003E20: 41 46 53 54 41 4E 44 00 2D 46 80 1B 3A 00 4C 46 |AFSTAND.-F..:.LF|
00003E30: 8A 1B 8F 20 3E 4F 56 45 52 49 47 45 20 56 45 4C |... >OVERIGE VEL|
00003E40: 44 45 4E 20 50 52 49 4E 54 45 4E 3C 00 59 46 94 |DEN PRINTEN<.YF.|
00003E50: 1B 81 49 31 B2 31 A4 46 41 00 6B 46 9E 1B 3A 3A |..I1.1.FA.kF..::|
00003E60: 8B 49 31 B2 4A 46 A7 37 31 37 30 00 7C 46 A8 1B |.I1.JF.7170.|F..|
00003E70: 3A 3A 98 35 2C 49 24 28 49 31 29 3B 00 94 46 B2 |::.5,I$(I1);..F.|
00003E80: 1B 3A 3A 8B 44 50 28 31 29 B2 31 A7 98 35 3A 89 |.::.DP(1).1..5:.|
00003E90: 37 31 31 30 00 BE 46 BC 1B 3A 3A 98 35 2C C8 28 |7110..F..::.5,.(|
00003EA0: 53 50 24 2C 44 50 28 32 29 29 3B 3A 8F 20 41 42 |SP$,DP(2));:. AB|
00003EB0: 53 4C 49 53 54 37 31 30 30 2D 37 32 30 30 00 C4 |SLIST7100-7200..|
00003EC0: 46 C6 1B 82 00 CA 46 D0 1B 3A 00 DA 46 DA 1B 81 |F.....F..:..F...|
00003ED0: 49 32 B2 31 A4 44 50 28 33 29 00 E3 46 E4 1B 3A |I2.1.DP(3)..F..:|
00003EE0: 3A 98 35 00 E9 46 EE 1B 82 00 EF 46 F8 1B 3A 00 |:.5..F.....F..:.|
00003EF0: F5 46 02 1C 8E 00 FB 46 0C 1C 3A 00 01 47 16 1C |.F.....F..:..G..|
00003F00: 3A 00 1A 47 20 1C 8F 20 2A 49 4E 44 45 58 20 56 |:..G .. *INDEX V|
00003F10: 41 53 54 4C 45 47 47 45 4E 2A 00 2B 47 2A 1C 98 |ASTLEGGEN*.+G*..|
00003F20: 31 2C 22 53 3A 49 4E 44 45 58 22 00 42 47 34 1C |1,"S:INDEX".BG4.|
00003F30: 9F 34 2C 38 2C 34 2C 22 49 4E 44 45 58 2C 53 2C |.4,8,4,"INDEX,S,|
00003F40: 57 22 00 48 47 3E 1C 3A 00 54 47 48 1C 81 49 B2 |W".HG>.:.TGH..I.|
00003F50: 31 A4 4E 45 00 64 47 52 1C 3A 3A 98 34 2C 4A 46 |1.NE.dGR.::.4,JF|
00003F60: 24 28 49 29 00 73 47 5C 1C 3A 3A 98 34 2C 50 25 |$(I).sG\.::.4,P%|
00003F70: 28 49 29 00 79 47 66 1C 82 00 7F 47 70 1C 3A 00 |(I).yGf....Gp.:.|
00003F80: 86 47 7A 1C A0 34 00 8C 47 84 1C 8E 00 92 47 8E |.Gz..4..G.....G.|
00003F90: 1C 3A 00 98 47 98 1C 3A 00 AC 47 A2 1C 8F 20 2A |.:..G..:..G... *|
00003FA0: 49 4E 44 45 58 20 4C 41 44 45 4E 2A 00 C3 47 AC |INDEX LADEN*..G.|
00003FB0: 1C 9F 34 2C 38 2C 34 2C 22 49 4E 44 45 58 2C 53 |..4,8,4,"INDEX,S|
00003FC0: 2C 52 22 00 C9 47 B6 1C 3A 00 D5 47 C0 1C 81 49 |,R"..G..:..G...I|
00003FD0: B2 31 A4 4E 45 00 E8 47 CA 1C 3A 3A 9E 53 49 2C |.1.NE..G..::.SI,|
00003FE0: 34 2C 4A 46 24 28 49 29 00 F7 47 D4 1C 3A 3A 84 |4,JF$(I)..G..::.|
00003FF0: 34 2C 50 25 28 49 29 00 FD 47 DE 1C 82 00 03 48 |4,P%(I)..G.....H|
00004000: E8 1C 3A 00 0A 48 F2 1C A0 34 00 10 48 FC 1C 8E |..:..H...4..H...|
00004010: 00 16 48 06 1D 3A 00 1C 48 10 1D 3A 00 3A 48 1A |..H..:..H..:.:H.|
00004020: 1D 8F 20 2A 49 4E 4C 45 5A 45 4E 20 56 41 4E 20 |.. *INLEZEN VAN |
00004030: 44 45 20 20 49 4E 46 4F 53 2A 00 57 48 24 1D 9F |DE INFOS*.WH$..|
00004040: 32 2C 38 2C 32 2C 22 49 4E 46 4F 42 45 53 54 41 |2,8,2,"INFOBESTA|
00004050: 4E 44 2C 55 2C 52 22 00 6C 48 2E 1D 84 32 2C 41 |ND,U,R".lH...2,A|
00004060: 52 2C 52 4C 2C 4A 46 2C 4E 2C 4E 45 00 72 48 38 |R,RL,JF,N,NE.rH8|
00004070: 1D 3A 00 7E 48 42 1D 81 49 B2 31 A4 44 50 00 8D |.:.~HB..I.1.DP..|
00004080: 48 4C 1D 3A 3A 84 32 2C 44 50 28 49 29 00 93 48 |HL.::.2,DP(I)..H|
00004090: 56 1D 82 00 99 48 60 1D 3A 00 A0 48 6A 1D A0 32 |V....H`.:..Hj..2|
000040A0: 00 A6 48 74 1D 8E 00 AC 48 7E 1D 3A 00 B2 48 88 |..Ht....H~.:..H.|
000040B0: 1D 3A 00 D3 48 92 1D 8F 20 2A 56 41 53 54 4C 45 |.:..H... *VASTLE|
000040C0: 47 47 45 4E 20 56 41 4E 20 44 45 20 20 49 4E 46 |GGEN VAN DE INF|
000040D0: 4F 53 2A 00 EA 48 9C 1D 98 31 2C 22 53 3A 49 4E |OS*..H...1,"S:IN|
000040E0: 46 4F 42 45 53 54 41 4E 44 22 00 07 49 A6 1D 9F |FOBESTAND"..I...|
000040F0: 32 2C 38 2C 32 2C 22 49 4E 46 4F 42 45 53 54 41 |2,8,2,"INFOBESTA|
00004100: 4E 44 2C 55 2C 57 22 00 2C 49 B0 1D 98 32 2C 41 |ND,U,W".,I...2,A|
00004110: 52 3B 43 52 24 3B 52 4C 3B 43 52 24 3B 4A 46 3B |R;CR$;RL;CR$;JF;|
00004120: 43 52 24 3B 4E 3B 43 52 24 3B 4E 45 00 32 49 BA |CR$;N;CR$;NE.2I.|
00004130: 1D 3A 00 3E 49 C4 1D 81 49 B2 31 A4 44 50 00 4D |.:.>I...I.1.DP.M|
00004140: 49 CE 1D 3A 3A 98 32 2C 44 50 28 49 29 00 53 49 |I..::.2,DP(I).SI|
00004150: D8 1D 82 00 59 49 E2 1D 3A 00 60 49 EC 1D A0 32 |....YI..:.`I...2|
00004160: 00 66 49 F6 1D 8E 00 6C 49 00 1E 3A 00 72 49 0A |.fI....lI..:.rI.|
00004170: 1E 3A 00 84 49 14 1E 8F 20 2A 5A 4F 45 4B 49 4E |.:..I... *ZOEKIN|
00004180: 46 4F 53 2A 00 C0 49 1E 1E 99 48 4F 4D 45 24 41 |FOS*..I...HOME$A|
00004190: 41 4E 24 22 20 20 20 20 20 20 20 5A 4F 45 4B 45 |AN$" ZOEKE|
000041A0: 4E 2C 20 57 49 4A 5A 49 47 45 4E 2C 20 57 49 53 |N, WIJZIGEN, WIS|
000041B0: 53 45 4E 20 20 20 20 20 20 20 22 55 49 54 24 3B |SEN "UIT$;|
000041C0: 00 E4 49 28 1E 97 43 53 2C 30 3A 97 43 5A 2C 32 |..I(..CS,0:.CZ,2|
000041D0: 32 3A 9E 43 52 3A 8F 20 43 52 53 2E 50 4C 41 41 |2:.CR:. CRS.PLAA|
000041E0: 54 53 45 4E 00 27 4A 32 1E 99 41 41 4E 24 22 20 |TSEN.'J2..AAN$" |
000041F0: 20 46 31 20 3D 20 4D 45 4E 55 20 20 20 20 20 20 | F1 = MENU |
00004200: 20 20 20 20 20 20 20 20 20 46 37 20 20 3D 20 5A | F7 = Z|
00004210: 4F 45 4B 45 4E 20 20 22 55 49 54 24 3B C8 28 53 |OEKEN "UIT$;.(S|
00004220: 50 24 2C 38 30 29 3B 00 2D 4A 3C 1E 8E 00 33 4A |P$,80);.-J<...3J|
00004230: 46 1E 3A 00 39 4A 50 1E 3A 00 50 4A 5A 1E 8F 20 |F.:.9JP.:.PJZ.. |
00004240: 2A 4D 45 4E 55 20 32 20 2D 20 49 4E 46 4F 53 2A |*MENU 2 - INFOS*|
00004250: 00 8A 4A 64 1E 99 48 4F 4D 45 24 41 41 4E 24 22 |..Jd..HOME$AAN$"|
00004260: 20 20 20 20 20 20 20 5A 4F 45 4B 45 4E 2C 20 57 | ZOEKEN, W|
00004270: 49 4A 5A 49 47 45 4E 2C 20 57 49 53 53 45 4E 20 |IJZIGEN, WISSEN |
00004280: 20 20 20 20 20 20 20 20 22 3B 00 B1 4A 6E 1E 97 | ";..Jn..|
00004290: 43 53 2C 30 3A 97 43 5A 2C 32 32 3A 9E 43 52 3A |CS,0:.CZ,22:.CR:|
000042A0: 8F 20 43 55 52 53 4F 52 20 50 4C 41 41 54 53 45 |. CURSOR PLAATSE|
000042B0: 4E 00 EA 4A 78 1E 99 41 41 24 22 52 45 54 55 52 |N..Jx..AA$"RETUR|
000042C0: 4E 3D 56 45 52 44 45 52 20 20 20 43 52 53 2E 52 |N=VERDER CRS.R|
000042D0: 2E 20 3D 3E 20 20 43 52 53 2E 4C 2E 20 3C 3D 20 |. => CRS.L. <= |
000042E0: 20 22 55 49 54 24 22 20 22 3B 00 1F 4B 82 1E 99 | "UIT$" ";..K...|
000042F0: 41 41 4E 24 22 46 31 3D 4D 45 4E 55 20 20 20 46 |AAN$"F1=MENU F|
00004300: 33 3D 4F 50 4E 49 45 55 57 20 5A 4F 45 4B 45 4E |3=OPNIEUW ZOEKEN|
00004310: 20 46 35 3D 50 52 49 4E 54 20 22 55 49 54 24 00 | F5=PRINT "UIT$.|
00004320: 57 4B 8C 1E 99 41 41 4E 24 22 20 20 20 20 20 46 |WK...AAN$" F|
00004330: 37 3D 57 49 4A 5A 49 47 45 4E 20 20 20 20 20 20 |7=WIJZIGEN |
00004340: 20 46 38 3D 57 49 53 53 45 4E 20 20 20 20 20 20 | F8=WISSEN |
00004350: 20 22 55 49 54 24 3B 00 5D 4B 96 1E 8E 00 63 4B | "UIT$;.]K....cK|
00004360: A0 1E 3A 00 69 4B AA 1E 3A 00 80 4B B4 1E 8F 20 |..:.iK..:..K... |
00004370: 2A 49 4E 56 4F 45 52 20 2D 20 49 4E 46 4F 53 2A |*INVOER - INFOS*|
00004380: 00 B8 4B BE 1E 99 48 4F 4D 45 24 41 41 4E 24 22 |..K...HOME$AAN$"|
00004390: 20 20 20 20 20 20 20 49 4E 56 4F 45 52 45 4E 20 | INVOEREN |
000043A0: 56 41 4E 20 44 41 54 41 52 45 47 45 4C 53 20 20 |VAN DATAREGELS |
000043B0: 20 20 20 20 20 20 22 3B 00 DC 4B C8 1E 97 43 53 | ";..K...CS|
000043C0: 2C 30 3A 97 43 5A 2C 32 32 3A 9E 43 52 3A 8F 20 |,0:.CZ,22:.CR:. |
000043D0: 43 52 53 2E 50 4C 41 41 54 53 45 4E 00 1C 4C D2 |CRS.PLAATSEN..L.|
000043E0: 1E 99 41 41 4E 24 22 20 20 46 31 20 3D 20 4D 45 |..AAN$" F1 = ME|
000043F0: 4E 55 20 20 20 20 20 20 20 20 20 20 20 46 37 20 |NU F7 |
00004400: 3D 20 49 4E 56 4F 45 52 45 4E 20 20 22 55 49 54 |= INVOEREN "UIT|
00004410: 24 3B C8 28 53 50 24 2C 38 30 29 3B 00 22 4C DC |$;.(SP$,80);."L.|
00004420: 1E 8E 00 28 4C E6 1E 3A 00 2E 4C F0 1E 3A 00 45 |...(L..:..L..:.E|
00004430: 4C FA 1E 8F 20 2A 57 49 4A 5A 49 47 45 4E 20 49 |L... *WIJZIGEN I|
00004440: 4E 46 4F 53 2A 00 6A 4C 04 1F 97 43 53 2C 30 3A |NFOS*.jL...CS,0:|
00004450: 97 43 5A 2C 32 32 3A 9E 43 52 3A 8F 20 43 52 53 |.CZ,22:.CR:. CRS|
00004460: 2E 20 50 4C 41 41 54 53 45 4E 00 AD 4C 0E 1F 99 |. PLAATSEN..L...|
00004470: 41 41 4E 24 22 20 20 46 31 20 3D 20 47 45 45 4E |AAN$" F1 = GEEN|
00004480: 20 57 49 4A 5A 49 47 49 4E 47 20 20 20 20 20 46 | WIJZIGING F|
00004490: 37 20 3D 20 57 49 4A 5A 49 47 45 4E 20 22 55 49 |7 = WIJZIGEN "UI|
000044A0: 54 24 3A C8 28 53 50 24 2C 38 30 29 3B 00 B3 4C |T$:.(SP$,80);..L|
000044B0: 18 1F 8E 00 B9 4C 22 1F 3A 00 BF 4C 2C 1F 3A 00 |.....L".:..L,.:.|
000044C0: C5 4C 36 1F 3A 00 F0 4C 27 23 8F 20 2A 2A 2A 20 |.L6.:..L'#. *** |
000044D0: 4D 41 43 48 49 4E 45 50 52 4F 47 52 41 4D 4D 41 |MACHINEPROGRAMMA|
000044E0: 20 49 4E 53 54 41 4C 4C 45 52 45 4E 20 2A 2A 2A | INSTALLEREN ***|
000044F0: 00 11 4D 28 23 99 22 49 4E 56 4F 45 52 52 4F 55 |..M(#."INVOERROU|
00004500: 54 49 4E 45 22 3A 41 44 B2 53 45 3A 8D 39 30 35 |TINE":AD.SE:.905|
00004510: 30 00 33 4D 29 23 99 22 49 4E 50 55 54 23 2D 52 |0.3M)#."INPUT#-R|
00004520: 4F 55 54 49 4E 45 22 3A 41 44 B2 53 31 3A 8D 39 |OUTINE":AD.S1:.9|
00004530: 30 35 30 00 52 4D 2A 23 99 22 5A 4F 45 4B 52 4F |050.RM*#."ZOEKRO|
00004540: 55 54 49 4E 45 22 3A 41 44 B2 53 53 3A 8D 39 30 |UTINE":AD.SS:.90|
00004550: 35 30 00 7E 4D 2B 23 99 22 42 4C 4F 4B 56 45 52 |50.~M+#."BLOKVER|
00004560: 53 43 48 55 49 56 49 4E 47 53 52 4F 55 54 49 4E |SCHUIVINGSROUTIN|
00004570: 45 22 3A 41 44 B2 53 42 3A 8D 39 30 35 30 00 84 |E":AD.SB:.9050..|
00004580: 4D 2D 23 8E 00 8A 4D 3C 23 3A 00 90 4D 46 23 3A |M-#...M<#:..MF#:|
00004590: 00 AC 4D 5A 23 50 53 B2 30 3A 81 49 B2 31 A4 31 |..MZ#PS.0:.I.1.1|
000045A0: 34 3A 87 44 3A 8B 44 B2 AB 31 A7 8E 00 C8 4D 5B |4:.D:.D..1....M[|
000045B0: 23 50 53 B2 50 53 AA 44 3A 97 41 44 2C 44 3A 41 |#PS.PS.D:.AD,D:A|
000045C0: 44 B2 41 44 AA 31 3A 82 00 DA 4D 5C 23 87 50 3A |D.AD.1:...M\#.P:|
000045D0: 8B 50 B2 50 53 A7 39 30 35 30 00 02 4E 5D 23 99 |.P.PS.9050..N]#.|
000045E0: 3A 99 22 44 41 54 41 20 46 4F 55 54 20 20 49 4E |:."DATA FOUT IN|
000045F0: 22 C2 28 36 33 29 AA 32 35 36 AC C2 28 36 34 29 |".(63).256..(64)|
00004600: 3A 80 00 0D 4E 6E 23 3A 39 30 38 30 3A 00 FF 00 |:...Nn#:9080:...|
....... *STARTADRES*.<. .SE.49152:. STAR
TADRES INVOERROUTINE.K...SI.49152.2.256:
. STARTADRES INPUT#-ROUTINE.....SS.49152
.4.256:. STARTADRES ZOEKROUTINE.Q...SB.4
9152.6.256:. STARTADRES BLOKVERSCHUIVING
S ROUTINE.W.H.:...M.. 9000:. ROUTINES IN
LEZEN...R.:...... *NUMERIEKE VARIABELEN*
.1...CS.211:. CURSORKOLOM.J...CZ.214:. C
URSORREGEL.P...CR.58640:. CURSORPLAATSIN
GROUTINE.V...:.|...:...... *STUURTEKENS*
...".CR$.G(13):. CARRIAGE RETURN.N.,.HOM
E$.G(19):. CURSOR HOME...6.CLEAR$.G(147)
:. CLEAR...@.UP$.G(145):. CURSOR UP.!.J.
DOWN$.G(17):. CURSOR DOWN.B.T.RECHTS$.G(
19):. CURSOR RIGHT.B.^.LINKS$.G(157):. C
URSOR LEFT.~.H.AAN$.G(18):. REVERS AAN..
.R.UIT$.G(146):. REVERS UIT...|.:.....:.
..... *FUNCTIETOETSEN*.M...F1$.G(133)...
..F3$.G(134).....F5$.G(135).....F7$.G(13
6)...B.F2$.G(137)...L.F4$.G(138).'.V.F6$
.G(139).6...F8$.G(140).<...:.B...:.Y....
*ANDERE STRINGS*.....A$."
":. 25 SACES.....SP$.A$.A$.A$
.A$.A$.A$.A$.A$.A$.A$:. 250 SPACES.T...M
1$."ESGDRV":. MENU 1...&.M2$.F1$.CR$.REC
HTS$.LINKS$.F3$.F5$.F8$.F7$:. MENU 2.K.0
.N1$."0123456789":. ZUIVER NUMERIEKE INV
OER (HELE GETALLEN).P.:.NU$.N1$."+-.":.
NUMERIEKE INVOER...D.. I.65.95:A1$.A1$.G
(I).G(I.128):....N.A1$.A1$." !#$%&'()+,-
./:;=@".G(34)...X.A1$.A1$.NU$:SO$."*<>?"
:. ALPHANUM. INVOER...B.E1$.F1$.F7$:. EI
NDE MET 'F1' EN 'F7'.D.L.E2$.DOWN$.UP$.C
R$.E1$:. +CRS. DOWN,UP;F1;F7.J.V.:.P...:
.U.... *BESTANDSPECIFIEKE VARIABELEN*...
..JF.1:. NUMMER VAN INDEXVELD (=SLEUTELV
ELD).B...JL.8:. LENGTE SLEUTELVELD.....N
.1:. VOLGENDE TE BESCHRIJVEN RECORD.....
NE.0:. ECHT AANTAL DATAREGELS.&...FA.7:.
AANTAL VELDEN.C.F.DP.5:. PRINTERPARAMET
ERS.Q.P.A.FA:.DP.FA.A.DP:. A=AANTAL MASK
ER VELDEN.W.Z.:.}...:...... *DIMENSIONER
INGEN*......I$(FA),NI$(FA),LI(FA),SI(FA)
,ZI(FA),EZ$(FA),S$(FA):. DATA REGELVELDE
N. ....MN$(A),ML(A),MS(A),MZ(A),MZ$(A),M
R$(A):. MASKERPARAMETERS.O....JF$(999),P
%(999):. INDEXVELD, POINTERVELD......DP(
DP),DI$(DP),DS(DP),DZ(DP),DE$(DP):. PRIN
TER PARAMETERVELDEN... .:...*.:...4.. *I
NVOERMASKER DEFINIEREN*...>.NI$(1)."VOOR
NAAM : ":LI(1).15:SI(1).2:ZI(1).3:EZ$(1)
.A1$.5.H.NI$(2)."NAAM : ":L1(2).15:SI(2)
.5:ZI(2).5:EZ$(2).A1$.T.R.NI$(3)."STRAAT
: ":LI(3).20:SI(3).2:ZI(3).7:EZ$(3).A1$
.NU$...\.NI$(4)."POSTCODE : ":LI(4).4:SI
(4).6:ZI(4).9:EZ$(4).NU$...F.NI$(5)."WOO
NPLAATS : ":LI(5).20:SI(5).2:ZI(5).11:EZ
$(5).A1$.NU$.6.P.NI$(6)."TELEFOON : ":LI
(6).15:SI(6).2:ZI(6).13:EZ$(6).A1$.NU$.X
.Z.NI$(7)."DIVERSEN : ":LI(7).20:SI(7).0
:ZI(7).15:EZ$(7).A1$.NU$.~...:.....:....
.. *PRINTERPARAMETERS DFINIEREN*.....DI$
(1)."VELDEN NAAST- OF ONDER ELKAAR :":DL
(1).1:DS(1).0:DZ(1).5.....DE$."NUNU".D..
.DI$(2)."VELDEN NAAST ELKAAR: VELDAFSTAN
D :":DL(2).1:DS(2).0:DZ(2).7.S...DE$(2).
N1$...J.DI$(3)."DATAREGELAFSTAND :":DL(3
).1:DS(3).0:DZ(3).9:DE$(3).N1$.Z.T.DI$(4
)."PRINTERADRES :":DL(4).1:DS(4).0:DZ(4)
.15:DE$(4)."34567".....DE$(5)."SECONDAIR
ADRES :":DL(5).3:DS(5).0:DZ(5).17:DE$(5)
.N1$."...:.B.... *PRINTERSTANDAARDWAARDE
N*.`...DP(1).1:. ONDERELKAAR =JA.....DP(
2).3:. NAASTELKAAR AFSTAND.....DP(3).1:.
AFSTAND VAN TWEE DATAREGELS = 1 REGEL..
.$.DP(4).4:. PRINTERADRES = 4 = STANDAAR
D.!...DP(5).7:. = GROOT/KLEINSCHRIFT-MOD
US BIJ COMMODORE PRINTERS.'.8.:.-.B.:.D.
L.. *PROGRAMMASTART*.|.V..53280,6:.53281
,14:.G(14)G(8):. KLEUR + GROOT/KLEIN...`
.:...J.:. .T.. *BESTAND INLEZEN*.I.~..1,
8,15,"I0":. KANAAL 15 ALTIJD OPEN.O...:.
.....2,8,2,"INFOBESTAND,U,R"......1610:
. FOUTKANAAL LEZEN..... 2.....:.?....E.0
.1250:. GEEN FOUT =>INFOS LEZEN.Y.D..E.6
2..19990:.2200:.1280:. 'FILE NOT FOUND'=
>AANMAKEN...N.. 1660:.1170:. ANDERE FOUT
,UITVOEREN,NIEUWE POGING...X.:.W.... 7
450:. INLEZEN VAN INFOS...... 7330:. IND
EX INLEZEN.....:.....AF.0:. WIJZIGINGSFL
AG INITIALIS."...:.(...:.<.... ***MENUE
1***.I.(..CLEAR$;..2..AAN$" K
EUZEMENU ";...<..AAN
$" --------- ".
..F..:.:....P.." "AAN$" E "UIT$" INVO
ER VAN DATAREGELS". .Z..:." "AAN$" S "U
IT$" ZOEKEN, WIJZIGEN, WISSEN".[.D..:.
" "AAN$" G "UIT$" GEORDENDE UITVOER V
AN BESTAND"...N..:." "AAN$" D "UIT$"
PRINTERPARAMETERS"...X..:." "AAN$" R "U
IT$" REORGANISATIE"......:." "AAN$" V
"UIT$" VERLATEN VAN PROGRAMMA"......:
.:..'....AAN$" UW KEUZE ?
";.[. .. AAN$"
".A...:......A
$:. I.1.C(M1$):.J(M1$,I,1).A$.1490......
:.1460...H.:.D.R..I.C(M1$).1540:. VERLAT
EN VAN PROG.......I.2610,3440,3940,4960,
5290......1310.....:.....:...... ***VERL
ATEN VAN PROGRAMMA***.,....AF.0.1580.I..
..7200:. INDEX VASTLEGGEN.Z."..7580:. IN
FO.C.,. 1:..I.6.:.O.@.:...J.. *FOUTKANAA
L LEZEN*...T..1,E,E$,E1,E2. .^.....H.:..
.R.:.J.|.. *FOUTMELDING UITGEVEN*......
CS,0:.CZ,24:.CR:. CRS. PLAATSEN......E;E
$;E1;E2......A$:. A$."" . 1690......."..
.:.(...:.=.B.. *POSITIONEREN*.M.L.HB..(R
.256).].V.LB.R.HB.256.~....1,"P".G(3).G(
LB).G(HB).G(1)............ *MASKEROPBOUW
*......I.1.MF...... *MASKEROPBOUW*.F....
I.1.MF.....::.CS,MS(I):.CZ,MZ(I):.CR:. C
RS.SET...&.::.MN$(I);I$(I);H((SP$,LI(I).
C(I$(I)).1);.".0...(.:.....D.:.4.N.:.L.X
.. *MASKERBESTURING*.D.B.I.1:. * EERSTE
VELD...L.S.C(MN$(I)).MS(I):. KOLOM...V..
SE,S,MZ(I),ML(I),MZ$(I),E2$,MR$(I).L...A
.B(253):. EINDTEKEN IN '253'......A.145.
I.1.I.I.1:.1900:. CRS. UP.%....(A.17.A.1
3).I.MF.I.I.1:.1900:. CRS. DOWN OF CR.C.
...A.133.A.136..:. F1 OF F7.M....1900.S.
..:.Y...:.N.F.. *MASKER TONEN*...P..CLEA
R$AAN$" DEMONSTRATIE VAN INVOERMASKER
"UIT$...Z.:.K.... <MASKERGEN.INITIA
L.>.U...MF.FA.....:......I.1.MF.-...::MN
$(I).NI$(I):ML(I).LI(I):MS(I).SI(I):MZ(I
).ZI(I):MZ$(I).EZ$(I).3.....9. .:.R.*..1
800:. MASKEROPBOUW.P.4..CS,0:.CZ,22:.CR:
. CURSOR...>..AAN$"GAAT U MET DIT INVOER
MASKER ";.K.H.."ACCOORD (J) OF WILT
U VERANDERINGEN ";...R.."AANBRENGEN (N)
?"UIT$" ";...\.A$."JJNN"...F..SE,B(211
),B(214,1,A$,CR$,B$.B.P..B$."J".B$."J".Q
.:. OPBOUW BESTAND.J.Z..:..P...:.V...:.S
.... ***BESTAND AANMAKEN***.....CLEAR$.
....:...... >RECORDLENGTE BEREKENEN<....
..I.1.FA.D.J.::RL.RL.LI(1).1.J.T...P...:
......R.255.."MAX.AANTAL DATAREGELS OVER
SCHREDEN! INKORTEN + STARETN":S.....:.D.
..AR..((570.6).254).(RL.JL.1.6.1)):. MAX
.AANTAL DATAREGELS BEREKENEN...... AR.99
9.AR.999:. MAX.999 DATAREGELS.....:.....
. >GEBRUIKER CORRECTIE?<.R.$.A$."MAXIMAA
L AANTAL REGELS: "......A$;AR.. 8..SE,C(
A$).1,B(214),4,NU$,CR$,A$.' B..E(A$).AR.
E(A$)..1..:.UP$;:. 2340.- L.:.: V.AR.E(A
$).@ `.:.Y J.. >BESTAND AANMAKEN<.V T..2
,8,2,"INFOBESTAND,U,W".. ~..1610:. FOUTK
ANAAL LEZEN.. .. 2.. ...E..0..1660:.242
0:. UITGEVEN.B ..:.. ...7580:. INFOBESTA
ND SCHRIJVEN.. ..:..!... >RECORDS VRIJGE
VEN<..!D..3,8,3,"DATI,L,".G(RL):. RECORD
LENGTE.H!N.R.AR:. AANTAL RECORDS.A!X..17
30:. POSITIONEREN..!...3,G(255):. VRIJGA
VE TEKENS SCHRIJVEN..!.. 3..!..:..!...16
10:. FOUTEN LEZEN..!...E..0.E..50..1660:
."DISKETTEFOUT ! NIEUWE START":...!.....
!..:..!(.:.."2.. ***INVOER VAN DATAREGEL
S***.("<..CLEAR$.:"F..7860:. INFOS.@"P.:
.A"Z.. >MASKERGENERATOR INITIAL.<.K"D.MF
.FA.Q"N.:.}"X..I.1.MF.C"..::MN$(I).NI$(I
):ML(I).LI(I):MS(I).SI(I):MZ(I).ZI(I):MZ
$(I).EZ$(I).I"....O"..:..# ..N.AR.2870:.
MAX.AANTAL DATAREGELS BEREIKT (=BESTAND
VOL )?..#..:.6#... >OVERGAVESTRINGS INI
TIAL.<.B#...I.1.MF.]#H.::MR$(I)." ":I$(I
)." ".C#R...I#..:..#...1800:. MASKEROPBO
UW..#...1880:. MASKERBESTURING..#..:.H#.
..A.133.2940:. MET F1 BEEINDIGD?.N#..:..
#...2980:. DATAREGEL SCHRIJVEN, INDEX IN
VOEREN..$"..2720:. VOLGENDE INVOER ?."$,
.:.]$6..NE.AR.2910:. NUMMER ECHT KLEINER
ALS MAX.REGELAANTAL?..$@..HOPME$;AAN$"
HET BESTAND IS VOL !!! "UI
T$;..$J..2920..$T.:..$^..HOME$;AAN$" OV
ERWEEG EEN REORGANISATIE "UIT$;..$H..A
$:.A$."".2920..$R.:..%|....%..:..%..:.(%
... *INVOERSUBPROGRAMMA*.3%..A$." ".9%..
:.Y%... >EEN DATASTRING AANMAKEN<.E%B..I
.1.MF..%L.::.MR$(I)." ".MR$(I).G(1)..%V.
::A$.A$.MR$(I).CR$. %.....%..:..%..:.J%.
.. *DATASTRING SCHRIJVEN*.R%..R.N..%...
3,8,3,"BESTAND,L,"..&...1730:. POSITIONE
REN..&&..3,A$;..&0. 3..&:.:.!&D.:.A&N..
*INDEXTABEL ACTUALISEREN*.T&X.A$.">".MR$
(JF).I&B..SS,A$,JF$(1),P%..&L..P%.0.JF$(
NE.1).H(MR$(JF),JL):P%(NE.1).N:.3240..&V
.:..&...SB,1,JF$(P%).E&...SB,1,P%(P%).K&
..:..&..JF$(P%).H(MR$(JF),JL):P%(P%).N..
'..AF.1:. WIJZIGING AANGEBRACHT..'..:.D'
..N.N.1:. POINTER OP VOLGEND RECORD VERH
OGEN.R'F.NE.NE.1:. ECHT AANTAL DATAREGEL
S VERHOGEN.X'P...~'Z.:..'..:..'... *POSI
TIONEREN EN INLEZEN*..'...3,8,3,"BESTAND
,L,".U'...1730:. POSITIONEREN..'..:..'..
.I.1.FA..' .::.SI,3,I$(I)..(*.::.I$(I).G
(1).I$(I)." "..(4...!(>.:.((H. 3..(R...4
(\.:.:(F.:.^(P.. **ZOEKEN, WIJZIGEN, WIS
SEN***.J(Z..CLEAR$..(...NE.0.3910:. AANT
ALDATAREGELS=0 ?..(...7700:. ZOEKINFOS..
(..:..(..MF.FA..(..:..(... >MASKERGENERA
TOR INITIAL.<..(...I.1.MF.3)J.::MN$(I).N
I$(I):ML(I).LI(I):MS(I).SI(I):MZ(I).ZI(I
):MZ$(I).EZ$(I).SO$.O)T.:S(I).SI(I):MZ(I
).ZI(I).U)....[)..:.Z)... >OVERGAVESTRIN
GS WISSEN<..)...I.1.MF..)..::MR$(I)." ":
I$(I)." "..).....)..:.I)$..1800:. MASKER
OPBOUWEN..)...1880:. MASKER BESTURING..
)8.:..*B..A.133.3910:. MET F1 BEEINDIGD
?..*L.:.7*V.. >INDEXBESTAND DOORZOEKEN<.
C*J.P%.1:. ZOEKEN VANAF EERSTE INDEXELEM
ENT..*T..P%.NE..7700:.3460:. EINDE BESTA
ND BEREIKT?..*Y..SS,MR$(JF),JF$(P%),P%.U
*~..P%.0..7700:.3460:. NIET GEVONDEN?..*
..:..*..R.P%(P%)..+...3320:. POSIT.+INLE
ZEN..+..:..+... >VERGELIJKING VAN ALLE V
ELDEN<.:+...I.1.FA.[+D.::.SS,MR$(I),MR$(
I),I$(I),F%..+N.::.F%..I..MR$(I).." ".P%
.P%.1:.3700:. NOT-FOUND EN <> LEEG?..+X.
...+..:..+...5900:. MENU 2..+(.:..+2..I.
2.P%.P%.1:.3700:. VERDERZOEKEN..,<..I.5.
3460:. ZOEKEN OPNIEUW STARTEN..,F....,P.
:..,Z.:.<,D.. **GEORDENDE UITVOER***.Y,N
.SF.JF:. INDEX BEVEILIGEN..,X..CLEAR$AAN
$" GEORDENDE UITVOER VAN BESTAND
"UIT$;..,..:..,... >SORTEERVELD AFVRAGE
N<.N,...CS,0:.CZ,8:.CR.., .A$."SORTEREN
NAAR VELD NUMMER".#-...A$;SF;" (CR)";:.
STANDAARDWAARDE= INDEXVELD.N-...SE,C(A$
).1,B(214),C(D(FA)),NU$,CR$,A$.[-..JF.E(
A$)..-H..JF.1.JF.FA.3960:. GELDIG SORTEE
RVELD?..-R.:.F-...CLEAR$AAN$"
SORTEERMASKER "UIT$;..-...CS,0
:.CZ,22:.CR:. CURSOR......AAN$" F1 = ME
NU F7 = SORTEREN "UIT$;.....:.;...
. >MASKERGENERATOR INITAL.<.E...MF.FA.K.
..:.W."..I.1.MF...,.::MN$(I).NI$(I):ML(I
).LI(I).1:MS(I).SI(I):MZ(I).ZI(I):MZ$(I)
.EZ$(I).SO$...6.::MR$(I)." ":I$(I)." ".D
.@...J.J.:...T..1800:. MASKER OPBOUWEN..
/^..1880:. MASKER BESTURING../H..A.133.4
930../R.:.5/|.. >ZOEKCRITERIA REDDEN<.A/
...I.1.FA.T/..::S$(I).MR$(I).Z/....`/..:
../...3,8,3,"BESTAND,L":. DATAKANAAL OPE
NEN../...SF.JF.4550:. OUD INDEXVELD=NIE
UW INDEXVELD?..0B..A.1.. 7200:. WIJZIGIN
GEN? JA,DAN INDEX REDDEN DOOR VASTLEGGEN
..0L.:."0V.. >INDEXTABEL INITIAL.<..0...
I.1.AR.G0..::P%(I).0:JF$(I)." ".M0....S0
..:..0... >INDEXTABEL NIEUW OPBOUWEN (IN
DEX=SORTEERVELD)<..0..NE.0:NN.N:N.1:. N
REDDEN; N,NE INITAL...0&.:.G00..R.1.N.1.
.0:.::.1730:. POSIT...0D.::.#3,A$.!1N.::
.A$.G(255).A$." ".N.N.1:.4520:. RECORD V
RIJGEVEN?.<1X.::.1730:. POSITIONEREN.B1B
.:.Q1L.::.I1.1.FA.G1V.::::.SI,3,MR$(I1).
.1..::::.MR$(I1).G(1).MR$(I1)." "..1..::
...1..:..1..::.3150:. INDEX INVOEREN..1.
....1..:..1... >DATAREGELS GESORTEERD LE
ZEN<..1F..5,DP(4),DP(5)..1P.:..2Z..I3.1.
NE..2..::R.P%(13)..2..::.1730:. POSIT..4
2..:.P2..::.I1.1.FA:.SI,3,I$(I1).P2..:::
:.I$(I1).G(1).I$(I1)." ".X2..::..~2 .:.
2*.::. >VERGELIJKING MET MASKER<..24.::.
I4.1.FA.M2>.::::.SS,S$(I4),I$(14),F%..2
H.::::.F%..I4..S$(I4).." " . 4720..2R.::
...2\.:..3F.::.6990:. AFDRUKKEN. 3P.. I3
.&3Z.:.03.. 5: 3.63..:.V3... >NIEUWE IND
EX OVERNEMEN?<..3...SF.JF.4930:. OUDE IN
DEX ONGEWIJZIGD?..3..:..3...CLEAR$..3...
CS,0:.CZ,8:.CR.H3J.."MOET VELD NUMMER"JF
"MET DE"..3T..:."AANDUIDING '"NI$(JF)"'
NIEUW"..4...:."INDEXVELD WORDEN ? N";..
4..:."4..B$."JJNN".F4...SE,B(211).1,B(21
4),1,B$,CR$,A$._4... A$."J".A$."J".4920.
~4..JF.SF:. INDEXVELD HERHALEN..4...7330
:. INDEX LADEN..4$.AF.0:.4930..4..:..48.
AF.1..4B....4L.:.F4V.:..4`.. ***PRINTER
PARAMETERS***..4J..CLEAR$.)5T..AAN$"
PRINTERPARAMETERS "UIT$
;.G5~..CS,0:.CZ,22:.CR:. CURSOR..5...AAN
$" F1 = MENU F7 = PARAMETERS VASTLEGGE
N "UIT$;..5..:..5... >MASKERGENERATOR IN
ITIAL.<..5..MF.DP..5..:.C5...I.1.MF..6D.
::MN$(I).DI$(I):ML(I).DL(I):MS(I).DS(I):
MZ(I).DZ(I):MZ$(I).DE$(I)..6N.:.A6X.::I$
(I).I(D(DP(I)),C(D(DP(I))).1:MR$(I).I$(I
).G6....M6..:.{6..I$(1)."N":.DP(1).1.I$(
1)."U":MR$(1).I$(1)..6..:..6...1800:. MA
SKER OPBOUWEN..6...1880:. MASKER BESTURI
NG.P6...A.133.5260:. F1?.V6(.:..62.. >NI
EUWE PARAMETERS OVERNEMEN<.>7<..E(MR$(5)
).255.MR$(5).I$(5):.5130:. SECONDAIR-ADR
. MAXIMAAL 255.I7F.DP(1).0:.MR$(1)."U".M
R$(1)."U".DP(1).1.O7P.:.{7Z..I.2.DP..7D.
::DP(I).E(MR$(I))..7N....7X.:..7...7570.
.7.....7..:..7 .:.R7... **REORGANISATIE*
**..7...CLEAR$..8...AAN$" RE
ORGANISATIE "UIT$.38H..CS,0:
.CZ,22:.CR:. CURSOR.J8R..AAN$" F1 = MENU
F7 = REORGANISATIE "UIT$;.P8..:
..8... >INDEXVELD AFVRAGEN<..8...CS,0:.C
Z,6:.CR:. CURSOR.R8..."WELK VELD MOET SL
EUTELVELD ZIJN";JF..8...SE,38,6,C(D(FA))
.1,NU$,E1$,A$..9...B(253).133.5870:. F1.
.9".I..(E(A$)).$9,.:.O96..I.1.I.FA.5370:
. INDEXVELD TOEGESTAAN?.9@.JF.1:. GELDI
GE WAARDE ALS INDEX OVERNEMEN..9J.:..9
T.. >INDEXTABEL INITIAL.<..9^..I.1.AR.F9
H.::JF$(I)." ":P%(I).0.L9R...R9|.:..9...
>INDEX AANMAKEN<..:..N.1:NE.0:. STARTWA
ARDEN..:....":...3,8,3,"BESTAND,L".(:..:
.<:...LR.1.AR:A$." ".Y:B.::R.LR:.1730:.1
730:. 2*!.F:L.::.#3,A$..:V.::.A$.G(255).
A$." ".5740:. RECORD VRIJGEGEVEN?..:..::
.1730:.1730:. 2-MAAL!.B:..::A$." ".H:..:
.V:..::.I.1.FA..:..::::.SI,3,MR$(I)..:..
::::.1,FK.!;..::::.FK..0.5740:. FOUT OPG
ETREDEN ?.:;&.::::A$.A$.MR$(I).CR$.B;0.:
:..H;:.:.D;D.::R.N:.1730:.1730:. 2*!.Q;N
.::.3,A$;..;X.::.3150:. INDEXINVOER SUBP
ROGRAMMA..;B.::.".";..;L..LR..;V.:.T;...
>OVERIGE RECORDS VRIJGEVEN<..;...N.AR.
5840..;...I.N.AR..<..::R.I:.1730:.1730:.
2*!.0<..::.3,G(255):. RECORDS VRIJGEVEN
.<<..::."*";.B<....H<F.:.O<P. 3.U<Z.:.^<
..AF.1.D<....J<..:.P<..:..<... ***MENU 2
***..<...7780:. MENU 2 - INFOS..< ..1800
:. MASKEROPBOUW..<*.:.Y<4.. >COMMANDO IN
GEVOERD?<..<>..A$..<H.:..<R..I.1.C(M2$).
.=\.::.J(M2$,I,1).A$.6030..=F....=P.:.A=
Z..5950:. GEEN COMMANDO INGEVOERD.G=..:.
V=...I.6060,6060,6100,6170,6060,6910,632
0,6590..=...5900..=..:..=.....=..:..=..:
..=J.. *VORRUITBLADEREN*..=T..P%.NE.A$."
EINDE BESTAND":.5950:. EINDE BESTAND BER
EIKT?..>..P%.P%.1:. POINTER OP INDEXELEM
ENT VERHOGEN.)>..R.P%(P%).B>...3320:. PO
SIT.+LEZEN.L>...5920.R>..:.X>..:.N>... *
TERUGBLADEREN*..>$..P%.1.A$."BEGIN BESTA
ND":.6250:. BEGIN BESTAND BEREIKT?.Y>..
P%.P%.1:. POINTER OP INDEXELEMENT VELAGE
N..>8.R.P%(P%)..>B..3320:. POSIT.+LEZEN.
.?L..5920..?V.:..?`.:.6?J.. *BEGIN RESP
EINDE BESTAND*.O?T..HOME$AAN$" "A$
" BEREIKT !!! "..?~..A4:
.A4."".6270.A?...HOME$AAN$" ZOEKEN
, WIJZIGEN, WISSEN "UIT$;.T?...5
950:. MENU 2.Z?..:..?..:..?... *WISSEN*.
.@...CS,0:.CZ,22:.CR:. CRS.PLAATSEN.V@D.
.AAN$" IS DAT JUIST (J/N) ?
"UIT$;H(SP$,80);.X@N..A$:.A$.."J".
A$.."N"TEHN 6350..@X..A$."N".6400..@..:.
.@...6450:. RECORD VRIJGEVEN, INDEXINVOE
R WISSEN..A...P%.NE.P%.NE:. STAAT P% ACH
TER HET EINDE VAN HET INDEXBESTAND?..A..
.5910:. EINDE WISSEN."A..:.(A..:.AA... *
WIS-SUBPROGRAMMA*.ZA(.. >RECORD VRIJGEVE
N<.RA2..3,8,3,"BESTAND,L,"..A<..1730:. P
OSITIONEREN..AF..3,G(255):. VRIJGAVETEKE
N SCHRIJVEN..AP. 3..AZ.:..AD.. >INDICES
NAAR VOREN VERPLAATSEN<..AN..SB,0,JF$(P%
)..BX..SB,P%(P%)..B..:..B..AF.1:. WIJZIG
ING UITGEVOERD.WB..NE.NE.1:. AANTAL DATA
REGELS VERLAGEN.]B ...CB..:.IB..:.ZB...
*WIJZIGEN*..BH..N.AR.6800..BR.:..B...793
0:. WIJZIGEN INFOS..B..:..B... >OVERGAVE
VAN DE TE VERANDEREN REGELS AAN MASKERG
ENERATOR<..B...I.1.MF.*C..::MR$(I).I$(I)
:ML(I).LI(I):MZ$(I).EZ$(I).0C....6C..:.I
C"..1880:. MASKER.OC,.:.SC6..A.133.6860:
. MET F1 BEEINDIGD?.YC@.:..CJ..6450:. WI
S-SUBPROGRAMMA..CT.Y.P%:. POINTER VASTLE
GGEN.TC^..2980:. INVOER-SUBPROGRAMMA..CH
.P%.Y:. POINTER HALEN..CR.:..D|..6860:.
EINDE WIJZIGEN..D..:.VD... NE.AR.6840:.
NUMMER ECHT KLEINER ALS MAX.AANTAL DATAR
EGELS?..D...HOME$;AAN$" HET BE
STAND IS VOL !!! "UIT$;..D...6850.
.D..:..D...HOME$;AAN$" WIJ ADVISEREN EEN
REORGANISATIE !!! "UIT$;..DB..A$:.A$.""
.6850..DL.:..EV..7780:. MENU 2 - INFOS.1
E...5950:. COMMANDOINVOER.7E..:.=E..:.BE
... *AFDRUKKEN VAN ACTUELE REGELS*.UE...
5,DP(4),DP(5)..E...6990:. PRINTEN..E.. 5
..E&.:. E0..5950..E:.:..ED.:.GEN.. *PRIN
T SUBPROGRAMMA*..EX.. >SORTEERVELD PRINT
EN<..EB..5,I$(JF);..FL..DP(1).1..5:.7060
.'FV..5,H(SP$,DP(2));:. AFSTAND.-F..:.LF
... >OVERIGE VELDEN PRINTEN<.YF...I1.1.F
A.KF..::.I1.JF.7170.|F..::.5,I$(I1);..F.
.::.DP(1).1..5:.7110..F..::.5,H(SP$,DP(2
));:. ABSLIST7100-7200.DFF...JFP.:.ZFZ..
I2.1.DP(3)..F..::.5..F.....F..:..F.....F
..:..G..:..G .. *INDEX VASTLEGGEN*.+G*..
1,"S:INDEX".BG4..4,8,4,"INDEX,S,W".HG>.:
.TGH..I.1.NE.DGR.::.4,JF$(I).SG\.::.4,P%
(I).YGF...GP.:..GZ. 4..G.....G..:..G..:
..G... *INDEX LADEN*.CG...4,8,4,"INDEX,S
,R".IG..:.UG...I.1.NE..GJ.::.SI,4,JF$(I)
..GT.::.4,P%(I)..G.....H..:..H.. 4..H...
..H..:..H..:.:H... *INLEZEN VAN DE INFO
S*.WH$..2,8,2,"INFOBESTAND,U,R".LH...2,A
R,RL,JF,N,NE.RH8.:.~HB..I.1.DP..HL.::.2,
DP(I)..HV....H`.:. HJ. 2..HT....H~.:..H.
.:.SH... *VASTLEGGEN VAN DE INFOS*..H..
.1,"S:INFOBESTAND"..I...2,8,2,"INFOBESTA
ND,U,W".,I...2,AR;CR$;RL;CR$;JF;CR$;N;CR
$;NE.2I..:.>ID..I.1.DP.MIN.::.2,DP(I).SI
X...YI..:.`I.. 2.FI....LI..:.RI..:..I...
*ZOEKINFOS*..I...HOME$AAN$" ZOEKE
N, WIJZIGEN, WISSEN "UIT$;..I(..CS
,0:.CZ,22:.CR:. CRS.PLAATSEN.'J2..AAN$"
F1 = MENU F7 = ZOEKEN "
UIT$;H(SP$,80);.-J<...3JF.:.9JP.:.PJZ..
*MENU 2 - INFOS*..JD..HOME$AAN$" Z
OEKEN, WIJZIGEN, WISSEN ";..JN..
CS,0:.CZ,22:.CR:. CURSOR PLAATSEN..JX..A
A$"RETURN=VERDER CRS.R. => CRS.L. <=
"UIT$" ";..K...AAN$"F1=MENU F3=OPNIEU
W ZOEKEN F5=PRINT "UIT$.WK...AAN$" F
7=WIJZIGEN F8=WISSEN "UIT$;.
]K....CK .:.IK..:..K... *INVOER - INFOS*
..K...HOME$AAN$" INVOEREN VAN DATA
REGELS ";..KH..CS,0:.CZ,22:.CR:.
CRS.PLAATSEN..LR..AAN$" F1 = MENU
F7 = INVOEREN "UIT$;H(SP$,80);."L.
...(L..:..L..:.EL... *WIJZIGEN INFOS*.JL
...CS,0:.CZ,22:.CR:. CRS. PLAATSEN..L...
AAN$" F1 = GEEN WIJZIGING F7 = WIJZ
IGEN "UIT$:H(SP$,80);..L.....L".:..L,.:.
EL6.:..L'#. *** MACHINEPROGRAMMA INSTALL
EREN ***..M(#."INVOERROUTINE":AD.SE:.905
0.3M)#."INPUT#-ROUTINE":AD.S1:.9050.RM*#
."ZOEKROUTINE":AD.SS:.9050.~M+#."BLOKVER
SCHUIVINGSROUTINE":AD.SB:.9050..M-#...M<
#:..MF#:..MZ#PS.0:.I.1.14:.D:.D..1...HM[
#PS.PS.D:.AD,D:AD.AD.1:..ZM\#.P:.P.PS.90
50..N]#.:."DATA FOUT IN"B(63).256.B(64)
:...NN#:9080:...
> CLICK IMAGE PREVIEW FOR FULL MODAL