Multiple names: VOORRAADBESTAND, VOORAADBESTAND
FILE INFORMATION
FILENAME(S):
• VOORRAADBESTAND<br>• VOORAADBESTAND
FILE TYPE(S): PRG
FILE SIZE: 5.9K
FIRST SEEN: 2025-11-30 21:11:59
APPEARS ON: 2 disk(s)
FILE HASH
350c30cf03974d59c8cd3579dd5aa760f468596329904765159b9de4fa5585b6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RUUD HANEGRAAF | VOORRAADBESTAND | PRG | DuncanTwain | 20 | 4 | DOWNLOAD FILE |
| SUNLINER | VOORAADBESTAND | PRG | DuncanTwain | 5 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 0A 00 86 56 4E 28 33 30 30 29 2C 42 |..&....VN(300),B|
00000010: 24 28 33 30 30 29 2C 45 50 28 33 30 30 29 2C 42 |$(300),EP(300),B|
00000020: 48 28 33 30 30 29 00 43 08 14 00 86 42 4E 28 33 |H(300).C....BN(3|
00000030: 30 30 29 2C 56 53 28 33 30 30 29 2C 57 56 28 33 |00),VS(300),WV(3|
00000040: 30 30 29 00 62 08 64 00 48 24 28 31 29 B2 22 56 |00).b.d.H$(1)."V|
00000050: 4F 4F 52 52 41 41 44 4E 55 4D 4D 45 52 20 20 20 |OORRAADNUMMER |
00000060: 20 22 00 81 08 6E 00 48 24 28 32 29 B2 22 42 45 | "...n.H$(2)."BE|
00000070: 53 43 48 52 49 4A 56 49 4E 47 20 20 20 20 20 20 |SCHRIJVING |
00000080: 22 00 A0 08 78 00 48 24 28 33 29 B2 22 45 45 4E |"...x.H$(3)."EEN|
00000090: 48 45 49 44 53 50 52 49 4A 53 20 20 20 20 20 22 |HEIDSPRIJS "|
000000A0: 00 BF 08 82 00 48 24 28 34 29 B2 22 54 45 20 42 |.....H$(4)."TE B|
000000B0: 45 53 54 45 4C 4C 45 4E 20 48 4F 45 56 2E 22 00 |ESTELLEN HOEV.".|
000000C0: DE 08 8C 00 48 24 28 35 29 B2 22 42 49 4A 42 45 |....H$(5)."BIJBE|
000000D0: 53 54 45 4C 4E 49 56 45 41 55 20 20 20 22 00 FD |STELNIVEAU "..|
000000E0: 08 96 00 48 24 28 36 29 B2 22 56 4F 4F 52 52 41 |...H$(6)."VOORRA|
000000F0: 41 44 53 54 41 4E 44 20 20 20 20 20 22 00 1C 09 |ADSTAND "...|
00000100: A0 00 48 24 28 37 29 B2 22 57 41 41 52 44 45 20 |..H$(7)."WAARDE |
00000110: 56 4F 4F 52 52 41 41 44 20 20 20 22 00 2F 09 C8 |VOORRAAD "./..|
00000120: 00 42 4C 24 B2 22 20 20 20 20 20 20 20 20 22 00 |.BL$." ".|
00000130: 3C 09 2C 01 99 22 93 22 3A 99 3A 99 00 57 09 36 |<.,..".":.:..W.6|
00000140: 01 99 22 20 20 12 4E 92 49 45 55 57 20 42 45 53 |.." .N.IEUW BES|
00000150: 54 41 4E 44 22 3A 99 00 7C 09 40 01 99 22 20 20 |TAND":..|.@.." |
00000160: 12 4C 92 41 41 44 20 42 45 53 54 41 41 4E 44 20 |.L.AAD BESTAAND |
00000170: 42 45 53 54 41 4E 44 22 3A 99 3A 99 00 84 09 4A |BESTAND":.:....J|
00000180: 01 85 41 24 00 9D 09 54 01 8B 41 24 B3 B1 22 4E |..A$...T..A$.."N|
00000190: 22 AF 41 24 B3 B1 22 4C 22 A7 33 30 30 00 AD 09 |".A$.."L".300...|
000001A0: 5E 01 8B 41 24 B2 22 4E 22 A7 4E B2 30 00 CF 09 |^..A$."N".N.0...|
000001B0: 68 01 8B 41 24 B2 22 4C 22 A7 8D 35 35 30 30 3A |h..A$."L"..5500:|
000001C0: 8F 20 42 45 53 54 41 4E 44 20 4C 41 44 45 4E 00 |. BESTAND LADEN.|
000001D0: DF 09 72 01 56 52 B2 4E AA 31 3A 53 52 B2 30 00 |..r.VR.N.1:SR.0.|
000001E0: F0 09 90 01 8D 31 32 30 30 3A 8F 20 4D 45 4E 55 |.....1200:. MENU|
000001F0: 00 F9 09 9A 01 99 22 93 22 00 29 0A A4 01 91 4F |......".".)....O|
00000200: 50 8D 31 35 30 30 2C 32 35 30 30 2C 32 30 30 30 |P.1500,2500,2000|
00000210: 2C 36 30 30 30 2C 34 30 30 30 2C 33 30 30 30 2C |,6000,4000,3000,|
00000220: 33 35 30 30 2C 34 35 30 30 00 38 0A AE 01 8B 4F |3500,4500.8....O|
00000230: 50 B3 B1 34 A7 34 30 30 00 3E 0A C2 01 80 00 49 |P..4.400.>.....I|
00000240: 0A B0 04 8F 20 4D 45 4E 55 00 52 0A BA 04 99 22 |.... MENU.R...."|
00000250: 93 22 00 68 0A C4 04 99 22 20 20 20 20 20 20 20 |.".h...." |
00000260: 20 12 4D 45 4E 55 92 22 00 6E 0A CE 04 99 00 92 | .MENU.".n......|
00000270: 0A D8 04 99 22 20 12 54 92 4F 45 56 4F 45 47 45 |...." .T.OEVOEGE|
00000280: 4E 20 20 20 20 12 57 92 49 4A 5A 49 47 45 4E 22 |N .W.IJZIGEN"|
00000290: 3A 99 00 B6 0A E2 04 99 22 20 12 53 92 43 48 52 |:......." .S.CHR|
000002A0: 41 50 50 45 4E 20 20 20 20 12 4F 92 50 5A 4F 45 |APPEN .O.PZOE|
000002B0: 4B 45 4E 22 3A 99 00 D8 0A EC 04 99 22 20 20 20 |KEN":......." |
000002C0: 20 20 20 12 42 92 49 4A 57 45 52 4B 45 4E 20 50 | .B.IJWERKEN P|
000002D0: 55 4E 54 45 4E 22 3A 99 00 F2 0A F6 04 99 22 20 |UNTEN":......." |
000002E0: 20 20 20 20 20 20 12 52 92 41 50 50 4F 52 54 22 | .R.APPORT"|
000002F0: 3A 99 00 15 0B 00 05 99 22 20 20 20 20 20 20 20 |:......." |
00000300: 12 56 92 4F 4C 4C 45 44 49 47 20 56 45 52 53 4C |.V.OLLEDIG VERSL|
00000310: 41 47 22 3A 99 00 36 0B 0A 05 99 22 20 20 20 20 |AG":..6...." |
00000320: 20 20 12 45 92 49 4E 44 45 20 50 52 4F 47 52 41 | .E.INDE PROGRA|
00000330: 4D 4D 41 22 3A 99 00 55 0B 14 05 99 22 4F 50 54 |MMA":..U...."OPT|
00000340: 49 45 53 20 42 20 45 20 4F 20 52 20 53 20 54 20 |IES B E O R S T |
00000350: 56 20 57 22 3B 00 5D 0B 1E 05 85 41 24 00 66 0B |V W";.]....A$.f.|
00000360: 28 05 4F 50 B2 30 00 71 0B 32 05 81 49 B2 31 A4 |(.OP.0.q.2..I.1.|
00000370: 38 00 90 0B 3C 05 8B 41 24 B2 CA 28 22 54 57 53 |8...<..A$..("TWS|
00000380: 45 52 4F 42 56 22 2C 49 2C 31 29 A7 4F 50 B2 49 |EROBV",I,1).OP.I|
00000390: 00 97 0B 46 05 82 49 00 AB 0B 50 05 8B 4F 50 B3 |...F..I...P..OP.|
000003A0: 31 B0 4F 50 B1 38 A7 31 32 30 30 00 B1 0B 5A 05 |1.OP.8.1200...Z.|
000003B0: 8E 00 C6 0B DC 05 99 22 93 22 3A 8F 20 54 4F 45 |.......".":. TOE|
000003C0: 56 4F 45 47 45 4E 00 DF 0B E6 05 99 22 12 52 45 |VOEGEN......".RE|
000003D0: 43 4F 52 44 4E 52 92 22 3B 56 52 3A 99 3A 99 00 |CORDNR.";VR:.:..|
000003E0: F1 0B F0 05 99 48 24 28 31 29 3B 3A 85 56 4E 3A |.....H$(1);:.VN:|
000003F0: 99 00 03 0C FA 05 99 48 24 28 32 29 3B 3A 85 42 |.......H$(2);:.B|
00000400: 24 3A 99 00 15 0C 04 06 99 48 24 28 33 29 3B 3A |$:.......H$(3);:|
00000410: 85 45 50 3A 99 00 27 0C 0E 06 99 48 24 28 34 29 |.EP:..'....H$(4)|
00000420: 3B 3A 85 42 48 3A 99 00 39 0C 18 06 99 48 24 28 |;:.BH:..9....H$(|
00000430: 35 29 3B 3A 85 42 4E 3A 99 00 4B 0C 22 06 99 48 |5);:.BN:..K."..H|
00000440: 24 28 36 29 3B 3A 85 56 53 3A 99 00 69 0C 2C 06 |$(6);:.VS:..i.,.|
00000450: 85 22 44 41 54 41 20 41 43 43 45 50 54 45 52 45 |."DATA ACCEPTERE|
00000460: 4E 20 4A 2F 4E 22 3B 41 24 00 7B 0C 40 06 8B 41 |N J/N";A$.{.@..A|
00000470: 24 B3 B1 22 4A 22 A7 31 36 33 30 00 85 0C 45 06 |$.."J".1630...E.|
00000480: 58 58 B2 56 52 00 9E 0C 4A 06 8D 38 30 30 30 3A |XX.VR...J..8000:|
00000490: 8F 20 52 45 43 4F 52 44 20 49 4E 49 2E 2E 00 AA |. RECORD INI....|
000004A0: 0C 54 06 56 52 B2 56 52 AA 31 00 B4 0C 5E 06 8D |.T.VR.VR.1...^..|
000004B0: 37 32 30 30 00 C5 0C 68 06 8B 41 24 B2 22 56 22 |7200...h..A$."V"|
000004C0: A7 31 35 30 30 00 CB 0C 72 06 8E 00 E0 0C D0 07 |.1500...r.......|
000004D0: 8F 20 53 43 48 52 41 50 20 52 4F 55 54 49 4E 45 |. SCHRAP ROUTINE|
000004E0: 00 E8 0C DA 07 99 3A 99 00 0D 0D E4 07 85 22 12 |......:.......".|
000004F0: 54 45 20 53 43 48 52 41 50 50 45 4E 20 56 4F 4F |TE SCHRAPPEN VOO|
00000500: 52 52 41 41 44 4E 52 92 22 3B 56 4E 53 00 1B 0D |RRAADNR.";VNS...|
00000510: F3 07 81 49 B2 31 A4 56 52 AB 31 00 30 0D F4 07 |...I.1.VR.1.0...|
00000520: 8B 56 4E 28 49 29 B3 B1 56 4E 53 A7 32 31 30 38 |.VN(I)..VNS.2108|
00000530: 00 38 0D F5 07 58 B2 31 00 41 0D F8 07 99 22 93 |.8...X.1.A....".|
00000540: 22 00 65 0D 02 08 99 22 20 20 20 20 20 20 20 20 |".e...." |
00000550: 20 12 53 43 48 52 41 50 20 44 49 54 20 52 45 43 | .SCHRAP DIT REC|
00000560: 4F 52 44 92 22 00 80 0D 0C 08 8D 37 34 30 30 3A |ORD."......7400:|
00000570: 8F 20 44 49 53 50 4C 41 59 20 52 45 43 4F 52 44 |. DISPLAY RECORD|
00000580: 00 9D 0D 16 08 99 3A 85 22 42 45 4E 20 4A 45 20 |......:."BEN JE |
00000590: 5A 45 4B 45 52 20 4A 2F 4E 22 3B 41 24 00 AE 0D |ZEKER J/N";A$...|
000005A0: 20 08 8B 41 24 B2 22 4E 22 A7 32 31 30 38 00 C0 | ..A$."N".2108..|
000005B0: 0D 2A 08 8B 41 24 B3 B1 22 4A 22 A7 32 30 34 30 |.*..A$.."J".2040|
000005C0: 00 DA 0D 34 08 42 24 28 49 29 B2 22 2A 2A 47 45 |...4.B$(I)."**GE|
000005D0: 53 43 48 52 41 50 54 2A 2A 22 00 E6 0D 39 08 53 |SCHRAPT**"...9.S|
000005E0: 52 B2 53 52 AA 31 00 ED 0D 3C 08 82 49 00 F7 0D |R.SR.1...<..I...|
000005F0: 3E 08 8D 37 32 30 30 00 08 0E 48 08 8B 41 24 B2 |>..7200...H..A$.|
00000600: 22 56 22 A7 32 30 30 30 00 0E 0E 52 08 8E 00 27 |"V".2000...R...'|
00000610: 0E C4 09 99 22 93 22 3A 8F 20 57 49 4A 5A 49 47 |....".":. WIJZIG|
00000620: 20 52 45 43 4F 52 44 00 48 0E CE 09 85 22 54 45 | RECORD.H...."TE|
00000630: 20 57 49 4A 5A 49 47 45 4E 20 56 4F 4F 52 52 41 | WIJZIGEN VOORRA|
00000640: 41 44 4E 52 22 3B 56 4E 00 56 0E EC 09 81 49 B2 |ADNR";VN.V....I.|
00000650: 31 A4 56 52 AB 31 00 6A 0E F6 09 8B 56 4E 28 49 |1.VR.1.j....VN(I|
00000660: 29 B3 B1 56 4E A7 32 37 34 30 00 81 0E 00 0A 99 |)..VN.2740......|
00000670: 3A 99 22 52 45 43 4F 52 44 20 56 52 22 3B 49 3A |:."RECORD VR";I:|
00000680: 99 00 92 0E 0A 0A 99 48 24 28 31 29 3B 56 4E 28 |.......H$(1);VN(|
00000690: 49 29 00 A6 0E 0F 0A 4C B2 C3 28 C4 28 56 4E 28 |I).....L..(.(VN(|
000006A0: 49 29 29 29 AA 32 00 B4 0E 14 0A 8D 37 36 30 30 |I))).2......7600|
000006B0: 3A 85 56 4E 00 CA 0E 1E 0A 99 48 24 28 32 29 3B |:.VN......H$(2);|
000006C0: 22 20 22 AA 42 24 28 49 29 3B 00 DB 0E 23 0A 4C |" ".B$(I);...#.L|
000006D0: B2 C3 28 42 24 28 49 29 29 AA 32 00 E9 0E 28 0A |..(B$(I)).2...(.|
000006E0: 8D 37 36 30 30 3A 85 42 24 00 FB 0E 32 0A 99 48 |.7600:.B$...2..H|
000006F0: 24 28 33 29 3B 45 50 28 49 29 3B 00 0F 0F 37 0A |$(3);EP(I);...7.|
00000700: 4C B2 C3 28 C4 28 45 50 28 49 29 29 29 AA 32 00 |L..(.(EP(I))).2.|
00000710: 1D 0F 3C 0A 8D 37 36 30 30 3A 85 45 50 00 2F 0F |..<..7600:.EP./.|
00000720: 46 0A 99 48 24 28 34 29 3B 42 48 28 49 29 3B 00 |F..H$(4);BH(I);.|
00000730: 43 0F 4B 0A 4C B2 C3 28 C4 28 42 48 28 49 29 29 |C.K.L..(.(BH(I))|
00000740: 29 AA 32 00 51 0F 50 0A 8D 37 36 30 30 3A 85 42 |).2.Q.P..7600:.B|
00000750: 48 00 63 0F 5A 0A 99 48 24 28 35 29 3B 42 4E 28 |H.c.Z..H$(5);BN(|
00000760: 49 29 3B 00 77 0F 5F 0A 4C B2 C3 28 C4 28 42 4E |I);.w._.L..(.(BN|
00000770: 28 49 29 29 29 AA 32 00 85 0F 64 0A 8D 37 36 30 |(I))).2...d..760|
00000780: 30 3A 85 42 4E 00 97 0F 6E 0A 99 48 24 28 36 29 |0:.BN...n..H$(6)|
00000790: 3B 56 53 28 49 29 3B 00 AB 0F 73 0A 4C B2 C3 28 |;VS(I);...s.L..(|
000007A0: C4 28 56 53 28 49 29 29 29 AA 32 00 B1 0F 82 0A |.(VS(I))).2.....|
000007B0: 99 00 CF 0F 8C 0A 85 22 44 41 54 41 20 41 43 43 |......."DATA ACC|
000007C0: 45 50 54 45 52 45 4E 20 4A 2F 4E 22 3B 41 24 00 |EPTEREN J/N";A$.|
000007D0: E1 0F A0 0A 8B 41 24 B3 B1 22 4A 22 A7 32 37 34 |.....A$.."J".274|
000007E0: 30 00 18 10 A5 0A 8B 42 24 28 49 29 B2 22 2A 2A |0......B$(I)."**|
000007F0: 47 45 53 43 48 52 41 50 54 2A 2A 22 AF 42 24 B3 |GESCHRAPT**".B$.|
00000800: B1 22 2A 2A 47 45 53 43 48 52 41 50 54 2A 2A 22 |."**GESCHRAPT**"|
00000810: A7 53 52 B2 53 52 AB 31 00 2E 10 AA 0A 57 56 28 |.SR.SR.1.....WV(|
00000820: 49 29 B2 56 53 28 49 29 AC 45 50 28 49 29 00 3D |I).VS(I).EP(I).=|
00000830: 10 AF 0A 58 58 B2 49 3A 8D 38 30 30 30 00 44 10 |...XX.I:.8000.D.|
00000840: B4 0A 82 49 00 4E 10 B9 0A 8D 37 32 30 30 00 5F |...I.N....7200._|
00000850: 10 BE 0A 8B 41 24 B2 22 56 22 A7 32 35 30 30 00 |....A$."V".2500.|
00000860: 65 10 C8 0A 8E 00 7A 10 B8 0B 8F 20 4F 50 5A 4F |e.....z.... OPZO|
00000870: 45 4B 20 52 4F 55 54 49 4E 45 00 9C 10 C2 0B 99 |EK ROUTINE......|
00000880: 22 12 4F 50 5A 4F 45 4B 45 4E 20 56 4F 4F 52 52 |".OPZOEKEN VOORR|
00000890: 41 41 44 42 45 53 54 41 4E 44 92 22 00 A2 10 CC |AADBESTAND."....|
000008A0: 0B 99 00 C0 10 D6 0B 85 22 4F 50 20 54 45 20 5A |........"OP TE Z|
000008B0: 4F 45 4B 45 4E 20 53 54 52 49 4E 47 22 3B 58 24 |OEKEN STRING";X$|
000008C0: 00 D9 10 EA 0B 4C B2 C3 28 58 24 29 3A 45 B2 30 |.....L..(X$):E.0|
000008D0: 3A 46 B2 30 3A 58 58 B2 30 00 DF 10 F4 0B 99 00 |:F.0:XX.0.......|
000008E0: E9 10 FE 0B 8D 37 38 30 30 00 F2 10 03 0C 9F 32 |.....7800......2|
000008F0: 2C 44 00 F8 10 06 0C 99 00 16 11 08 0C 98 32 2C |,D............2,|
00000900: 22 20 20 20 20 4F 50 20 5A 4F 45 4B 20 4E 41 41 |" OP ZOEK NAA|
00000910: 52 20 22 3B 58 24 00 3E 11 12 0C 98 32 2C 22 2D |R ";X$.>....2,"-|
00000920: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000930: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 49 |-------------".I|
00000940: 11 1C 0C 98 32 2C 22 20 22 00 73 11 26 0C 98 32 |....2," ".s.&..2|
00000950: 2C 22 20 56 4F 4F 52 4E 52 20 20 20 42 45 53 43 |," VOORNR BESC|
00000960: 48 52 49 4A 56 49 4E 47 20 48 4F 45 56 2D 56 4F |HRIJVING HOEV-VO|
00000970: 4F 52 22 00 9D 11 30 0C 98 32 2C 22 2D 2D 2D 2D |OR"...0..2,"----|
00000980: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000990: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 AB 11 |------------"...|
000009A0: 3A 0C 81 49 B2 31 A4 56 52 AB 31 00 B5 11 44 0C |:..I.1.VR.1...D.|
000009B0: 45 B2 45 AA 31 00 C8 11 4E 0C 57 B2 C3 28 42 24 |E.E.1...N.W..(B$|
000009C0: 28 49 29 29 AB 4C AA 31 00 D3 11 58 0C 81 50 B2 |(I)).L.1...X..P.|
000009D0: 31 A4 57 00 E7 11 62 0C 5A 24 B2 CA 28 42 24 28 |1.W...b.Z$..(B$(|
000009E0: 49 29 2C 50 2C 4C 29 00 F8 11 6C 0C 8B 5A 24 B3 |I),P,L)...l..Z$.|
000009F0: B1 58 24 A7 33 32 33 30 00 02 12 76 0C 46 B2 46 |.X$.3230...v.F.F|
00000A00: AA 31 00 11 12 80 0C 58 58 B2 49 3A 8D 38 32 30 |.1.....XX.I:.820|
00000A10: 30 00 24 12 8A 0C 4C 24 B2 46 31 24 AA 46 32 24 |0.$...L$.F1$.F2$|
00000A20: AA 46 36 24 00 2E 12 94 0C 98 32 2C 4C 24 00 36 |.F6$......2,L$.6|
00000A30: 12 99 0C 50 B2 57 00 3D 12 9E 0C 82 50 00 44 12 |...P.W.=....P.D.|
00000A40: A8 0C 82 49 00 6E 12 B2 0C 98 32 2C 22 2D 2D 2D |...I.n....2,"---|
00000A50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000A60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 8B |-------------"..|
00000A70: 12 BC 0C 98 32 2C 45 3B 22 52 45 43 4F 52 44 53 |....2,E;"RECORDS|
00000A80: 20 4F 50 47 45 5A 4F 43 48 54 22 00 A5 12 C6 0C | OPGEZOCHT".....|
00000A90: 98 32 2C 46 3B 22 52 45 43 4F 52 44 53 20 47 45 |.2,F;"RECORDS GE|
00000AA0: 4C 49 53 54 22 00 AC 12 D0 0C A0 32 00 B6 12 DA |LIST"......2....|
00000AB0: 0C 8D 37 32 30 30 00 C7 12 E4 0C 8B 41 24 B2 22 |..7200......A$."|
00000AC0: 56 22 A7 33 30 30 30 00 CD 12 EE 0C 8E 00 E2 12 |V".3000.........|
00000AD0: AC 0D 99 22 93 22 3A 8F 20 42 49 4A 57 45 52 4B |...".":. BIJWERK|
00000AE0: 45 4E 00 05 13 B6 0D 85 22 42 49 4A 20 54 45 20 |EN......"BIJ TE |
00000AF0: 57 45 52 4B 45 4E 20 56 4F 4F 52 52 41 41 44 4E |WERKEN VOORRAADN|
00000B00: 52 22 3B 56 4E 00 0B 13 C0 0D 99 00 19 13 CA 0D |R";VN...........|
00000B10: 81 49 B2 31 A4 56 52 AB 31 00 2D 13 D4 0D 8B 56 |.I.1.VR.1.-....V|
00000B20: 4E 28 49 29 B3 B1 56 4E A7 33 36 36 30 00 42 13 |N(I)..VN.3660.B.|
00000B30: E8 0D 99 22 52 45 43 4F 52 44 20 4E 52 22 3B 49 |..."RECORD NR";I|
00000B40: 3A 99 00 55 13 F2 0D 99 48 24 28 31 29 3B 56 4E |:..U....H$(1);VN|
00000B50: 28 49 29 3A 99 00 68 13 FC 0D 99 48 24 28 32 29 |(I):..h....H$(2)|
00000B60: 3B 42 24 28 49 29 3A 99 00 88 13 06 0E 99 22 4C |;B$(I):......."L|
00000B70: 4F 50 45 4E 44 45 20 56 4F 4F 52 52 41 41 44 22 |OPENDE VOORRAAD"|
00000B80: 3B 56 53 28 49 29 3A 99 00 91 13 0B 0E 56 41 B2 |;VS(I):......VA.|
00000B90: 30 00 B7 13 10 0E 85 22 56 4F 4F 52 52 41 41 44 |0......"VOORRAAD|
00000BA0: 41 41 4E 50 41 53 53 49 4E 47 20 2B 2F 2D 22 3B |AANPASSING +/-";|
00000BB0: 56 41 28 49 29 3A 99 00 C7 13 15 0E 56 53 B2 56 |VA(I):......VS.V|
00000BC0: 53 28 49 29 AA 56 41 00 E5 13 1A 0E 99 22 48 45 |S(I).VA......"HE|
00000BD0: 52 5A 49 45 4E 45 20 56 4F 4F 52 52 41 41 44 22 |RZIENE VOORRAAD"|
00000BE0: 3B 56 53 3A 99 00 03 14 24 0E 85 22 44 41 54 41 |;VS:....$.."DATA|
00000BF0: 20 41 43 43 45 50 54 45 52 45 4E 20 4A 2F 4E 22 | ACCEPTEREN J/N"|
00000C00: 3B 41 24 00 15 14 2E 0E 8B 41 24 B3 B1 22 4A 22 |;A$......A$.."J"|
00000C10: A7 33 36 36 30 00 22 14 38 0E 56 53 28 49 29 B2 |.3660.".8.VS(I).|
00000C20: 56 53 00 38 14 42 0E 57 56 28 49 29 B2 56 53 28 |VS.8.B.WV(I).VS(|
00000C30: 49 29 AC 45 50 28 49 29 00 3F 14 4C 0E 82 49 00 |I).EP(I).?.L..I.|
00000C40: 49 14 56 0E 8D 37 32 30 30 00 5A 14 60 0E 8B 41 |I.V..7200.Z.`..A|
00000C50: 24 B2 22 56 22 A7 33 35 30 30 00 60 14 6A 0E 8E |$."V".3500.`.j..|
00000C60: 00 80 14 A0 0F 99 22 93 22 3A 8F 20 52 41 50 50 |......".":. RAPP|
00000C70: 4F 52 54 20 42 49 4A 42 45 53 54 45 4C 4C 45 4E |ORT BIJBESTELLEN|
00000C80: 00 8A 14 AA 0F 8D 37 38 30 30 00 93 14 B4 0F 9F |......7800......|
00000C90: 32 2C 44 00 9C 14 B9 0F 43 54 B2 30 00 A7 14 BC |2,D.....CT.0....|
00000CA0: 0F 98 32 2C 22 20 22 00 D0 14 BE 0F 98 32 2C 22 |..2," "......2,"|
00000CB0: 20 20 20 20 20 20 20 20 20 20 20 52 41 50 50 4F | RAPPO|
00000CC0: 52 54 20 42 49 4A 42 45 53 54 45 4C 4C 45 4E 22 |RT BIJBESTELLEN"|
00000CD0: 00 F9 14 C8 0F 98 32 2C 22 20 20 20 20 20 20 20 |......2," |
00000CE0: 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ------------|
00000CF0: 2D 2D 2D 2D 2D 2D 2D 2D 22 00 04 15 D2 0F 98 32 |--------"......2|
00000D00: 2C 22 20 22 00 34 15 DC 0F 98 32 2C 22 56 4F 4F |," ".4....2,"VOO|
00000D10: 52 4E 52 20 20 42 45 53 43 48 52 49 4A 56 49 4E |RNR BESCHRIJVIN|
00000D20: 47 20 20 20 20 41 41 4E 54 41 4C 20 20 20 50 52 |G AANTAL PR|
00000D30: 49 4A 53 22 00 64 15 E6 0F 98 32 2C 22 2D 2D 2D |IJS".d....2,"---|
00000D40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000D50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000D60: 2D 2D 2D 22 00 72 15 F0 0F 81 49 B2 31 A4 56 52 |---".r....I.1.VR|
00000D70: AB 31 00 88 15 FA 0F 8B 56 53 28 49 29 B1 42 4E |.1......VS(I).BN|
00000D80: 28 49 29 A7 34 31 35 35 00 9B 15 04 10 50 52 B2 |(I).4155.....PR.|
00000D90: 42 48 28 49 29 AC 45 50 28 49 29 00 B2 15 09 10 |BH(I).EP(I).....|
00000DA0: 41 4D B2 50 52 3A 8D 37 37 30 30 3A 50 52 24 B2 |AM.PR:.7700:PR$.|
00000DB0: 4D 24 00 C7 15 0E 10 50 52 24 B2 C9 28 42 4C 24 |M$.....PR$..(BL$|
00000DC0: AA 50 52 24 2C 38 29 00 D4 15 18 10 43 54 B2 43 |.PR$,8).....CT.C|
00000DD0: 54 AA 50 52 00 E3 15 22 10 58 58 B2 49 3A 8D 38 |T.PR...".XX.I:.8|
00000DE0: 32 30 30 00 FA 15 2C 10 4C 24 B2 46 31 24 AA 46 |200...,.L$.F1$.F|
00000DF0: 32 24 AA 46 34 24 AA 50 52 24 00 04 16 36 10 98 |2$.F4$.PR$...6..|
00000E00: 32 2C 4C 24 00 0B 16 3B 10 82 49 00 3B 16 40 10 |2,L$...;..I.;.@.|
00000E10: 98 32 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.2,"------------|
00000E20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000E30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 52 16 45 10 |----------".R.E.|
00000E40: 41 4D B2 43 54 3A 8D 37 37 30 30 3A 43 54 24 B2 |AM.CT:.7700:CT$.|
00000E50: 4D 24 00 7C 16 4A 10 98 32 2C 22 20 20 20 20 20 |M$.|.J..2," |
00000E60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E70: 20 20 20 54 4F 54 41 41 4C 20 22 3B 00 90 16 4F | TOTAAL ";...O|
00000E80: 10 98 32 2C C9 28 42 4C 24 AA 43 54 24 2C 38 29 |..2,.(BL$.CT$,8)|
00000E90: 00 C0 16 54 10 98 32 2C 22 2D 2D 2D 2D 2D 2D 2D |...T..2,"-------|
00000EA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000EB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"|
00000EC0: 00 C7 16 5E 10 A0 32 00 D1 16 68 10 8D 37 32 30 |...^..2...h..720|
00000ED0: 30 00 E2 16 72 10 8B 41 24 B2 22 56 22 A7 34 30 |0...r..A$."V".40|
00000EE0: 30 30 00 E8 16 81 10 8E 00 04 17 94 11 99 22 93 |00............".|
00000EF0: 22 3A 8F 20 56 4F 4C 4C 45 44 49 47 20 56 45 52 |":. VOLLEDIG VER|
00000F00: 53 4C 41 47 00 0E 17 9E 11 8D 37 38 30 30 00 17 |SLAG......7800..|
00000F10: 17 A8 11 9F 32 2C 44 00 20 17 B2 11 43 54 B2 30 |....2,D. ...CT.0|
00000F20: 00 2B 17 B7 11 98 32 2C 22 20 22 00 4D 17 BC 11 |.+....2," ".M...|
00000F30: 98 32 2C 22 20 20 20 20 20 20 20 20 56 4F 4C 4C |.2," VOLL|
00000F40: 45 44 49 47 20 56 45 52 53 4C 41 47 22 00 6F 17 |EDIG VERSLAG".o.|
00000F50: C6 11 98 32 2C 22 20 20 20 20 20 20 20 20 2D 2D |...2," --|
00000F60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00000F70: 7A 17 D0 11 98 32 2C 22 20 22 00 AA 17 DA 11 98 |z....2," "......|
00000F80: 32 2C 22 20 56 4F 4F 52 4E 52 20 20 20 42 45 53 |2," VOORNR BES|
00000F90: 43 48 52 49 4A 56 49 4E 47 20 20 20 20 41 41 4E |CHRIJVING AAN|
00000FA0: 54 20 20 57 41 41 52 44 45 22 00 DA 17 E4 11 98 |T WAARDE"......|
00000FB0: 32 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |2,"-------------|
00000FC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000FD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 E8 17 EE 11 81 |---------"......|
00000FE0: 49 B2 31 A4 56 52 AB 31 00 F7 17 F8 11 58 58 B2 |I.1.VR.1.....XX.|
00000FF0: 49 3A 8D 38 32 30 30 00 0E 18 02 12 4C 24 B2 46 |I:.8200.....L$.F|
00001000: 31 24 AA 46 32 24 AA 46 36 24 AA 46 37 24 00 18 |1$.F2$.F6$.F7$..|
00001010: 18 0C 12 98 32 2C 4C 24 00 28 18 16 12 43 54 B2 |....2,L$.(...CT.|
00001020: 43 54 AA 57 56 28 49 29 00 2F 18 1B 12 82 49 00 |CT.WV(I)./....I.|
00001030: 46 18 1E 12 41 4D B2 43 54 3A 8D 37 37 30 30 3A |F...AM.CT:.7700:|
00001040: 43 54 24 B2 4D 24 00 76 18 20 12 98 32 2C 22 2D |CT$.M$.v. ..2,"-|
00001050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001070: 2D 2D 2D 2D 2D 22 00 A1 18 2A 12 98 32 2C 22 20 |-----"...*..2," |
00001080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001090: 20 20 20 20 20 20 20 20 54 4F 54 41 41 4C 20 22 | TOTAAL "|
000010A0: 3B 00 B5 18 2F 12 98 32 2C C9 28 42 4C 24 AA 43 |;.../..2,.(BL$.C|
000010B0: 54 24 2C 38 29 00 E5 18 34 12 98 32 2C 22 2D 2D |T$,8)...4..2,"--|
000010C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000010D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000010E0: 2D 2D 2D 2D 22 00 EC 18 3E 12 A0 32 00 F6 18 48 |----"...>..2...H|
000010F0: 12 8D 37 32 30 30 00 07 19 52 12 8B 41 24 B2 22 |..7200...R..A$."|
00001100: 56 22 A7 34 35 30 30 00 0D 19 5C 12 8E 00 18 19 |V".4500...\.....|
00001110: 88 13 81 59 B2 31 A4 38 00 23 19 92 13 48 B2 50 |...Y.1.8.#...H.P|
00001120: 28 49 29 00 33 19 9C 13 99 59 3B 20 54 24 3B 20 |(I).3....Y; T$; |
00001130: 20 56 4E 00 41 19 A6 13 99 55 24 3B 20 20 20 20 | VN.A....U$; |
00001140: 48 00 50 19 B0 13 8B 59 B3 B1 38 A7 35 30 37 30 |H.P....Y..8.5070|
00001150: 00 64 19 BA 13 A1 4F 24 3A 8B 4F 24 B2 22 22 A7 |.d....O$:.O$."".|
00001160: 35 30 35 30 00 6A 19 CE 13 99 00 71 19 D8 13 82 |5050.j.....q....|
00001170: 59 00 77 19 EC 13 8E 00 8E 19 7C 15 99 22 93 22 |Y.w.......|.."."|
00001180: 3A 8F 20 4C 41 41 44 52 4F 55 54 49 4E 45 00 94 |:. LAADROUTINE..|
00001190: 19 86 15 99 00 9A 19 B8 15 99 00 BA 19 C2 15 85 |................|
000011A0: 22 56 4F 45 52 20 42 45 53 54 41 4E 44 53 4E 41 |"VOER BESTANDSNA|
000011B0: 41 4D 20 49 4E 22 3B 46 54 24 00 D4 19 D6 15 9F |AM IN";FT$......|
000011C0: 32 2C 38 2C 32 2C 22 30 3A 22 AA 46 54 24 AA 22 |2,8,2,"0:".FT$."|
000011D0: 53 2C 52 22 00 DA 19 D8 15 99 00 EE 19 DB 15 99 |S,R"............|
000011E0: 22 47 45 56 4F 4E 44 45 4E 22 3B 46 54 24 00 F7 |"GEVONDEN";FT$..|
000011F0: 19 EA 15 84 32 2C 4E 00 FD 19 EC 15 99 00 1C 1A |....2,N.........|
00001200: EE 15 99 4E 3B 22 52 45 43 4F 52 44 53 20 41 41 |...N;"RECORDS AA|
00001210: 4E 20 48 45 54 20 4C 45 5A 45 4E 22 00 27 1A F4 |N HET LEZEN".'..|
00001220: 15 81 49 B2 31 A4 4E 00 52 1A FE 15 84 32 2C 56 |..I.1.N.R....2,V|
00001230: 4E 28 49 29 2C 42 24 28 49 29 2C 45 50 28 49 29 |N(I),B$(I),EP(I)|
00001240: 2C 42 48 28 49 29 2C 42 4E 28 49 29 2C 56 53 28 |,BH(I),BN(I),VS(|
00001250: 49 29 00 68 1A 03 16 57 56 28 49 29 B2 45 50 28 |I).h...WV(I).EP(|
00001260: 49 29 AC 56 53 28 49 29 00 6F 1A 08 16 82 49 00 |I).VS(I).o....I.|
00001270: 77 1A 12 16 A0 20 32 00 7D 1A 26 16 8E 00 9D 1A |w.... 2.}.&.....|
00001280: 70 17 99 22 93 22 3A 8F 20 45 49 4E 44 45 20 26 |p..".":. EINDE &|
00001290: 20 53 41 56 45 20 52 4F 55 54 49 4E 45 00 BF 1A | SAVE ROUTINE...|
000012A0: 7A 17 85 22 12 53 41 56 45 20 4C 4F 50 45 4E 44 |z..".SAVE LOPEND|
000012B0: 45 20 46 49 4C 45 2C 4A 2F 4E 92 22 3B 41 24 00 |E FILE,J/N.";A$.|
000012C0: D9 1A 8E 17 8B 41 24 B3 B1 22 4E 22 AF 41 24 B3 |.....A$.."N".A$.|
000012D0: B1 22 4A 22 A7 36 30 30 30 00 EA 1A 98 17 8B 41 |."J".6000......A|
000012E0: 24 B2 22 4E 22 A7 36 33 30 30 00 F0 1A A2 17 99 |$."N".6300......|
000012F0: 00 F6 1A D4 17 99 00 12 1B DE 17 85 22 56 4F 45 |............"VOE|
00001300: 52 20 46 49 4C 45 4E 41 41 4D 20 49 4E 22 3B 46 |R FILENAAM IN";F|
00001310: 54 24 00 2C 1B F2 17 9F 32 2C 38 2C 32 2C 22 30 |T$.,....2,8,2,"0|
00001320: 3A 22 AA 46 54 24 AA 22 53 2C 57 22 00 3B 1B FC |:".FT$."S,W".;..|
00001330: 17 98 32 2C 56 52 AB 31 AB 53 52 00 49 1B 06 18 |..2,VR.1.SR.I...|
00001340: 81 49 B2 31 A4 56 52 AB 31 00 69 1B 0B 18 8B 42 |.I.1.VR.1.i....B|
00001350: 24 28 49 29 B2 22 2A 2A 47 45 53 43 48 52 41 50 |$(I)."**GESCHRAP|
00001360: 54 2A 2A 22 A7 36 32 32 30 00 76 1B 10 18 98 32 |T**".6220.v....2|
00001370: 2C 56 4E 28 49 29 00 83 1B 1A 18 98 32 2C 42 24 |,VN(I)......2,B$|
00001380: 28 49 29 00 90 1B 24 18 98 32 2C 45 50 28 49 29 |(I)...$..2,EP(I)|
00001390: 00 9D 1B 2E 18 98 32 2C 42 48 28 49 29 00 AA 1B |......2,BH(I)...|
000013A0: 38 18 98 32 2C 42 4E 28 49 29 00 B7 1B 42 18 98 |8..2,BN(I)...B..|
000013B0: 32 2C 56 53 28 49 29 00 BE 1B 4C 18 82 49 00 C6 |2,VS(I)...L..I..|
000013C0: 1B 56 18 A0 20 32 00 DA 1B 60 18 99 22 46 49 4C |.V.. 2...`.."FIL|
000013D0: 45 20 47 45 53 41 56 45 44 22 00 E0 1B 9C 18 8E |E GESAVED"......|
000013E0: 00 F0 1B 20 1C 8F 20 56 45 52 56 4F 4C 47 45 4E |... .. VERVOLGEN|
000013F0: 00 F6 1B 25 1C 99 00 16 1C 2A 1C 85 22 12 56 92 |...%.....*..".V.|
00001400: 45 52 56 4F 4C 47 45 4E 20 4F 46 20 12 4D 92 45 |ERVOLGEN OF .M.E|
00001410: 4E 55 22 3B 41 24 00 1C 1C 34 1C 8E 00 31 1C E8 |NU";A$...4...1..|
00001420: 1C 8F 20 44 49 53 50 4C 41 59 20 52 45 43 4F 52 |.. DISPLAY RECOR|
00001430: 44 00 45 1C F2 1C 99 22 52 45 43 4F 52 44 4E 52 |D.E...."RECORDNR|
00001440: 22 3B 58 3A 99 00 58 1C FC 1C 99 48 24 28 31 29 |";X:..X....H$(1)|
00001450: 3B 56 4E 28 58 29 3A 99 00 6F 1C 06 1D 99 48 24 |;VN(X):..o....H$|
00001460: 28 32 29 3B 22 20 22 AA 42 24 28 58 29 3A 99 00 |(2);" ".B$(X):..|
00001470: 82 1C 10 1D 99 48 24 28 33 29 3B 45 50 28 58 29 |.....H$(3);EP(X)|
00001480: 3A 99 00 95 1C 1A 1D 99 48 24 28 34 29 3B 42 48 |:.......H$(4);BH|
00001490: 28 58 29 3A 99 00 A8 1C 24 1D 99 48 24 28 35 29 |(X):....$..H$(5)|
000014A0: 3B 42 4E 28 58 29 3A 99 00 BB 1C 2E 1D 99 48 24 |;BN(X):.......H$|
000014B0: 28 36 29 3B 56 4E 28 58 29 3A 99 00 D0 1C 38 1D |(6);VN(X):....8.|
000014C0: 99 48 24 28 37 29 3B 57 56 28 58 29 3A 99 3A 99 |.H$(7);WV(X):.:.|
000014D0: 00 D6 1C 42 1D 8E 00 EF 1C B0 1D 8F 20 43 55 52 |...B........ CUR|
000014E0: 53 4F 52 20 56 45 52 50 4C 41 41 54 53 45 4E 00 |SOR VERPLAATSEN.|
000014F0: 03 1D BA 1D 81 5A B2 31 A4 4C 3A 99 22 9D 22 3A |.....Z.1.L:.".":|
00001500: 82 3A 8E 00 20 1D 14 1E 8F 20 32 20 44 45 43 20 |.:.. .... 2 DEC |
00001510: 50 4C 41 41 54 53 45 4E 20 52 4F 55 54 49 4E 45 |PLAATSEN ROUTINE|
00001520: 00 30 1D 1E 1E 4C 24 B2 C4 28 B5 28 41 4D 29 29 |.0...L$..(.(AM))|
00001530: 00 43 1D 28 1E 52 B2 B5 28 31 30 30 AC 41 4D AA |.C.(.R..(100.AM.|
00001540: 2E 35 29 00 54 1D 32 1E 52 24 B2 C9 28 C4 28 52 |.5).T.2.R$..(.(R|
00001550: 29 2C 32 29 00 66 1D 37 1E 8B 41 4D B2 30 A7 52 |),2).f.7..AM.0.R|
00001560: 24 B2 22 30 30 22 00 77 1D 3C 1E 4D 24 B2 4C 24 |$."00".w.<.M$.L$|
00001570: AA 22 2E 22 AA 52 24 00 7D 1D 46 1E 8E 00 9A 1D |.".".R$.}.F.....|
00001580: 78 1E 8F 20 5A 45 54 20 4F 55 54 50 55 54 44 45 |x.. ZET OUTPUTDE|
00001590: 56 49 43 45 20 4B 4C 41 41 52 00 A0 1D 82 1E 99 |VICE KLAAR......|
000015A0: 00 CC 1D 8C 1E 85 22 4F 55 54 50 55 54 20 4E 41 |......"OUTPUT NA|
000015B0: 41 52 20 53 43 48 45 52 4D 20 4F 46 20 50 52 49 |AR SCHERM OF PRI|
000015C0: 4E 54 45 52 2C 53 2F 50 22 3B 41 24 00 DC 1D 96 |NTER,S/P";A$....|
000015D0: 1E 8B 41 24 B2 22 53 22 A7 44 B2 33 00 EC 1D A0 |..A$."S".D.3....|
000015E0: 1E 8B 41 24 B2 22 50 22 A7 44 B2 34 00 06 1E AA |..A$."P".D.4....|
000015F0: 1E 8B 41 24 B3 B1 22 53 22 AF 41 24 B3 B1 22 50 |..A$.."S".A$.."P|
00001600: 22 A7 37 38 32 30 00 0C 1E B4 1E 8E 00 1D 1E 40 |".7820.........@|
00001610: 1F 8F 20 52 45 43 4F 52 44 20 49 4E 49 00 2B 1E |.. RECORD INI.+.|
00001620: 4A 1F 56 4E 28 58 58 29 B2 56 4E 00 39 1E 54 1F |J.VN(XX).VN.9.T.|
00001630: 42 24 28 58 58 29 B2 42 24 00 47 1E 5E 1F 45 50 |B$(XX).B$.G.^.EP|
00001640: 28 58 58 29 B2 45 50 00 55 1E 68 1F 42 48 28 58 |(XX).EP.U.h.BH(X|
00001650: 58 29 B2 42 48 00 63 1E 72 1F 42 4E 28 58 58 29 |X).BH.c.r.BN(XX)|
00001660: B2 42 4E 00 71 1E 7C 1F 56 53 28 58 58 29 B2 56 |.BN.q.|.VS(XX).V|
00001670: 53 00 8A 1E 86 1F 57 56 28 58 58 29 B2 56 53 28 |S.....WV(XX).VS(|
00001680: 58 58 29 AC 45 50 28 58 58 29 00 90 1E 90 1F 8E |XX).EP(XX)......|
00001690: 00 A4 1E 08 20 8F 20 46 4F 52 4D 41 54 20 56 45 |.... . FORMAT VE|
000016A0: 4C 44 45 4E 00 BF 1E 12 20 46 31 24 B2 C9 28 42 |LDEN.... F1$..(B|
000016B0: 4C 24 AA C4 28 56 4E 28 58 58 29 29 2C 38 29 00 |L$..(VN(XX)),8).|
000016C0: DC 1E 1C 20 46 32 24 B2 C8 28 42 24 28 58 58 29 |... F2$..(B$(XX)|
000016D0: AA 42 4C 24 AA 42 4C 24 2C 31 33 29 00 EC 1E 26 |.BL$.BL$,13)...&|
000016E0: 20 46 32 24 B2 22 20 22 AA 46 32 24 00 07 1F 30 | F2$." ".F2$...0|
000016F0: 20 46 33 24 B2 C9 28 42 4C 24 AA C4 28 45 50 28 | F3$..(BL$..(EP(|
00001700: 58 58 29 29 2C 38 29 00 22 1F 3A 20 46 34 24 B2 |XX)),8).".: F4$.|
00001710: C9 28 42 4C 24 AA C4 28 42 48 28 58 58 29 29 2C |.(BL$..(BH(XX)),|
00001720: 38 29 00 3D 1F 44 20 46 35 24 B2 C9 28 42 4C 24 |8).=.D F5$..(BL$|
00001730: AA C4 28 42 4E 28 58 58 29 29 2C 38 29 00 58 1F |..(BN(XX)),8).X.|
00001740: 4E 20 46 36 24 B2 C9 28 42 4C 24 AA C4 28 56 53 |N F6$..(BL$..(VS|
00001750: 28 58 58 29 29 2C 38 29 00 73 1F 53 20 41 4D B2 |(XX)),8).s.S AM.|
00001760: 57 56 28 58 58 29 3A 8D 37 37 30 30 3A 57 56 24 |WV(XX):.7700:WV$|
00001770: B2 4D 24 00 88 1F 58 20 46 37 24 B2 C9 28 42 4C |.M$...X F7$..(BL|
00001780: 24 AA 57 56 24 2C 38 29 00 8E 1F 62 20 8E 00 00 |$.WV$,8)...b ...|
00001790: 00 |. |
..&....VN(300),B$(300),EP(300),BH(300).C
....BN(300),VS(300),WV(300).B.D.H$(1)."V
OORRAADNUMMER "...N.H$(2)."BESCHRIJVI
NG ". .X.H$(3)."EENHEIDSPRIJS "
.....H$(4)."TE BESTELLEN HOEV.".....H$(5
)."BIJBESTELNIVEAU ".....H$(6)."VOORRA
ADSTAND "... .H$(7)."WAARDE VOORRAAD
"./.H.BL$." ".<.,..".":.:..W.6
.." .N.IEUW BESTAND":..|.@.." .L.AAD B
ESTAAND BESTAND":.:....J..A$...T..A$.."N
".A$.."L".300...^..A$."N".N.0.O.H..A$."L
"..5500:. BESTAND LADEN...R.VR.N.1:SR.0.
.....1200:. MENU......".".)....OP.1500,2
500,2000,6000,4000,3000,3500,4500.8....O
P..4.400.>.B...I.... MENU.R....".".H.D..
" .MENU.".N.N.....X.." .T.OEVOEGE
N .W.IJZIGEN":......." .S.CHRAPPEN
.O.PZOEKEN":..X...." .B.IJWERKEN P
UNTEN":......." .R.APPORT":.......
" .V.OLLEDIG VERSLAG":..6...."
.E.INDE PROGRAMMA":..U...."OPTIES B E
O R S T V W";.]....A$.F.(.OP.0.Q.2..I.1.
8...<..A$.J("TWSEROBV",I,1).OP.I...F..I.
..P..OP.1.OP.8.1200...Z...F....".":. TOE
VOEGEN......".RECORDNR.";VR:.:.......H$(
1);:.VN:.......H$(2);:.B$:.......H$(3);:
.EP:..'....H$(4);:.BH:..9....H$(5);:.BN:
..K."..H$(6);:.VS:..I.,.."DATA ACCEPTERE
N J/N";A$.{.@..A$.."J".1630...E.XX.VR...
J..8000:. RECORD INI.....T.VR.VR.1...^..
7200.E.H..A$."V".1500.K.R.....P.. SCHRAP
ROUTINE...Z..:.......".TE SCHRAPPEN VOO
RRAADNR.";VNS......I.1.VR.1.0....VN(I)..
VNS.2108.8...X.1.A....".".E...."
.SCHRAP DIT RECORD."......7400:. DISPLA
Y RECORD......:."BEN JE ZEKER J/N";A$...
..A$."N".2108...*..A$.."J".2040.Z.4.B$(
I)."**GESCHRAPT**"...9.SR.SR.1...<..I...
>..7200...H..A$."V".2000...R...'.D..".":
. WIJZIG RECORD.H.N.."TE WIJZIGEN VOORRA
ADNR";VN.V....I.1.VR.1.J....VN(I)..VN.27
40......:."RECORD VR";I:.......H$(1);VN(
I).....L.C(D(VN(I))).2......7600:.VN.J..
..H$(2);" ".B$(I);...#.L.C(B$(I)).2...(.
.7600:.B$...2..H$(3);EP(I);...7.L.C(D(EP
(I))).2...<..7600:.EP./.F..H$(4);BH(I);.
C.K.L.C(D(BH(I))).2.Q.P..7600:.BH.C.Z..H
$(5);BN(I);.W._.L.C(D(BN(I))).2...D..760
0:.BN...N..H$(6);VS(I);...S.L.C(D(VS(I))
).2.......O...."DATA ACCEPTEREN J/N";A$.
.. ..A$.."J".2740......B$(I)."**GESCHRAP
T**".B$.."**GESCHRAPT**".SR.SR.1.....WV(
I).VS(I).EP(I).=...XX.I:.8000.D....I.N..
..7200._....A$."V".2500.E.H...Z.... OPZO
EK ROUTINE...B..".OPZOEKEN VOORRAADBESTA
ND."...L.....V.."OP TE ZOEKEN STRING";X$
.Y...L.C(X$):E.0:F.0:XX.0............780
0......2,D............2," OP ZOEK NAA
R ";X$.>....2,"-------------------------
-----".I....2," ".S.&..2," VOORNR BESC
HRIJVING HOEV-VOOR"...0..2,"------------
--------------------"...:..I.1.VR.1...D.
E.E.1.H.N.W.C(B$(I)).L.1.S.X..P.1.W...B.
Z$.J(B$(I),P,L)...L..Z$..X$.3230...V.F.F
.1.....XX.I:.8200.$...L$.F1$.F2$.F6$....
..2,L$.6...P.W.=....P.D....I.N....2,"---
-----------------------------"......2,E;
"RECORDS OPGEZOCHT"...F..2,F;"RECORDS GE
LIST"...P. 2...Z..7200.G....A$."V".3000.
M..........".":. BIJWERKEN......"BIJ TE
WERKEN VOORRAADNR";VN.........J..I.1.VR.
1.-.T..VN(I)..VN.3660.B...."RECORD NR";I
:..U....H$(1);VN(I):..H....H$(2);B$(I):.
......"LOPENDE VOORRAAD";VS(I):......VA.
0......"VOORRAADAANPASSING +/-";VA(I):..
G...VS.VS(I).VA......"HERZIENE VOORRAAD"
;VS:....$.."DATA ACCEPTEREN J/N";A$.....
.A$.."J".3660.".8.VS(I).VS.8.B.WV(I).VS(
I).EP(I).?.L..I.I.V..7200.Z.`..A$."V".35
00.`.J..... ..".":. RAPPORT BIJBESTELLEN
......7800......2,D.....CT.0......2," ".
P....2," RAPPORT BIJBESTELLEN"
...H..2," --------------------
"...R..2," ".4....2,"VOORNR BESCHRIJVIN
G AANTAL PRIJS".D....2,"-----------
---------------------------".R....I.1.VR
.1......VS(I).BN(I).4155.....PR.BH(I).EP
(I).....AM.PR:.7700:PR$.M$.G...PR$.I(BL$
.PR$,8).T...CT.CT.PR...".XX.I:.8200...,.
L$.F1$.F2$.F4$.PR$...6..2,L$...;..I.;.@.
.2,"------------------------------------
--".R.E.AM.CT:.7700:CT$.M$.|.J..2,"
TOTAAL ";...O..2,I(BL
$.CT$,8)...T..2,"-----------------------
---------------".G.^. 2.Q.H..7200...R..A
$."V".4000............".":. VOLLEDIG VER
SLAG......7800......2,D. ...CT.0.+....2,
" ".M....2," VOLLEDIG VERSLAG".O.
F..2," ----------------".Z.P..2,"
"...Z..2," VOORNR BESCHRIJVING AAN
T WAARDE".Z....2,"---------------------
-----------------"......I.1.VR.1.....XX.
I:.8200.....L$.F1$.F2$.F6$.F7$......2,L$
.(...CT.CT.WV(I)./....I.F...AM.CT:.7700:
CT$.M$.V. ..2,"-------------------------
-------------"...*..2,"
TOTAAL ";.../..2,I(BL$.CT$,8)...
4..2,"----------------------------------
----"...>. 2...H..7200...R..A$."V".4500.
..\........Y.1.8.#...H.P(I).3....Y; T$;
VN.A....U$; H.P....Y..8.5070.D....O$
:.O$."".5050.J.N...Q.X..Y.W.......|.."."
:. LAADROUTINE...............B.."VOER BE
STANDSNAAM IN";FT$.T.V..2,8,2,"0:".FT$."
S,R".Z.X........"GEVONDEN";FT$......2,N.
...........N;"RECORDS AAN HET LEZEN".'..
..I.1.N.R....2,VN(I),B$(I),EP(I),BH(I),B
N(I),VS(I).H...WV(I).EP(I).VS(I).O....I.
W... 2.}.&.....P..".":. EINDE & SAVE RO
UTINE...Z..".SAVE LOPENDE FILE,J/N.";A$.
Y....A$.."N".A$.."J".6000......A$."N".63
00.........T........"VOER FILENAAM IN";F
T$.,....2,8,2,"0:".FT$."S,W".;....2,VR.1
.SR.I....I.1.VR.1.I....B$(I)."**GESCHRAP
T**".6220.V....2,VN(I)......2,B$(I)...$.
.2,EP(I)......2,BH(I)...8..2,BN(I)...B..
2,VS(I)...L..I.F.V. 2.Z.`.."FILE GESAVE
D"......... .. VERVOLGEN...%.....*..".V.
ERVOLGEN OF .M.ENU";A$...4...1.... DISPL
AY RECORD.E...."RECORDNR";X:..X....H$(1)
;VN(X):..O....H$(2);" ".B$(X):.......H$(
3);EP(X):.......H$(4);BH(X):....$..H$(5)
;BN(X):.......H$(6);VN(X):..P.8..H$(7);W
V(X):.:..V.B........ CURSOR VERPLAATSEN.
.....Z.1.L:.".":.:.. .... 2 DEC PLAATSEN
ROUTINE.0...L$.D(.(AM)).C.(.R..(100.AM.
.5).T.2.R$.I(D(R),2).F.7..AM.0.R$."00".W
.<.M$.L$.".".R$.}.F.....X.. ZET OUTPUTDE
VICE KLAAR. .....L...."OUTPUT NAAR SCHER
M OF PRINTER,S/P";A$......A$."S".D.3...
..A$."P".D.4......A$.."S".A$.."P".7820..
.......@.. RECORD INI.+.J.VN(XX).VN.9.T.
B$(XX).B$.G.^.EP(XX).EP.U.H.BH(XX).BH.C.
R.BN(XX).BN.Q.|.VS(XX).VS.....WV(XX).VS(
XX).EP(XX).......... . FORMAT VELDEN....
F1$.I(BL$.D(VN(XX)),8).... F2$.H(B$(XX)
.BL$.BL$,13)...& F2$." ".F2$...0 F3$.I(B
L$.D(EP(XX)),8).".: F4$.I(BL$.D(BH(XX)),
8).=.D F5$.I(BL$.D(BN(XX)),8).X.N F6$.I(
BL$.D(VS(XX)),8).S.S AM.WV(XX):.7700:WV$
.M$...X F7$.I(BL$.WV$,8)...B ....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL