BASISECO
FILE INFORMATION
FILENAME(S): BASISECO
FILE TYPE(S): PRG
FILE SIZE: 5.8K
FIRST SEEN: 2025-11-30 21:23:45
APPEARS ON: 1 disk(s)
FILE HASH
e02eb7544b32f7873c2d32d1987adfb16461384879e4b00d6900907a22422a57
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 46 1 | BASISECO | PRG | DuncanTwain | 6 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 00 00 8F 20 44 52 53 2E 4A 43 41 56 |....... DRS.JCAV|
00000010: 41 4E 4C 45 54 48 2F 56 45 4E 4C 4F 00 53 08 05 |ANLETH/VENLO.S..|
00000020: 00 8F 20 50 47 4D 20 3D 20 27 4D 41 43 52 4F 2D |.. PGM = 'MACRO-|
00000030: 45 43 4F 4E 2E 4D 4F 44 45 4C 4C 45 4E 20 42 41 |ECON.MODELLEN BA|
00000040: 53 49 53 50 52 4F 47 52 2E 27 20 4D 45 53 2D 38 |SISPROGR.' MES-8|
00000050: 35 32 30 00 7A 08 06 00 8F 20 28 43 29 20 4D 41 |520.z.... (C) MA|
00000060: 4D 42 45 52 47 20 31 39 38 32 20 4A 2E 43 2E 41 |MBERG 1982 J.C.A|
00000070: 2E 20 56 41 4E 20 4C 45 54 48 00 84 08 08 00 99 |. VAN LETH......|
00000080: C7 28 38 29 00 90 08 0A 00 8D 20 36 30 30 30 30 |.(8)...... 60000|
00000090: 00 99 08 50 00 99 22 93 22 00 B7 08 55 00 97 35 |...P.."."...U..5|
000000A0: 33 32 38 31 2C 33 3A 97 35 33 32 38 30 2C 33 3A |3281,3:.53280,3:|
000000B0: 97 36 34 36 2C 31 31 00 DB 08 5A 00 4B B2 30 3A |.646,11...Z.K.0:|
000000C0: 5A B2 30 3A 49 B2 30 3A 4A B2 30 3A 58 B2 30 3A |Z.0:I.0:J.0:X.0:|
000000D0: 59 B2 30 3A 41 41 B2 31 30 32 34 00 E4 08 64 00 |Y.0:AA.1024...d.|
000000E0: 8D 35 30 30 00 EE 08 6E 00 8D 32 30 30 30 00 F8 |.500...n..2000..|
000000F0: 08 73 00 8D 39 30 30 30 00 02 09 78 00 8D 33 30 |.s..9000...x..30|
00000100: 30 30 00 0C 09 8C 00 8D 35 30 30 30 00 29 09 91 |00......5000.)..|
00000110: 00 8B 20 46 54 B2 31 20 A7 20 46 54 B2 30 3A 8D |.. FT.1 . FT.0:.|
00000120: 36 30 30 30 3A 89 31 31 35 00 33 09 96 00 8D 39 |6000:.115.3....9|
00000130: 35 30 30 00 3E 09 A0 00 8D 20 39 30 30 30 00 51 |500.>.... 9000.Q|
00000140: 09 A5 00 8B 20 56 41 B2 31 20 A7 20 89 20 31 32 |.... VA.1 . . 12|
00000150: 30 00 77 09 AA 00 99 22 93 11 11 11 CE 4F 47 20 |0.w....".....OG |
00000160: 45 45 4E 20 50 52 4F 42 4C 45 45 4D 3F 20 22 3B |EEN PROBLEEM? ";|
00000170: 3A 8D 20 34 31 30 30 00 8F 09 B4 00 8B 20 5A 5A |:. 4100...... ZZ|
00000180: 24 B2 22 4A 22 20 A7 20 9C 3A 89 20 31 30 30 00 |$."J" . .:. 100.|
00000190: 9B 09 BE 00 99 C7 28 39 29 3A 80 00 A6 09 F4 01 |......(9):......|
000001A0: 99 22 93 11 11 11 00 F0 09 FE 01 99 22 1F 20 20 |."..........". |
000001B0: 20 20 20 20 CD C1 C3 D2 CF 2D C5 C3 CF CE CF CD | .....-......|
000001C0: C9 D3 C3 C8 C5 20 CD CF C4 C5 CC CC C5 CE 20 20 |..... ........ |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001E0: 20 20 C2 C1 D3 C9 D3 D0 D2 CF C7 D2 C1 CD CD C1 | ..............|
000001F0: 00 20 0A 08 02 99 3A 99 22 2D 2D 2D 2D 2D 2D 2D |. ....:."-------|
00000200: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000210: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 97 |---------------.|
00000220: 00 3B 0A E8 03 8F 20 53 55 42 52 4F 55 54 49 4E |.;.... SUBROUTIN|
00000230: 45 56 41 52 49 41 42 45 4C 45 4E 00 44 0A EB 03 |EVARIABELEN.D...|
00000240: 9F 31 2C 30 00 7A 0A ED 03 99 3A 99 22 C8 4F 45 |.1,0.z....:.".OE|
00000250: 56 45 45 4C 20 56 41 52 49 41 42 45 4C 45 4E 20 |VEEL VARIABELEN |
00000260: 48 45 45 46 54 20 4A 45 20 4D 4F 44 45 4C 3F 20 |HEEFT JE MODEL? |
00000270: 22 3B 3A 84 31 2C 5A 24 3A 99 00 8C 0A EE 03 5A |";:.1,Z$:......Z|
00000280: B2 C5 28 5A 24 29 3A 20 5A 31 B2 5A 00 C7 0A EF |..(Z$): Z1.Z....|
00000290: 03 99 3A 99 22 CA 45 20 4D 4F 44 45 4C 20 56 45 |..:.".E MODEL VE|
000002A0: 52 45 49 53 54 20 44 55 53 20 4F 4F 4B 22 3B 5A |REIST DUS OOK";Z|
000002B0: 3A 99 A3 32 30 29 22 56 45 52 47 45 4C 49 4A 4B |:..20)"VERGELIJK|
000002C0: 49 4E 47 45 4E 2E 22 00 D7 0A F0 03 8D 34 30 30 |INGEN."......400|
000002D0: 30 3A 99 22 93 22 3B 00 E3 0A F2 03 86 59 28 5A |0:.".";......Y(Z|
000002E0: 2C 31 29 00 EE 0A FC 03 81 4A B2 31 A4 5A 00 1C |,1)......J.1.Z..|
000002F0: 0B 06 04 99 22 C7 45 45 46 20 44 45 22 3B 4A 3B |....".EEF DE";J;|
00000300: 22 9D 45 20 56 41 52 49 41 42 45 4C 45 20 4F 50 |".E VARIABELE OP|
00000310: 3A 20 22 3B 3A 84 31 2C 5A 24 3A 99 00 22 0B 07 |: ";:.1,Z$:.."..|
00000320: 04 99 00 3B 0B 0B 04 8B C3 28 5A 24 29 B3 32 A7 |...;.....(Z$).2.|
00000330: 5A 24 B2 5A 24 AA 28 22 2A 22 29 00 55 0B 10 04 |Z$.Z$.("*").U...|
00000340: 59 28 4A 2C 31 29 B2 C3 28 5A 24 29 3A 41 24 B2 |Y(J,1)..(Z$):A$.|
00000350: 41 24 AA 5A 24 00 5C 0B 24 04 82 4A 00 65 0B 2E |A$.Z$.\.$..J.e..|
00000360: 04 A0 31 3A 8E 00 8B 0B D0 07 8F 53 55 42 52 4F |..1:.......SUBRO|
00000370: 55 54 49 4E 45 56 45 52 47 45 4C 49 4A 4B 49 4E |UTINEVERGELIJKIN|
00000380: 47 45 4E 4F 4D 5A 45 54 54 45 4E 00 93 0B D5 07 |GENOMZETTEN.....|
00000390: 99 3A 99 00 D1 0B DA 07 86 41 28 5A 2C 5A AA 32 |.:.......A(Z,Z.2|
000003A0: 29 2C 42 28 5A 2C 32 29 2C 50 24 28 5A 2C 31 30 |),B(Z,2),P$(Z,10|
000003B0: 30 29 2C 42 24 28 31 2C 31 30 30 29 2C 43 31 24 |0),B$(1,100),C1$|
000003C0: 28 5A 2C 31 30 30 29 2C 43 24 28 31 2C 31 30 30 |(Z,100),C$(1,100|
000003D0: 29 00 DF 0B DB 07 86 51 28 5A 2C 5A AA 32 29 00 |)......Q(Z,Z.2).|
000003E0: E8 0B E4 07 59 31 B2 31 00 F3 0B EE 07 81 4A B2 |....Y1.1......J.|
000003F0: 31 A4 5A 00 FE 0B F8 07 9F 31 2C 30 3A 99 00 2A |1.Z......1,0:..*|
00000400: 0C 02 08 99 22 C7 45 45 46 20 44 45 22 3B 4A 3B |....".EEF DE";J;|
00000410: 22 9D 45 20 56 45 52 47 45 4C 49 4A 4B 49 4E 47 |".E VERGELIJKING|
00000420: 3A 20 22 3B 3A 84 31 2C 42 24 00 30 0C 04 08 99 |: ";:.1,B$.0....|
00000430: 00 56 0C 07 08 50 24 28 4A 2C C3 28 42 24 29 29 |.V...P$(J,.(B$))|
00000440: B2 42 24 3A 53 32 B2 C3 28 42 24 29 3A 42 28 4A |.B$:S2..(B$):B(J|
00000450: 2C 31 29 B2 53 32 00 65 0C 0C 08 81 50 B2 31 A4 |,1).S2.e....P.1.|
00000460: C3 28 42 24 29 00 7D 0C 16 08 8B CA 28 42 24 2C |.(B$).}.....(B$,|
00000470: 50 2C 31 29 B3 B1 28 22 3D 22 29 A7 82 00 8E 0C |P,1)..("=").....|
00000480: 20 08 43 24 B2 C8 28 42 24 2C 50 AB 31 29 00 9D | .C$..(B$,P.1)..|
00000490: 0C 2A 08 81 58 B2 50 A4 C3 28 42 24 29 00 C9 0C |.*..X.P..(B$)...|
000004A0: 34 08 8B CA 28 42 24 2C 58 2C 31 29 B2 28 22 3D |4...(B$,X,1).("=|
000004B0: 22 29 AF CA 28 42 24 2C 58 AA 31 2C 31 29 B2 28 |")..(B$,X.1,1).(|
000004C0: 22 2D 22 29 A7 32 31 38 30 00 EC 0C 3E 08 8B CA |"-").2180...>...|
000004D0: 28 42 24 2C 58 2C 31 29 B2 28 22 3D 22 29 A7 43 |(B$,X,1).("=").C|
000004E0: 24 B2 43 24 AA 28 22 2D 22 29 3A 82 00 0F 0D 48 |$.C$.("-"):....H|
000004F0: 08 8B CA 28 42 24 2C 58 2C 31 29 B2 28 22 2D 22 |...(B$,X,1).("-"|
00000500: 29 A7 43 24 B2 43 24 AA 28 22 2B 22 29 3A 82 00 |).C$.C$.("+"):..|
00000510: 32 0D 52 08 8B CA 28 42 24 2C 58 2C 31 29 B2 28 |2.R...(B$,X,1).(|
00000520: 22 2B 22 29 A7 43 24 B2 43 24 AA 28 22 2D 22 29 |"+").C$.C$.("-")|
00000530: 3A 82 00 46 0D 5C 08 43 24 B2 43 24 AA CA 28 42 |:..F.\.C$.C$..(B|
00000540: 24 2C 58 2C 31 29 00 4C 0D 70 08 82 00 56 0D 7A |$,X,1).L.p...V.z|
00000550: 08 89 32 32 30 30 00 6E 0D 84 08 43 24 B2 43 24 |..2200.n...C$.C$|
00000560: AA 28 22 2B 22 29 3A 58 B2 58 AA 31 3A 82 00 9C |.("+"):X.X.1:...|
00000570: 0D 98 08 42 24 B2 43 24 3A 5A 31 B2 C6 28 C9 28 |...B$.C$:Z1..(.(|
00000580: 42 24 2C 31 29 29 3A 5A 32 B2 C6 28 CA 28 42 24 |B$,1)):Z2..(.(B$|
00000590: 2C C3 28 42 24 29 AB 31 2C 31 29 29 00 C2 0D A2 |,.(B$).1,1))....|
000005A0: 08 8B 28 5A 31 B3 34 38 B0 5A 31 B1 35 37 29 A7 |..(Z1.48.Z1.57).|
000005B0: 43 24 B2 42 24 AA 28 22 3D 30 22 29 3A 89 32 32 |C$.B$.("=0"):.22|
000005C0: 33 30 00 F0 0D A7 08 8B 28 5A 31 B1 B2 34 38 AF |30......(Z1..48.|
000005D0: 5A 31 B3 B2 35 37 AF 5A 32 B1 36 33 29 A7 43 24 |Z1..57.Z2.63).C$|
000005E0: B2 42 24 AA 28 22 3D 30 22 29 3A 89 32 32 33 30 |.B$.("=0"):.2230|
000005F0: 00 0A 0E AC 08 8B 28 5A 31 B1 B2 34 38 AF 5A 31 |......(Z1..48.Z1|
00000600: B3 B2 35 37 29 A7 32 32 35 30 00 1B 0E B6 08 8D |..57).2250......|
00000610: 32 33 32 30 3A 8D 20 38 30 30 30 00 3E 0E BB 08 |2320:. 8000.>...|
00000620: 8B 54 4C B2 31 A7 43 31 24 28 4A 2C C3 28 43 24 |.TL.1.C1$(J,.(C$|
00000630: 29 29 B2 43 24 3A 43 31 B2 C3 28 43 24 29 00 5A |)).C$:C1..(C$).Z|
00000640: 0E BD 08 8B 54 4C B2 31 A7 42 28 4A 2C 32 29 B2 |....TL.1.B(J,2).|
00000650: 43 31 3A 43 24 B2 4C 24 3A 8E 00 8C 0E C0 08 43 |C1:C$.L$:......C|
00000660: 31 24 28 4A 2C C3 28 43 24 29 29 B2 43 24 3A 43 |1$(J,.(C$)).C$:C|
00000670: 31 B2 C3 28 43 24 29 3A 42 28 4A 2C 32 29 B2 43 |1..(C$):B(J,2).C|
00000680: 31 3A 43 24 B2 4C 24 3A 82 4A 3A 8E 00 9E 0E CA |1:C$.L$:.J:.....|
00000690: 08 81 58 B2 C3 28 43 24 29 A4 31 A9 AB 31 00 AC |..X..(C$).1..1..|
000006A0: 0E D4 08 51 B2 C3 28 43 24 29 AB 58 00 C4 0E DE |...Q..(C$).X....|
000006B0: 08 8B CA 28 43 24 2C 58 2C 31 29 B2 22 2D 22 A7 |...(C$,X,1)."-".|
000006C0: 32 33 30 30 00 DC 0E E8 08 8B CA 28 43 24 2C 58 |2300.......(C$,X|
000006D0: 2C 31 29 B2 22 2B 22 A7 32 33 31 30 00 E3 0E F2 |,1)."+".2310....|
000006E0: 08 82 58 00 0E 0F FC 08 44 24 B2 C8 28 43 24 2C |..X.....D$..(C$,|
000006F0: 58 AB 31 29 AA 28 22 3D 22 29 AA C9 28 43 24 2C |X.1).("=")..(C$,|
00000700: 51 29 3A 43 24 B2 44 24 3A 89 32 32 33 30 00 3F |Q):C$.D$:.2230.?|
00000710: 0F 06 09 44 24 B2 C8 28 43 24 2C 58 AB 31 29 AA |...D$..(C$,X.1).|
00000720: 28 22 3D 22 29 AA 28 22 2D 22 29 AA C9 28 43 24 |("=").("-")..(C$|
00000730: 2C 51 29 3A 43 24 B2 44 24 3A 89 32 32 33 30 00 |,Q):C$.D$:.2230.|
00000740: 51 0F 10 09 99 A3 32 30 29 22 1F 22 43 24 22 97 |Q.....20)"."C$".|
00000750: 22 00 5A 0F 24 09 A0 31 3A 8E 00 79 0F B8 0B 8F |".Z.$..1:..y....|
00000760: 3A 46 4F 52 4A 3D 31 54 4F 5A 3A 41 28 4A 2C 4A |:FORJ=1TOZ:A(J,J|
00000770: 29 3D 30 3A 4E 45 58 54 4A 00 A0 0F C2 0B 81 4A |)=0:NEXTJ......J|
00000780: B2 31 A4 5A 3A 4D 31 B2 31 3A 43 24 B2 43 31 24 |.1.Z:M1.1:C$.C1$|
00000790: 28 4A 2C 42 28 4A 2C 32 29 29 3A 42 24 B2 43 24 |(J,B(J,2)):B$.C$|
000007A0: 00 CB 0F CC 0B 8B C6 28 C8 28 43 24 2C 31 29 29 |.......(.(C$,1))|
000007B0: B3 35 38 A7 45 24 B2 28 22 20 22 29 3A 42 24 B2 |.58.E$.(" "):B$.|
000007C0: 45 24 AA 43 24 3A 89 33 30 34 30 00 EE 0F E0 0B |E$.C$:.3040.....|
000007D0: 81 58 B2 31 A4 5A 3A 4D 31 B2 4D 31 AA 59 28 58 |.X.1.Z:M1.M1.Y(X|
000007E0: AB 31 2C 31 29 3A 43 B2 59 28 58 2C 31 29 00 FD |.1,1):C.Y(X,1)..|
000007F0: 0F F4 0B 81 59 B2 31 A4 C3 28 42 24 29 00 1D 10 |....Y.1..(B$)...|
00000800: FE 0B 8B CA 28 41 24 2C 4D 31 2C 43 29 B2 CA 28 |....(A$,M1,C)..(|
00000810: 42 24 2C 59 2C 43 29 A7 8D 33 31 33 30 00 26 10 |B$,Y,C)..3130.&.|
00000820: 08 0C 82 59 2C 58 00 4C 10 1C 0C 81 57 B2 31 A4 |...Y,X.L....W.1.|
00000830: C3 28 42 24 29 3A 8B CA 28 42 24 2C 59 AB 57 2C |.(B$):..(B$,Y.W,|
00000840: 31 29 B3 B1 28 22 3D 22 29 A7 82 57 00 70 10 26 |1)..("=")..W.p.&|
00000850: 0C 44 24 B2 CA 28 42 24 2C 59 AB 57 AA 31 2C 57 |.D$..(B$,Y.W.1,W|
00000860: 29 3A 41 28 4A 2C 5A AA 31 29 B2 C5 28 44 24 29 |):A(J,Z.1)..(D$)|
00000870: 00 7A 10 30 0C 89 33 32 33 30 00 9D 10 3A 0C 8B |.z.0..3230...:..|
00000880: CA 28 41 24 2C 4D 31 2C 43 29 B2 C8 28 42 24 2C |.(A$,M1,C)..(B$,|
00000890: 43 29 A7 41 28 4A 2C 58 29 B2 31 3A 8E 00 BF 10 |C).A(J,X).1:....|
000008A0: 44 0C 8B CA 28 42 24 2C 59 AB 31 2C 31 29 B2 28 |D...(B$,Y.1,1).(|
000008B0: 22 2B 22 29 A7 41 28 4A 2C 58 29 B2 31 3A 8E 00 |"+").A(J,X).1:..|
000008C0: E2 10 4E 0C 8B CA 28 42 24 2C 59 AB 31 2C 31 29 |..N...(B$,Y.1,1)|
000008D0: B2 28 22 2D 22 29 A7 41 28 4A 2C 58 29 B2 AB 31 |.("-").A(J,X)..1|
000008E0: 3A 8E 00 FD 10 58 0C 81 51 B2 31 A4 59 3A 41 31 |:....X..Q.1.Y:A1|
000008F0: 24 B2 CA 28 42 24 2C 59 AB 51 2C 31 29 00 2A 11 |$..(B$,Y.Q,1).*.|
00000900: 6C 0C 8B 41 31 24 B2 28 22 20 22 29 A7 44 24 B2 |l..A1$.(" ").D$.|
00000910: CA 28 42 24 2C 59 AB 51 2C 51 29 3A 41 28 4A 2C |.(B$,Y.Q,Q):A(J,|
00000920: 58 29 B2 C5 28 44 24 29 3A 8E 00 57 11 76 0C 8B |X)..(D$):..W.v..|
00000930: 41 31 24 B2 28 22 2D 22 29 A7 44 24 B2 CA 28 42 |A1$.("-").D$..(B|
00000940: 24 2C 59 AB 51 2C 51 29 3A 41 28 4A 2C 58 29 B2 |$,Y.Q,Q):A(J,X).|
00000950: C5 28 44 24 29 3A 8E 00 84 11 80 0C 8B 41 31 24 |.(D$):.......A1$|
00000960: B2 28 22 2B 22 29 A7 44 24 B2 CA 28 42 24 2C 59 |.("+").D$..(B$,Y|
00000970: AB 51 2C 51 29 3A 41 28 4A 2C 58 29 B2 C5 28 44 |.Q,Q):A(J,X)..(D|
00000980: 24 29 3A 8E 00 8B 11 8A 0C 82 51 00 95 11 94 0C |$):.......Q.....|
00000990: 89 33 31 30 30 00 9C 11 9E 0C 82 4A 00 C3 11 A3 |.3100......J....|
000009A0: 0C 81 4B B2 31 A4 5A 3A 81 49 B2 31 A4 5A AA 32 |..K.1.Z:.I.1.Z.2|
000009B0: 3A 51 28 4B 2C 49 29 B2 41 28 4B 2C 49 29 3A 82 |:Q(K,I).A(K,I):.|
000009C0: 49 2C 4B 00 C9 11 A8 0C 8E 00 EC 11 A0 0F 99 3A |I,K............:|
000009D0: 99 22 20 20 20 20 20 20 20 D3 4C 41 20 45 45 4E |." .LA EEN|
000009E0: 20 54 4F 45 54 53 20 41 41 4E 2E 22 00 03 12 AA | TOETS AAN."....|
000009F0: 0F 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 |..198,0:.198,1:.|
00000A00: 5A 5A 24 00 09 12 B4 0F 8E 00 1E 12 04 10 9F 31 |ZZ$............1|
00000A10: 2C 30 3A 84 31 2C 5A 5A 24 3A A0 31 3A 8E 00 40 |,0:.1,ZZ$:.1:..@|
00000A20: 12 88 13 8B 54 4D B2 31 A7 35 30 31 30 3A 8F 4F |....TM.1.5010:.O|
00000A30: 50 4C 4F 53 53 49 4E 47 53 52 4F 55 54 49 4E 45 |PLOSSINGSROUTINE|
00000A40: 00 80 12 89 13 99 3A 99 22 D7 49 4C 20 4A 45 20 |......:.".IL JE |
00000A50: 45 45 4E 20 41 46 44 52 55 4B 20 56 41 4E 20 44 |EEN AFDRUK VAN D|
00000A60: 45 20 4F 50 4C 4F 53 53 49 4E 47 20 20 20 20 20 |E OPLOSSING |
00000A70: 20 28 4A 2F 4E 29 3F 20 22 3B 3A 8D 34 31 30 30 | (J/N)? ";:.4100|
00000A80: 00 9B 12 8A 13 8B C8 28 5A 5A 24 2C 31 29 B2 22 |.......(ZZ$,1)."|
00000A90: 4A 22 A7 20 9F 32 2C 34 3A 9D 32 00 A4 12 8B 13 |J". .2,4:.2.....|
00000AA0: 99 22 93 22 00 D4 12 8D 13 99 22 1F 2A 2A 2A 2A |."."......".****|
00000AB0: 2A 20 C4 C5 20 CF D0 CC CF D3 D3 C9 CE C7 20 D6 |* .. ......... .|
00000AC0: C1 CE 20 C8 C5 D4 20 CD CF C4 C5 CC 20 2A 2A 2A |.. ... ..... ***|
00000AD0: 2A 2A 97 22 00 DF 12 92 13 81 4A B2 31 A4 5A 00 |**."......J.1.Z.|
00000AE0: EA 12 9C 13 81 49 B2 4A A4 5A 00 FE 12 A6 13 8B |.....I.J.Z......|
00000AF0: 41 28 49 2C 4A 29 B3 B1 30 A7 35 30 37 30 00 05 |A(I,J)..0.5070..|
00000B00: 13 B0 13 82 49 00 11 13 BA 13 46 54 B2 31 3A 20 |....I.....FT.1: |
00000B10: 8E 00 41 13 CE 13 81 4B B2 31 A4 5A AA 31 3A 58 |..A....K.1.Z.1:X|
00000B20: B2 41 28 4A 2C 4B 29 3A 41 28 4A 2C 4B 29 B2 41 |.A(J,K):A(J,K).A|
00000B30: 28 49 2C 4B 29 3A 41 28 49 2C 4B 29 B2 58 3A 82 |(I,K):A(I,K).X:.|
00000B40: 4B 00 50 13 00 14 59 B2 31 AD 41 28 4A 2C 4A 29 |K.P...Y.1.A(J,J)|
00000B50: 00 5E 13 01 14 8B 59 B2 31 A7 35 31 36 30 00 7E |.^....Y.1.5160.~|
00000B60: 13 0A 14 81 4B B2 31 A4 5A AA 31 3A 41 28 4A 2C |....K.1.Z.1:A(J,|
00000B70: 4B 29 B2 59 AC 41 28 4A 2C 4B 29 3A 82 4B 00 89 |K).Y.A(J,K):.K..|
00000B80: 13 28 14 81 49 B2 31 A4 5A 00 97 13 32 14 8B 49 |.(..I.1.Z...2..I|
00000B90: B2 4A A7 35 32 32 30 00 A5 13 3C 14 59 B2 AB 41 |.J.5220...<.Y..A|
00000BA0: 28 49 2C 4A 29 00 CC 13 46 14 81 4B B2 31 A4 5A |(I,J)...F..K.1.Z|
00000BB0: AA 31 3A 41 28 49 2C 4B 29 B2 41 28 49 2C 4B 29 |.1:A(I,K).A(I,K)|
00000BC0: AA 59 AC 41 28 4A 2C 4B 29 3A 82 4B 00 D5 13 64 |.Y.A(J,K):.K...d|
00000BD0: 14 82 49 2C 4A 00 DB 13 78 14 99 00 EF 13 79 14 |..I,J...x.....y.|
00000BE0: 50 31 B2 31 3A 8B 54 4D B2 31 A7 39 36 32 30 00 |P1.1:.TM.1.9620.|
00000BF0: FA 13 82 14 81 49 B2 31 A4 5A 00 16 14 87 14 50 |.....I.1.Z.....P|
00000C00: 31 B2 50 31 AA 59 28 49 AB 31 2C 31 29 3A 43 B2 |1.P1.Y(I.1,1):C.|
00000C10: 59 28 49 2C 31 29 00 48 14 8C 14 99 CA 28 41 24 |Y(I,1).H.....(A$|
00000C20: 2C 50 31 2C 43 29 3B 22 3D 22 3B B5 28 41 28 49 |,P1,C);"=";.(A(I|
00000C30: 2C 5A AA 31 29 AC 31 30 30 30 30 30 AA 2E 35 29 |,Z.1).100000..5)|
00000C40: AD 31 30 30 30 30 30 3B 00 6A 14 91 14 99 A3 31 |.100000;.j.....1|
00000C50: 35 29 22 28 22 3B 49 3B 22 29 20 20 22 3B 50 24 |5)"(";I;") ";P$|
00000C60: 28 49 2C 42 28 49 2C 31 29 29 00 71 14 96 14 82 |(I,B(I,1)).q....|
00000C70: 49 00 8C 14 A0 14 8B 20 C8 28 5A 5A 24 2C 31 29 |I...... .(ZZ$,1)|
00000C80: B2 22 4A 22 20 A7 20 98 32 3A A0 32 00 92 14 B4 |."J" . .2:.2....|
00000C90: 14 8E 00 9C 14 70 17 99 22 93 11 11 00 C5 14 7A |.....p.."......z|
00000CA0: 17 99 22 1F C4 49 54 20 53 54 45 4C 53 45 4C 20 |.."..IT STELSEL |
00000CB0: 48 45 45 46 54 20 47 45 45 4E 20 4F 50 4C 4F 53 |HEEFT GEEN OPLOS|
00000CC0: 53 49 4E 47 21 00 F1 14 84 17 99 22 CA 45 20 4D |SING!......".E M|
00000CD0: 4F 45 54 20 44 45 20 56 45 52 47 45 4C 49 4A 4B |OET DE VERGELIJK|
00000CE0: 49 4E 47 45 4E 20 41 41 4E 50 41 53 53 45 4E 2E |INGEN AANPASSEN.|
00000CF0: 97 00 0C 15 8E 17 99 22 11 C4 45 20 56 41 52 49 |......."..E VARI|
00000D00: 41 42 45 4C 45 4E 20 5A 49 4A 4E 3A 00 15 15 93 |ABELEN ZIJN:....|
00000D10: 17 50 31 B2 31 00 3B 15 98 17 81 20 49 B2 31 20 |.P1.1.;.... I.1 |
00000D20: A4 20 5A 3A 50 31 B2 50 31 AA 59 28 49 AB 31 2C |. Z:P1.P1.Y(I.1,|
00000D30: 31 29 3A 43 B2 59 28 49 2C 31 29 00 71 15 9D 17 |1):C.Y(I,1).q...|
00000D40: 5A 5A 24 B2 CA 28 41 24 2C 50 31 2C 43 29 3A 8B |ZZ$..(A$,P1,C):.|
00000D50: C9 28 5A 5A 24 2C 31 29 B2 22 2A 22 A7 20 5A 5A |.(ZZ$,1)."*". ZZ|
00000D60: 24 B2 C8 28 5A 5A 24 2C C3 28 5A 5A 24 29 AB 31 |$..(ZZ$,.(ZZ$).1|
00000D70: 29 00 83 15 9F 17 99 5A 5A 24 22 20 20 22 3B 3A |)......ZZ$" ";:|
00000D80: 82 20 49 00 A4 15 A2 17 99 3A 99 22 11 C4 45 20 |. I......:."..E |
00000D90: 56 45 52 47 45 4C 49 4A 4B 49 4E 47 45 4E 20 5A |VERGELIJKINGEN Z|
00000DA0: 49 4A 4E 3A 00 CA 15 AC 17 81 20 4A B2 31 20 A4 |IJN:...... J.1 .|
00000DB0: 20 5A 3A 99 4A 22 9D 2E 20 22 3B 50 24 28 4A 2C | Z:.J".. ";P$(J,|
00000DC0: 42 28 4A 2C 31 29 29 3A 82 4A 00 D2 15 B6 17 99 |B(J,1)):.J......|
00000DD0: 3A 8E 00 D8 15 40 1F 8F 00 FD 15 41 1F 8F 3A 47 |:....@.....A..:G|
00000DE0: 45 4C 49 4A 4B 53 43 48 41 4B 45 4C 45 4E 56 41 |ELIJKSCHAKELENVA|
00000DF0: 4E 44 45 56 41 52 49 41 42 45 4C 45 4E 00 07 16 |NDEVARIABELEN...|
00000E00: 4A 1F 46 24 B2 4C 24 00 2A 16 54 1F 81 52 B2 31 |J.F$.L$.*.T..R.1|
00000E10: A4 C3 28 43 24 29 3A 8B CA 28 43 24 2C 52 2C 31 |..(C$):..(C$,R,1|
00000E20: 29 B3 B1 28 22 3D 22 29 A7 82 00 35 16 5E 1F 81 |)..("=")...5.^..|
00000E30: 53 B2 31 A4 52 00 5B 16 68 1F 48 55 B2 C6 28 CA |S.1.R.[.h.HU..(.|
00000E40: 28 43 24 2C 53 2C 31 29 29 3A 48 4F B2 C6 28 CA |(C$,S,1)):HO..(.|
00000E50: 28 43 24 2C 53 AA 31 2C 31 29 29 00 6F 16 72 1F |(C$,S.1,1)).o.r.|
00000E60: 46 24 B2 46 24 AA CA 28 43 24 2C 53 2C 31 29 00 |F$.F$..(C$,S,1).|
00000E70: 94 16 7C 1F 8B 28 48 55 B1 36 34 AF 48 4F B1 36 |..|..(HU.64.HO.6|
00000E80: 34 AF 48 55 B3 32 31 38 AF 48 4F B3 32 31 38 29 |4.HU.218.HO.218)|
00000E90: A7 4B B2 31 00 BB 16 81 1F 8B 4B B2 31 A7 46 24 |.K.1......K.1.F$|
00000EA0: B2 46 24 AA CA 28 43 24 2C 53 AA 31 2C 31 29 3A |.F$..(C$,S.1,1):|
00000EB0: 53 B2 53 AA 31 3A 4B B2 30 3A 82 00 DF 16 86 1F |S.S.1:K.0:......|
00000EC0: 8B 28 48 55 B1 36 34 AF 48 55 B3 32 31 38 AF 48 |.(HU.64.HU.218.H|
00000ED0: 4F B1 34 37 AF 48 4F B3 35 38 29 A7 4C B2 31 00 |O.47.HO.58).L.1.|
00000EE0: 06 17 8B 1F 8B 4C B2 31 A7 46 24 B2 46 24 AA CA |.....L.1.F$.F$..|
00000EF0: 28 43 24 2C 53 AA 31 2C 31 29 3A 53 B2 53 AA 31 |(C$,S.1,1):S.S.1|
00000F00: 3A 4C B2 30 3A 82 00 2E 17 90 1F 8B 28 48 55 B1 |:L.0:.......(HU.|
00000F10: 36 34 AF 48 55 B3 32 31 38 AF 48 4F B2 34 33 29 |64.HU.218.HO.43)|
00000F20: A7 46 24 B2 46 24 AA 28 22 2A 22 29 3A 82 00 56 |.F$.F$.("*"):..V|
00000F30: 17 9A 1F 8B 28 48 55 B1 36 34 AF 48 55 B3 32 31 |....(HU.64.HU.21|
00000F40: 38 AF 48 4F B2 34 35 29 A7 46 24 B2 46 24 AA 28 |8.HO.45).F$.F$.(|
00000F50: 22 2A 22 29 3A 82 00 7E 17 A4 1F 8B 28 48 55 B1 |"*"):..~....(HU.|
00000F60: 36 34 AF 48 55 B3 32 31 38 AF 48 4F B2 36 31 29 |64.HU.218.HO.61)|
00000F70: A7 46 24 B2 46 24 AA 28 22 2A 22 29 3A 82 00 84 |.F$.F$.("*"):...|
00000F80: 17 AE 1F 82 00 9C 17 B8 1F 46 24 B2 46 24 AA C9 |.........F$.F$..|
00000F90: 28 43 24 2C C3 28 43 24 29 AB 52 29 00 A8 17 C2 |(C$,.(C$).R)....|
00000FA0: 1F 43 24 B2 46 24 3A 8E 00 AF 17 28 23 8F 3A 00 |.C$.F$:....(#.:.|
00000FB0: B8 17 29 23 56 41 B2 30 00 ED 17 2D 23 99 3A 99 |..)#VA.0...-#.:.|
00000FC0: 22 D7 49 4C 20 4A 45 20 45 45 4E 20 56 45 52 47 |".IL JE EEN VERG|
00000FD0: 45 4C 49 4A 4B 49 4E 47 20 56 45 52 41 4E 44 45 |ELIJKING VERANDE|
00000FE0: 52 45 4E 3F 20 22 3B 3A 8D 34 31 30 30 00 01 18 |REN? ";:.4100...|
00000FF0: 32 23 8B 5A 5A 24 B2 22 4E 22 A7 54 4D B2 30 3A |2#.ZZ$."N".TM.0:|
00001000: 8E 00 0A 18 37 23 56 41 B2 31 00 3D 18 3C 23 99 |....7#VA.1.=.<#.|
00001010: 3A 99 22 D7 45 4C 4B 45 20 28 47 45 45 46 20 56 |:.".ELKE (GEEF V|
00001020: 4F 4C 47 4E 55 4D 4D 45 52 29 3F 20 22 3B 3A 8D |OLGNUMMER)? ";:.|
00001030: 34 31 30 30 3A 4A B2 C5 28 5A 5A 24 29 00 71 18 |4100:J..(ZZ$).q.|
00001040: 41 23 99 3A 99 3A 99 22 C4 49 45 20 56 45 52 47 |A#.:.:.".IE VERG|
00001050: 45 4C 49 4A 4B 49 4E 47 20 57 41 53 20 22 3B 50 |ELIJKING WAS ";P|
00001060: 24 28 4A 2C 42 28 4A 2C 31 29 29 3A 99 22 91 91 |$(J,B(J,1)):."..|
00001070: 22 00 83 18 46 23 54 4C B2 31 3A 8D 32 30 34 30 |"...F#TL.1:.2040|
00001080: 3A A0 31 00 AE 18 50 23 99 3A 99 22 CE 4F 47 20 |:.1...P#.:.".OG |
00001090: 4D 45 45 52 20 56 45 52 47 45 4C 49 4A 4B 49 4E |MEER VERGELIJKIN|
000010A0: 47 45 4E 3F 20 20 22 3B 3A 8D 34 31 30 30 00 B6 |GEN? ";:.4100..|
000010B0: 18 55 23 99 3A 99 00 C8 18 5A 23 8B 5A 5A 24 B2 |.U#.:....Z#.ZZ$.|
000010C0: 22 4A 22 A7 39 30 32 30 00 D3 18 64 23 54 4D B2 |"J".9020...d#TM.|
000010D0: 30 3A 8E 00 F6 18 1C 25 8F 52 4F 55 54 49 4E 45 |0:.....%.ROUTINE|
000010E0: 4F 4D 4D 55 4C 54 49 50 4C 49 45 52 53 54 45 42 |OMMULTIPLIERSTEB|
000010F0: 45 50 41 4C 45 4E 00 23 19 26 25 99 3A 99 3A 99 |EPALEN.#.&%.:.:.|
00001100: 22 1F C2 C5 D2 C5 CB C5 CE C9 CE C7 20 D6 C1 CE |"........... ...|
00001110: 20 C1 CC CC C5 20 CD D5 CC D4 C9 D0 CC C9 C5 D2 | .... ..........|
00001120: D3 97 22 00 63 19 30 25 99 3A 99 22 D7 45 4C 4B |..".c.0%.:.".ELK|
00001130: 20 56 4F 4C 47 4E 55 4D 4D 45 52 20 48 45 45 46 | VOLGNUMMER HEEF|
00001140: 54 20 44 45 20 56 41 52 49 41 42 45 4C 45 20 59 |T DE VARIABELE Y|
00001150: 3F 20 22 3A 8D 34 31 30 30 3A 54 51 B2 C5 28 5A |? ":.4100:TQ..(Z|
00001160: 5A 24 29 00 A3 19 44 25 99 3A 99 22 C7 45 45 46 |Z$)...D%.:.".EEF|
00001170: 20 4E 4F 2E 20 56 41 4E 20 44 45 20 45 56 45 4E | NO. VAN DE EVEN|
00001180: 57 49 43 48 54 53 56 4F 4F 52 57 41 41 52 44 45 |WICHTSVOORWAARDE|
00001190: 3A 20 22 3A 8D 34 31 30 30 3A 51 54 B2 C5 28 5A |: ":.4100:QT..(Z|
000011A0: 5A 24 29 00 D4 19 4E 25 99 3A 99 22 C7 45 45 46 |Z$)...N%.:.".EEF|
000011B0: 20 42 49 4A 20 45 45 4E 20 C9 D3 2F CC CD 2D 4D | BIJ EEN ../..-M|
000011C0: 4F 44 45 4C 20 48 45 54 20 56 4F 4C 47 4E 55 4D |ODEL HET VOLGNUM|
000011D0: 4D 45 52 22 00 FF 19 53 25 99 22 56 41 4E 20 44 |MER"...S%."VAN D|
000011E0: 45 20 41 4E 44 45 52 45 20 45 56 45 4E 57 49 43 |E ANDERE EVENWIC|
000011F0: 48 54 53 56 4F 4F 52 57 41 41 52 44 45 2C 22 00 |HTSVOORWAARDE,".|
00001200: 29 1A 54 25 99 22 41 4E 44 45 52 53 20 45 45 4E |).T%."ANDERS EEN|
00001210: 20 27 30 27 2E 20 20 22 3B 3A 8D 34 31 30 30 3A | '0'. ";:.4100:|
00001220: 51 52 B2 C5 28 5A 5A 24 29 00 44 1A 58 25 54 30 |QR..(ZZ$).D.X%T0|
00001230: B2 30 3A 4D 55 B2 41 28 54 51 2C 5A AA 31 29 3A |.0:MU.A(TQ,Z.1):|
00001240: 54 4D B2 31 00 50 1A 62 25 54 30 B2 54 30 AA 31 |TM.1.P.b%T0.T0.1|
00001250: 00 6C 1A 6C 25 8B 28 28 54 30 B2 51 54 29 B0 28 |.l.l%.((T0.QT).(|
00001260: 54 30 B2 51 52 29 29 A7 39 36 35 30 00 7A 1A 76 |T0.QR)).9650.z.v|
00001270: 25 8F 3A 47 4F 54 4F 31 32 30 00 A1 1A 7B 25 81 |%.:GOTO120...{%.|
00001280: 4B B2 31 A4 5A 3A 81 49 B2 31 A4 5A AA 32 3A 41 |K.1.Z:.I.1.Z.2:A|
00001290: 28 4B 2C 49 29 B2 51 28 4B 2C 49 29 3A 82 49 2C |(K,I).Q(K,I):.I,|
000012A0: 4B 00 BC 1A 80 25 41 28 54 30 2C 5A AA 31 29 B2 |K....%A(T0,Z.1).|
000012B0: 41 28 54 30 2C 5A AA 31 29 AA 31 30 00 C7 1A 8A |A(T0,Z.1).10....|
000012C0: 25 89 20 35 30 31 30 00 FC 1A 94 25 99 22 CD 55 |%. 5010....%.".U|
000012D0: 4C 54 49 50 4C 49 45 52 20 56 2F 44 20 41 55 54 |LTIPLIER V/D AUT|
000012E0: 4F 4E 4F 4D 45 3A 22 3B C8 28 50 24 28 54 30 2C |ONOME:";.(P$(T0,|
000012F0: 42 28 54 30 2C 31 29 29 2C 32 29 3B 00 17 1B 9E |B(T0,1)),2);....|
00001300: 25 99 22 20 22 3B 28 41 28 54 51 2C 5A AA 31 29 |%." ";(A(TQ,Z.1)|
00001310: AB 4D 55 29 AD 31 30 00 26 1B B2 25 8B 54 30 B3 |.MU).10.&..%.T0.|
00001320: 5A A7 39 35 37 30 00 4D 1B BC 25 81 4B B2 31 A4 |Z.9570.M..%.K.1.|
00001330: 5A 3A 81 49 B2 31 A4 5A AA 32 3A 41 28 4B 2C 49 |Z:.I.1.Z.2:A(K,I|
00001340: 29 B2 51 28 4B 2C 49 29 3A 82 49 2C 4B 00 53 1B |).Q(K,I):.I,K.S.|
00001350: D0 25 8E 00 5E 1B 60 EA 8F 20 4C 4F 47 4F 00 7B |.%..^.`.. LOGO.{|
00001360: 1B 65 EA 97 35 33 32 38 30 2C 35 3A 97 35 33 32 |.e..53280,5:.532|
00001370: 38 31 2C 35 3A 97 36 34 36 2C 31 00 87 1B 6A EA |81,5:.646,1...j.|
00001380: 99 C7 28 31 34 29 3B 00 B9 1B 74 EA 99 22 93 11 |..(14);...t.."..|
00001390: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000013A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000013B0: 20 20 20 20 20 20 20 20 22 00 E9 1B 76 EA 99 22 | "...v.."|
000013C0: 12 20 CD C5 D3 20 4D 45 53 20 CD C5 D3 20 4D 45 |. ... MES ... ME|
000013D0: 53 20 CD C5 D3 20 4D 45 53 20 CD 45 53 20 4D 45 |S ... MES .ES ME|
000013E0: 53 20 CD C5 D3 20 20 20 22 00 19 1C 78 EA 99 22 |S ... "...x.."|
000013F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001410: 20 20 20 20 20 20 20 20 22 00 45 1C 84 EA 99 22 | ".E...."|
00001420: AC A2 A2 20 20 20 20 20 20 20 A2 A2 BB 20 20 A2 |... ... .|
00001430: A2 20 A2 A2 20 A2 A2 A2 BB 20 20 A2 A2 20 A2 A2 |. .. .... .. ..|
00001440: A2 A2 20 A2 A2 00 72 1C 86 EA 99 22 AC A2 A2 BB |.. ...r...."....|
00001450: 20 20 20 20 20 AC A2 A2 BB 20 20 A2 A2 20 A2 A2 | .... .. ..|
00001460: 20 A2 A2 A2 BB 20 AC A2 BB AC A2 A2 A2 A2 BB AC | .... ..........|
00001470: A2 A2 00 A0 1C 88 EA 99 22 AC A2 A2 A2 20 20 20 |........".... |
00001480: 20 20 A2 A2 A2 BB 20 20 A2 A2 20 20 20 20 20 20 | .... .. |
00001490: 20 20 20 A2 A2 20 20 20 20 20 20 20 20 A2 A2 BB | .. ...|
000014A0: 00 CE 1C 8A EA 99 22 AC A2 A2 A2 BB 20 20 20 AC |......"..... .|
000014B0: A2 A2 A2 BB 20 20 A2 A2 20 20 20 20 20 20 20 20 |.... .. |
000014C0: 20 A2 A2 20 20 20 20 20 20 20 20 A2 A2 BB 00 F1 | .. .....|
000014D0: 1C 8C EA 99 22 AC A2 BB A2 A2 20 20 20 A2 A2 AC |...."..... ...|
000014E0: A2 BB 20 20 A2 A2 20 20 20 20 20 20 20 20 20 A2 |.. .. .|
000014F0: A2 00 1E 1D 8E EA 99 22 AC A2 BB AC A2 BB 20 AC |......."...... .|
00001500: A2 BB AC A2 BB 20 20 A2 A2 20 A2 A2 20 A2 A2 A2 |..... .. .. ...|
00001510: BB 20 AC A2 BB AC A2 A2 A2 A2 BB AC A2 BB 00 4B |. .............K|
00001520: 1D 90 EA 99 22 AC A2 BB 20 A2 A2 20 A2 A2 20 AC |...."... .. .. .|
00001530: A2 BB 20 20 A2 A2 20 A2 A2 20 A2 A2 A2 BB 20 20 |.. .. .. .... |
00001540: A2 A2 20 A2 A2 A2 A2 A2 20 A2 A2 00 79 1D 92 EA |.. ..... ...y...|
00001550: 99 22 AC A2 BB 20 AC A2 A2 A2 BB 20 AC A2 BB 20 |."... ..... ... |
00001560: 20 A2 A2 20 20 20 20 20 20 20 20 20 20 20 20 20 | .. |
00001570: 20 20 20 20 20 20 AC A2 A2 00 A7 1D 94 EA 99 22 | ........."|
00001580: AC A2 BB 20 20 A2 A2 A2 20 20 AC A2 BB 20 20 A2 |... ... ... .|
00001590: A2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000015A0: 20 20 20 20 AC A2 A2 00 D5 1D 96 EA 99 22 AC A2 | ........."..|
000015B0: BB 20 20 AC A2 BB 20 20 AC A2 BB 20 20 A2 A2 20 |. ... ... .. |
000015C0: 20 20 20 20 20 20 20 20 A2 A2 BB 20 20 20 20 20 | ... |
000015D0: 20 20 AC A2 A2 00 03 1E 98 EA 99 22 AC A2 BB 20 | ........."... |
000015E0: 20 20 A2 20 20 20 AC A2 BB 20 20 A2 A2 20 20 20 | . ... .. |
000015F0: 20 20 20 20 20 20 A2 A2 BB 20 20 20 20 20 20 20 | ... |
00001600: AC A2 A2 00 31 1E 9A EA 99 22 AC A2 BB 20 20 20 |....1...."... |
00001610: 20 20 20 20 AC A2 BB 20 20 A2 A2 20 A2 A2 20 A2 | ... .. .. .|
00001620: A2 A2 BB 20 AC A2 BB AC A2 A2 A2 A2 A2 20 A2 A2 |... ......... ..|
00001630: BB 00 5E 1E 9C EA 99 22 AC A2 BB 20 20 20 20 20 |..^...."... |
00001640: 20 20 AC A2 BB 20 20 A2 A2 20 A2 A2 20 A2 A2 A2 | ... .. .. ...|
00001650: BB 20 20 A2 A2 20 A2 A2 A2 A2 BB AC A2 A2 00 92 |. .. ..........|
00001660: 1E B0 EA 99 22 11 11 12 20 20 20 20 20 20 20 20 |...."... |
00001670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001690: 22 3B 00 C3 1E B2 EA 99 22 20 20 CD C1 CC CD C2 |";......" .....|
000016A0: C5 D2 C7 D3 20 20 20 A0 C5 C4 D5 C3 C1 D4 C9 C5 |.... .........|
000016B0: D6 C5 20 20 A0 D3 CF C6 D4 D7 C1 D2 C5 A0 A0 A0 |.. ............|
000016C0: A0 22 3B 00 F4 1E B4 EA 99 22 12 20 20 20 20 20 |.";......". |
000016D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000016E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000016F0: 20 20 20 22 00 15 1F B6 EA 81 49 B2 31 A4 31 35 | "......I.1.15|
00001700: 30 30 3A A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 49 |00:.Z$:.Z$.."".I|
00001710: B2 31 35 30 30 00 1C 1F B8 EA 82 49 00 22 1F BA |.1500......I."..|
00001720: EA 8E 00 00 00 21 |.....! |
....... DRS.JCAVANLETH/VENLO.S.... PGM =
'MACRO-ECON.MODELLEN BASISPROGR.' MES-8
520.Z.... (C) MAMBERG 1982 J.C.A. VAN LE
TH......G(8)...... 60000...P.."."...U..5
3281,3:.53280,3:.646,11...Z.K.0:Z.0:I.0:
J.0:X.0:Y.0:AA.1024...D..500...N..2000..
.S..9000...X..3000......5000.).... FT.1
. FT.0:.6000:.115.3....9500.>. .. 9000.Q
.... VA.1 . . 120.W...."....NOG EEN PROB
LEEM? ";:. 4100...... ZZ$."J" . .:. 100.
.....G(9):......."..........". MACR
O-ECONOMISCHE MODELLEN
BASISPROGRAMMA. ....:."---------------
-----------------------..;.... SUBROUTIN
EVARIABELEN.D....1,0.Z....:."HOEVEEL VAR
IABELEN HEEFT JE MODEL? ";:.1,Z$:......Z
.E(Z$): Z1.Z.G....:."JE MODEL VEREIST DU
S OOK";Z:..20)"VERGELIJKINGEN.".W....400
0:.".";......Y(Z,1)......J.1.Z......"GEE
F DE";J;".E VARIABELE OP: ";:.1,Z$:.."..
...;....C(Z$).2.Z$.Z$.("*").U...Y(J,1).C
(Z$):A$.A$.Z$.\.$..J.E... 1:....P..SUBRO
UTINEVERGELIJKINGENOMZETTEN...U..:..Q.Z.
.A(Z,Z.2),B(Z,2),P$(Z,100),B$(1,100),C1$
(Z,100),C$(1,100)......Q(Z,Z.2).....Y1.1
......J.1.Z......1,0:..*...."GEEF DE";J;
".E VERGELIJKING: ";:.1,B$.0.....V...P$(
J,C(B$)).B$:S2.C(B$):B(J,1).S2.E....P.1.
C(B$).}....J(B$,P,1)..("=")..... .C$.H(B
$,P.1)...*..X.P.C(B$).I.4..J(B$,X,1).("=
").J(B$,X.1,1).("-").2180...>..J(B$,X,1)
.("=").C$.C$.("-"):....H..J(B$,X,1).("-"
).C$.C$.("+"):..2.R..J(B$,X,1).("+").C$.
C$.("-"):..F.\.C$.C$.J(B$,X,1).L.P...V.Z
..2200.N...C$.C$.("+"):X.X.1:......B$.C$
:Z1.F(I(B$,1)):Z2.F(J(B$,C(B$).1,1)).B..
..(Z1.48.Z1.57).C$.B$.("=0"):.2230......
(Z1..48.Z1..57.Z2.63).C$.B$.("=0"):.2230
......(Z1..48.Z1..57).2250......2320:. 8
000.>....TL.1.C1$(J,C(C$)).C$:C1.C(C$).Z
....TL.1.B(J,2).C1:C$.L$:......C1$(J,C(C
$)).C$:C1.C(C$):B(J,2).C1:C$.L$:.J:....J
..X.C(C$).1..1...T.Q.C(C$).X.D....J(C$,X
,1)."-".2300......J(C$,X,1)."+".2310....
..X.....D$.H(C$,X.1).("=").I(C$,Q):C$.D$
:.2230.?...D$.H(C$,X.1).("=").("-").I(C$
,Q):C$.D$:.2230.Q.....20)"."C$".".Z.$. 1
:..Y....:FORJ=1TOZ:A(J,J)=0:NEXTJ. .B..J
.1.Z:M1.1:C$.C1$(J,B(J,2)):B$.C$.K.L..F(
H(C$,1)).58.E$.(" "):B$.E$.C$:.3040.....
.X.1.Z:M1.M1.Y(X.1,1):C.Y(X,1)......Y.1.
C(B$)......J(A$,M1,C).J(B$,Y,C)..3130.&.
...Y,X.L....W.1.C(B$):.J(B$,Y.W,1)..("="
)..W.P.&.D$.J(B$,Y.W.1,W):A(J,Z.1).E(D$)
.Z.0..3230...:..J(A$,M1,C).H(B$,C).A(J,X
).1:....D..J(B$,Y.1,1).("+").A(J,X).1:..
..N..J(B$,Y.1,1).("-").A(J,X)..1:....X..
Q.1.Y:A1$.J(B$,Y.Q,1).*.L..A1$.(" ").D$.
J(B$,Y.Q,Q):A(J,X).E(D$):..W.V..A1$.("-"
).D$.J(B$,Y.Q,Q):A(J,X).E(D$):.......A1$
.("+").D$.J(B$,Y.Q,Q):A(J,X).E(D$):.....
..Q......3100......J.C....K.1.Z:.I.1.Z.2
:Q(K,I).A(K,I):.I,K.I....... ..:."
SLA EEN TOETS AAN."......198,0:.198,1:.
ZZ$............1,0:.1,ZZ$: 1:..@....TM.1
.5010:.OPLOSSINGSROUTINE......:."WIL JE
EEN AFDRUK VAN DE OPLOSSING (J/N)?
";:.4100......H(ZZ$,1)."J". .2,4:.2.....
.".".T....".***** DE OPLOSSING VAN HET M
ODEL *****."......J.1.Z......I.J.Z......
A(I,J)..0.5070......I.....FT.1: ..A.N..K
.1.Z.1:X.A(J,K):A(J,K).A(I,K):A(I,K).X:.
K.P...Y.1.A(J,J).^....Y.1.5160.~....K.1.
Z.1:A(J,K).Y.A(J,K):.K...(..I.1.Z...2..I
.J.5220...<.Y..A(I,J).L.F..K.1.Z.1:A(I,K
).A(I,K).Y.A(J,K):.K.U.D..I,J...X.....Y.
P1.1:.TM.1.9620......I.1.Z.....P1.P1.Y(I
.1,1):C.Y(I,1).H....J(A$,P1,C);"=";.(A(I
,Z.1).100000..5).100000;.J.....15)"(";I;
") ";P$(I,B(I,1)).Q....I... .. H(ZZ$,1)
."J" . .2: 2.........P.."....E.Z..".DIT
STELSEL HEEFT GEEN OPLOSSING!......"JE M
OET DE VERGELIJKINGEN AANPASSEN........"
.DE VARIABELEN ZIJN:.....P1.1.;.... I.1
. Z:P1.P1.Y(I.1,1):C.Y(I,1).Q...ZZ$.J(A$
,P1,C):.I(ZZ$,1)."*". ZZ$.H(ZZ$,C(ZZ$).1
)......ZZ$" ";:. I......:.".DE VERGELIJ
KINGEN ZIJN:.J.... J.1 . Z:.J".. ";P$(J,
B(J,1)):.J.R....:..X.@.....A..:GELIJKSCH
AKELENVANDEVARIABELEN...J.F$.L$.*.T..R.1
.C(C$):.J(C$,R,1)..("=")...5.^..S.1.R.[.
H.HU.F(J(C$,S,1)):HO.F(J(C$,S.1,1)).O.R.
F$.F$.J(C$,S,1)...|..(HU.64.HO.64.HU.218
.HO.218).K.1......K.1.F$.F$.J(C$,S.1,1):
S.S.1:K.0:.......(HU.64.HU.218.HO.47.HO.
58).L.1......L.1.F$.F$.J(C$,S.1,1):S.S.1
:L.0:.......(HU.64.HU.218.HO.43).F$.F$.(
"*"):..V....(HU.64.HU.218.HO.45).F$.F$.(
"*"):..~....(HU.64.HU.218.HO.61).F$.F$.(
"*"):............F$.F$.I(C$,C(C$).R)...B
.C$.F$:....(#.:...)#VA.0...-#.:."WIL JE
EEN VERGELIJKING VERANDEREN? ";:.4100...
2#.ZZ$."N".TM.0:....7#VA.1.=.<#.:."WELKE
(GEEF VOLGNUMMER)? ";:.4100:J.E(ZZ$).Q.
A#.:.:."DIE VERGELIJKING WAS ";P$(J,B(J,
1)):.".."...F#TL.1:.2040: 1...P#.:."NOG
MEER VERGELIJKINGEN? ";:.4100...U#.:..H
.Z#.ZZ$."J".9020.S.D#TM.0:.....%.ROUTINE
OMMULTIPLIERSTEBEPALEN.#.&%.:.:.".BEREKE
NING VAN ALLE MULTIPLIERS.".C.0%.:."WELK
VOLGNUMMER HEEFT DE VARIABELE Y? ":.410
0:TQ.E(ZZ$)...D%.:."GEEF NO. VAN DE EVEN
WICHTSVOORWAARDE: ":.4100:QT.E(ZZ$).T.N%
.:."GEEF BIJ EEN IS/LM-MODEL HET VOLGNUM
MER"...S%."VAN DE ANDERE EVENWICHTSVOORW
AARDE,".).T%."ANDERS EEN '0'. ";:.4100:
QR.E(ZZ$).D.X%T0.0:MU.A(TQ,Z.1):TM.1.P.B
%T0.T0.1.L.L%.((T0.QT).(T0.QR)).9650.Z.V
%.:GOTO120...{%.K.1.Z:.I.1.Z.2:A(K,I).Q(
K,I):.I,K....%A(T0,Z.1).A(T0,Z.1).10.G..
%. 5010....%."MULTIPLIER V/D AUTONOME:";
H(P$(T0,B(T0,1)),2);....%." ";(A(TQ,Z.1)
.MU).10.&..%.T0.Z.9570.M..%.K.1.Z:.I.1.Z
.2:A(K,I).Q(K,I):.I,K.S.P%..^.`.. LOGO.{
.E..53280,5:.53281,5:.646,1...J..G(14);.
..T.."...
"...V..". MES MES MES MES MES ME
S MES MES MES "...X.."
".E...."...
... .. .. .... .. .... ...R...."....
.... .. .. .... ............. ....
".... .... .. .. ...
.N...."..... ..... .. ..
........."..... ..... .. .
......."...... ...... .. .. .... ......
.......K...."... .. .. ... .. .. ....
.. ..... ...Y...."... ..... ... ..
........."... ... ... .
. ....U...."... ...
... .. ... ........."...
. ... .. ... ....1...
."... ... .. .. .... ......... ..
..^...."... ... .. .. .... .. ..
............"...
";.C...." MALMBERGS
EDUCATIEVE SOFTWARE ";......".
"....
..I.1.1500:.Z$:.Z$.."".I.1500......I."..
.....!
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL