DEELLYST MAKEN
FILE INFORMATION
FILENAME(S): DEELLYST MAKEN
FILE TYPE(S): PRG
FILE SIZE: 6.6K
FIRST SEEN: 2025-11-30 21:13:28
APPEARS ON: 1 disk(s)
FILE HASH
8a76ecdaa9c0fb2b3fd61cf3aa05000ba2771ef296569c543012994f52eab9b3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SB DATA 2B | DEELLYST MAKEN | PRG | DuncanTwain | 26 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..(....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 0F 00 8F 20 20 |********.O.... |
00000030: 20 20 20 52 4F 55 54 49 4E 45 53 20 42 49 4A 20 | ROUTINES BIJ |
00000040: 41 52 52 41 59 2D 53 4F 52 54 20 20 20 20 2A 00 |ARRAY-SORT *.|
00000050: 76 08 14 00 8F 20 20 20 20 20 20 20 20 20 20 20 |v.... |
00000060: 20 34 20 56 45 4C 44 45 4E 20 20 20 20 20 20 20 | 4 VELDEN |
00000070: 20 20 20 20 20 2A 00 9D 08 1E 00 8F 20 20 20 20 | *...... |
00000080: 20 20 20 41 52 52 41 59 2D 53 4F 52 54 20 55 49 | ARRAY-SORT UI|
00000090: 54 3A 36 34 45 52 20 20 20 20 20 20 2A 00 C4 08 |T:64ER *...|
000000A0: 28 00 8F 20 20 20 20 20 20 20 20 20 20 20 35 2F |(.. 5/|
000000B0: 38 36 20 50 31 30 30 20 20 20 20 20 20 20 20 20 |86 P100 |
000000C0: 20 20 20 2A 00 EB 08 2D 00 8F 20 20 20 20 20 20 | *...-.. |
000000D0: 20 48 2E 47 2E 56 41 4E 20 4D 41 4E 45 4E 20 31 | H.G.VAN MANEN 1|
000000E0: 2F 39 30 20 20 20 20 20 20 20 2A 00 12 09 32 00 |/90 *...2.|
000000F0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000110: 2A 2A 00 18 09 37 00 3A 00 39 09 3C 00 41 B2 41 |**...7.:.9.<.A.A|
00000120: AA 31 3A 8B 41 B2 31 A7 93 22 41 52 52 41 59 2D |.1:.A.1.."ARRAY-|
00000130: 53 4F 52 54 22 2C 38 2C 31 00 46 09 41 00 9F 31 |SORT",8,1.F.A..1|
00000140: 35 2C 38 2C 31 35 00 78 09 46 00 99 C7 28 31 34 |5,8,15.x.F...(14|
00000150: 29 22 93 11 11 11 11 11 20 20 20 C4 45 20 44 41 |)"...... .E DA|
00000160: 54 41 20 57 4F 52 44 45 4E 20 49 4E 47 45 4C 45 |TA WORDEN INGELE|
00000170: 5A 45 4E 2E 2E 2E 2E 22 00 95 09 50 00 81 41 B2 |ZEN...."...P..A.|
00000180: 30 A4 31 34 38 3A 87 44 3A 97 35 30 31 37 36 AA |0.148:.D:.50176.|
00000190: 41 2C 44 3A 82 00 C0 09 55 00 81 41 B2 31 A4 35 |A,D:....U..A.1.5|
000001A0: 3A 81 42 B2 30 A4 33 3A 87 41 24 3A 41 24 28 41 |:.B.0.3:.A$:A$(A|
000001B0: 2C 42 29 B2 41 24 3A 82 42 3A 82 41 3A 49 B2 35 |,B).A$:.B:.A:I.5|
000001C0: 00 E5 09 5A 00 81 41 B2 38 32 38 A4 38 36 34 3A |...Z..A.828.864:|
000001D0: 87 44 3A 97 41 2C 44 3A 82 3A 20 20 20 20 20 20 |.D:.A,D:.: |
000001E0: 20 9E 38 32 38 00 25 0A 5C 00 8F 20 44 45 5A 45 | .828.%.\.. DEZE|
000001F0: 20 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 20 4C | INPUT ROUTINE L|
00000200: 41 41 54 20 4B 4F 4D 4D 41 20 45 4E 20 20 20 20 |AAT KOMMA EN |
00000210: 20 20 20 20 44 55 42 42 45 4C 45 20 50 55 4E 54 | DUBBELE PUNT|
00000220: 20 54 4F 45 2E 00 4B 0A 5D 00 8F 20 55 49 54 53 | TOE..K.].. UITS|
00000230: 43 48 41 4B 45 4C 45 4E 20 4D 45 54 3A 20 52 2F |CHAKELEN MET: R/|
00000240: 53 20 2B 20 52 45 53 54 4F 52 45 00 6C 0A 5E 00 |S + RESTORE.l.^.|
00000250: 8F 20 49 4E 53 43 48 41 4B 45 4C 45 4E 20 4D 45 |. INSCHAKELEN ME|
00000260: 54 3A 20 50 4F 4B 45 20 31 2C 35 34 00 72 0A 5F |T: POKE 1,54.r._|
00000270: 00 3A 00 82 0A 64 00 8F 20 49 4E 4C 45 49 44 49 |.:...d.. INLEIDI|
00000280: 4E 47 00 C6 0A 6E 00 99 22 93 11 20 CD 45 54 20 |NG...n..".. .ET |
00000290: 44 49 54 20 50 52 47 20 4B 55 4E 54 20 55 20 54 |DIT PRG KUNT U T|
000002A0: 57 45 45 2D 44 49 4D 45 4E 53 49 4F 4E 41 4C 45 |WEE-DIMENSIONALE|
000002B0: 20 20 20 20 41 52 52 41 59 53 20 42 45 53 54 41 | ARRAYS BESTA|
000002C0: 41 4E 44 45 22 3B 00 DC 0A 78 00 99 22 20 55 49 |ANDE";...x.." UI|
000002D0: 54 20 34 20 56 45 4C 44 45 4E 3A 22 00 F1 0A 8C |T 4 VELDEN:"....|
000002E0: 00 99 22 11 20 20 20 2D 20 49 4E 56 4F 45 52 45 |..". - INVOERE|
000002F0: 4E 00 0F 0B 91 00 99 22 20 20 20 2D 20 49 4E 4C |N......" - INL|
00000300: 45 5A 45 4E 20 56 41 4E 20 53 43 48 49 4A 46 00 |EZEN VAN SCHIJF.|
00000310: 2D 0B 96 00 99 22 20 20 20 2D 20 D3 CF D2 D4 C5 |-...." - .....|
00000320: D2 C5 CE A0 CE C1 C1 D2 A0 D6 C5 CC C4 00 4C 0B |..............L.|
00000330: 9B 00 99 22 20 20 20 2D 20 54 4F 4E 45 4E 20 4F |..." - TONEN O|
00000340: 50 20 48 45 54 20 53 43 48 45 52 4D 00 62 0B A0 |P HET SCHERM.b..|
00000350: 00 99 22 20 20 20 2D 20 55 49 54 50 52 49 4E 54 |.." - UITPRINT|
00000360: 45 4E 00 86 0B A5 00 99 22 20 20 20 2D 20 57 45 |EN......" - WE|
00000370: 47 53 43 48 52 49 4A 56 45 4E 20 4E 41 41 52 20 |GSCHRIJVEN NAAR |
00000380: 53 43 48 49 4A 46 00 B1 0B A6 00 99 22 20 20 20 |SCHIJF......" |
00000390: 28 4F 4F 4B 3A 20 57 49 4A 5A 49 47 45 4E 2F 41 |(OOK: WIJZIGEN/A|
000003A0: 41 4E 56 55 4C 4C 45 4E 20 42 45 53 54 41 4E 44 |ANVULLEN BESTAND|
000003B0: 29 00 E0 0B B2 00 99 22 11 9F 20 C5 45 4E 20 42 |)......".. .EN B|
000003C0: 45 53 54 41 4E 44 4A 45 20 49 53 20 41 41 4E 57 |ESTANDJE IS AANW|
000003D0: 45 5A 49 47 20 41 4C 53 20 44 45 4D 4F 2E 9A 22 |EZIG ALS DEMO.."|
000003E0: 00 0B 0C B4 00 99 22 11 11 11 20 12 C4 52 55 4B |......"... ..RUK|
000003F0: 20 4F 50 20 45 45 4E 20 54 4F 45 54 53 20 56 4F | OP EEN TOETS VO|
00000400: 4F 52 20 56 45 52 56 4F 4C 47 22 00 1D 0C B9 00 |OR VERVOLG".....|
00000410: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 00 23 0C |.198,0:.198,1.#.|
00000420: BE 00 3A 00 2E 0C C8 00 8F 20 4D 45 4E 55 00 3B |..:...... MENU.;|
00000430: 0C D2 00 97 35 33 32 38 31 2C 30 00 76 0C D7 00 |....53281,0.v...|
00000440: 99 C7 28 31 35 38 29 22 93 11 11 20 20 20 D2 CF |..(158)"... ..|
00000450: D5 D4 C9 CE C5 D3 A0 32 2D C4 C9 CD 2E A0 C1 D2 |.......2-.......|
00000460: D2 C1 D9 D3 A0 28 34 20 56 45 4C 44 45 4E 29 22 |.....(4 VELDEN)"|
00000470: C7 28 31 35 34 29 00 98 0C DC 00 99 22 11 11 20 |.(154)......".. |
00000480: 20 20 20 20 20 20 20 20 31 29 20 46 49 4C 45 20 | 1) FILE |
00000490: 49 4E 56 4F 45 52 45 4E 00 B8 0C E1 00 99 22 11 |INVOEREN......".|
000004A0: 20 20 20 20 20 20 20 20 20 32 29 20 46 49 4C 45 | 2) FILE|
000004B0: 20 49 4E 4C 45 5A 45 4E 00 DE 0C E6 00 99 22 11 | INLEZEN......".|
000004C0: 20 20 20 20 20 20 20 20 20 33 29 20 53 4F 52 54 | 3) SORT|
000004D0: 45 52 45 4E 20 4E 41 41 52 20 56 45 4C 44 00 FC |EREN NAAR VELD..|
000004E0: 0C EB 00 99 22 11 20 20 20 20 20 20 20 20 20 34 |....". 4|
000004F0: 29 20 46 49 4C 45 20 54 4F 4E 45 4E 00 1A 0D F0 |) FILE TONEN....|
00000500: 00 99 22 11 20 20 20 20 20 20 20 20 20 35 29 20 |..". 5) |
00000510: 55 49 54 50 52 49 4E 54 45 4E 00 33 0D F5 00 99 |UITPRINTEN.3....|
00000520: 22 11 20 20 20 20 20 20 20 20 20 36 29 20 53 41 |". 6) SA|
00000530: 56 45 4E 00 4C 0D FA 00 99 22 11 20 20 20 20 20 |VEN.L....". |
00000540: 20 20 20 20 37 29 20 45 49 4E 44 45 00 76 0D FD | 7) EINDE.v..|
00000550: 00 99 22 11 20 20 20 20 20 20 20 20 20 97 38 29 |..". .8)|
00000560: 20 57 49 4A 5A 49 47 45 4E 20 56 41 4E 20 42 45 | WIJZIGEN VAN BE|
00000570: 53 54 41 4E 44 9A 00 A0 0D FE 00 99 22 20 20 20 |STAND......." |
00000580: 20 20 20 20 20 20 97 39 29 20 54 4F 45 56 4F 45 | .9) TOEVOE|
00000590: 47 45 4E 20 41 41 4E 20 42 45 53 54 41 4E 44 9A |GEN AAN BESTAND.|
000005A0: 00 BD 0D FF 00 99 22 11 20 20 20 CD 41 41 4B 20 |......". .AAK |
000005B0: 45 45 4E 20 4B 45 55 5A 45 20 31 2D 39 00 D0 0D |EEN KEUZE 1-9...|
000005C0: 04 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 36 30 |...A$:.A$."".260|
000005D0: 00 EB 0D 09 01 8B C6 28 41 24 29 B3 34 39 B0 C6 |.......(A$).49..|
000005E0: 28 41 24 29 B1 35 37 A7 32 36 30 00 05 0E 0E 01 |(A$).57.260.....|
000005F0: 99 22 93 22 3A 97 35 33 32 38 31 2C 36 3A 43 B2 |.".":.53281,6:C.|
00000600: C5 28 41 24 29 00 33 0E 13 01 91 43 89 33 30 30 |.(A$).3....C.300|
00000610: 2C 35 30 30 2C 36 30 30 2C 37 30 30 2C 38 30 30 |,500,600,700,800|
00000620: 2C 39 30 30 2C 31 30 30 30 2C 31 31 30 30 2C 31 |,900,1000,1100,1|
00000630: 32 30 30 00 39 0E 22 01 3A 00 46 0E 2C 01 8F 20 |200.9.".:.F.,.. |
00000640: 49 4E 56 4F 45 52 00 60 0E 31 01 9C 3A 9F 31 35 |INVOER.`.1..:.15|
00000650: 2C 38 2C 31 35 3A 86 41 24 28 35 30 30 2C 33 29 |,8,15:.A$(500,3)|
00000660: 00 86 0E 36 01 49 4E B2 35 30 31 37 36 20 20 3A |...6.IN.50176 :|
00000670: 8F 20 2A 2A 20 4D 54 50 52 47 20 49 4E 53 43 48 |. ** MTPRG INSCH|
00000680: 41 4B 45 4C 45 4E 00 A7 0E 40 01 4F 46 B2 35 30 |AKELEN...@.OF.50|
00000690: 31 37 36 AA 33 3A 8F 20 2A 2A 20 55 49 54 53 43 |176.3:. ** UITSC|
000006A0: 48 41 4B 45 4C 45 4E 00 CD 0E 4A 01 47 54 B2 35 |HAKELEN...J.GT.5|
000006B0: 30 31 37 36 AA 36 3A 8F 20 2A 2A 20 4B 4F 50 52 |0176.6:. ** KOPR|
000006C0: 45 47 45 4C 53 20 27 53 41 56 45 4E 27 00 F2 0E |EGELS 'SAVEN'...|
000006D0: 54 01 5A 4C B2 35 30 31 37 36 AA 39 3A 8F 20 2A |T.ZL.50176.9:. *|
000006E0: 2A 20 41 41 4E 54 41 4C 20 4B 4F 50 52 45 47 45 |* AANTAL KOPREGE|
000006F0: 4C 53 00 FC 0E 59 01 97 5A 4C 2C 33 00 2A 0F 5E |LS...Y..ZL,3.*.^|
00000700: 01 99 22 93 9F 20 45 49 4E 44 45 20 49 4E 56 4F |..".. EINDE INVO|
00000710: 45 52 20 44 4F 4F 52 20 5F 20 49 4E 20 45 45 52 |ER DOOR _ IN EER|
00000720: 53 54 45 20 56 45 4C 44 20 22 00 53 0F 63 01 99 |STE VELD ".S.c..|
00000730: 22 20 20 20 43 4F 52 52 49 47 45 52 45 4E 20 44 |" CORRIGEREN D|
00000740: 4F 4F 52 20 2A 20 49 4E 20 45 45 4E 20 56 45 4C |OOR * IN EEN VEL|
00000750: 44 9A 22 00 67 0F 68 01 81 54 B2 30 A4 33 39 3A |D.".g.h..T.0.39:|
00000760: 99 22 2D 22 3B 3A 82 00 73 0F 72 01 9E 47 54 3A |."-";:..s.r..GT:|
00000770: 9E 49 4E 00 94 0F 7C 01 99 3A A0 31 3A 9F 31 2C |.IN...|..:.1:.1,|
00000780: 30 3A 8F 20 49 4E 50 55 54 20 3F 20 57 45 47 4C |0:. INPUT ? WEGL|
00000790: 41 54 45 4E 00 A3 0F 90 01 81 41 B2 49 AA 31 A4 |ATEN......A.I.1.|
000007A0: 35 30 30 00 DC 0F 9A 01 99 22 4E 52 22 41 22 45 |500......"NR"A"E|
000007B0: 45 52 53 54 45 20 56 45 4C 44 3A 22 3B 3A 84 31 |ERSTE VELD:";:.1|
000007C0: 2C 41 24 28 41 2C 30 29 3A 99 3A 8B 41 24 28 41 |,A$(A,0):.:.A$(A|
000007D0: 2C 30 29 B2 22 2A 22 A7 32 30 32 30 00 09 10 A4 |,0)."*".2020....|
000007E0: 01 8B 41 24 28 41 2C 30 29 B2 22 5F 22 A7 41 24 |..A$(A,0)."_".A$|
000007F0: 28 41 2C 30 29 B2 22 22 3A 49 B2 41 AB 31 3A 41 |(A,0)."":I.A.1:A|
00000800: B2 35 30 30 3A 89 34 35 30 00 42 10 AE 01 99 22 |.500:.450.B...."|
00000810: 4E 52 22 41 22 54 57 45 45 44 45 20 56 45 4C 44 |NR"A"TWEEDE VELD|
00000820: 3A 22 3B 3A 84 31 2C 41 24 28 41 2C 31 29 3A 99 |:";:.1,A$(A,1):.|
00000830: 3A 8B 41 24 28 41 2C 31 29 B2 22 2A 22 A7 32 30 |:.A$(A,1)."*".20|
00000840: 32 30 00 7B 10 B8 01 99 22 4E 52 22 41 22 44 45 |20.{...."NR"A"DE|
00000850: 52 44 45 20 20 56 45 4C 44 3A 22 3B 3A 84 31 2C |RDE VELD:";:.1,|
00000860: 41 24 28 41 2C 32 29 3A 99 3A 8B 41 24 28 41 2C |A$(A,2):.:.A$(A,|
00000870: 32 29 B2 22 2A 22 A7 32 30 32 30 00 B4 10 BD 01 |2)."*".2020.....|
00000880: 99 22 4E 52 22 41 22 56 49 45 52 44 45 20 56 45 |."NR"A"VIERDE VE|
00000890: 4C 44 3A 22 3B 3A 84 31 2C 41 24 28 41 2C 33 29 |LD:";:.1,A$(A,3)|
000008A0: 3A 99 3A 8B 41 24 28 41 2C 33 29 B2 22 2A 22 A7 |:.:.A$(A,3)."*".|
000008B0: 32 30 32 30 00 BC 10 C2 01 99 3A 82 00 C7 10 CC |2020......:.....|
000008C0: 01 9E 4F 46 3A A0 31 00 EE 10 D6 01 50 4C B2 C2 |..OF:.1.....PL..|
000008D0: 28 32 31 34 29 3A 99 22 13 22 3B 3A 81 41 B2 31 |(214):.".";:.A.1|
000008E0: A4 32 30 3A 99 22 20 20 20 20 22 3B 3A 82 00 08 |.20:." ";:...|
000008F0: 11 E0 01 97 32 31 34 2C 50 4C 3A 97 32 31 31 2C |....214,PL:.211,|
00000900: 30 3A 9E 35 38 36 34 30 00 17 11 EA 01 8D 32 32 |0:.58640......22|
00000910: 30 30 3A 89 32 30 30 00 1D 11 EF 01 3A 00 31 11 |00:.200.....:.1.|
00000920: F4 01 8F 20 41 52 52 41 59 20 49 4E 4C 45 5A 45 |... ARRAY INLEZE|
00000930: 4E 00 40 11 F9 01 9C 3A 9F 31 35 2C 38 2C 31 35 |N.@....:.15,8,15|
00000940: 00 51 11 FE 01 99 22 13 12 49 4E 4C 45 5A 45 4E |.Q...."..INLEZEN|
00000950: 22 00 80 11 03 02 99 22 11 20 D7 49 4C 54 20 55 |"......". .ILT U|
00000960: 20 45 45 52 53 54 20 5A 49 45 4E 20 57 45 4C 4B | EERST ZIEN WELK|
00000970: 45 20 53 45 51 2E 46 49 4C 45 53 20 4F 50 20 22 |E SEQ.FILES OP "|
00000980: 00 9B 11 08 02 99 22 20 44 45 5A 45 20 53 43 48 |......" DEZE SCH|
00000990: 49 4A 46 20 53 54 41 41 4E 3F 22 00 AE 11 0D 02 |IJF STAAN?".....|
000009A0: 99 22 20 D4 49 4B 20 49 4E 20 4A 2F 4E 22 00 C1 |." .IK IN J/N"..|
000009B0: 11 12 02 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 35 33 |....Z$:.Z$."".53|
000009C0: 30 00 D2 11 17 02 8B 5A 24 B2 22 4A 22 A7 32 33 |0......Z$."J".23|
000009D0: 39 30 00 E2 11 1C 02 8B 5A 24 B2 22 4E 22 A7 35 |90......Z$."N".5|
000009E0: 35 30 00 EB 11 21 02 89 35 33 30 00 08 12 26 02 |50...!..530...&.|
000009F0: 85 22 12 11 11 D7 41 54 20 49 53 20 44 45 20 4E |."....AT IS DE N|
00000A00: 41 41 4D 20 22 3B 4E 24 00 20 12 2B 02 A0 38 3A |AAM ";N$. .+..8:|
00000A10: 9F 38 2C 38 2C 38 2C 4E 24 AA 22 2C 53 2C 52 22 |.8,8,8,N$.",S,R"|
00000A20: 00 41 12 30 02 84 31 35 2C 4E 4F 2C 46 4F 24 2C |.A.0..15,NO,FO$,|
00000A30: 53 50 2C 53 45 3A 8B 4E 4F B3 B1 30 A7 32 32 36 |SP,SE:.NO..0.226|
00000A40: 30 00 50 12 35 02 86 41 24 28 35 30 30 2C 33 29 |0.P.5..A$(500,3)|
00000A50: 00 7D 12 3A 02 49 B2 49 AA 31 3A 84 38 2C 41 24 |.}.:.I.I.1:.8,A$|
00000A60: 28 49 2C 30 29 2C 41 24 28 49 2C 31 29 2C 41 24 |(I,0),A$(I,1),A$|
00000A70: 28 49 2C 32 29 2C 41 24 28 49 2C 33 29 00 AA 12 |(I,2),A$(I,3)...|
00000A80: 3F 02 8B C8 28 41 24 28 49 2C 32 29 2C 32 29 B2 |?...(A$(I,2),2).|
00000A90: 22 D3 C5 22 B0 C8 28 41 24 28 49 2C 32 29 2C 32 |".."..(A$(I,2),2|
00000AA0: 29 B2 22 CD 41 22 A7 35 38 30 00 C0 12 40 02 8B |).".A".580...@..|
00000AB0: 53 54 B2 36 34 A7 49 B2 49 AB 31 3A 89 35 39 30 |ST.64.I.I.1:.590|
00000AC0: 00 CF 12 41 02 49 B2 49 AB 31 3A 89 35 37 30 00 |...A.I.I.1:.570.|
00000AD0: 00 13 44 02 99 22 12 22 49 22 92 22 3A 99 41 24 |..D.."."I".":.A$|
00000AE0: 28 49 2C 30 29 3A 99 41 24 28 49 2C 31 29 3A 99 |(I,0):.A$(I,1):.|
00000AF0: 41 24 28 49 2C 32 29 3A 99 41 24 28 49 2C 33 29 |A$(I,2):.A$(I,3)|
00000B00: 00 12 13 45 02 8B 53 54 B2 36 34 A7 99 3A 89 35 |...E..ST.64..:.5|
00000B10: 39 30 00 22 13 49 02 8B 53 54 B3 B1 36 34 A7 35 |90.".I..ST..64.5|
00000B20: 37 30 00 29 13 4E 02 A0 38 00 38 13 53 02 8D 32 |70.).N..8.8.S..2|
00000B30: 32 30 30 3A 89 32 30 30 00 3E 13 55 02 3A 00 54 |200:.200.>.U.:.T|
00000B40: 13 58 02 8F 20 53 4F 52 54 45 45 52 2D 52 4F 55 |.X.. SORTEER-ROU|
00000B50: 54 49 4E 45 00 66 13 62 02 99 22 13 12 53 4F 52 |TINE.f.b.."..SOR|
00000B60: 54 45 52 45 4E 22 00 7B 13 6C 02 8B 41 24 28 31 |TEREN".{.l..A$(1|
00000B70: 2C 30 29 B2 22 22 A7 32 32 34 30 00 C0 13 76 02 |,0)."".2240...v.|
00000B80: 99 22 11 12 CE 41 41 52 20 57 45 4C 4B 20 56 45 |."...AAR WELK VE|
00000B90: 4C 44 20 57 49 4C 54 20 55 20 44 45 20 41 52 52 |LD WILT U DE ARR|
00000BA0: 41 59 20 53 4F 52 54 45 52 45 4E 3F D4 49 4B 20 |AY SORTEREN?.IK |
00000BB0: 49 4E 20 31 2C 20 32 2C 20 33 20 4F 46 20 34 22 |IN 1, 2, 3 OF 4"|
00000BC0: 00 D3 13 80 02 A1 58 24 3A 8B 58 24 B2 22 22 A7 |......X$:.X$."".|
00000BD0: 36 34 30 00 F8 13 8A 02 8B 58 24 B2 22 31 22 B0 |640......X$."1".|
00000BE0: 58 24 B2 22 32 22 B0 58 24 B2 22 33 22 B0 58 24 |X$."2".X$."3".X$|
00000BF0: B2 22 34 22 A7 36 37 30 00 01 14 94 02 89 36 34 |."4".670......64|
00000C00: 30 00 45 14 9E 02 97 37 38 30 2C C5 28 58 24 29 |0.E....780,.(X$)|
00000C10: AB 31 3A 9E 34 30 39 36 AC 31 32 2C 41 20 3A 8F |.1:.4096.12,A :.|
00000C20: 20 53 4F 52 54 45 52 45 4E 20 4E 41 41 52 20 31 | SORTEREN NAAR 1|
00000C30: 45 20 32 45 20 33 45 20 4F 46 20 34 45 20 45 4C |E 2E 3E OF 4E EL|
00000C40: 45 4D 45 4E 54 00 54 14 A8 02 8D 32 32 30 30 3A |EMENT.T....2200:|
00000C50: 89 32 30 30 00 5A 14 B2 02 3A 00 74 14 BC 02 8F |.200.Z...:.t....|
00000C60: 20 41 46 44 52 55 4B 4B 45 4E 20 4F 50 20 53 43 | AFDRUKKEN OP SC|
00000C70: 48 45 52 4D 00 87 14 C6 02 99 22 13 12 46 49 4C |HERM......"..FIL|
00000C80: 45 20 54 4F 4E 45 4E 00 9C 14 D0 02 8B 41 24 28 |E TONEN......A$(|
00000C90: 31 2C 30 29 B2 22 22 A7 32 32 34 30 00 A7 14 DA |1,0)."".2240....|
00000CA0: 02 81 41 B2 31 A4 49 00 B4 14 E4 02 99 22 12 22 |..A.1.I......"."|
00000CB0: 41 22 92 22 00 C1 14 E9 02 99 41 24 28 41 2C 30 |A"."......A$(A,0|
00000CC0: 29 00 CE 14 EE 02 99 41 24 28 41 2C 31 29 00 DB |)......A$(A,1)..|
00000CD0: 14 F8 02 99 41 24 28 41 2C 32 29 00 EA 14 FD 02 |....A$(A,2).....|
00000CE0: 99 41 24 28 41 2C 33 29 3A 99 00 F0 14 02 03 82 |.A$(A,3):.......|
00000CF0: 00 FF 14 0C 03 8D 32 32 30 30 3A 89 32 30 30 00 |......2200:.200.|
00000D00: 05 15 16 03 3A 00 16 15 20 03 8F 20 55 49 54 50 |....:... .. UITP|
00000D10: 52 49 4E 54 45 4E 00 29 15 2A 03 99 22 13 12 55 |RINTEN.).*.."..U|
00000D20: 49 54 50 52 49 4E 54 45 4E 00 3E 15 34 03 8B 41 |ITPRINTEN.>.4..A|
00000D30: 24 28 31 2C 30 29 B2 22 22 A7 32 32 34 30 00 58 |$(1,0)."".2240.X|
00000D40: 15 39 03 9F 31 2C 34 2C 31 3A A0 31 3A 8B 53 54 |.9..1,4,1:.1:.ST|
00000D50: B3 30 A7 89 32 31 35 30 00 63 15 3E 03 9F 34 2C |.0..2150.c.>..4,|
00000D60: 34 2C 37 00 8B 15 43 03 98 34 3A 98 34 2C A6 32 |4,7...C..4:.4,.2|
00000D70: 30 29 22 D3 D4 C5 CE C3 C9 CC D3 20 C5 CE C7 C5 |0)"........ ....|
00000D80: CC D3 C5 20 D3 C5 C3 D4 C9 C5 22 00 B0 15 44 03 |... ......"...D.|
00000D90: 98 34 2C A6 32 30 29 22 2D 2D 2D 2D 2D 2D 2D 2D |.4,.20)"--------|
00000DA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"|
00000DB0: 00 B7 15 45 03 98 34 00 C2 15 48 03 81 41 B2 31 |...E..4...H..A.1|
00000DC0: A4 49 00 D7 15 52 03 98 34 2C 22 20 20 20 22 41 |.I...R..4," "A|
00000DD0: 24 28 41 2C 30 29 3B 00 F7 15 5C 03 98 34 2C A6 |$(A,0);...\..4,.|
00000DE0: 32 35 AB C3 28 41 24 28 41 2C 30 29 29 29 3B 41 |25..(A$(A,0)));A|
00000DF0: 24 28 41 2C 31 29 3B 00 17 16 66 03 98 34 2C A6 |$(A,1);...f..4,.|
00000E00: 33 35 AB C3 28 41 24 28 41 2C 31 29 29 29 3B 41 |35..(A$(A,1)));A|
00000E10: 24 28 41 2C 32 29 3B 00 35 16 6B 03 98 34 2C A6 |$(A,2);.5.k..4,.|
00000E20: 37 AB C3 28 41 24 28 41 2C 32 29 29 29 3B 41 24 |7..(A$(A,2)));A$|
00000E30: 28 41 2C 33 29 00 3B 16 70 03 82 00 45 16 75 03 |(A,3).;.p...E.u.|
00000E40: 98 34 3A A0 34 00 54 16 7A 03 8D 32 32 30 30 3A |.4:.4.T.z..2200:|
00000E50: 89 32 30 30 00 5A 16 7F 03 3A 00 66 16 84 03 8F |.200.Z...:.f....|
00000E60: 20 53 41 56 45 4E 00 74 16 8E 03 99 22 13 12 53 | SAVEN.t...."..S|
00000E70: 41 56 45 4E 00 89 16 98 03 8B 41 24 28 31 2C 30 |AVEN......A$(1,0|
00000E80: 29 B2 22 22 A7 32 32 34 30 00 B5 16 A2 03 85 22 |)."".2240......"|
00000E90: D7 41 54 20 49 53 20 44 45 20 4E 41 41 4D 20 56 |.AT IS DE NAAM V|
00000EA0: 41 4E 20 44 45 20 4E 49 45 55 57 45 20 46 49 4C |AN DE NIEUWE FIL|
00000EB0: 45 22 3B 4E 24 00 CD 16 AC 03 A0 38 3A 9F 38 2C |E";N$......8:.8,|
00000EC0: 38 2C 38 2C 4E 24 AA 22 2C 53 2C 57 22 00 EE 16 |8,8,N$.",S,W"...|
00000ED0: B6 03 84 31 35 2C 4E 4F 2C 46 4F 24 2C 53 50 2C |...15,NO,FO$,SP,|
00000EE0: 53 45 3A 8B 4E 4F B3 B1 30 A7 32 32 36 30 00 F9 |SE:.NO..0.2260..|
00000EF0: 16 C0 03 81 41 B2 31 A4 49 00 29 17 CA 03 98 38 |....A.1.I.)....8|
00000F00: 2C 41 24 28 41 2C 30 29 3A 98 38 2C 41 24 28 41 |,A$(A,0):.8,A$(A|
00000F10: 2C 31 29 3A 98 38 2C 41 24 28 41 2C 32 29 3A 98 |,1):.8,A$(A,2):.|
00000F20: 38 2C 41 24 28 41 2C 33 29 00 32 17 D4 03 82 3A |8,A$(A,3).2....:|
00000F30: A0 38 00 41 17 DE 03 8D 32 32 30 30 3A 89 32 30 |.8.A....2200:.20|
00000F40: 30 00 47 17 E3 03 3A 00 53 17 E8 03 8F 20 45 49 |0.G...:.S.... EI|
00000F50: 4E 44 45 00 61 17 F2 03 99 22 13 12 45 49 4E 44 |NDE.a...."..EIND|
00000F60: 45 00 7D 17 FC 03 99 22 11 20 D7 45 52 4B 45 4C |E.}....". .ERKEL|
00000F70: 49 4A 4B 20 53 54 4F 50 50 45 4E 3F 22 00 AA 17 |IJK STOPPEN?"...|
00000F80: 06 04 99 22 11 20 D4 49 4B 20 49 4E 20 4A 20 28 |...". .IK IN J (|
00000F90: C5 4C 4B 45 20 41 4E 44 45 52 45 20 54 4F 45 54 |.LKE ANDERE TOET|
00000FA0: 53 20 3D 20 4D 45 4E 55 29 22 00 BE 17 10 04 A1 |S = MENU)"......|
00000FB0: 5A 24 3A 8B 5A 24 B2 22 22 A7 31 30 34 30 00 CF |Z$:.Z$."".1040..|
00000FC0: 17 1A 04 8B 5A 24 B2 22 4A 22 A7 31 30 36 30 00 |....Z$."J".1060.|
00000FD0: E0 17 24 04 8B 5A 24 B3 B1 22 4A 22 A7 32 30 30 |..$..Z$.."J".200|
00000FE0: 00 F6 17 2E 04 A0 31 35 3A 9E 36 35 35 31 31 3A |......15:.65511:|
00000FF0: 9E 36 34 37 33 38 00 FC 17 38 04 3A 00 13 18 4C |.64738...8.:...L|
00001000: 04 8F 20 57 49 4A 5A 49 47 45 4E 20 42 45 53 54 |.. WIJZIGEN BEST|
00001010: 41 4E 44 00 2D 18 56 04 99 22 13 12 57 49 4A 5A |AND.-.V.."..WIJZ|
00001020: 49 47 45 4E 20 42 45 53 54 41 4E 44 22 00 42 18 |IGEN BESTAND".B.|
00001030: 60 04 8B 41 24 28 31 2C 30 29 B2 22 22 A7 32 32 |`..A$(1,0)."".22|
00001040: 34 30 00 4C 18 6A 04 97 31 39 2C 31 00 84 18 74 |40.L.j..19,1...t|
00001050: 04 85 22 11 C7 45 45 46 20 49 54 45 4D 20 4E 52 |.."..EEF ITEM NR|
00001060: 2C 20 4B 4F 4D 4D 41 2C 20 56 45 4C 44 4E 52 28 |, KOMMA, VELDNR(|
00001070: 31 2D 34 29 3A 20 20 20 20 9D 9D 9D 9D 22 3B 4E |1-4): ....";N|
00001080: 52 2C 56 45 00 A8 18 7E 04 8B 4E 52 B1 49 20 B0 |R,VE...~..NR.I .|
00001090: 20 56 45 B3 31 20 B0 20 56 45 B1 34 A7 99 22 91 | VE.1 . VE.4..".|
000010A0: 91 22 3A 89 31 31 34 30 00 D0 18 88 04 99 3A 99 |.":.1140......:.|
000010B0: 22 20 C4 45 20 4F 55 44 45 20 54 45 4B 53 54 20 |" .E OUDE TEKST |
000010C0: 57 41 53 3A 22 41 24 28 4E 52 2C 56 45 AB 31 29 |WAS:"A$(NR,VE.1)|
000010D0: 00 EE 18 92 04 85 22 20 C7 45 45 46 20 4A 55 49 |......" .EEF JUI|
000010E0: 53 54 45 20 54 45 4B 53 54 3A 22 3B 41 24 00 01 |STE TEKST:";A$..|
000010F0: 19 9C 04 41 24 28 4E 52 2C 56 45 AB 31 29 B2 41 |...A$(NR,VE.1).A|
00001100: 24 00 0F 19 A6 04 97 31 39 2C 30 3A 99 3A 99 00 |$......19,0:.:..|
00001110: 18 19 AB 04 89 32 30 30 00 1E 19 AD 04 3A 00 36 |.....200.....:.6|
00001120: 19 B0 04 8F 20 54 4F 45 56 4F 45 47 45 4E 20 42 |.... TOEVOEGEN B|
00001130: 45 53 54 41 4E 44 00 49 19 BA 04 99 22 13 12 54 |ESTAND.I...."..T|
00001140: 4F 45 56 4F 45 47 45 4E 22 00 5E 19 C4 04 8B 41 |OEVOEGEN".^....A|
00001150: 24 28 31 2C 30 29 B2 22 22 A7 32 32 34 30 00 67 |$(1,0)."".2240.g|
00001160: 19 CE 04 89 33 31 30 00 6D 19 D8 04 3A 00 7F 19 |....310.m...:...|
00001170: D0 07 8F 20 53 55 42 52 4F 55 54 49 4E 45 53 00 |... SUBROUTINES.|
00001180: 85 19 DA 07 3A 00 9C 19 E4 07 8F 20 43 4F 52 52 |....:...... CORR|
00001190: 45 43 54 49 45 20 49 4E 56 4F 45 52 00 B1 19 EE |ECTIE INVOER....|
000011A0: 07 8B 41 24 28 41 2C 30 29 B2 22 2A 22 A7 42 B2 |..A$(A,0)."*".B.|
000011B0: 31 00 C6 19 F8 07 8B 41 24 28 41 2C 31 29 B2 22 |1......A$(A,1)."|
000011C0: 2A 22 A7 42 B2 32 00 DB 19 02 08 8B 41 24 28 41 |*".B.2......A$(A|
000011D0: 2C 32 29 B2 22 2A 22 A7 42 B2 33 00 F0 19 07 08 |,2)."*".B.3.....|
000011E0: 8B 41 24 28 41 2C 33 29 B2 22 2A 22 A7 42 B2 34 |.A$(A,3)."*".B.4|
000011F0: 00 FA 19 0C 08 97 31 39 2C 31 00 32 1A 16 08 85 |......19,1.2....|
00001200: 22 11 C7 45 45 46 20 49 54 45 4D 20 4E 52 2C 20 |"..EEF ITEM NR, |
00001210: 4B 4F 4D 4D 41 2C 20 56 45 4C 44 4E 52 28 31 2D |KOMMA, VELDNR(1-|
00001220: 34 29 3A 20 20 20 20 9D 9D 9D 9D 22 3B 4E 52 2C |4): ....";NR,|
00001230: 56 45 00 54 1A 20 08 8B 4E 52 B1 41 AB 31 B0 56 |VE.T. ..NR.A.1.V|
00001240: 45 B3 31 B0 56 45 B1 34 A7 99 22 91 91 22 3A 89 |E.1.VE.4.."..":.|
00001250: 32 30 37 30 00 7C 1A 2A 08 99 3A 99 22 20 C4 45 |2070.|.*..:." .E|
00001260: 20 4F 55 44 45 20 54 45 4B 53 54 20 57 41 53 3A | OUDE TEKST WAS:|
00001270: 22 41 24 28 4E 52 2C 56 45 AB 31 29 00 9A 1A 34 |"A$(NR,VE.1)...4|
00001280: 08 85 22 20 C7 45 45 46 20 4A 55 49 53 54 45 20 |.." .EEF JUISTE |
00001290: 54 45 4B 53 54 3A 22 3B 41 24 00 AD 1A 3E 08 41 |TEKST:";A$...>.A|
000012A0: 24 28 4E 52 2C 56 45 AB 31 29 B2 41 24 00 BB 1A |$(NR,VE.1).A$...|
000012B0: 48 08 97 31 39 2C 30 3A 99 3A 99 00 CE 1A 52 08 |H..19,0:.:....R.|
000012C0: 91 42 89 34 31 30 2C 34 33 30 2C 34 34 30 00 D4 |.B.410,430,440..|
000012D0: 1A 5C 08 3A 00 04 1B 66 08 99 22 11 20 9F D3 4C |.\.:...f..". ..L|
000012E0: 55 49 54 20 44 45 20 50 52 49 4E 54 45 52 20 41 |UIT DE PRINTER A|
000012F0: 41 4E 20 53 56 50 21 9A 22 3A 8D 32 32 30 30 3A |AN SVP!.":.2200:|
00001300: 89 38 32 35 00 0A 1B 70 08 3A 00 3F 1B 98 08 99 |.825...p.:.?....|
00001310: 22 11 22 C7 28 31 38 29 22 C4 52 55 4B 20 4F 50 |".".(18)".RUK OP|
00001320: 20 45 45 4E 20 54 4F 45 54 53 20 56 4F 4F 52 20 | EEN TOETS VOOR |
00001330: 56 45 52 56 4F 4C 47 2E 22 C7 28 31 34 36 29 00 |VERVOLG.".(146).|
00001340: 51 1B A2 08 97 31 39 38 2C 30 3A 92 31 39 38 2C |Q....198,0:.198,|
00001350: 31 00 57 1B AC 08 8E 00 5D 1B B6 08 3A 00 91 1B |1.W.....]...:...|
00001360: C0 08 99 22 11 11 11 11 20 C5 52 20 49 53 20 47 |...".... .R IS G|
00001370: 45 45 4E 20 42 45 53 54 41 4E 44 20 41 41 4E 57 |EEN BESTAND AANW|
00001380: 45 5A 49 47 21 22 3A 8D 32 32 30 30 3A 89 32 30 |EZIG!":.2200:.20|
00001390: 30 00 97 1B CA 08 3A 00 B2 1B D4 08 8F 20 46 4F |0.....:...... FO|
000013A0: 55 54 4B 41 4E 41 41 4C 20 41 46 44 52 55 4B 4B |UTKANAAL AFDRUKK|
000013B0: 45 4E 00 C7 1B DE 08 99 22 11 22 4E 4F 3B 46 4F |EN......"."NO;FO|
000013C0: 24 3B 53 50 3B 53 45 00 D8 1B E8 08 8B 4E 4F B2 |$;SP;SE......NO.|
000013D0: 36 33 A7 8D 32 33 31 30 00 EC 1B F2 08 99 22 11 |63..2310......".|
000013E0: 22 3A 8D 32 32 30 30 3A 89 32 30 30 00 F2 1B FC |":.2200:.200....|
000013F0: 08 3A 00 20 1C 06 09 99 22 11 11 20 D7 49 4C 54 |.:. ....".. .ILT|
00001400: 20 55 20 5A 49 45 4E 20 57 45 4C 4B 45 20 53 45 | U ZIEN WELKE SE|
00001410: 51 2E 46 49 4C 45 53 20 4F 50 20 44 45 5A 45 22 |Q.FILES OP DEZE"|
00001420: 00 36 1C 10 09 99 22 20 53 43 48 49 4A 46 20 53 |.6...." SCHIJF S|
00001430: 54 41 41 4E 3F 22 00 4A 1C 1A 09 99 22 11 20 D4 |TAAN?".J....". .|
00001440: 49 4B 20 49 4E 20 4A 2F 4E 22 00 5E 1C 24 09 A1 |IK IN J/N".^.$..|
00001450: 5A 24 3A 8B 5A 24 B2 22 22 A7 32 33 34 30 00 6F |Z$:.Z$."".2340.o|
00001460: 1C 2E 09 8B 5A 24 B2 22 4A 22 A7 32 33 39 30 00 |....Z$."J".2390.|
00001470: 7D 1C 38 09 8B 5A 24 B2 22 4E 22 A7 8E 00 87 1C |}.8..Z$."N".....|
00001480: 42 09 89 32 33 34 30 00 8D 1C 4C 09 3A 00 AB 1C |B..2340...L.:...|
00001490: 56 09 8F 20 53 45 51 2E 46 49 4C 45 53 20 4C 45 |V.. SEQ.FILES LE|
000014A0: 5A 45 4E 20 55 49 54 20 44 49 52 00 C6 1C 60 09 |ZEN UIT DIR...`.|
000014B0: 99 22 11 12 20 53 45 51 2E 46 49 4C 45 53 20 49 |.".. SEQ.FILES I|
000014C0: 4E 20 44 49 52 22 00 D8 1C 6A 09 A0 32 3A 9F 32 |N DIR"...j..2:.2|
000014D0: 2C 38 2C 32 2C 22 23 22 00 ED 1C 74 09 41 B2 30 |,8,2,"#"...t.A.0|
000014E0: 3A 54 B2 31 38 3A 53 B2 31 3A 4E B2 30 00 02 1D |:T.18:S.1:N.0...|
000014F0: 7E 09 98 31 35 2C 22 55 31 22 3B 32 3B 30 3B 54 |~..15,"U1";2;0;T|
00001500: 3B 53 00 14 1D 88 09 98 31 35 2C 22 42 2D 50 22 |;S......15,"B-P"|
00001510: 3B 32 2C 30 00 2E 1D 92 09 A1 23 32 2C 58 24 3A |;2,0......#2,X$:|
00001520: 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 3A |.X$."".X$..(0).:|
00001530: 1D 9C 09 54 B2 C6 28 58 24 29 00 54 1D A6 09 A1 |...T..(X$).T....|
00001540: 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 |#2,X$:.X$."".X$.|
00001550: C7 28 30 29 00 60 1D B0 09 53 B2 C6 28 58 24 29 |.(0).`...S..(X$)|
00001560: 00 6B 1D BA 09 81 58 B2 31 A4 38 00 82 1D C4 09 |.k....X.1.8.....|
00001570: 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 32 |.15,"B-P";2;X.32|
00001580: AA 32 00 9C 1D CE 09 A1 23 32 2C 58 24 3A 8B 58 |.2......#2,X$:.X|
00001590: 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 A9 1D D8 |$."".X$..(0)....|
000015A0: 09 54 59 B2 C6 28 58 24 29 00 BE 1D E2 09 8B 28 |.TY..(X$)......(|
000015B0: 54 59 AF 31 35 29 B3 B1 31 A7 32 36 34 30 00 D5 |TY.15)..1.2640..|
000015C0: 1D EC 09 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 |....15,"B-P";2;X|
000015D0: AC 33 32 AA 35 00 E0 1D F6 09 46 46 24 B2 22 22 |.32.5.....FF$.""|
000015E0: 00 EC 1D 00 0A 81 59 B2 31 A4 31 36 00 06 1E 0A |......Y.1.16....|
000015F0: 0A A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 |..#2,X$:.X$."".X|
00001600: 24 B2 C7 28 30 29 00 1A 1E 14 0A 8B C6 28 58 24 |$..(0).......(X$|
00001610: 29 B2 31 36 30 A7 32 36 31 30 00 29 1E 1E 0A 46 |).160.2610.)...F|
00001620: 46 24 B2 46 46 24 AA 58 24 00 30 1E 28 0A 82 59 |F$.FF$.X$.0.(..Y|
00001630: 00 3A 1E 32 0A 4E B2 4E AA 31 00 55 1E 3C 0A 8B |.:.2.N.N.1.U.<..|
00001640: 41 B2 30 A7 41 B2 31 3A 99 4E 3B 46 46 24 3B 3A |A.0.A.1:.N;FF$;:|
00001650: 89 32 36 34 30 00 69 1E 46 0A 41 B2 30 3A 99 A3 |.2640.i.F.A.0:..|
00001660: 32 30 29 3B 4E 3B 46 46 24 00 70 1E 50 0A 82 58 |20);N;FF$.p.P..X|
00001670: 00 7F 1E 5A 0A 8B 54 B3 B1 30 A7 32 34 33 30 00 |...Z..T..0.2430.|
00001680: 86 1E 64 0A A0 32 00 9A 1E 6E 0A 8B 41 B2 30 A7 |..d..2...n..A.0.|
00001690: 99 22 20 12 45 49 4E 44 45 22 00 B0 1E 73 0A 8B |." .EINDE"...s..|
000016A0: 41 B2 31 A7 99 3A 99 22 20 12 45 49 4E 44 45 22 |A.1..:." .EINDE"|
000016B0: 00 BD 1E 78 0A 8B 4E 4F B2 36 33 A7 8E 00 C6 1E |...x..NO.63.....|
000016C0: 82 0A 89 35 35 30 00 CC 1E 8C 0A 3A 00 15 1F 10 |...550.....:....|
000016D0: 27 83 37 36 2C 31 30 2C 31 39 36 2C 37 36 2C 39 |'.76,10,196,76,9|
000016E0: 38 2C 31 39 36 2C 37 36 2C 31 31 36 2C 31 39 36 |8,196,76,116,196|
000016F0: 2C 32 2C 31 32 30 2C 31 36 39 2C 34 35 2C 31 36 |,2,120,169,45,16|
00001700: 32 2C 31 39 36 2C 31 34 31 2C 32 30 2C 33 2C 31 |2,196,141,20,3,1|
00001710: 34 32 2C 32 31 00 5E 1F 11 27 83 33 2C 31 37 34 |42,21.^..'.3,174|
00001720: 2C 39 2C 31 39 36 2C 31 38 39 2C 31 34 34 2C 31 |,9,196,189,144,1|
00001730: 39 36 2C 31 34 31 2C 31 38 2C 32 30 38 2C 31 37 |96,141,18,208,17|
00001740: 33 2C 31 37 2C 32 30 38 2C 34 31 2C 31 32 37 2C |3,17,208,41,127,|
00001750: 31 34 31 2C 31 37 2C 32 30 38 2C 31 36 39 00 A7 |141,17,208,169..|
00001760: 1F 12 27 83 31 32 39 2C 31 34 31 2C 32 36 2C 32 |..'.129,141,26,2|
00001770: 30 38 2C 38 38 2C 39 36 2C 31 37 33 2C 32 35 2C |08,88,96,173,25,|
00001780: 32 30 38 2C 31 34 31 2C 32 35 2C 32 30 38 2C 34 |208,141,25,208,4|
00001790: 38 2C 37 2C 31 37 33 2C 31 33 2C 32 32 30 2C 38 |8,7,173,13,220,8|
000017A0: 38 2C 37 36 2C 34 39 00 F1 1F 13 27 83 32 33 34 |8,76,49....'.234|
000017B0: 2C 31 32 30 2C 31 37 34 2C 39 2C 31 39 36 2C 31 |,120,174,9,196,1|
000017C0: 38 39 2C 31 33 38 2C 31 39 36 2C 31 37 30 2C 31 |89,138,196,170,1|
000017D0: 38 39 2C 31 34 38 2C 31 39 36 2C 31 35 37 2C 30 |89,148,196,157,0|
000017E0: 2C 34 2C 31 38 39 2C 31 32 2C 31 39 37 2C 31 35 |,4,189,12,197,15|
000017F0: 37 00 3A 20 14 27 83 30 2C 32 31 36 2C 32 30 32 |7.: .'.0,216,202|
00001800: 2C 31 36 2C 32 34 31 2C 31 37 34 2C 39 2C 31 39 |,16,241,174,9,19|
00001810: 36 2C 31 37 33 2C 31 38 2C 32 30 38 2C 32 32 31 |6,173,18,208,221|
00001820: 2C 31 34 31 2C 31 39 32 2C 31 34 34 2C 32 34 38 |,141,192,144,248|
00001830: 2C 38 38 2C 37 36 2C 31 32 39 00 83 20 15 27 83 |,88,76,129.. .'.|
00001840: 32 33 34 2C 31 32 30 2C 31 36 39 2C 30 2C 31 34 |234,120,169,0,14|
00001850: 31 2C 32 36 2C 32 30 38 2C 31 36 39 2C 34 39 2C |1,26,208,169,49,|
00001860: 31 36 32 2C 32 33 34 2C 31 34 31 2C 32 30 2C 33 |162,234,141,20,3|
00001870: 2C 31 34 32 2C 32 31 2C 33 2C 38 38 2C 39 36 2C |,142,21,3,88,96,|
00001880: 31 37 34 00 CB 20 16 27 83 39 2C 31 39 36 2C 31 |174.. .'.9,196,1|
00001890: 38 39 2C 31 33 38 2C 31 39 36 2C 31 37 30 2C 31 |89,138,196,170,1|
000018A0: 38 39 2C 30 2C 34 2C 31 35 37 2C 31 34 38 2C 31 |89,0,4,157,148,1|
000018B0: 39 36 2C 31 38 39 2C 30 2C 32 31 36 2C 31 35 37 |96,189,0,216,157|
000018C0: 2C 31 32 2C 31 39 37 2C 32 30 32 00 F7 20 17 27 |,12,197,202.. .'|
000018D0: 83 31 36 2C 32 34 31 2C 39 36 2C 33 39 2C 37 39 |.16,241,96,39,79|
000018E0: 2C 31 31 39 2C 35 39 2C 36 37 2C 37 35 2C 33 30 |,119,59,67,75,30|
000018F0: 2C 31 30 2C 30 2C 30 00 25 21 20 4E 83 22 CA 41 |,10,0,0.%! N.".A|
00001900: 4E 22 2C 22 D0 49 45 54 45 52 53 45 4E 22 2C 22 |N",".IETERSEN","|
00001910: CC 41 4E 47 45 57 45 47 20 33 31 22 2C 22 C4 49 |.ANGEWEG 31",".I|
00001920: 45 52 45 4E 22 00 50 21 21 4E 83 22 D0 49 45 54 |EREN".P!!N.".IET|
00001930: 22 2C 22 CA 41 4E 53 45 4E 22 2C 22 CF 56 45 52 |",".ANSEN",".VER|
00001940: 57 45 47 20 34 41 22 2C 22 C1 52 4E 48 45 4D 22 |WEG 4A",".RNHEM"|
00001950: 00 88 21 22 4E 83 22 CB 4C 41 41 53 22 2C 22 C7 |..!"N.".LAAS",".|
00001960: 45 52 52 49 54 53 22 2C 22 D3 54 41 54 49 4F 4E |ERRITS",".TATION|
00001970: 53 53 54 52 41 41 54 20 32 36 22 2C 22 CF 4F 53 |SSTRAAT 26",".OS|
00001980: 54 45 52 42 45 45 4B 22 00 B3 21 23 4E 83 22 D4 |TERBEEK"..!#N.".|
00001990: 48 4F 4D 41 53 22 2C 22 CB 45 49 5A 45 52 22 2C |HOMAS",".EIZER",|
000019A0: 22 CD 45 45 4E 54 20 34 35 22 2C 22 DA 57 4F 4C |".EENT 45",".WOL|
000019B0: 4C 45 22 00 E7 21 24 4E 83 22 CC 49 45 53 42 45 |LE"..!$N.".IESBE|
000019C0: 54 48 22 2C 22 44 45 20 C7 52 4F 4F 54 22 2C 22 |TH","DE .ROOT","|
000019D0: CD 41 52 4B 54 50 4C 45 49 4E 20 31 22 2C 22 C1 |.ARKTPLEIN 1",".|
000019E0: 4C 4B 4D 41 41 52 22 00 2F 22 00 7D 83 31 36 39 |LKMAAR"./".}.169|
000019F0: 2C 30 2C 31 33 33 2C 39 35 2C 31 33 33 2C 39 30 |,0,133,95,133,90|
00001A00: 2C 31 33 33 2C 38 38 2C 31 36 39 2C 31 36 30 2C |,133,88,169,160,|
00001A10: 31 33 33 2C 39 36 2C 31 36 39 2C 31 39 32 2C 31 |133,96,169,192,1|
00001A20: 33 33 2C 39 31 2C 31 33 33 2C 38 39 2C 33 32 00 |33,91,133,89,32.|
00001A30: 78 22 01 7D 83 31 39 31 2C 31 36 33 2C 31 36 39 |x".}.191,163,169|
00001A40: 2C 31 32 38 2C 31 34 31 2C 31 30 34 2C 31 37 32 |,128,141,104,172|
00001A50: 2C 31 34 31 2C 31 30 38 2C 31 37 32 2C 31 34 31 |,141,108,172,141|
00001A60: 2C 31 31 32 2C 31 37 32 2C 31 36 39 2C 35 34 2C |,112,172,169,54,|
00001A70: 31 33 33 2C 31 2C 39 36 00 00 00 |133,1,96... |
..(....*********************************
.O.... ROUTINES BIJ ARRAY-SORT *.
V.... 4 VELDEN *..
.... ARRAY-SORT UIT:64ER *.D.
(.. 5/86 P100 *...-
.. H.G.VAN MANEN 1/90 *...2.
.*********************************...7.:
.9.<.A.A.1:.A.1.."ARRAY-SORT",8,1.F.A..1
5,8,15.X.F..G(14)"...... DE DATA WORDE
N INGELEZEN...."...P..A.0.148:.D:.50176.
A,D:....U..A.1.5:.B.0.3:.A$:A$(A,B).A$:.
B:.A:I.5...Z..A.828.864:.D:.A,D:.:
.828.%.\.. DEZE INPUT ROUTINE LAAT KOMM
A EN DUBBELE PUNT TOE..K.].. UITS
CHAKELEN MET: R/S + RESTORE.L.^.. INSCHA
KELEN MET: POKE 1,54.R._.:...D.. INLEIDI
NG.F.N..".. MET DIT PRG KUNT U TWEE-DIME
NSIONALE ARRAYS BESTAANDE";...X.." UI
T 4 VELDEN:"......". - INVOEREN......"
- INLEZEN VAN SCHIJF.-...." - SORTE
REN NAAR VELD.L...." - TONEN OP HET SC
HERM.B. .." - UITPRINTEN......" - WE
GSCHRIJVEN NAAR SCHIJF......" (OOK: WI
JZIGEN/AANVULLEN BESTAND)......".. EEN B
ESTANDJE IS AANWEZIG ALS DEMO.."......".
.. .DRUK OP EEN TOETS VOOR VERVOLG".....
.198,0:.198,1.#...:...H.. MENU.;.R..5328
1,0.V.W..G(158)"... ROUTINES 2-DIM. AR
RAYS (4 VELDEN)"G(154)......"..
1) FILE INVOEREN......". 2) FILE
INLEZEN......". 3) SORTEREN NAA
R VELD......". 4) FILE TONEN....
..". 5) UITPRINTEN.3....".
6) SAVEN.L....". 7) EINDE.V..
..". .8) WIJZIGEN VAN BESTAND..
...." .9) TOEVOEGEN AAN BESTAND.
......". MAAK EEN KEUZE 1-9.P....A$:.A
$."".260......F(A$).49.F(A$).57.260.....
.".":.53281,6:C.E(A$).3....C.300,500,600
,700,800,900,1000,1100,1200.9.".:.F.,..
INVOER.`.1..:.15,8,15:.A$(500,3)...6.IN.
50176 :. ** MTPRG INSCHAKELEN...@.OF.50
176.3:. ** UITSCHAKELEN.M.J.GT.50176.6:.
** KOPREGELS 'SAVEN'...T.ZL.50176.9:. *
* AANTAL KOPREGELS...Y..ZL,3.*.^..".. EI
NDE INVOER DOOR _ IN EERSTE VELD ".S.C..
" CORRIGEREN DOOR * IN EEN VELD.".G.H.
.T.0.39:."-";:..S.R..GT:.IN...|..: 1:.1,
0:. INPUT ? WEGLATEN......A.I.1.500.....
."NR"A"EERSTE VELD:";:.1,A$(A,0):.:.A$(A
,0)."*".2020......A$(A,0)."_".A$(A,0).""
:I.A.1:A.500:.450.B...."NR"A"TWEEDE VELD
:";:.1,A$(A,1):.:.A$(A,1)."*".2020.{....
"NR"A"DERDE VELD:";:.1,A$(A,2):.:.A$(A,
2)."*".2020......"NR"A"VIERDE VELD:";:.1
,A$(A,3):.:.A$(A,3)."*".2020...B..:..G.L
..OF: 1...V.PL.B(214):.".";:.A.1.20:."
";:.......214,PL:.211,0:.58640......22
00:.200.....:.1.... ARRAY INLEZEN.@....:
.15,8,15.Q...."..INLEZEN"......". WILT U
EERST ZIEN WELKE SEQ.FILES OP "......"
DEZE SCHIJF STAAN?"......" TIK IN J/N".A
....Z$:.Z$."".530.R....Z$."J".2390......
Z$."N".550...!..530...&.."...WAT IS DE N
AAM ";N$. .+. 8:.8,8,8,N$.",S,R".A.0..15
,NO,FO$,SP,SE:.NO..0.2260.P.5..A$(500,3)
.}.:.I.I.1:.8,A$(I,0),A$(I,1),A$(I,2),A$
(I,3)...?..H(A$(I,2),2)."SE".H(A$(I,2),2
)."MA".580...@..ST.64.I.I.1:.590.O.A.I.I
.1:.570...D.."."I".":.A$(I,0):.A$(I,1):.
A$(I,2):.A$(I,3)...E..ST.64..:.590.".I..
ST..64.570.).N. 8.8.S..2200:.200.>.U.:.T
.X.. SORTEER-ROUTINE.F.B.."..SORTEREN".{
.L..A$(1,0)."".2240...V.."..NAAR WELK VE
LD WILT U DE ARRAY SORTEREN?TIK IN 1, 2,
3 OF 4".S....X$:.X$."".640......X$."1".
X$."2".X$."3".X$."4".670......640.E....7
80,E(X$).1:.4096.12,A :. SORTEREN NAAR 1
E 2E 3E OF 4E ELEMENT.T....2200:.200.Z..
.:.T.... AFDRUKKEN OP SCHERM...F.."..FIL
E TONEN...P..A$(1,0)."".2240...Z..A.1.I.
....."."A".".A....A$(A,0).N....A$(A,1)..
....A$(A,2)......A$(A,3):.............22
00:.200.....:... .. UITPRINTEN.).*.."..U
ITPRINTEN.>.4..A$(1,0)."".2240.X.9..1,4,
1: 1:.ST.0..2150.C.>..4,4,7...C..4:.4,.2
0)"STENCILS ENGELSE SECTIE"...D..4,.20)"
-----------------------"...E..4.B.H..A.1
.I.W.R..4," "A$(A,0);...\..4,.25.C(A$(
A,0)));A$(A,1);...F..4,.35.C(A$(A,1)));A
$(A,2);.5.K..4,.7.C(A$(A,2)));A$(A,3).;.
P...E.U..4: 4.T.Z..2200:.200.Z..:.F....
SAVEN.T...."..SAVEN......A$(1,0)."".224
0......"WAT IS DE NAAM VAN DE NIEUWE FIL
E";N$.M... 8:.8,8,8,N$.",S,W"......15,NO
,FO$,SP,SE:.NO..0.2260......A.1.I.).J..8
,A$(A,0):.8,A$(A,1):.8,A$(A,2):.8,A$(A,3
).2.T..: 8.A....2200:.200.G...:.S.... EI
NDE.A...."..EINDE.}....". WERKELIJK STOP
PEN?"......". TIK IN J (ELKE ANDERE TOET
S = MENU)"......Z$:.Z$."".1040.O....Z$."
J".1060...$..Z$.."J".200..... 15:.65511:
.64738...8.:...L.. WIJZIGEN BESTAND.-.V.
."..WIJZIGEN BESTAND".B.`..A$(1,0)."".22
40.L.J..19,1...T..".GEEF ITEM NR, KOMMA,
VELDNR(1-4): ....";NR,VE...~..NR.I .
VE.1 . VE.4.."..":.1140.P....:." DE OUD
E TEKST WAS:"A$(NR,VE.1)......" GEEF JUI
STE TEKST:";A$.....A$(NR,VE.1).A$......1
9,0:.:.......200.....:.6.... TOEVOEGEN B
ESTAND.I...."..TOEVOEGEN".^.D..A$(1,0)."
".2240.G.N..310.M.X.:..P.. SUBROUTINES.
..Z.:...... CORRECTIE INVOER......A$(A,0
)."*".B.1.F....A$(A,1)."*".B.2......A$(A
,2)."*".B.3......A$(A,3)."*".B.4......19
,1.2....".GEEF ITEM NR, KOMMA, VELDNR(1-
4): ....";NR,VE.T. ..NR.A.1.VE.1.VE.4
.."..":.2070.|.*..:." DE OUDE TEKST WAS:
"A$(NR,VE.1)...4.." GEEF JUISTE TEKST:";
A$...>.A$(NR,VE.1).A$...H..19,0:.:..N.R.
.B.410,430,440.T.\.:...F..". .SLUIT DE P
RINTER AAN SVP!.":.2200:.825...P.:.?....
"."G(18)"DRUK OP EEN TOETS VOOR VERVOLG.
"G(146).Q....198,0:.198,1.W.....]...:...
...".... ER IS GEEN BESTAND AANWEZIG!":.
2200:.200...J.:...T.. FOUTKANAAL AFDRUKK
EN.G...."."NO;FO$;SP;SE.X....NO.63..2310
......".":.2200:.200.....:. ....".. WILT
U ZIEN WELKE SEQ.FILES OP DEZE".6...."
SCHIJF STAAN?".J....". TIK IN J/N".^.$..
Z$:.Z$."".2340.O....Z$."J".2390.}.8..Z$.
"N".....B..2340...L.:...V.. SEQ.FILES LE
ZEN UIT DIR.F.`..".. SEQ.FILES IN DIR".X
.J. 2:.2,8,2,"#"...T.A.0:T.18:S.1:N.0...
~..15,"U1";2;0;T;S......15,"B-P";2,0....
..#2,X$:.X$."".X$.G(0).:...T.F(X$).T....
#2,X$:.X$."".X$.G(0).`...S.F(X$).K....X.
1.8...D..15,"B-P";2;X.32.2...N..#2,X$:.X
$."".X$.G(0)...X.TY.F(X$)......(TY.15)..
1.2640.U....15,"B-P";2;X.32.5.....FF$.""
......Y.1.16......#2,X$:.X$."".X$.G(0)..
....F(X$).160.2610.)...FF$.FF$.X$.0.(..Y
.:.2.N.N.1.U.<..A.0.A.1:.N;FF$;:.2640.I.
F.A.0:..20);N;FF$.P.P..X..Z..T..0.2430.
..D. 2...N..A.0.." .EINDE"...S..A.1..:."
.EINDE"...X..NO.63...F....550.L...:....
'.76,10,196,76,98,196,76,116,196,2,120,1
69,45,162,196,141,20,3,142,21.^..'.3,174
,9,196,189,144,196,141,18,208,173,17,208
,41,127,141,17,208,169....'.129,141,26,2
08,88,96,173,25,208,141,25,208,48,7,173,
13,220,88,76,49....'.234,120,174,9,196,1
89,138,196,170,189,148,196,157,0,4,189,1
2,197,157.: .'.0,216,202,16,241,174,9,19
6,173,18,208,221,141,192,144,248,88,76,1
29.. .'.234,120,169,0,141,26,208,169,49,
162,234,141,20,3,142,21,3,88,96,174.K .'
.9,196,189,138,196,170,189,0,4,157,148,1
96,189,0,216,157,12,197,202.. .'.16,241,
96,39,79,119,59,67,75,30,10,0,0.%! N."JA
N","PIETERSEN","LANGEWEG 31","DIEREN".P!
!N."PIET","JANSEN","OVERWEG 4A","ARNHEM"
..!"N."KLAAS","GERRITS","STATIONSSTRAAT
26","OOSTERBEEK"..!#N."THOMAS","KEIZER",
"MEENT 45","ZWOLLE"..!$N."LIESBETH","DE
GROOT","MARKTPLEIN 1","ALKMAAR"./".}.169
,0,133,95,133,90,133,88,169,160,133,96,1
69,192,133,91,133,89,32.X".}.191,163,169
,128,141,104,172,141,108,172,141,112,172
,169,54,133,1,96...
> CLICK IMAGE PREVIEW FOR FULL MODAL