VOORRAADKRT LOS
FILE INFORMATION
FILENAME(S): VOORRAADKRT LOS
FILE TYPE(S): PRG
FILE SIZE: 8.5K
FIRST SEEN: 2025-11-30 21:26:50
APPEARS ON: 2 disk(s)
FILE HASH
c0d902fd4fdbd769f4a85bba0a519d03a3fc3048d727a03241640085ce227581
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ETIKETTEN | VOORRAADKRT LOS | PRG | DuncanTwain | 32 | 0 | DOWNLOAD FILE |
| ETIKETTEN | VOORRAADKRT LOS | PRG | DuncanTwain | 32 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 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 00 |***************.|
00000020: 3D 08 14 00 8F 2A 2A 2A 20 56 4F 4F 52 52 41 41 |=....*** VOORRAA|
00000030: 44 4B 52 54 20 4C 4F 53 20 20 2A 2A 2A 00 5B 08 |DKRT LOS ***.[.|
00000040: 1E 00 8F 2A 2A 2A 20 38 38 30 36 30 37 20 20 20 |...*** 880607 |
00000050: 20 20 20 20 20 20 20 20 2A 2A 2A 00 79 08 28 00 | ***.y.(.|
00000060: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7F 08 32 00 3A 00 |*********...2.:.|
00000080: BA 08 37 00 45 53 24 B2 C7 28 32 37 29 3A 4D 49 |..7.ES$..(27):MI|
00000090: 24 B2 C7 28 33 33 29 3A 4D 4D 24 B2 45 53 24 AA |$..(33):MM$.ES$.|
000000A0: 4D 49 24 3A 52 4C 24 B2 45 53 24 AA C7 28 31 30 |MI$:RL$.ES$..(10|
000000B0: 29 3A 54 24 B2 C7 28 31 36 29 00 C6 08 38 00 9F |):T$..(16)...8..|
000000C0: 20 39 2C 34 2C 37 00 EE 08 39 00 97 35 33 32 38 | 9,4,7...9..5328|
000000D0: 30 2C 30 3A 97 35 33 32 38 31 2C 36 3A 99 22 05 |0,0:.53281,6:.".|
000000E0: 22 3A 99 C7 28 31 34 29 3A 99 C7 28 38 29 00 3D |":..(14):..(8).=|
000000F0: 09 3C 00 86 52 52 24 28 39 29 2C 41 24 28 31 31 |.<..RR$(9),A$(11|
00000100: 34 29 2C 42 24 28 31 34 34 2C 33 29 2C 43 24 28 |4),B$(144,3),C$(|
00000110: 34 33 35 29 2C 41 28 31 32 29 2C 44 24 28 31 34 |435),A(12),D$(14|
00000120: 34 2C 34 29 2C 52 24 28 32 30 2C 31 39 29 2C 53 |4,4),R$(20,19),S|
00000130: 54 24 28 31 30 29 2C 4D 47 28 31 30 29 00 49 09 |T$(10),MG(10).I.|
00000140: 41 00 86 47 24 28 31 32 29 00 52 09 46 00 9F 34 |A..G$(12).R.F..4|
00000150: 2C 34 00 5C 09 64 00 89 39 31 30 30 00 62 09 F4 |,4.\.d..9100.b..|
00000160: 01 3A 00 7B 09 FE 01 8F 2A 2A 2A 20 53 55 42 52 |.:.{....*** SUBR|
00000170: 4F 55 54 49 4E 45 53 20 2A 2A 2A 00 81 09 08 02 |OUTINES ***.....|
00000180: 3A 00 B0 09 12 02 98 34 2C 45 53 24 3B C7 28 34 |:......4,ES$;.(4|
00000190: 38 29 3B 3A 8E 3A 20 20 20 8F 20 52 45 47 45 4C |8);:.: . REGEL|
000001A0: 41 46 53 54 41 4E 44 20 31 2F 38 20 49 4E 43 48 |AFSTAND 1/8 INCH|
000001B0: 00 B6 09 1C 02 3A 00 D5 09 26 02 98 34 2C 4D 4D |.....:...&..4,MM|
000001C0: 24 3B C7 28 31 29 3B 3A 8E 3A 20 20 20 20 8F 20 |$;.(1);:.: . |
000001D0: 45 4C 49 54 45 00 DB 09 30 02 3A 00 FE 09 3A 02 |ELITE...0.:...:.|
000001E0: 98 34 2C 4D 4D 24 3B C7 28 34 29 3B 3A 8E 3A 20 |.4,MM$;.(4);:.: |
000001F0: 20 20 20 8F 20 43 4F 4E 44 45 4E 53 45 44 00 04 | . CONDENSED..|
00000200: 0A 44 02 3A 00 38 0A 4E 02 98 34 2C 4D 4D 24 3B |.D.:.8.N..4,MM$;|
00000210: C7 28 30 29 3B 3A 98 34 2C 45 53 24 3B C7 28 31 |.(0);:.4,ES$;.(1|
00000220: 32 30 29 3B C7 28 34 39 29 3B 3A 8E 3A 20 8F 20 |20);.(49);:.: . |
00000230: 50 49 43 41 20 4E 4C 51 00 3E 0A 58 02 3A 00 62 |PICA NLQ.>.X.:.b|
00000240: 0A 62 02 98 34 2C 4D 4D 24 3B C7 28 31 AA 31 36 |.b..4,MM$;.(1.16|
00000250: 29 3B 3A 8E 3A 20 8F 20 45 4C 49 54 45 2B 42 4F |);:.: . ELITE+BO|
00000260: 4C 44 00 68 0A 6C 02 3A 00 90 0A 76 02 98 34 2C |LD.h.l.:...v..4,|
00000270: 4D 4D 24 3B C7 28 34 AA 31 36 29 3B 3A 8E 3A 20 |MM$;.(4.16);:.: |
00000280: 8F 20 43 4F 4E 44 45 4E 53 45 44 2B 42 4F 4C 44 |. CONDENSED+BOLD|
00000290: 00 96 0A 80 02 3A 00 BA 0A 8A 02 98 34 2C 45 53 |.....:......4,ES|
000002A0: 24 3B C7 28 35 32 29 3B 3A 8E 3A 20 20 20 8F 20 |$;.(52);:.: . |
000002B0: 49 54 41 4C 49 43 20 41 41 4E 00 C0 0A 94 02 3A |ITALIC AAN.....:|
000002C0: 00 E4 0A 9E 02 98 34 2C 45 53 24 3B C7 28 35 33 |......4,ES$;.(53|
000002D0: 29 3B 3A 8E 3A 20 20 20 8F 20 49 54 41 4C 49 43 |);:.: . ITALIC|
000002E0: 20 55 49 54 00 EA 0A A8 02 3A 00 15 0B B2 02 98 | UIT.....:......|
000002F0: 34 2C 45 53 24 3B C7 28 31 30 34 29 3B C7 28 31 |4,ES$;.(104);.(1|
00000300: 29 3B 3A 8E 3A 20 20 8F 20 44 55 42 42 45 4C 20 |);:.: . DUBBEL |
00000310: 47 52 4F 4F 54 00 1B 0B BC 02 3A 00 3D 0B C6 02 |GROOT.....:.=...|
00000320: 98 34 2C 45 53 24 3B C7 28 31 32 30 29 3B C7 28 |.4,ES$;.(120);.(|
00000330: 34 39 29 3B 3A 8E 3A 20 8F 20 4E 4C 51 00 43 0B |49);:.: . NLQ.C.|
00000340: D0 02 3A 00 67 0B DA 02 98 34 2C 45 53 24 3B C7 |..:.g....4,ES$;.|
00000350: 28 31 32 30 29 3B C7 28 34 38 29 3B 3A 8E 3A 20 |(120);.(48);:.: |
00000360: 8F 20 44 52 41 46 54 00 6D 0B E4 02 3A 00 97 0B |. DRAFT.m...:...|
00000370: EE 02 98 34 2C 45 53 24 3B C7 28 38 33 29 3B C7 |...4,ES$;.(83);.|
00000380: 28 34 38 29 3B 3A 20 8E 3A 20 8F 20 53 55 50 45 |(48);: .: . SUPE|
00000390: 52 53 43 52 49 50 54 00 9D 0B F8 02 3A 00 BD 0B |RSCRIPT.....:...|
000003A0: 02 03 8D 35 39 30 3B 3A 98 34 2C 45 53 24 3B C7 |...590;:.4,ES$;.|
000003B0: 28 34 35 29 3B C7 28 34 39 29 3B 3A 8E 00 C3 0B |(45);.(49);:....|
000003C0: 0C 03 3A 00 EC 0B 16 03 98 34 2C 45 53 24 3B C7 |..:......4,ES$;.|
000003D0: 28 34 35 29 3B C7 28 34 38 29 3B 3A 8E 3A 8F 20 |(45);.(48);:.:. |
000003E0: 4F 4E 44 45 52 53 54 52 2E 55 49 54 00 F2 0B 20 |ONDERSTR.UIT... |
000003F0: 03 3A 00 1C 0C 2A 03 98 34 2C 45 53 24 3B C7 28 |.:...*..4,ES$;.(|
00000400: 34 35 29 3B C7 28 34 39 29 3B 3A 8E 3A 8F 20 4F |45);.(49);:.:. O|
00000410: 4E 44 45 52 53 54 52 45 50 49 4E 47 00 22 0C 34 |NDERSTREPING.".4|
00000420: 03 3A 00 3C 0C 3E 03 98 34 2C 4D 4D 24 2C C7 28 |.:.<.>..4,MM$,.(|
00000430: 30 29 3B 3A 8E 3A 8F 20 50 49 43 41 00 42 0C 48 |0);:.:. PICA.B.H|
00000440: 03 3A 00 6B 0C 52 03 98 34 2C 45 53 24 3B C7 28 |.:.k.R..4,ES$;.(|
00000450: 31 30 34 29 3B C7 28 31 29 3B 3A 8E 3A 8F 20 44 |104);.(1);:.:. D|
00000460: 55 42 42 45 4C 20 47 52 4F 4F 54 00 71 0C 5C 03 |UBBEL GROOT.q.\.|
00000470: 3A 00 9C 0C 66 03 98 34 2C 45 53 24 3B C7 28 36 |:...f..4,ES$;.(6|
00000480: 37 29 3B C7 28 30 29 3B C7 28 33 29 3B 3A 8E 3A |7);.(0);.(3);:.:|
00000490: 8F 20 42 4C 5A 3D 33 20 49 4E 43 48 00 A2 0C 70 |. BLZ=3 INCH...p|
000004A0: 03 3A 00 C9 0C 7A 03 98 34 2C 45 53 24 3B C7 28 |.:...z..4,ES$;.(|
000004B0: 35 31 29 3B C7 28 32 37 29 3B 3A 8E 3A 8F 32 37 |51);.(27);:.:.27|
000004C0: 2F 32 31 36 20 49 4E 43 48 00 F5 0C E8 03 81 20 |/216 INCH...... |
000004D0: 4A B2 31 20 A4 31 32 20 3A 98 39 2C 22 A2 A2 A2 |J.1 .12 :.9,"...|
000004E0: A2 A2 A2 A2 A2 A2 A2 22 3B 3A 82 4A 3A 98 39 2C |.......";:.J:.9,|
000004F0: 22 A2 22 3A 8E 00 FB 0C F2 03 3A 00 27 0D FC 03 |".":......:.'...|
00000500: 81 20 4A B2 31 20 A4 31 32 20 3A 98 39 2C 22 A4 |. J.1 .12 :.9,".|
00000510: A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3B 3A 82 4A 3A 98 |.........";:.J:.|
00000520: 39 2C 22 A4 22 3A 8E 00 2D 0D 06 04 3A 00 58 0D |9,".":..-...:.X.|
00000530: 10 04 98 34 2C 45 53 24 3B C7 28 36 37 29 3B C7 |...4,ES$;.(67);.|
00000540: 28 30 29 3B C7 28 36 29 3B 3A 8E 3A 20 8F 20 42 |(0);.(6);:.: . B|
00000550: 4C 5A 3D 36 49 4E 43 48 00 5E 0D 1A 04 3A 00 89 |LZ=6INCH.^...:..|
00000560: 0D 24 04 98 34 2C 45 53 24 3B C7 28 37 38 29 3B |.$..4,ES$;.(78);|
00000570: C7 28 30 29 3B 3A 8E 3A 20 20 20 8F 20 4F 4E 44 |.(0);:.: . OND|
00000580: 45 52 4D 41 52 47 45 3D 30 00 8F 0D 2E 04 3A 00 |ERMARGE=0.....:.|
00000590: BB 0D 38 04 98 34 2C 45 53 24 3B C7 28 31 31 34 |..8..4,ES$;.(114|
000005A0: 29 3B C7 28 30 29 3B 3A 8E 3A 20 20 20 8F 20 42 |);.(0);:.: . B|
000005B0: 4F 56 45 4E 4D 41 52 47 45 3D 30 00 C1 0D 42 04 |OVENMARGE=0...B.|
000005C0: 3A 00 EC 0D D0 07 98 34 2C 45 53 24 3B C7 28 36 |:......4,ES$;.(6|
000005D0: 37 29 3B C7 28 30 29 3B C7 28 32 29 3B 3A 8E 3A |7);.(0);.(2);:.:|
000005E0: 8F 20 42 4C 5A 3D 32 20 49 4E 43 48 00 F2 0D DA |. BLZ=2 INCH....|
000005F0: 07 3A 00 19 0E E4 07 99 22 93 12 20 20 20 20 2B |.:......".. +|
00000600: 20 20 20 3D 20 45 54 49 4B 45 54 20 54 52 41 4E | = ETIKET TRAN|
00000610: 53 50 4F 52 54 20 22 3A 99 00 3B 0E EE 07 99 22 |SPORT ":..;...."|
00000620: 12 20 53 50 41 54 49 45 20 3D 20 56 45 52 56 4F |. SPATIE = VERVO|
00000630: 4C 47 20 20 20 20 20 20 20 20 22 00 45 0E F3 07 |LG ".E...|
00000640: 8D 32 30 37 30 00 5A 0E F8 07 A1 20 41 24 3A 8B |.2070.Z.... A$:.|
00000650: 41 24 B2 22 22 A7 32 30 34 30 00 72 0E FD 07 8B |A$."".2040.r....|
00000660: 20 41 24 B2 22 2B 22 20 A7 20 98 34 2C C7 28 31 | A$."+" . .4,.(1|
00000670: 32 29 00 86 0E FF 07 8B 20 41 24 B2 C7 28 33 32 |2)...... A$..(32|
00000680: 29 20 A7 20 98 34 00 8C 0E 02 08 8E 00 92 0E 0C |) . .4..........|
00000690: 08 3A 00 BD 0E 16 08 98 34 2C 45 53 24 3B C7 28 |.:......4,ES$;.(|
000006A0: 36 37 29 3B C7 28 31 32 29 3B 3A 8E 3A 20 8F 20 |67);.(12);:.: . |
000006B0: 42 4C 5A 3D 31 32 20 52 45 47 45 4C 53 00 C3 0E |BLZ=12 REGELS...|
000006C0: 20 08 3A 00 DC 0E 8C 23 8F 2A 2A 2A 2A 2A 2A 2A | .:....#.*******|
000006D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F5 0E 96 |************....|
000006E0: 23 8F 2A 2A 2A 20 56 4F 4F 52 52 41 41 44 4B 52 |#.*** VOORRAADKR|
000006F0: 54 20 2A 2A 2A 00 0E 0F A0 23 8F 2A 2A 2A 20 38 |T ***....#.*** 8|
00000700: 38 30 34 32 30 20 20 20 20 20 20 2A 2A 2A 00 27 |80420 ***.'|
00000710: 0F AA 23 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..#.************|
00000720: 2A 2A 2A 2A 2A 2A 2A 00 2D 0F B4 23 3A 00 33 0F |*******.-..#:.3.|
00000730: BE 23 3A 00 50 0F C8 23 8F 2A 2A 2A 20 56 4F 4F |.#:.P..#.*** VOO|
00000740: 52 52 41 41 44 4B 52 54 2D 36 20 20 20 2A 2A 2A |RRAADKRT-6 ***|
00000750: 00 6E 0F D2 23 8D 35 33 30 3A 8F 20 52 45 47 45 |.n..#.530:. REGE|
00000760: 4C 41 46 53 54 20 31 2F 38 20 49 4E 43 48 00 74 |LAFST 1/8 INCH.t|
00000770: 0F 22 24 3A 00 7A 0F 2C 24 3A 00 B5 0F 36 24 99 |."$:.z.,$:...6$.|
00000780: 22 93 31 20 12 D5 49 54 44 52 41 41 49 20 28 D3 |".1 ..ITDRAAI (.|
00000790: 54 41 52 20 CE CC 2D 31 30 29 22 3A 99 20 20 20 |TAR ..-10)":. |
000007A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.|
000007B0: 20 32 36 35 30 00 CC 0F 40 24 99 22 32 20 12 CB | 2650...@$."2 ..|
000007C0: 4F 52 52 45 43 54 49 45 20 22 3A 99 00 F0 0F 4A |ORRECTIE ":....J|
000007D0: 24 99 22 33 20 12 C9 4E 48 4F 55 44 53 4F 50 47 |$."3 ..NHOUDSOPG|
000007E0: 41 56 45 20 4F 50 20 4E 55 4D 4D 45 52 22 3A 99 |AVE OP NUMMER":.|
000007F0: 00 17 10 54 24 99 22 34 20 12 CB 4F 50 49 45 52 |...T$."4 ..OPIER|
00000800: 45 4E 20 4E 41 41 52 20 4E 49 45 55 57 20 4E 55 |EN NAAR NIEUW NU|
00000810: 4D 4D 45 52 22 3A 99 00 39 10 5E 24 99 22 35 20 |MMER":..9.^$."5 |
00000820: 12 CE 49 45 55 57 20 46 49 4C 45 20 53 43 48 52 |..IEUW FILE SCHR|
00000830: 49 4A 56 45 4E 20 22 3A 99 00 5B 10 68 24 99 22 |IJVEN ":..[.h$."|
00000840: 36 20 12 D3 50 4F 4F 4C 49 4E 47 20 49 4E 48 4F |6 ..POOLING INHO|
00000850: 55 44 53 46 49 4C 45 20 22 3A 99 00 77 10 72 24 |UDSFILE ":..w.r$|
00000860: 99 22 37 20 12 C1 52 52 41 59 20 55 49 54 44 52 |."7 ..RRAY UITDR|
00000870: 41 41 49 92 22 3A 99 00 9C 10 7C 24 99 22 38 20 |AAI.":....|$."8 |
00000880: 12 C9 4E 48 4F 55 44 53 46 49 4C 45 2F 44 49 4D |..NHOUDSFILE/DIM|
00000890: 2D 49 4E 48 2E 46 49 4C 45 22 3A 99 00 BC 10 86 |-INH.FILE":.....|
000008A0: 24 99 22 39 20 12 D0 52 49 4E 54 45 4E 20 49 4E |$."9 ..RINTEN IN|
000008B0: 48 4F 55 44 53 4F 50 47 41 56 45 22 00 CB 10 90 |HOUDSOPGAVE"....|
000008C0: 24 8D 20 35 35 30 3A 8D 35 33 30 00 D1 10 9A 24 |$. 550:.530....$|
000008D0: 3A 00 E9 10 A4 24 A1 20 41 24 3A 20 8B 41 24 B2 |:....$. A$: .A$.|
000008E0: 22 22 20 A7 20 39 33 38 30 00 2A 11 AE 24 91 20 |"" . 9380.*..$. |
000008F0: C5 28 41 24 29 20 89 20 31 31 30 33 30 2C 39 34 |.(A$) . 11030,94|
00000900: 33 30 2C 39 36 32 30 2C 39 38 33 30 2C 31 30 30 |30,9620,9830,100|
00000910: 39 30 2C 31 31 36 33 30 2C 31 30 35 35 30 2C 31 |90,11630,10550,1|
00000920: 30 36 34 30 2C 31 32 31 30 30 00 34 11 B8 24 89 |0640,12100.4..$.|
00000930: 39 32 37 30 00 3A 11 BD 24 3A 00 40 11 C2 24 3A |9270.:..$:.@..$:|
00000940: 00 57 11 CC 24 8F 2A 2A 2A 20 4B 4F 52 52 45 4B |.W..$.*** KORREK|
00000950: 54 49 45 20 2A 2A 2A 00 6D 11 D6 24 99 22 93 12 |TIE ***.m..$."..|
00000960: 4B 4F 52 52 45 4B 54 49 45 92 22 3A 99 00 85 11 |KORREKTIE.":....|
00000970: E0 24 8D 31 30 34 38 30 3A 8F 20 46 49 4C 45 20 |.$.10480:. FILE |
00000980: 4C 45 5A 45 4E 00 95 11 EA 24 81 20 49 B2 30 20 |LEZEN....$. I.0 |
00000990: A4 20 31 31 33 00 A4 11 F4 24 58 B2 C3 28 41 24 |. 113....$X..(A$|
000009A0: 28 49 29 29 00 D2 11 FE 24 99 49 3B 3A 99 22 20 |(I))....$.I;:." |
000009B0: 20 22 3B 3A 99 22 12 22 3B 41 24 28 49 29 3B 22 | ";:.".";A$(I);"|
000009C0: 92 22 3A 8B 20 58 B1 33 33 20 A7 20 89 20 39 34 |.":. X.33 . . 94|
000009D0: 39 30 00 E4 11 08 25 85 22 91 1D 1D 1D 22 3B 41 |90....%."....";A|
000009E0: 24 28 49 29 00 01 12 12 25 8B 20 58 B1 33 33 20 |$(I)....%. X.33 |
000009F0: A7 20 85 22 91 91 1D 1D 1D 22 3B 41 24 28 49 29 |. .".....";A$(I)|
00000A00: 3A 00 38 12 15 25 8B 20 C8 28 41 24 28 49 29 2C |:.8..%. .(A$(I),|
00000A10: 31 29 B2 22 5E 22 20 A7 20 41 24 28 49 29 B2 C9 |1)."^" . A$(I)..|
00000A20: 28 41 24 28 49 29 2C C3 28 41 24 28 49 29 29 AB |(A$(I),.(A$(I)).|
00000A30: 31 29 3A 49 B2 49 AB 32 00 42 12 1C 25 99 3A 82 |1):I.I.2.B..%.:.|
00000A40: 20 49 00 71 12 26 25 99 22 12 44 52 55 4B 20 56 | I.q.&%.".DRUK V|
00000A50: 4F 4F 52 20 4F 50 53 4C 41 47 20 4F 50 20 2A 20 |OOR OPSLAG OP * |
00000A60: 22 3A 8B 20 41 24 B2 22 2A 22 20 A7 20 39 35 33 |":. A$."*" . 953|
00000A70: 30 00 8A 12 30 25 A1 20 41 24 3A 8B 41 24 B3 B1 |0...0%. A$:.A$..|
00000A80: 22 2A 22 20 A7 20 39 35 31 30 00 A8 12 3A 25 9F |"*" . 9510...:%.|
00000A90: 32 2C 38 2C 33 2C 22 40 30 3A 22 AA 41 24 28 31 |2,8,3,"@0:".A$(1|
00000AA0: 29 AA 22 2C 53 2C 57 22 00 B8 12 44 25 81 20 49 |).",S,W"...D%. I|
00000AB0: B2 30 20 A4 20 31 31 33 00 C5 12 4E 25 98 32 2C |.0 . 113...N%.2,|
00000AC0: 41 24 28 49 29 00 CC 12 58 25 82 49 00 D3 12 62 |A$(I)...X%.I...b|
00000AD0: 25 A0 32 00 DD 12 6C 25 89 39 32 37 30 00 E3 12 |%.2...l%.9270...|
00000AE0: 76 25 3A 00 E9 12 80 25 3A 00 18 13 8A 25 8F 2A |v%:....%:....%.*|
00000AF0: 2A 2A 20 56 4F 4F 52 53 43 48 52 49 46 54 4E 41 |** VOORSCHRIFTNA|
00000B00: 4D 45 4E 20 4C 45 5A 45 4E 20 45 4E 20 50 52 49 |MEN LEZEN EN PRI|
00000B10: 4E 54 45 4E 20 2A 2A 2A 00 4A 13 94 25 99 22 93 |NTEN ***.J..%.".|
00000B20: 22 3A 99 22 12 C9 4E 44 49 45 4E 20 54 45 52 55 |":."..NDIEN TERU|
00000B30: 47 20 4E 41 41 52 20 4D 45 4E 55 20 54 4F 45 54 |G NAAR MENU TOET|
00000B40: 53 3A 20 40 20 92 22 20 3A 99 00 73 13 9E 25 99 |S: @ ." :..s..%.|
00000B50: 22 12 49 4E 44 49 45 4E 20 56 45 52 56 4F 4C 47 |".INDIEN VERVOLG|
00000B60: 20 3A 54 4F 45 54 53 20 53 50 41 54 49 45 42 41 | :TOETS SPATIEBA|
00000B70: 4C 4B 22 00 8B 13 A8 25 A1 20 41 24 3A 8B 20 41 |LK"....%. A$:. A|
00000B80: 24 B2 22 40 22 A7 20 39 32 37 30 00 9E 13 B2 25 |$."@". 9270....%|
00000B90: 8B 20 41 24 B2 22 58 22 A7 20 39 32 37 30 00 B1 |. A$."X". 9270..|
00000BA0: 13 BC 25 8B 20 41 24 B2 22 22 20 89 20 39 36 34 |..%. A$."" . 964|
00000BB0: 30 00 E3 13 C6 25 99 3A 85 22 45 45 52 53 54 45 |0....%.:."EERSTE|
00000BC0: 20 20 46 49 4C 45 4E 55 4D 4D 45 52 22 3B 45 20 | FILENUMMER";E |
00000BD0: 3A 99 3A A0 31 3A 20 9F 31 2C 34 2C 37 3A 8D 20 |:.:.1: .1,4,7:. |
00000BE0: 35 39 30 00 FF 13 D0 25 85 22 4C 41 41 54 53 54 |590....%."LAATST|
00000BF0: 45 20 46 49 4C 45 4E 55 4D 4D 45 52 22 3B 47 00 |E FILENUMMER";G.|
00000C00: 36 14 DA 25 81 20 4E B2 45 20 A4 20 47 3A 8F 20 |6..%. N.E . G:. |
00000C10: 51 3D 28 2D 31 29 2A 4E 3A 52 45 4D 20 4E 4E 3D |Q=(-1)*N:REM NN=|
00000C20: 41 42 53 28 51 29 3A 52 45 4D 20 4E 24 3D 53 54 |ABS(Q):REM N$=ST|
00000C30: 52 24 28 4E 4E 29 00 4A 14 E4 25 4E 24 B2 C4 28 |R$(NN).J..%N$..(|
00000C40: 4E 29 3A 50 B2 C3 28 4E 24 29 00 5B 14 EE 25 51 |N):P..(N$).[..%Q|
00000C50: 24 B2 C9 28 4E 24 2C 50 AB 31 29 00 76 14 F8 25 |$..(N$,P.1).v..%|
00000C60: 9F 20 32 2C 38 2C 33 2C 22 30 3A 22 AA 51 24 AA |. 2,8,3,"0:".Q$.|
00000C70: 22 2C 53 2C 52 22 00 83 14 02 26 81 20 49 B2 30 |",S,R"....&. I.0|
00000C80: A4 20 35 00 90 14 0C 26 84 32 2C 41 24 28 49 29 |. 5....&.2,A$(I)|
00000C90: 00 9C 14 16 26 82 20 49 3A 20 A0 32 00 A8 14 20 |....&. I: .2... |
00000CA0: 26 9F 20 32 2C 34 2C 37 00 B6 14 2A 26 54 41 24 |&. 2,4,7...*&TA$|
00000CB0: B2 C7 28 31 36 29 00 E8 14 34 26 98 32 2C 41 24 |..(16)...4&.2,A$|
00000CC0: 28 31 29 3B 54 41 24 3B 22 30 36 22 3B 41 24 28 |(1);TA$;"06";A$(|
00000CD0: 32 29 3B 54 41 24 3B 22 34 30 22 3B 41 24 28 33 |2);TA$;"40";A$(3|
00000CE0: 29 3A A0 32 20 3A 82 4E 00 F8 14 3E 26 8D 38 33 |):.2 :.N...>&.83|
00000CF0: 30 20 3A 89 39 36 32 30 00 FE 14 48 26 3A 00 04 |0 :.9620...H&:..|
00000D00: 15 52 26 3A 00 17 15 5C 26 8F 2A 2A 2A 20 4B 4F |.R&:...\&.*** KO|
00000D10: 50 49 45 20 2A 2A 2A 00 3B 15 66 26 99 22 93 12 |PIE ***.;.f&."..|
00000D20: 4B 4F 50 49 45 20 4F 4E 44 45 52 20 4E 49 45 55 |KOPIE ONDER NIEU|
00000D30: 57 20 46 49 4C 45 4E 52 22 3A 99 00 6F 15 69 26 |W FILENR":..o.i&|
00000D40: 99 22 93 12 11 C4 4F 45 20 54 45 20 4B 4F 50 49 |."....OE TE KOPI|
00000D50: 45 52 45 4E 20 46 4C 4F 50 20 49 4E 20 44 52 49 |EREN FLOP IN DRI|
00000D60: 56 45 20 45 4E 20 54 4F 45 54 53 20 22 3A 99 00 |VE EN TOETS ":..|
00000D70: 83 15 6C 26 A1 41 24 3A 8B 41 24 B2 22 22 A7 39 |..l&.A$:.A$."".9|
00000D80: 38 33 36 00 9C 15 70 26 8D 20 31 30 34 38 30 3A |836...p&. 10480:|
00000D90: 8F 20 46 49 4C 45 20 4C 45 5A 45 4E 00 CE 15 73 |. FILE LEZEN...s|
00000DA0: 26 99 22 12 11 C4 4F 45 20 4F 4E 54 56 41 4E 47 |&."...OE ONTVANG|
00000DB0: 45 4E 44 45 20 46 4C 4F 50 20 49 4E 20 44 52 49 |ENDE FLOP IN DRI|
00000DC0: 56 45 20 45 4E 20 54 4F 45 54 53 22 3A 99 00 E2 |VE EN TOETS":...|
00000DD0: 15 76 26 A1 41 24 3A 8B 41 24 B2 22 22 A7 39 38 |.v&.A$:.A$."".98|
00000DE0: 34 36 00 13 16 7A 26 9F 20 32 2C 38 2C 33 2C 22 |46...z&. 2,8,3,"|
00000DF0: 44 49 4D 20 49 4E 48 4F 55 44 53 46 49 4C 45 2C |DIM INHOUDSFILE,|
00000E00: 53 2C 52 22 3A 84 32 2C 55 4C 3A 84 32 2C 55 45 |S,R":.2,UL:.2,UE|
00000E10: 3A A0 32 00 1F 16 7F 26 55 4C B2 55 4C AA 31 00 |:.2....&UL.UL.1.|
00000E20: 59 16 84 26 42 24 B2 C4 28 55 4C 29 3A 42 B2 C3 |Y..&B$..(UL):B..|
00000E30: 28 42 24 29 3A 41 24 28 31 29 B2 C9 28 42 24 2C |(B$):A$(1)..(B$,|
00000E40: 42 AB 31 29 3A 99 22 93 D4 4F 45 54 53 20 53 50 |B.1):."..OETS SP|
00000E50: 41 54 49 45 42 41 4C 4B 22 00 70 16 8E 26 A1 20 |ATIEBALK".p..&. |
00000E60: 41 24 3A 8B 41 24 B2 22 22 20 89 20 39 38 37 30 |A$:.A$."" . 9870|
00000E70: 00 8E 16 98 26 9F 20 32 2C 38 2C 33 2C 22 30 3A |....&. 2,8,3,"0:|
00000E80: 22 AA 41 24 28 31 29 AA 22 2C 53 2C 57 22 00 9E |".A$(1).",S,W"..|
00000E90: 16 A2 26 81 20 49 B2 30 20 A4 20 31 31 33 00 B4 |..&. I.0 . 113..|
00000EA0: 16 AC 26 98 32 2C 41 24 28 49 29 3A 82 20 49 3A |..&.2,A$(I):. I:|
00000EB0: 20 A0 20 32 00 F0 16 B6 26 9F 20 32 2C 38 2C 33 | . 2....&. 2,8,3|
00000EC0: 2C 22 40 3A 44 49 4D 20 49 4E 48 4F 55 44 53 46 |,"@:DIM INHOUDSF|
00000ED0: 49 4C 45 2C 53 2C 57 22 3A 98 32 2C 41 24 28 31 |ILE,S,W":.2,A$(1|
00000EE0: 29 3A 98 32 2C 55 45 3A A0 32 3A 89 39 32 37 30 |):.2,UE:.2:.9270|
00000EF0: 00 F6 16 C0 26 3A 00 0F 17 CA 26 8F 2A 2A 2A 20 |....&:....&.*** |
00000F00: 53 55 42 52 4F 55 54 49 4E 45 53 20 2A 2A 2A 00 |SUBROUTINES ***.|
00000F10: 15 17 D4 26 3A 00 26 17 DE 26 8D 31 30 32 30 3A |...&:.&..&.1020:|
00000F20: 8D 35 37 30 3A 8E 00 2C 17 E8 26 3A 00 4B 17 F2 |.570:..,..&:.K..|
00000F30: 26 8F 2A 2A 2A 20 42 49 4A 57 45 52 4B 45 4E 20 |&.*** BIJWERKEN |
00000F40: 49 4E 48 4F 55 44 53 46 49 4C 45 00 68 17 FC 26 |INHOUDSFILE.h..&|
00000F50: 9F 32 2C 38 2C 32 2C 22 49 4E 48 4F 55 44 53 46 |.2,8,2,"INHOUDSF|
00000F60: 49 4C 45 2C 53 2C 41 22 00 75 17 06 27 98 32 2C |ILE,S,A".u..'.2,|
00000F70: 41 24 28 31 29 00 82 17 09 27 98 32 2C 41 24 28 |A$(1)....'.2,A$(|
00000F80: 32 29 00 8F 17 0B 27 98 32 2C 41 24 28 32 29 00 |2)....'.2,A$(2).|
00000F90: 98 17 10 27 A0 32 3A 8E 00 9E 17 11 27 3A 00 BF |...'.2:.....':..|
00000FA0: 17 74 27 8F 2A 2A 2A 4E 49 45 55 57 20 46 49 4C |.t'.***NIEUW FIL|
00000FB0: 45 20 53 43 48 52 49 4A 56 45 4E 20 2A 2A 2A 00 |E SCHRIJVEN ***.|
00000FC0: C8 17 7E 27 99 22 93 22 00 FD 17 88 27 99 22 12 |..~'."."....'.".|
00000FD0: 20 20 20 2A 2A 2A 20 53 43 48 52 49 4A 56 45 4E | *** SCHRIJVEN|
00000FE0: 20 56 41 4E 20 45 45 4E 20 4E 49 45 55 57 20 46 | VAN EEN NIEUW F|
00000FF0: 49 4C 45 20 2A 2A 2A 20 22 3A 99 3A 99 00 38 18 |ILE *** ":.:..8.|
00001000: 92 27 8D 20 31 31 39 39 30 3A 20 99 22 12 48 45 |.'. 11990: .".HE|
00001010: 54 20 4C 41 41 54 53 54 20 49 4E 47 45 42 52 41 |T LAATST INGEBRA|
00001020: 43 48 54 45 20 46 49 4C 45 2D 4E 52 20 49 53 20 |CHTE FILE-NR IS |
00001030: 22 3B 55 4C 3A 99 3A 99 00 5F 18 9C 27 85 22 44 |";UL:.:.._..'."D|
00001040: 49 4D 45 4E 53 49 45 20 56 41 4E 20 44 45 20 42 |IMENSIE VAN DE B|
00001050: 45 52 45 49 44 49 4E 47 22 3B 41 24 28 30 29 00 |EREIDING";A$(0).|
00001060: 78 18 A1 27 8B 20 41 24 28 30 29 B2 22 40 22 20 |x..'. A$(0)."@" |
00001070: A7 20 89 20 39 32 37 30 00 9F 18 A6 27 42 24 B2 |. . 9270....'B$.|
00001080: C4 28 55 4C AA 31 29 3A 42 B2 C3 28 42 24 29 3A |.(UL.1):B..(B$):|
00001090: 41 24 28 31 29 B2 C9 28 42 24 2C 42 AB 31 29 00 |A$(1)..(B$,B.1).|
000010A0: AD 18 B0 27 55 4C 24 B2 41 24 28 31 29 00 BD 18 |...'UL$.A$(1)...|
000010B0: BA 27 55 4C B2 C5 28 41 24 28 31 29 29 00 C6 18 |.'UL..(A$(1))...|
000010C0: C4 27 45 B2 55 4C 00 CF 18 CE 27 47 B2 55 4C 00 |.'E.UL....'G.UL.|
000010D0: E5 18 D8 27 85 22 4E 45 44 2E 4E 41 41 4D 22 3B |...'."NED.NAAM";|
000010E0: 41 24 28 32 29 00 FB 18 E2 27 85 22 4C 41 54 2E |A$(2)....'."LAT.|
000010F0: 4E 41 41 4D 22 3B 41 24 28 33 29 00 14 19 EC 27 |NAAM";A$(3)....'|
00001100: 85 22 4B 41 41 52 54 2D 44 41 54 55 4D 22 3B 41 |."KAART-DATUM";A|
00001110: 24 28 34 29 00 50 19 F6 27 85 22 47 52 4F 4F 54 |$(4).P..'."GROOT|
00001120: 54 45 20 56 41 4E 20 48 45 54 20 56 4F 4F 52 53 |TE VAN HET VOORS|
00001130: 43 48 52 49 46 54 20 28 5A 4F 4E 44 45 52 20 44 |CHRIFT (ZONDER D|
00001140: 49 4D 45 4E 53 49 45 29 22 3B 41 24 28 30 35 29 |IMENSIE)";A$(05)|
00001150: 00 62 19 00 28 81 20 58 B2 30 20 A4 20 33 33 20 |.b..(. X.0 . 33 |
00001160: A9 33 00 86 19 0A 28 99 22 47 52 4F 4E 44 53 54 |.3....(."GRONDST|
00001170: 4F 46 22 3B 58 AD 33 AA 31 3B 3A 85 20 41 24 28 |OF";X.3.1;:. A$(|
00001180: 58 AA 36 AA 30 29 00 B1 19 14 28 99 22 48 4F 45 |X.6.0)....(."HOE|
00001190: 56 45 45 4C 48 45 49 44 20 53 54 4F 46 22 3B 58 |VEELHEID STOF";X|
000011A0: AD 33 AA 31 3B 3A 85 20 41 24 28 58 AA 36 AA 31 |.3.1;:. A$(X.6.1|
000011B0: 29 00 D4 19 1E 28 99 22 44 49 4D 45 4E 53 49 45 |)....(."DIMENSIE|
000011C0: 22 3B 58 AD 33 AA 31 3B 3A 85 20 41 24 28 58 AA |";X.3.1;:. A$(X.|
000011D0: 36 AA 32 29 00 DB 19 28 28 82 58 00 E4 19 32 28 |6.2)...((.X...2(|
000011E0: 49 B2 34 31 00 F3 19 3C 28 81 20 58 B2 31 20 A4 |I.41...<(. X.1 .|
000011F0: 20 31 32 00 01 1A 46 28 81 20 59 B2 31 20 A4 20 | 12...F(. Y.1 . |
00001200: 33 00 0F 1A 50 28 81 20 5A B2 30 20 A4 20 31 00 |3...P(. Z.0 . 1.|
00001210: 30 1A 5A 28 8B 20 5A B2 30 20 A7 20 99 20 58 3B |0.Z(. Z.0 . . X;|
00001220: 59 3B 3A 49 B2 49 AA 31 3A 85 20 41 24 28 49 29 |Y;:I.I.1:. A$(I)|
00001230: 00 57 1A 64 28 8B 20 5A B2 31 20 A7 20 99 20 22 |.W.d(. Z.1 . . "|
00001240: 20 20 20 12 4F 50 4D 22 3B 3A 49 B2 49 AA 31 3A | .OPM";:I.I.1:|
00001250: 85 20 41 24 28 49 29 00 5F 1A 6E 28 82 20 5A 00 |. A$(I)._.n(. Z.|
00001260: 67 1A 78 28 82 20 59 00 6F 1A 82 28 82 20 58 00 |g.x(. Y.o..(. X.|
00001270: 8D 1A 8C 28 9F 20 32 2C 38 2C 32 2C 22 30 3A 22 |...(. 2,8,2,"0:"|
00001280: AA 41 24 28 31 29 AA 22 2C 53 2C 57 22 00 9D 1A |.A$(1).",S,W"...|
00001290: 96 28 81 20 49 B2 30 20 A4 20 31 31 33 00 AA 1A |.(. I.0 . 113...|
000012A0: A0 28 98 32 2C 41 24 28 49 29 00 B5 1A AA 28 82 |.(.2,A$(I)....(.|
000012B0: 20 49 3A A0 32 00 D9 1A B4 28 9F 20 32 2C 38 2C | I:.2....(. 2,8,|
000012C0: 32 2C 22 40 3A 44 49 4D 20 49 4E 48 4F 55 44 53 |2,"@:DIM INHOUDS|
000012D0: 46 49 4C 45 2C 53 2C 57 22 00 E3 1A BE 28 98 32 |FILE,S,W"....(.2|
000012E0: 2C 55 4C 00 ED 1A C3 28 98 32 2C 55 45 00 F4 1A |,UL....(.2,UE...|
000012F0: C8 28 A0 32 00 17 1B CD 28 8D 20 39 39 37 30 3A |.(.2....(. 9970:|
00001300: 8F 20 42 49 4A 57 45 52 4B 45 4E 20 49 4E 48 4F |. BIJWERKEN INHO|
00001310: 55 44 53 46 49 4C 45 00 21 1B D2 28 89 39 32 37 |UDSFILE.!..(.927|
00001320: 30 00 27 1B DC 28 3A 00 2D 1B E6 28 3A 00 6F 1B |0.'..(:.-..(:.o.|
00001330: F0 28 99 22 12 C4 CF C5 A0 C4 C5 A0 C6 CC CF D0 |.(."............|
00001340: D0 D9 A0 CD C5 D4 A0 C2 C5 D2 C5 C9 C4 C9 CE C7 |................|
00001350: D3 D6 CF CF D2 D3 C3 C8 D2 C9 C6 D4 C5 CE A0 C9 |................|
00001360: CE A0 C4 C5 A0 C4 D2 C9 D6 C5 22 3A 99 3A 99 00 |..........":.:..|
00001370: 8D 1B F5 28 85 22 12 D7 41 54 20 49 53 20 48 45 |...(."..AT IS HE|
00001380: 54 20 46 49 4C 45 2D 4E 52 22 3B 46 24 00 A3 1B |T FILE-NR";F$...|
00001390: FA 28 8B 20 46 24 B2 22 40 22 20 A7 20 89 20 39 |.(. F$."@" . . 9|
000013A0: 32 37 30 00 BE 1B 04 29 9F 20 32 2C 38 2C 33 2C |270....). 2,8,3,|
000013B0: 22 30 3A 22 AA 46 24 AA 22 2C 53 2C 52 22 00 CE |"0:".F$.",S,R"..|
000013C0: 1B 0E 29 81 20 49 B2 30 20 A4 20 31 31 33 00 DB |..). I.0 . 113..|
000013D0: 1B 18 29 84 32 2C 41 24 28 49 29 00 E7 1B 22 29 |..).2,A$(I)...")|
000013E0: 82 49 3A A0 32 3A 8E 00 ED 1B 2C 29 3A 00 F3 1B |.I:.2:....,):...|
000013F0: 2D 29 3A 00 0F 1C 36 29 8F 2A 2A 2A 20 41 52 52 |-):...6).*** ARR|
00001400: 41 59 20 55 49 54 44 52 41 41 49 20 2A 2A 2A 00 |AY UITDRAAI ***.|
00001410: 15 1C 37 29 3A 00 2A 1C 40 29 8D 20 31 30 34 38 |..7):.*.@). 1048|
00001420: 30 20 3A 8F 20 4C 41 44 45 4E 00 3C 1C 4A 29 8D |0 :. LADEN.<.J).|
00001430: 20 38 33 30 20 3A 8F 20 50 49 43 41 00 48 1C 54 | 830 :. PICA.H.T|
00001440: 29 9F 20 32 2C 34 2C 37 00 59 1C 5E 29 81 20 49 |). 2,4,7.Y.^). I|
00001450: B2 20 30 20 A4 20 31 31 33 00 6C 1C 68 29 98 32 |. 0 . 113.l.h).2|
00001460: 2C 49 3B 22 A1 22 3B 41 24 28 49 29 00 7E 1C 72 |,I;".";A$(I).~.r|
00001470: 29 82 20 49 3A A0 32 3A 89 20 39 32 37 30 00 84 |). I:.2:. 9270..|
00001480: 1C 7C 29 3A 00 8A 1C 7D 29 3A 00 AD 1C 86 29 8F |.|):...}):....).|
00001490: 2A 2A 2A 20 49 4E 48 4F 55 44 53 2D 46 49 4C 45 |*** INHOUDS-FILE|
000014A0: 20 41 41 4E 4D 41 4B 45 4E 20 2A 2A 2A 00 DF 1C | AANMAKEN ***...|
000014B0: 90 29 99 22 93 22 3A 99 22 12 C9 4E 44 49 45 4E |.).".":."..NDIEN|
000014C0: 20 54 45 52 55 47 20 4E 41 41 52 20 4D 45 4E 55 | TERUG NAAR MENU|
000014D0: 20 54 4F 45 54 53 3A 20 40 20 92 22 20 3A 99 00 | TOETS: @ ." :..|
000014E0: 08 1D 9A 29 99 22 12 49 4E 44 49 45 4E 20 56 45 |...).".INDIEN VE|
000014F0: 52 56 4F 4C 47 20 3A 54 4F 45 54 53 20 53 50 41 |RVOLG :TOETS SPA|
00001500: 54 49 45 42 41 4C 4B 22 00 20 1D A4 29 A1 20 41 |TIEBALK". ..). A|
00001510: 24 3A 8B 20 41 24 B2 22 40 22 A7 20 39 32 37 30 |$:. A$."@". 9270|
00001520: 00 34 1D AE 29 8B 20 41 24 B2 22 22 20 89 20 31 |.4..). A$."" . 1|
00001530: 30 36 36 30 00 51 1D B8 29 99 22 93 12 31 20 46 |0660.Q..)."..1 F|
00001540: 49 4C 45 20 55 49 54 42 52 45 49 44 45 4E 22 3A |ILE UITBREIDEN":|
00001550: 99 00 73 1D C2 29 99 22 12 32 20 49 4E 48 4F 55 |..s..).".2 INHOU|
00001560: 44 53 46 49 4C 45 20 56 45 52 56 41 4E 47 45 4E |DSFILE VERVANGEN|
00001570: 22 3A 99 00 A0 1D CC 29 99 22 12 33 20 44 49 4D |":.....).".3 DIM|
00001580: 20 49 4E 48 4F 55 44 53 46 49 4C 45 20 4F 50 4E | INHOUDSFILE OPN|
00001590: 49 45 57 20 49 4E 53 54 45 4C 4C 45 4E 22 3A 99 |IEW INSTELLEN":.|
000015A0: 00 B1 1D D6 29 A1 20 48 24 3A 48 B2 C5 28 48 24 |....). H$:H..(H$|
000015B0: 29 00 C5 1D E0 29 8B 20 48 24 B2 22 22 20 A7 20 |)....). H$."" . |
000015C0: 31 30 37 31 30 00 D6 1D EA 29 8B 20 48 B2 32 20 |10710....). H.2 |
000015D0: 89 31 31 36 39 30 00 E8 1D F4 29 8B 20 48 B2 31 |.11690....). H.1|
000015E0: 20 89 20 31 30 39 30 30 00 FA 1D FE 29 8B 20 48 | . 10900....). H|
000015F0: B2 33 20 89 20 31 32 30 34 30 00 0D 1E 08 2A 8B |.3 . 12040....*.|
00001600: 31 B3 48 B3 33 20 A7 20 31 30 37 31 30 00 31 1E |1.H.3 . 10710.1.|
00001610: 12 2A 9F 20 32 2C 38 2C 32 2C 22 30 3A 44 49 4D |.*. 2,8,2,"0:DIM|
00001620: 20 49 4E 48 4F 55 44 53 46 49 4C 45 2C 53 2C 52 | INHOUDSFILE,S,R|
00001630: 22 00 3E 1E 1C 2A 84 32 2C 55 4C 3A A0 32 00 56 |".>..*.2,UL:.2.V|
00001640: 1E 26 2A 8B 20 45 B2 47 20 A7 20 48 B2 31 3A 20 |.&*. E.G . H.1: |
00001650: 89 31 30 38 30 30 00 8D 1E 30 2A 81 20 4E B2 31 |.10800...0*. N.1|
00001660: 20 A4 20 55 3A 8F 20 51 3D 28 2D 31 29 2A 4E 3A | . U:. Q=(-1)*N:|
00001670: 52 45 4D 20 4E 4E 3D 41 42 53 28 51 29 3A 52 45 |REM NN=ABS(Q):RE|
00001680: 4D 20 4E 24 3D 53 54 52 24 28 4E 4E 29 00 A1 1E |M N$=STR$(NN)...|
00001690: 3A 2A 4E 24 B2 C4 28 4E 29 3A 50 B2 C3 28 4E 24 |:*N$..(N):P..(N$|
000016A0: 29 00 C7 1E 44 2A 51 24 B2 C9 28 4E 24 2C 50 AB |)...D*Q$..(N$,P.|
000016B0: 31 29 20 3A 8F 20 51 24 3D 4E 24 5A 4F 4E 44 45 |1) :. Q$=N$ZONDE|
000016C0: 52 20 54 45 4B 45 4E 00 CE 1E 4E 2A A0 32 00 E9 |R TEKEN...N*.2..|
000016D0: 1E 58 2A 9F 20 32 2C 38 2C 33 2C 22 30 3A 22 AA |.X*. 2,8,3,"0:".|
000016E0: 51 24 AA 22 2C 53 2C 52 22 00 F6 1E 62 2A 81 20 |Q$.",S,R"...b*. |
000016F0: 49 B2 30 A4 20 33 00 05 1F 6C 2A 84 32 2C 42 24 |I.0. 3...l*.2,B$|
00001700: 28 4E 2C 49 29 00 18 1F 76 2A 82 20 49 3A 82 4E |(N,I)...v*. I:.N|
00001710: 3A 46 4C B2 31 3A A0 32 00 37 1F 80 2A 8B 20 48 |:FL.1:.2.7..*. H|
00001720: B2 32 20 89 20 31 31 36 39 30 20 3A 8F 20 56 45 |.2 . 11690 :. VE|
00001730: 52 56 41 4E 47 45 4E 00 57 1F 8A 2A 8B 20 48 B2 |RVANGEN.W..*. H.|
00001740: 31 20 89 20 31 30 39 30 30 20 3A 8F 20 55 49 54 |1 . 10900 :. UIT|
00001750: 42 52 45 49 44 45 4E 00 87 1F 94 2A 9F 20 32 2C |BREIDEN....*. 2,|
00001760: 38 2C 32 2C 22 49 4E 48 4F 55 44 53 46 49 4C 45 |8,2,"INHOUDSFILE|
00001770: 2C 53 2C 41 22 3A 8F 20 46 49 4C 45 20 55 49 54 |,S,A":. FILE UIT|
00001780: 42 52 45 49 44 45 4E 00 C1 1F 9E 2A 8B 20 48 B2 |BREIDEN....*. H.|
00001790: 32 20 A7 20 9F 20 32 2C 38 2C 32 2C 22 40 3A 49 |2 . . 2,8,2,"@:I|
000017A0: 4E 48 4F 55 44 53 46 49 4C 45 2C 53 2C 57 22 20 |NHOUDSFILE,S,W" |
000017B0: 3A 8F 20 46 49 4C 45 20 56 45 52 56 41 4E 47 45 |:. FILE VERVANGE|
000017C0: 4E 00 D4 1F A8 2A 8B 20 46 4C B2 31 20 89 20 31 |N....*. FL.1 . 1|
000017D0: 30 39 37 30 00 E1 1F B2 2A 98 32 2C 41 24 28 31 |0970....*.2,A$(1|
000017E0: 29 00 EE 1F BC 2A 98 32 2C 41 24 28 32 29 00 FB |)....*.2,A$(2)..|
000017F0: 1F C6 2A 98 32 2C 41 24 28 33 29 00 06 20 D0 2A |..*.2,A$(3).. .*|
00001800: 89 31 30 39 39 30 00 1F 20 DA 2A 81 20 4E B2 45 |.10990.. .*. N.E|
00001810: 20 A4 20 47 3A 20 81 20 49 B2 31 20 A4 20 33 00 | . G: . I.1 . 3.|
00001820: 37 20 E4 2A 98 32 2C 42 24 28 4E 2C 49 29 3A 82 |7 .*.2,B$(N,I):.|
00001830: 20 49 3A 20 82 20 4E 00 3E 20 EE 2A A0 32 00 49 | I: . N.> .*.2.I|
00001840: 20 F8 2A 89 20 39 32 37 30 00 4F 20 02 2B 3A 00 | .*. 9270.O .+:.|
00001850: 55 20 0C 2B 3A 00 82 20 16 2B 8F 2A 2A 2A 20 55 |U .+:.. .+.*** U|
00001860: 49 54 44 52 41 41 49 20 42 45 52 45 49 44 49 4E |ITDRAAI BEREIDIN|
00001870: 47 53 4B 41 41 52 54 20 2A 2A 2A 20 38 38 30 33 |GSKAART *** 8803|
00001880: 30 31 00 96 20 18 2B 99 22 93 12 D5 49 54 44 52 |01.. .+."...ITDR|
00001890: 41 41 49 22 3A 99 00 AF 20 1B 2B 98 34 2C 45 53 |AAI":... .+.4,ES|
000018A0: 24 3B C7 28 31 30 38 29 3B C7 28 34 29 3B 3A 00 |$;.(108);.(4);:.|
000018B0: C6 20 1D 2B 8D 20 31 30 34 30 3A 8F 20 42 4C 5A |. .+. 1040:. BLZ|
000018C0: 3D 36 49 4E 43 48 00 E3 20 1E 2B 98 34 2C 52 4C |=6INCH.. .+.4,RL|
000018D0: 24 3B 3A 98 34 2C 52 4C 24 3B 3A 98 34 2C 52 4C |$;:.4,RL$;:.4,RL|
000018E0: 24 3B 3A 00 FE 20 20 2B 9F 20 32 2C 34 2C 31 30 |$;:.. +. 2,4,10|
000018F0: 3A 98 32 3A A0 32 3A 8D 20 31 30 34 38 30 00 14 |:.2:.2:. 10480..|
00001900: 21 2A 2B 99 3A 99 22 93 12 22 3B 41 24 28 33 29 |!*+.:."..";A$(3)|
00001910: 3A 99 3A 99 00 45 21 34 2B 99 3A 99 22 12 56 4F |:.:..E!4+.:.".VO|
00001920: 4F 52 20 51 3D 31 20 48 4F 45 56 45 45 4C 48 45 |OR Q=1 HOEVEELHE|
00001930: 49 44 3A 22 41 24 28 35 29 3B 22 20 22 3B 41 24 |ID:"A$(5);" ";A$|
00001940: 28 30 29 3A 99 00 5C 21 3E 2B 85 22 12 57 41 41 |(0):..\!>+.".WAA|
00001950: 52 44 45 20 56 41 4E 20 51 22 3B 51 00 89 21 48 |RDE VAN Q";Q..!H|
00001960: 2B 8D 20 35 35 30 20 3A 98 39 2C 41 24 28 33 29 |+. 550 :.9,A$(3)|
00001970: 3B C7 28 31 36 29 3B 22 37 36 22 3B 22 46 49 4C |;.(16);"76";"FIL|
00001980: 45 2D 4E 52 2E 20 20 22 3B 00 A0 21 4D 2B 8D 37 |E-NR. ";..!M+.7|
00001990: 37 30 3A 98 39 2C 41 24 28 31 29 3A 8D 35 35 30 |70:.9,A$(1):.550|
000019A0: 00 B0 21 52 2B 98 39 2C 41 24 28 32 29 3A 98 39 |..!R+.9,A$(2):.9|
000019B0: 00 D6 21 5C 2B 42 33 B2 C5 28 41 24 28 35 29 29 |..!\+B3..(A$(5))|
000019C0: AC 51 3A 42 33 B2 B5 28 42 33 AC 31 30 30 AA 2E |.Q:B3..(B3.100..|
000019D0: 35 29 AD 31 30 30 00 FF 21 66 2B 98 39 2C 22 20 |5).100..!f+.9," |
000019E0: 20 20 20 43 48 41 52 47 45 47 52 4F 4F 54 54 45 | CHARGEGROOTTE|
000019F0: 3A 22 3B 42 33 3B 22 20 22 3B 41 24 28 30 29 00 |:";B3;" ";A$(0).|
00001A00: 4B 22 70 2B 53 53 24 B2 22 20 20 20 20 A2 A2 A2 |K"p+SS$." ...|
00001A10: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00001A20: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00001A30: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00001A40: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 22 00 61 22 7A 2B |..........".a"z+|
00001A50: 8D 20 35 35 30 3A 98 39 2C 53 53 24 3A 8D 35 37 |. 550:.9,SS$:.57|
00001A60: 30 00 6D 22 8E 2B 81 49 B2 31 A4 31 32 00 9D 22 |0.m".+.I.1.12.."|
00001A70: 93 2B 41 28 49 29 B2 C5 28 41 24 28 34 AA 33 AC |.+A(I)..(A$(4.3.|
00001A80: 49 29 29 AC 51 3A 41 28 49 29 B2 B5 28 31 30 30 |I)).Q:A(I)..(100|
00001A90: AC 41 28 49 29 AA 2E 35 29 AD 31 30 30 00 CA 22 |.A(I)..5).100.."|
00001AA0: 98 2B 47 24 28 49 29 B2 C4 28 41 28 49 29 29 3A |.+G$(I)..(A(I)):|
00001AB0: 20 47 24 28 49 29 B2 C9 28 47 24 28 49 29 2C C3 | G$(I)..(G$(I),.|
00001AC0: 28 47 24 28 49 29 29 AB 31 29 00 E9 22 9D 2B 8B |(G$(I)).1)..".+.|
00001AD0: 20 41 28 49 29 B3 31 20 A7 20 47 24 28 49 29 B2 | A(I).1 . G$(I).|
00001AE0: 22 30 22 AA 47 24 28 49 29 00 F0 22 AC 2B 82 49 |"0".G$(I)..".+.I|
00001AF0: 00 02 23 CA 2B 81 20 57 B2 33 20 A4 20 33 36 20 |..#.+. W.3 . 36 |
00001B00: A9 33 00 3B 23 D4 2B 8B 20 41 24 28 57 AA 33 29 |.3.;#.+. A$(W.3)|
00001B10: B2 22 2D 22 A7 8D 20 35 35 30 3A 98 39 2C 53 53 |."-".. 550:.9,SS|
00001B20: 24 3B 22 20 4B 41 41 52 54 3A 22 3B 41 24 28 34 |$;" KAART:";A$(4|
00001B30: 29 3A 98 39 3A 89 31 31 32 39 30 00 58 23 E8 2B |):.9:.11290.X#.+|
00001B40: 98 39 2C 22 20 20 20 20 20 20 A1 22 3B 54 24 3B |.9," .";T$;|
00001B50: 22 39 39 22 3B 22 A1 22 00 8A 23 F2 2B 98 39 2C |"99";"."..#.+.9,|
00001B60: 22 20 20 20 20 20 20 A1 20 43 48 41 52 47 45 A4 |" . CHARGE.|
00001B70: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00001B80: A4 A4 A4 A4 A4 A4 A4 20 22 3B 00 C2 23 FC 2B 98 |....... ";..#.+.|
00001B90: 39 2C 41 24 28 57 AA 33 29 3B 54 24 3B 22 38 30 |9,A$(W.3);T$;"80|
00001BA0: 22 3B 47 24 28 57 AD 33 29 3B 22 20 20 22 3B 41 |";G$(W.3);" ";A|
00001BB0: 24 28 57 AA 35 29 3B 54 24 3B 22 39 39 22 3B 22 |$(W.5);T$;"99";"|
00001BC0: A1 22 00 CA 23 06 2C 82 20 57 00 F0 23 10 2C 8D |."..#.,. W..#.,.|
00001BD0: 20 35 37 30 3A 20 98 39 2C 53 53 24 3B 22 20 4B | 570: .9,SS$;" K|
00001BE0: 41 41 52 54 3A 20 22 3B 41 24 28 34 29 3A 98 39 |AART: ";A$(4):.9|
00001BF0: 00 06 24 1A 2C 8D 20 35 33 30 3A 8D 35 37 30 3A |..$.,. 530:.570:|
00001C00: 8D 20 31 30 30 30 00 0F 24 24 2C 57 B2 34 32 00 |. 1000..$$,W.42.|
00001C10: 1F 24 2E 2C 81 20 55 55 B2 31 20 A4 20 31 32 00 |.$.,. UU.1 . 12.|
00001C20: 38 24 38 2C 8B 20 20 41 24 28 57 29 B2 22 40 22 |8$8,. A$(W)."@"|
00001C30: 20 A7 20 31 31 34 30 30 00 50 24 42 2C 8B 20 41 | . 11400.P$B,. A|
00001C40: 24 28 57 29 B2 22 58 22 20 A7 20 31 31 34 30 30 |$(W)."X" . 11400|
00001C50: 00 74 24 4C 2C 98 39 2C 55 55 3B 22 2A 22 3B 41 |.t$L,.9,UU;"*";A|
00001C60: 24 28 57 29 3B 54 24 3B 22 39 39 22 3B 41 24 28 |$(W);T$;"99";A$(|
00001C70: 57 AA 31 29 00 9A 24 56 2C 98 39 2C 22 20 20 20 |W.1)..$V,.9," |
00001C80: 20 22 3B 41 24 28 57 AA 32 29 3B 54 24 3B 22 39 | ";A$(W.2);T$;"9|
00001C90: 39 22 3B 41 24 28 57 AA 33 29 00 C0 24 60 2C 98 |9";A$(W.3)..$`,.|
00001CA0: 39 2C 22 20 20 20 20 22 3B 41 24 28 57 AA 34 29 |9," ";A$(W.4)|
00001CB0: 3B 54 24 3B 22 39 39 22 3B 41 24 28 57 AA 35 29 |;T$;"99";A$(W.5)|
00001CC0: 00 CB 24 6A 2C 8D 20 31 30 32 30 00 D5 24 74 2C |..$j,. 1020..$t,|
00001CD0: 57 B2 57 AA 36 00 DE 24 7E 2C 82 20 55 55 00 E9 |W.W.6..$~,. UU..|
00001CE0: 24 88 2C 8D 20 31 30 30 30 00 F3 24 92 2C 8D 20 |$.,. 1000..$.,. |
00001CF0: 35 35 30 00 09 25 9C 2C 53 24 B2 22 B9 B9 B9 B9 |550..%.,S$."....|
00001D00: B9 B9 B9 B9 B9 B9 B9 B9 22 00 29 25 A6 2C 98 39 |........".)%.,.9|
00001D10: 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 4F 50 |," OP|
00001D20: 42 52 45 4E 47 53 54 20 22 00 33 25 B0 2C 98 39 |BRENGST ".3%.,.9|
00001D30: 2C 53 24 00 4F 25 BA 2C 98 39 2C 22 20 20 20 20 |,S$.O%.,.9," |
00001D40: 20 20 20 20 20 20 20 20 43 48 41 52 47 45 22 00 | CHARGE".|
00001D50: 59 25 C4 2C 98 39 2C 53 24 00 80 25 CE 2C 98 39 |Y%.,.9,S$..%.,.9|
00001D60: 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 4E 41 |," NA|
00001D70: 41 4D 20 42 45 52 45 49 44 28 53 54 29 45 52 22 |AM BEREID(ST)ER"|
00001D80: 00 8A 25 D8 2C 98 39 2C 53 24 00 D4 25 E2 2C 98 |..%.,.9,S$..%.,.|
00001D90: 39 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 56 |9," V|
00001DA0: 52 49 4A 47 49 46 54 45 20 50 41 52 41 41 46 20 |RIJGIFTE PARAAF |
00001DB0: 41 50 4F 54 48 45 4B 45 52 20 20 20 20 20 20 20 |APOTHEKER |
00001DC0: 20 20 20 20 20 20 20 20 45 54 49 4B 45 54 20 20 | ETIKET |
00001DD0: 20 20 20 22 00 E1 25 E7 2C 98 39 2C C7 28 31 32 | "..%.,.9,.(12|
00001DE0: 29 00 FA 25 EA 2C 98 39 2C 45 53 24 3B C7 28 31 |)..%.,.9,ES$;.(1|
00001DF0: 30 38 29 3B C7 28 31 29 3B 3A 00 05 26 EC 2C 89 |08);.(1);:..&.,.|
00001E00: 20 39 32 37 30 00 0B 26 5A 2D 3A 00 11 26 64 2D | 9270..&Z-:..&d-|
00001E10: 3A 00 33 26 6E 2D 8F 2A 2A 2A 20 53 50 4F 4F 4C |:.3&n-.*** SPOOL|
00001E20: 49 4E 47 20 49 4E 48 4F 55 44 53 46 49 4C 45 20 |ING INHOUDSFILE |
00001E30: 2A 2A 2A 00 4F 26 78 2D 9F 20 32 2C 38 2C 32 2C |***.O&x-. 2,8,2,|
00001E40: 22 30 3A 49 4E 48 4F 55 44 53 46 49 4C 45 22 00 |"0:INHOUDSFILE".|
00001E50: 6A 26 82 2D A1 23 32 2C 41 24 3A 8B 20 53 54 B2 |j&.-.#2,A$:. ST.|
00001E60: 36 34 20 A7 20 31 31 36 37 30 00 7C 26 8C 2D 98 |64 . 11670.|&.-.|
00001E70: 39 2C 41 24 3B 3A 89 31 31 36 35 30 00 86 26 96 |9,A$;:.11650..&.|
00001E80: 2D A0 31 3A A0 32 00 91 26 A0 2D 89 20 39 32 37 |-.1:.2..&.-. 927|
00001E90: 30 00 B4 26 AA 2D 8F 2A 2A 2A 20 49 4E 48 4F 55 |0..&.-.*** INHOU|
00001EA0: 44 53 46 49 4C 45 20 56 45 52 56 41 4E 47 45 4E |DSFILE VERVANGEN|
00001EB0: 20 2A 2A 2A 00 BA 26 B4 2D 3A 00 ED 26 BE 2D 8F | ***..&.-:..&.-.|
00001EC0: 2A 2A 2A 20 44 49 4D 45 4E 53 49 45 20 56 41 4E |*** DIMENSIE VAN|
00001ED0: 20 48 45 54 20 49 4E 48 4F 55 44 53 46 49 4C 45 | HET INHOUDSFILE|
00001EE0: 20 4F 50 56 52 41 47 45 4E 20 2A 2A 2A 00 0F 27 | OPVRAGEN ***..'|
00001EF0: C8 2D 9F 20 32 2C 38 2C 33 2C 22 44 49 4D 20 49 |.-. 2,8,3,"DIM I|
00001F00: 4E 48 4F 55 44 53 46 49 4C 45 2C 53 2C 52 22 00 |NHOUDSFILE,S,R".|
00001F10: 19 27 D2 2D 84 32 2C 55 4C 00 23 27 D7 2D 84 32 |.'.-.2,UL.#'.-.2|
00001F20: 2C 55 45 00 3A 27 DC 2D A0 32 3A 8B 20 46 4C B2 |,UE.:'.-.2:. FL.|
00001F30: 31 20 A7 20 46 4C B2 30 3A 8E 00 40 27 E6 2D 3A |1 . FL.0:..@'.-:|
00001F40: 00 6D 27 F0 2D 8F 2A 2A 2A 20 4C 45 5A 45 4E 20 |.m'.-.*** LEZEN |
00001F50: 45 45 52 53 54 45 20 52 45 47 45 4C 20 56 41 4E |EERSTE REGEL VAN|
00001F60: 20 45 4C 4B 20 46 49 4C 45 20 2A 2A 2A 00 7D 27 | ELK FILE ***.}'|
00001F70: FA 2D 81 20 4E B2 55 45 20 A4 20 55 4C 00 89 27 |.-. N.UE . UL..'|
00001F80: 04 2E 4E 24 B2 C4 28 4E 29 00 95 27 0E 2E 50 B2 |..N$..(N)..'..P.|
00001F90: C3 28 4E 24 29 00 BA 27 18 2E 51 24 B2 C9 28 4E |.(N$)..'..Q$..(N|
00001FA0: 24 2C 50 AB 31 29 3A 8F 20 51 24 3D 4E 20 5A 4F |$,P.1):. Q$=N ZO|
00001FB0: 4E 44 45 52 20 54 45 4B 45 4E 00 D0 27 22 2E 9F |NDER TEKEN..'"..|
00001FC0: 20 32 2C 38 2C 33 2C 51 24 AA 22 2C 53 2C 52 22 | 2,8,3,Q$.",S,R"|
00001FD0: 00 DD 27 2C 2E 81 20 49 B2 31 20 A4 34 00 F0 27 |..',.. I.1 .4..'|
00001FE0: 36 2E 84 32 2C 44 24 28 4E 2C 49 29 3A 82 20 49 |6..2,D$(N,I):. I|
00001FF0: 00 F7 27 40 2E A0 32 00 FF 27 4A 2E 82 20 4E 00 |..'@..2..'J.. N.|
00002000: 05 28 54 2E 3A 00 3A 28 5E 2E 8F 2A 2A 2A 20 57 |.(T.:.:(^..*** W|
00002010: 45 47 53 43 48 52 49 4A 56 45 4E 20 56 41 4E 20 |EGSCHRIJVEN VAN |
00002020: 48 45 54 20 4E 49 45 55 57 45 20 49 4E 48 4F 55 |HET NIEUWE INHOU|
00002030: 44 53 46 49 4C 45 20 2A 2A 2A 00 5A 28 68 2E 9F |DSFILE ***.Z(h..|
00002040: 20 32 2C 38 2C 33 2C 22 40 3A 49 4E 48 4F 55 44 | 2,8,3,"@:INHOUD|
00002050: 53 46 49 4C 45 2C 53 2C 57 22 00 6A 28 72 2E 81 |SFILE,S,W".j(r..|
00002060: 20 4D B2 55 45 20 A4 20 55 4C 00 78 28 7C 2E 81 | M.UE . UL.x(|..|
00002070: 20 49 B2 32 20 A4 20 34 00 87 28 86 2E 98 32 2C | I.2 . 4..(...2,|
00002080: 44 24 28 4D 2C 49 29 00 8F 28 90 2E 82 20 49 00 |D$(M,I)..(... I.|
00002090: 97 28 9A 2E 82 20 4D 00 9F 28 A4 2E A0 20 32 00 |.(... M..(... 2.|
000020A0: AA 28 AE 2E 89 20 39 32 37 30 00 B0 28 B8 2E 3A |.(... 9270..(..:|
000020B0: 00 B6 28 C2 2E 3A 00 DF 28 CC 2E 8F 2A 2A 2A 20 |..(..:..(...*** |
000020C0: 4F 50 52 4F 45 50 45 4E 20 47 52 4F 4F 54 54 45 |OPROEPEN GROOTTE|
000020D0: 20 56 48 20 49 4E 48 4F 55 44 53 46 49 4C 45 00 | VH INHOUDSFILE.|
000020E0: 01 29 D6 2E 9F 20 32 2C 38 2C 33 2C 22 44 49 4D |.)... 2,8,3,"DIM|
000020F0: 20 49 4E 48 4F 55 44 53 46 49 4C 45 2C 53 2C 52 | INHOUDSFILE,S,R|
00002100: 22 00 0B 29 E0 2E 84 32 2C 55 4C 00 18 29 E5 2E |"..)...2,UL..)..|
00002110: 84 32 2C 55 45 3A A0 32 00 1E 29 EA 2E 8E 00 24 |.2,UE:.2..)....$|
00002120: 29 F4 2E 3A 00 2A 29 FE 2E 3A 00 50 29 08 2F 85 |)..:.*)..:.P)./.|
00002130: 22 54 4F 54 41 41 4C 20 41 41 4E 54 41 4C 20 56 |"TOTAAL AANTAL V|
00002140: 4F 4F 52 53 43 48 52 49 46 54 45 4E 22 3B 55 4C |OORSCHRIFTEN";UL|
00002150: 00 7B 29 0B 2F 85 22 4E 55 4D 4D 45 52 20 45 45 |.{)./."NUMMER EE|
00002160: 52 53 54 45 20 46 49 4C 45 20 56 41 4E 20 44 45 |RSTE FILE VAN DE|
00002170: 5A 45 20 46 4C 4F 50 22 3B 55 45 00 9F 29 12 2F |ZE FLOP";UE..)./|
00002180: 9F 20 32 2C 38 2C 33 2C 22 40 3A 44 49 4D 20 49 |. 2,8,3,"@:DIM I|
00002190: 4E 48 4F 55 44 53 46 49 4C 45 2C 53 2C 57 22 00 |NHOUDSFILE,S,W".|
000021A0: A9 29 1C 2F 98 32 2C 55 4C 00 B6 29 21 2F 98 32 |.)./.2,UL..)!/.2|
000021B0: 2C 55 45 3A A0 32 00 C1 29 26 2F 89 20 39 32 37 |,UE:.2..)&/. 927|
000021C0: 30 00 C7 29 30 2F 3A 00 CD 29 3A 2F 3A 00 E8 29 |0..)0/:..):/:..)|
000021D0: 44 2F 8F 2A 2A 2A 20 49 4E 48 4F 55 44 53 4F 50 |D/.*** INHOUDSOP|
000021E0: 47 41 56 45 20 2A 2A 2A 00 00 00 |GAVE ***... |
.......************************.=....***
VOORRAADKRT LOS ***.[....*** 880607
***.Y.(..***********************
*..2.:...7.ES$.G(27):MI$.G(33):MM$.ES$.
MI$:RL$.ES$.G(10):T$.G(16).F.8.. 9,4,7..
.9..53280,0:.53281,6:.".":.G(14):.G(8).=
.<..RR$(9),A$(114),B$(144,3),C$(435),A(1
2),D$(144,4),R$(20,19),ST$(10),MG(10).I.
A..G$(12).R.F..4,4.\.D..9100.B...:.{....
*** SUBROUTINES ***.....:......4,ES$;G(4
8);:.: . REGELAFSTAND 1/8 INCH.....:.U
.&..4,MM$;G(1);:.: . ELITE...0.:...:.
.4,MM$;G(4);:.: . CONDENSED...D.:.8.N
..4,MM$;G(0);:.4,ES$;G(120);G(49);:.: .
PICA NLQ.>.X.:.B.B..4,MM$;G(1.16);:.: .
ELITE+BOLD.H.L.:...V..4,MM$;G(4.16);:.:
. CONDENSED+BOLD.....:......4,ES$;G(52);
:.: . ITALIC AAN.....:......4,ES$;G(53
);:.: . ITALIC UIT.....:......4,ES$;G(
104);G(1);:.: . DUBBEL GROOT.....:.=.F.
.4,ES$;G(120);G(49);:.: . NLQ.C.P.:.G.Z.
.4,ES$;G(120);G(48);:.: . DRAFT.M...:...
...4,ES$;G(83);G(48);: .: . SUPERSCRIPT.
....:......590;:.4,ES$;G(45);G(49);:..C.
..:......4,ES$;G(45);G(48);:.:. ONDERSTR
.UIT... .:...*..4,ES$;G(45);G(49);:.:. O
NDERSTREPING.".4.:.<.>..4,MM$,G(0);:.:.
PICA.B.H.:.K.R..4,ES$;G(104);G(1);:.:. D
UBBEL GROOT.Q.\.:...F..4,ES$;G(67);G(0);
G(3);:.:. BLZ=3 INCH...P.:.I.Z..4,ES$;G(
51);G(27);:.:.27/216 INCH...... J.1 .12
:.9,"..........";:.J:.9,".":......:.'...
. J.1 .12 :.9,"..........";:.J:.9,".":..
-...:.X....4,ES$;G(67);G(0);G(6);:.: . B
LZ=6INCH.^...:...$..4,ES$;G(78);G(0);:.:
. ONDERMARGE=0.....:...8..4,ES$;G(114
);G(0);:.: . BOVENMARGE=0.A.B.:...P..4
,ES$;G(67);G(0);G(2);:.:. BLZ=2 INCH...Z
.:......".. + = ETIKET TRANSPORT ":
..;....". SPATIE = VERVOLG ".E...
.2070.Z.... A$:.A$."".2040.R.... A$."+"
. .4,G(12)...... A$.G(32) . .4..........
.:......4,ES$;G(67);G(12);:.: . BLZ=12 R
EGELS.C. .:....#.*******************....
#.*** VOORRAADKRT ***... #.*** 880420
***.'..#.*******************.-..#:.3.
.#:.P.H#.*** VOORRAADKRT-6 ***.N.R#.53
0:. REGELAFST 1/8 INCH.T."$:.Z.,$:...6$.
".1 .UITDRAAI (STAR NL-10)":.
:. 2650.L.@$."2 .KORRECTIE ":....J
$."3 .INHOUDSOPGAVE OP NUMMER":....T$."4
.KOPIEREN NAAR NIEUW NUMMER":..9.^$."5
.NIEUW FILE SCHRIJVEN ":..[.H$."6 .SPOOL
ING INHOUDSFILE ":..W.R$."7 .ARRAY UITDR
AAI.":....|$."8 .INHOUDSFILE/DIM-INH.FIL
E":.....$."9 .PRINTEN INHOUDSOPGAVE".K..
$. 550:.530.Q..$:....$. A$: .A$."" . 938
0.*..$. E(A$) . 11030,9430,9620,9830,100
90,11630,10550,10640,12100.4..$.9270.:..
$:.@.B$:.W.L$.*** KORREKTIE ***.M.V$."..
KORREKTIE.":.....$.10480:. FILE LEZEN...
.$. I.0 . 113....$X.C(A$(I)).R..$.I;:."
";:.".";A$(I);".":. X.33 . . 9490....%.
"....";A$(I)....%. X.33 . .".....";A$(I)
:.8..%. H(A$(I),1)."^" . A$(I).I(A$(I),C
(A$(I)).1):I.I.2.B..%.:. I.Q.&%.".DRUK V
OOR OPSLAG OP * ":. A$."*" . 9530...0%.
A$:.A$.."*" . 9510...:%.2,8,3,"@0:".A$(1
).",S,W"...D%. I.0 . 113.E.N%.2,A$(I).L.
X%.I.S.B% 2...L%.9270...V%:....%:....%.*
** VOORSCHRIFTNAMEN LEZEN EN PRINTEN ***
.J..%.".":.".INDIEN TERUG NAAR MENU TOET
S: @ ." :..S..%.".INDIEN VERVOLG :TOETS
SPATIEBALK"....%. A$:. A$."@". 9270....%
. A$."X". 9270....%. A$."" . 9640...F%.:
."EERSTE FILENUMMER";E :.: 1: .1,4,7:.
590...P%."LAATSTE FILENUMMER";G.6.Z%. N.
E . G:. Q=(-1)*N:REM NN=ABS(Q):REM N$=ST
R$(NN).J..%N$.D(N):P.C(N$).[..%Q$.I(N$,P
.1).V..%. 2,8,3,"0:".Q$.",S,R"....&. I.0
. 5....&.2,A$(I)....&. I: 2... &. 2,4,7
...*&TA$.G(16)...4&.2,A$(1);TA$;"06";A$(
2);TA$;"40";A$(3): 2 :.N...>&.830 :.9620
...H&:...R&:...\&.*** KOPIE ***.;.F&."..
KOPIE ONDER NIEUW FILENR":..O.I&."...DOE
TE KOPIEREN FLOP IN DRIVE EN TOETS ":..
..L&.A$:.A$."".9836...P&. 10480:. FILE L
EZEN.N.S&."..DOE ONTVANGENDE FLOP IN DRI
VE EN TOETS":....V&.A$:.A$."".9846...Z&.
2,8,3,"DIM INHOUDSFILE,S,R":.2,UL:.2,UE
: 2...&UL.UL.1.Y..&B$.D(UL):B.C(B$):A$(
1).I(B$,B.1):.".TOETS SPATIEBALK".P..&.
A$:.A$."" . 9870....&. 2,8,3,"0:".A$(1).
",S,W"....&. I.0 . 113....&.2,A$(I):. I:
2....&. 2,8,3,"@:DIM INHOUDSFILE,S,W"
:.2,A$(1):.2,UE: 2:.9270....&:...J&.***
SUBROUTINES ***...T&:.&..&.1020:.570:..,
..&:.K..&.*** BIJWERKEN INHOUDSFILE.H..&
.2,8,2,"INHOUDSFILE,S,A".U..'.2,A$(1)...
.'.2,A$(2)....'.2,A$(2)....' 2:.....':..
.T'.***NIEUW FILE SCHRIJVEN ***.H.~'."."
....'.". *** SCHRIJVEN VAN EEN NIEUW F
ILE *** ":.:..8..'. 11990: .".HET LAATST
INGEBRACHTE FILE-NR IS ";UL:.:.._..'."D
IMENSIE VAN DE BEREIDING";A$(0).X..'. A$
(0)."@" . . 9270....'B$.D(UL.1):B.C(B$):
A$(1).I(B$,B.1)....'UL$.A$(1)....'UL.E(A
$(1)).F.D'E.UL.O.N'G.UL...X'."NED.NAAM";
A$(2)....'."LAT.NAAM";A$(3)....'."KAART-
DATUM";A$(4).P..'."GROOTTE VAN HET VOORS
CHRIFT (ZONDER DIMENSIE)";A$(05).B..(. X
.0 . 33 .3....(."GRONDSTOF";X.3.1;:. A$(
X.6.0)....(."HOEVEELHEID STOF";X.3.1;:.
A$(X.6.1).T..(."DIMENSIE";X.3.1;:. A$(X.
6.2)...((.X...2(I.41...<(. X.1 . 12...F(
. Y.1 . 3...P(. Z.0 . 1.0.Z(. Z.0 . . X;
Y;:I.I.1:. A$(I).W.D(. Z.1 . . " .OPM"
;:I.I.1:. A$(I)._.N(. Z.G.X(. Y.O..(. X.
...(. 2,8,2,"0:".A$(1).",S,W"....(. I.0
. 113... (.2,A$(I)....(. I: 2.Y..(. 2,8,
2,"@:DIM INHOUDSFILE,S,W"....(.2,UL...C(
.2,UE...H( 2...M(. 9970:. BIJWERKEN INHO
UDSFILE.!.R(.9270.'..(:.-..(:.O..(.".DOE
DE FLOPPY MET BEREIDINGSVOORSCHRIFTEN I
N DE DRIVE":.:.....(.".WAT IS HET FILE-N
R";F$....(. F$."@" . . 9270....). 2,8,3,
"0:".F$.",S,R".N..). I.0 . 113....).2,A$
(I)...").I: 2:....,):...-):...6).*** ARR
AY UITDRAAI ***...7):.*.@). 10480 :. LAD
EN.<.J). 830 :. PICA.H.T). 2,4,7.Y.^). I
. 0 . 113.L.H).2,I;".";A$(I).~.R). I: 2:
. 9270...|):...}):....).*** INHOUDS-FILE
AANMAKEN ***....).".":.".INDIEN TERUG N
AAR MENU TOETS: @ ." :.....).".INDIEN VE
RVOLG :TOETS SPATIEBALK". ..). A$:. A$."
@". 9270.4..). A$."" . 10660.Q..)."..1 F
ILE UITBREIDEN":..S.B).".2 INHOUDSFILE V
ERVANGEN":.. .L).".3 DIM INHOUDSFILE OPN
IEW INSTELLEN":....V). H$:H.E(H$).E..).
H$."" . 10710.V..). H.2 .11690....). H.1
. 10900....). H.3 . 12040....*.1.H.3 .
10710.1..*. 2,8,2,"0:DIM INHOUDSFILE,S,R
".>..*.2,UL: 2.V.&*. E.G . H.1: .10800..
.0*. N.1 . U:. Q=(-1)*N:REM NN=ABS(Q):RE
M N$=STR$(NN)...:*N$.D(N):P.C(N$).G.D*Q$
.I(N$,P.1) :. Q$=N$ZONDER TEKEN.N.N* 2..
.X*. 2,8,3,"0:".Q$.",S,R"...B*. I.0. 3..
.L*.2,B$(N,I)...V*. I:.N:FL.1: 2.7..*. H
.2 . 11690 :. VERVANGEN.W..*. H.1 . 1090
0 :. UITBREIDEN....*. 2,8,2,"INHOUDSFILE
,S,A":. FILE UITBREIDEN.A..*. H.2 . . 2,
8,2,"@:INHOUDSFILE,S,W" :. FILE VERVANGE
N.T..*. FL.1 . 10970....*.2,A$(1)....*.2
,A$(2)...F*.2,A$(3).. P*.10990.. Z*. N.E
. G: . I.1 . 3.7 .*.2,B$(N,I):. I: . N.
> .* 2.I .*. 9270.O .+:.U .+:.. .+.*** U
ITDRAAI BEREIDINGSKAART *** 880301.. .+.
"..UITDRAAI":... .+.4,ES$;G(108);G(4);:.
F .+. 1040:. BLZ=6INCH.. .+.4,RL$;:.4,RL
$;:.4,RL$;:.. +. 2,4,10:.2: 2:. 10480..
!*+.:."..";A$(3):.:..E!4+.:.".VOOR Q=1 H
OEVEELHEID:"A$(5);" ";A$(0):..\!>+.".WAA
RDE VAN Q";Q..!H+. 550 :.9,A$(3);G(16);"
76";"FILE-NR. ";. !M+.770:.9,A$(1):.550
..!R+.9,A$(2):.9.V!\+B3.E(A$(5)).Q:B3..(
B3.100..5).100..!F+.9," CHARGEGROOTTE
:";B3;" ";A$(0).K"P+SS$." ...........
........................................
..........".A"Z+. 550:.9,SS$:.570.M".+.I
.1.12..".+A(I).E(A$(4.3.I)).Q:A(I)..(100
.A(I)..5).100.J".+G$(I).D(A(I)): G$(I).I
(G$(I),C(G$(I)).1)..".+. A(I).1 . G$(I).
"0".G$(I)..".+.I..#J+. W.3 . 36 .3.;#T+.
A$(W.3)."-".. 550:.9,SS$;" KAART:";A$(4
):.9:.11290.X#.+.9," .";T$;"99";"."
..#.+.9," . CHARGE.................
....... ";.B#.+.9,A$(W.3);T$;"80";G$(W.3
);" ";A$(W.5);T$;"99";".".J#.,. W..#.,.
570: .9,SS$;" KAART: ";A$(4):.9..$.,. 5
30:.570:. 1000..$$,W.42..$.,. UU.1 . 12.
8$8,. A$(W)."@" . 11400.P$B,. A$(W)."X"
. 11400.T$L,.9,UU;"*";A$(W);T$;"99";A$(
W.1)..$V,.9," ";A$(W.2);T$;"99";A$(W.
3)..$`,.9," ";A$(W.4);T$;"99";A$(W.5)
.K$J,. 1020.U$T,W.W.6..$~,. UU..$.,. 100
0..$.,. 550..%.,S$."............".)%.,.9
," OPBRENGST ".3%.,.9,S$.O%.,
.9," CHARGE".Y%D,.9,S$..%N,.9
," NAAM BEREID(ST)ER"..%X,.9,
S$.T%.,.9," VRIJGIFTE PARAAF
APOTHEKER ETIKET "..%.
,.9,G(12)..%.,.9,ES$;G(108);G(1);:..&.,.
9270..&Z-:..&D-:.3&N-.*** SPOOLING INHO
UDSFILE ***.O&X-. 2,8,2,"0:INHOUDSFILE".
J&.-.#2,A$:. ST.64 . 11670.|&.-.9,A$;:.1
1650..&.- 1: 2..& -. 9270..&.-.*** INHOU
DSFILE VERVANGEN ***..&.-:..&.-.*** DIME
NSIE VAN HET INHOUDSFILE OPVRAGEN ***..'
H-. 2,8,3,"DIM INHOUDSFILE,S,R"..'R-.2,U
L.#'W-.2,UE.:'.- 2:. FL.1 . FL.0:..@'.-:
.M'.-.*** LEZEN EERSTE REGEL VAN ELK FIL
E ***.}'.-. N.UE . UL..'..N$.D(N)..'..P.
C(N$)..'..Q$.I(N$,P.1):. Q$=N ZONDER TEK
EN.P'".. 2,8,3,Q$.",S,R"..',.. I.1 .4..'
6..2,D$(N,I):. I..'@. 2..'J.. N..(T.:.:(
^..*** WEGSCHRIJVEN VAN HET NIEUWE INHOU
DSFILE ***.Z(H.. 2,8,3,"@:INHOUDSFILE,S,
W".J(R.. M.UE . UL.X(|.. I.2 . 4..(...2,
D$(M,I)..(... I..(... M..(.. 2..(... 92
70..(..:..(B.:..(L..*** OPROEPEN GROOTTE
VH INHOUDSFILE..)V.. 2,8,3,"DIM INHOUDS
FILE,S,R"..)...2,UL..)...2,UE: 2..)....$
)..:.*)..:.P)./."TOTAAL AANTAL VOORSCHRI
FTEN";UL.{)./."NUMMER EERSTE FILE VAN DE
ZE FLOP";UE..)./. 2,8,3,"@:DIM INHOUDSFI
LE,S,W"..)./.2,UL..)!/.2,UE: 2.A)&/. 927
0.G)0/:.M):/:..)D/.*** INHOUDSOPGAVE ***
...
> CLICK IMAGE PREVIEW FOR FULL MODAL