> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4E 08 00 00 8F 20 2D 2D 28 43 29 20 44 49 |..N.... --(C) DI|
00000010: 47 49 43 4F 4D 20 53 4F 46 54 57 41 52 45 2C 54 |GICOM SOFTWARE,T|
00000020: 41 50 45 20 42 30 31 20 2D 2D 20 20 20 20 20 20 |APE B01 -- |
00000030: 20 20 20 41 41 4E 47 45 50 41 53 54 20 56 4F 4F | AANGEPAST VOO|
00000040: 52 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 00 71 |R COMMODORE 64.q|
00000050: 08 0A 00 8F 20 2A 2A 2A 20 4F 50 54 49 4D 41 4C |.... *** OPTIMAL|
00000060: 45 20 42 45 53 54 45 4C 53 45 52 49 45 20 2A 2A |E BESTELSERIE **|
00000070: 2A 00 7F 08 14 00 86 20 41 28 32 35 2C 33 29 00 |*...... A(25,3).|
00000080: A4 08 1E 00 8F 20 2A 2A 2A 20 49 4E 56 4F 45 52 |..... *** INVOER|
00000090: 20 56 41 4E 20 44 45 20 47 45 47 45 56 45 4E 53 | VAN DE GEGEVENS|
000000A0: 20 2A 2A 2A 00 AE 08 28 00 99 22 93 22 3B 00 D1 | ***...(..".";..|
000000B0: 08 32 00 99 22 2A 2A 2A 20 4F 50 54 49 4D 41 4C |.2.."*** OPTIMAL|
000000C0: 45 20 42 45 53 54 45 4C 53 45 52 49 45 20 2A 2A |E BESTELSERIE **|
000000D0: 2A 00 D7 08 3C 00 99 00 F2 08 46 00 99 22 41 46 |*...<.....F.."AF|
000000E0: 5A 45 54 20 50 45 52 20 50 45 52 49 4F 44 45 20 |ZET PER PERIODE |
000000F0: 22 3B 00 FA 08 50 00 85 20 51 00 22 09 5A 00 8B |";...P.. Q.".Z..|
00000100: 20 28 20 51 20 B3 B2 20 30 20 29 20 B0 20 28 20 | ( Q .. 0 ) . ( |
00000110: 51 AB B5 28 51 29 20 B3 B1 20 30 20 29 20 A7 20 |Q..(Q) .. 0 ) . |
00000120: 37 30 00 46 09 64 00 99 22 56 41 53 54 20 42 45 |70.F.d.."VAST BE|
00000130: 44 52 41 47 20 50 45 52 20 42 45 53 54 45 4C 4C |DRAG PER BESTELL|
00000140: 49 4E 47 20 22 3B 00 4E 09 6E 00 85 20 42 00 7E |ING ";.N.n.. B.~|
00000150: 09 78 00 8B 20 28 20 42 20 B3 20 30 20 29 20 B0 |.x.. ( B . 0 ) .|
00000160: 20 28 20 42 AC 31 30 30 AB B5 28 42 AC 31 30 30 | ( B.100..(B.100|
00000170: 29 20 B3 B1 20 30 20 29 20 A7 20 31 30 30 00 AB |) .. 0 ) . 100..|
00000180: 09 82 00 99 20 22 56 41 52 49 41 42 45 4C 45 20 |.... "VARIABELE |
00000190: 4F 50 53 4C 41 47 4B 4F 53 54 45 4E 20 50 45 52 |OPSLAGKOSTEN PER|
000001A0: 20 45 45 4E 48 45 49 44 20 22 3B 00 B4 09 8C 00 | EENHEID ";.....|
000001B0: 85 20 4B 31 00 E4 09 96 00 8B 20 28 20 4B 31 B3 |. K1...... ( K1.|
000001C0: 30 20 29 20 B0 20 28 4B 31 AC 31 30 30 AB B5 28 |0 ) . (K1.100..(|
000001D0: 4B 31 AC 31 30 30 29 20 B3 B1 20 30 20 29 20 A7 |K1.100) .. 0 ) .|
000001E0: 20 31 33 30 00 FE 09 A0 00 99 22 49 4E 54 45 52 | 130......"INTER|
000001F0: 45 53 54 20 49 4E 20 50 52 4F 43 20 22 3B 00 06 |EST IN PROC ";..|
00000200: 0A AA 00 85 20 4B 00 18 0A B4 00 8B 20 4B 20 B3 |.... K...... K .|
00000210: 20 30 20 A7 20 31 36 30 00 3C 0A BE 00 8F 20 2A | 0 . 160.<.... *|
00000220: 2A 20 4F 50 4E 41 4D 45 20 4B 57 41 4E 54 55 4D |* OPNAME KWANTUM|
00000230: 4B 4F 52 54 49 4E 47 45 4E 20 2A 2A 00 42 0A C8 |KORTINGEN **.B..|
00000240: 00 99 00 62 0A D2 00 99 22 2A 2A 2A 20 4B 57 41 |...b...."*** KWA|
00000250: 4E 54 55 4D 4B 4F 52 54 49 4E 47 45 4E 20 2A 2A |NTUMKORTINGEN **|
00000260: 2A 22 00 68 0A DC 00 99 00 70 0A E6 00 58 B2 30 |*".h.....p...X.0|
00000270: 00 A9 0A F0 00 99 22 4D 49 4E 2E 48 4F 45 56 45 |......"MIN.HOEVE|
00000280: 45 4C 48 2E 20 2C 4D 41 58 2E 48 4F 45 56 45 45 |ELH. ,MAX.HOEVEE|
00000290: 4C 48 2E 20 2C 50 52 59 53 22 3A 99 22 53 54 4F |LH. ,PRYS":."STO|
000002A0: 50 3D 30 2C 30 2C 30 20 22 00 B3 0A FA 00 58 B2 |P=0,0,0 ".....X.|
000002B0: 58 AA 31 00 C5 0A 04 01 99 22 4B 57 41 4E 54 55 |X.1......"KWANTU|
000002C0: 4D 22 3B 58 2C 00 E0 0A 0E 01 85 20 41 28 58 2C |M";X,...... A(X,|
000002D0: 31 29 2C 41 28 58 2C 32 29 2C 41 28 58 2C 33 29 |1),A(X,2),A(X,3)|
000002E0: 00 0E 0B 18 01 8B 20 28 20 41 28 58 2C 32 29 20 |...... ( A(X,2) |
000002F0: B3 B1 20 30 20 29 20 B0 20 28 20 41 28 58 2C 33 |.. 0 ) . ( A(X,3|
00000300: 29 20 B3 B1 20 30 20 29 20 A7 20 32 35 30 00 18 |) .. 0 ) . 250..|
00000310: 0B 22 01 58 B2 58 AB 31 00 22 0B 2C 01 99 22 93 |.".X.X.1.".,..".|
00000320: 22 3B 00 4A 0B 36 01 99 20 A3 30 35 29 22 2A 2A |";.J.6.. .05)"**|
00000330: 2A 20 4F 50 54 49 4D 41 41 4C 20 42 45 53 54 45 |* OPTIMAAL BESTE|
00000340: 4C 50 4C 41 4E 20 2A 2A 2A 22 00 50 0B 40 01 99 |LPLAN ***".P.@..|
00000350: 00 72 0B 4A 01 99 22 48 4F 45 56 45 45 4C 48 45 |.r.J.."HOEVEELHE|
00000360: 49 44 20 50 52 59 53 20 42 45 53 54 45 4C 2D 20 |ID PRYS BESTEL- |
00000370: 22 3B 00 86 0B 54 01 99 22 41 41 4E 54 2E 20 42 |";...T.."AANT. B|
00000380: 45 44 52 41 47 22 00 A9 0B 5E 01 99 22 4D 49 4E |EDRAG"...^.."MIN|
00000390: 22 3B A3 36 29 22 4D 41 58 22 3B A3 31 37 29 22 |";.6)"MAX";.17)"|
000003A0: 47 52 4F 4F 54 54 45 22 3B 00 B9 0B 68 01 99 A3 |GROOTTE";...h...|
000003B0: 32 35 29 22 4F 52 44 2E 22 00 C3 0B 72 01 41 24 |25)"ORD."...r.A$|
000003C0: B2 22 22 00 D1 0B 7C 01 81 20 49 B2 31 20 A4 20 |.""...|.. I.1 . |
000003D0: 58 00 F9 0B 86 01 59 B2 28 28 32 AC 42 AC 51 29 |X.....Y.((2.B.Q)|
000003E0: AD 28 4B 31 AC 32 AA 20 41 28 49 2C 33 29 AC 4B |.(K1.2. A(I,3).K|
000003F0: AD 31 30 30 29 29 AE 2E 35 00 07 0C 90 01 59 B2 |.100))..5.....Y.|
00000400: B5 28 59 AA 2E 35 29 00 18 0C 9A 01 59 31 B2 B5 |.(Y..5).....Y1..|
00000410: 28 51 AD 59 AA 2E 35 29 00 28 0C A4 01 59 32 B2 |(Q.Y..5).(...Y2.|
00000420: 59 AC 41 28 49 2C 33 29 00 3C 0C AE 01 8B 20 59 |Y.A(I,3).<.... Y|
00000430: B3 41 28 49 2C 31 29 A7 20 34 36 30 00 54 0C B8 |.A(I,1). 460.T..|
00000440: 01 8B 20 59 20 20 B1 20 41 28 49 2C 32 29 20 A7 |.. Y . A(I,2) .|
00000450: 20 34 36 30 00 5F 0C C2 01 41 24 B2 22 2A 22 00 | 460._...A$."*".|
00000460: 81 0C CC 01 99 41 28 49 2C 31 29 3B A3 35 29 41 |.....A(I,1);.5)A|
00000470: 28 49 2C 32 29 3B A3 31 32 29 41 28 49 2C 33 29 |(I,2);.12)A(I,3)|
00000480: 3B 00 A2 0C D6 01 99 20 A3 31 37 29 59 3B A3 32 |;...... .17)Y;.2|
00000490: 34 29 59 31 3B A3 33 30 29 59 32 3B A3 33 36 29 |4)Y1;.30)Y2;.36)|
000004A0: 41 24 00 AC 0C E0 01 41 24 B2 22 22 00 B4 0C EA |A$.....A$.""....|
000004B0: 01 82 20 49 00 BA 0C F4 01 99 00 C0 0C FE 01 80 |.. I............|
000004C0: 00 00 00 |... |
..N.... --(C) DIGICOM SOFTWARE,TAPE B01
-- AANGEPAST VOOR COMMODORE 64.Q
.... *** OPTIMALE BESTELSERIE ***.....
A(25,3)...... *** INVOER VAN DE GEGEVENS
***...(..".";.Q.2.."*** OPTIMALE BESTEL
SERIE ***.W.<.....F.."AFZET PER PERIODE
";...P.. Q.".Z.. ( Q .. 0 ) . ( Q..(Q) .
. 0 ) . 70.F.D.."VAST BEDRAG PER BESTELL
ING ";.N.N.. B.~.X.. ( B . 0 ) . ( B.100
..(B.100) .. 0 ) . 100...... "VARIABELE
OPSLAGKOSTEN PER EENHEID ";...... K1....
.. ( K1.0 ) . (K1.100..(K1.100) .. 0 ) .
130... .."INTEREST IN PROC ";...... K..
.... K . 0 . 160.<.... ** OPNAME KWANTUM
KORTINGEN **.B.H...B.R.."*** KWANTUMKORT
INGEN ***".H.....P...X.0......"MIN.HOEVE
ELH. ,MAX.HOEVEELH. ,PRYS":."STOP=0,0,0
".....X.X.1.E...."KWANTUM";X,...... A(X,
1),A(X,2),A(X,3)...... ( A(X,2) .. 0 ) .
( A(X,3) .. 0 ) . 250...".X.X.1.".,..".
";.J.6.. .05)"*** OPTIMAAL BESTELPLAN **
*".P.@...R.J.."HOEVEELHEID PRYS BESTEL-
";...T.."AANT. BEDRAG"...^.."MIN";.6)"MA
X";.17)"GROOTTE";...H...25)"ORD.".C.R.A$
."".Q.|.. I.1 . X.....Y.((2.B.Q).(K1.2.
A(I,3).K.100))..5.....Y..(Y..5).....Y1..
(Q.Y..5).(...Y2.Y.A(I,3).<.... Y.A(I,1).
460.T.... Y . A(I,2) . 460._.B.A$."*".
..L..A(I,1);.5)A(I,2);.12)A(I,3);...V..
.17)Y;.24)Y1;.30)Y2;.36)A$.....A$.""....
.. I...............
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL