PAGINA 26
FILE INFORMATION
FILENAME(S): PAGINA 26
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-11-30 21:24:22
APPEARS ON: 1 disk(s)
FILE HASH
b847a721ee03a29fba78ab1bb8fde301e62973703b9c1ffbe05fbe221f91764a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 45 1 | PAGINA 26 | PRG | DuncanTwain | 21 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> 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 75 |R COMMODORE 64.u| 00000050: 08 0A 00 8F 20 2A 2A 2A 20 42 45 50 41 4C 49 4E |.... *** BEPALIN| 00000060: 47 20 4E 55 4C 50 55 4E 54 20 46 55 4E 43 54 49 |G NULPUNT FUNCTI| 00000070: 45 20 2A 2A 2A 00 98 08 14 00 8F 20 20 20 20 20 |E ***...... | 00000080: 46 55 4E 43 54 49 45 20 4D 4F 45 54 20 43 4F 4E |FUNCTIE MOET CON| 00000090: 54 49 4E 55 20 5A 59 4E 00 A2 08 1E 00 89 20 31 |TINU ZYN...... 1| 000000A0: 31 30 00 C5 08 28 00 8F 20 2A 2A 2A 20 54 45 20 |10...(.. *** TE | 000000B0: 45 56 41 4C 55 45 52 45 4E 20 46 55 4E 43 54 49 |EVALUEREN FUNCTI| 000000C0: 45 20 2A 2A 2A 00 DA 08 32 00 59 20 B2 20 32 AC |E ***...2.Y . 2.| 000000D0: 58 AE 32 AB 34 AC 58 AB 33 30 00 E0 08 3C 00 8E |X.2.4.X.30...<..| 000000E0: 00 1F 09 46 00 8F 20 2A 2A 2A 20 42 45 52 45 4B |...F.. *** BEREK| 000000F0: 45 4E 49 4E 47 20 4E 49 45 55 57 45 20 53 43 48 |ENING NIEUWE SCH| 00000100: 41 54 54 49 4E 47 20 20 20 20 20 20 20 20 20 20 |ATTING | 00000110: 20 20 20 58 2D 57 41 41 52 44 45 20 2A 2A 2A 00 | X-WAARDE ***.| 00000120: 41 09 50 00 58 33 B2 28 20 59 32 AC 58 31 20 AB |A.P.X3.( Y2.X1 .| 00000130: 59 31 AC 58 32 20 29 AD 28 20 59 32 AB 59 31 20 |Y1.X2 ).( Y2.Y1 | 00000140: 29 00 47 09 5A 00 8E 00 6E 09 64 00 8F 20 2A 2A |).G.Z...n.d.. **| 00000150: 2A 20 49 4E 56 4F 45 52 45 4E 20 56 41 4E 20 44 |* INVOEREN VAN D| 00000160: 45 20 47 45 47 45 56 45 4E 53 20 2A 2A 2A 00 78 |E GEGEVENS ***.x| 00000170: 09 6E 00 99 22 93 22 3B 00 A8 09 78 00 99 22 42 |.n..".";...x.."B| 00000180: 45 50 41 4C 49 4E 47 20 4E 55 4C 50 55 4E 54 20 |EPALING NULPUNT | 00000190: 46 55 4E 43 54 49 45 3A 20 59 3D 32 2A 58 5E 32 |FUNCTIE: Y=2*X^2| 000001A0: 2D 34 2A 58 2D 33 30 22 00 AE 09 82 00 99 00 CF |-4*X-30"........| 000001B0: 09 8C 00 99 22 58 2D 57 41 41 52 44 45 20 42 45 |...."X-WAARDE BE| 000001C0: 47 49 4E 20 49 4E 54 45 52 56 41 4C 20 22 3B 00 |GIN INTERVAL ";.| 000001D0: D8 09 96 00 85 20 58 31 00 F9 09 A0 00 99 22 58 |..... X1......"X| 000001E0: 2D 57 41 41 52 44 45 20 45 49 4E 44 45 20 49 4E |-WAARDE EINDE IN| 000001F0: 54 45 52 56 41 4C 20 22 3B 00 02 0A AA 00 85 20 |TERVAL ";...... | 00000200: 58 32 00 18 0A B4 00 41 24 B2 22 47 45 45 4E 20 |X2.....A$."GEEN | 00000210: 4E 55 4C 50 55 4E 54 22 00 31 0A BE 00 8F 20 2A |NULPUNT".1.... *| 00000220: 2A 2A 20 42 45 52 45 4B 45 4E 49 4E 47 20 2A 2A |** BEREKENING **| 00000230: 2A 00 3B 0A C8 00 58 34 B2 58 31 00 45 0A D2 00 |*.;...X4.X1.E...| 00000240: 58 35 B2 58 32 00 64 0A DC 00 8F 20 2A 2A 20 42 |X5.X2.d.... ** B| 00000250: 45 50 41 4C 49 4E 47 20 59 31 2D 57 41 41 52 44 |EPALING Y1-WAARD| 00000260: 45 20 2A 2A 00 6D 0A E6 00 58 B2 58 31 00 76 0A |E **.m...X.X1.v.| 00000270: F0 00 8D 20 35 30 00 7F 0A FA 00 59 31 B2 59 00 |... 50.....Y1.Y.| 00000280: 9E 0A 04 01 8F 20 2A 2A 20 42 45 50 41 4C 49 4E |..... ** BEPALIN| 00000290: 47 20 59 32 2D 57 41 41 52 44 45 20 2A 2A 00 A7 |G Y2-WAARDE **..| 000002A0: 0A 0E 01 58 B2 58 32 00 B0 0A 18 01 8D 20 35 30 |...X.X2...... 50| 000002B0: 00 B9 0A 22 01 59 32 B2 59 00 C2 0A 2C 01 8D 20 |...".Y2.Y...,.. | 000002C0: 38 30 00 E1 0A 36 01 8F 20 2A 2A 20 42 45 50 41 |80...6.. ** BEPA| 000002D0: 4C 49 4E 47 20 59 33 2D 57 41 41 52 44 45 20 2A |LING Y3-WAARDE *| 000002E0: 2A 00 EA 0A 40 01 58 B2 58 33 00 F3 0A 4A 01 8D |*...@.X.X3...J..| 000002F0: 20 35 30 00 3B 0B 54 01 8F 20 2A 2A 20 48 45 54 | 50.;.T.. ** HET| 00000300: 20 52 45 43 48 54 45 52 4C 49 44 20 56 41 4E 20 | RECHTERLID VAN | 00000310: 44 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |DE | 00000320: 20 20 20 20 20 56 45 52 47 45 4C 59 4B 49 4E 47 | VERGELYKING| 00000330: 20 42 45 50 41 41 4C 54 20 44 45 00 56 0B 5E 01 | BEPAALT DE.V.^.| 00000340: 8F 20 20 20 20 4E 41 55 57 4B 45 55 52 49 47 48 |. NAUWKEURIGH| 00000350: 45 49 44 20 2A 2A 00 6D 0B 68 01 8B 20 B6 28 59 |EID **.m.h.. .(Y| 00000360: 29 20 B3 31 45 AB 34 20 A7 20 34 33 30 00 81 0B |) .1E.4 . 430...| 00000370: 72 01 8B 20 59 31 AC 59 20 B3 30 20 A7 20 34 31 |r.. Y1.Y .0 . 41| 00000380: 30 00 95 0B 7C 01 8B 20 59 32 AC 59 20 B1 30 20 |0...|.. Y2.Y .0 | 00000390: A7 20 34 35 30 00 9F 0B 86 01 58 31 B2 58 33 00 |. 450.....X1.X3.| 000003A0: A9 0B 90 01 89 20 32 33 30 00 B3 0B 9A 01 58 32 |..... 230.....X2| 000003B0: B2 58 33 00 BD 0B A4 01 89 20 32 33 30 00 C7 0B |.X3...... 230...| 000003C0: AE 01 41 24 B2 22 22 00 ED 0B B8 01 8F 20 2A 2A |..A$.""...... **| 000003D0: 2A 20 55 49 54 56 4F 45 52 20 56 41 4E 20 44 45 |* UITVOER VAN DE| 000003E0: 20 47 45 47 45 56 45 4E 53 20 2A 2A 2A 00 F7 0B | GEGEVENS ***...| 000003F0: C2 01 99 22 93 22 3B 00 24 0C CC 01 99 20 A3 30 |...".";.$.... .0| 00000400: 35 29 22 2A 2A 2A 20 42 45 50 41 4C 49 4E 47 20 |5)"*** BEPALING | 00000410: 4E 55 4C 50 55 4E 54 20 46 55 4E 43 54 49 45 20 |NULPUNT FUNCTIE | 00000420: 2A 2A 2A 22 00 41 0C D6 01 99 20 A3 31 30 29 22 |***".A.... .10)"| 00000430: 59 20 3D 20 32 2A 58 5E 32 2D 34 2A 58 2D 33 30 |Y = 2*X^2-4*X-30| 00000440: 22 00 47 0C E0 01 99 00 6D 0C EA 01 99 22 58 2D |".G.....m...."X-| 00000450: 57 41 41 52 44 45 20 42 45 47 49 4E 20 49 4E 54 |WAARDE BEGIN INT| 00000460: 45 52 56 41 4C 3A 20 20 20 22 3B 58 34 00 93 0C |ERVAL: ";X4...| 00000470: F4 01 99 22 58 2D 57 41 41 52 44 45 20 45 49 4E |..."X-WAARDE EIN| 00000480: 44 45 20 49 4E 54 45 52 56 41 4C 3A 20 20 20 22 |DE INTERVAL: "| 00000490: 3B 58 35 00 99 0C FE 01 99 00 A1 0C 08 02 99 41 |;X5............A| 000004A0: 24 00 B8 0C 12 02 8B 20 B6 28 59 29 20 B1 31 45 |$...... .(Y) .1E| 000004B0: AB 34 20 A7 20 35 35 30 00 EB 0C 1C 02 99 22 44 |.4 . 550......"D| 000004C0: 45 20 58 2D 57 41 41 52 44 45 20 56 4F 4F 52 20 |E X-WAARDE VOOR | 000004D0: 48 45 54 20 4E 55 4C 50 55 4E 54 20 4E 41 44 45 |HET NULPUNT NADE| 000004E0: 52 54 20 4E 41 41 52 20 22 3B 58 00 F1 0C 26 02 |RT NAAR ";X...&.| 000004F0: 99 00 F7 0C 30 02 80 00 00 00 |....0..... |
..N.... --(C) DIGICOM SOFTWARE,TAPE B01
-- AANGEPAST VOOR COMMODORE 64.U
.... *** BEPALING NULPUNT FUNCTIE ***...
... FUNCTIE MOET CONTINU ZYN...... 1
10.E.(.. *** TE EVALUEREN FUNCTIE ***.Z.
2.Y . 2.X.2.4.X.30...<.....F.. *** BEREK
ENING NIEUWE SCHATTING X-WAA
RDE ***.A.P.X3.( Y2.X1 .Y1.X2 ).( Y2.Y1
).G.Z...N.D.. *** INVOEREN VAN DE GEGEVE
NS ***.X.N..".";...X.."BEPALING NULPUNT
FUNCTIE: Y=2*X^2-4*X-30".......O...."X-W
AARDE BEGIN INTERVAL ";.X.... X1... .."X
-WAARDE EINDE INTERVAL ";...... X2.....A
$."GEEN NULPUNT".1.... *** BEREKENING **
*.;.H.X4.X1.E.R.X5.X2.D.... ** BEPALING
Y1-WAARDE **.M...X.X1.V.... 50....Y1.Y.
..... ** BEPALING Y2-WAARDE **.....X.X2.
..... 50...".Y2.Y.B.,.. 80...6.. ** BEPA
LING Y3-WAARDE **...@.X.X3...J.. 50.;.T.
. ** HET RECHTERLID VAN DE
VERGELYKING BEPAALT DE.V.^.. NAU
WKEURIGHEID **.M.H.. .(Y) .1E.4 . 430...
R.. Y1.Y .0 . 410...|.. Y2.Y .0 . 450...
..X1.X3...... 230.....X2.X3...... 230.G.
..A$.""...... *** UITVOER VAN DE GEGEVEN
S ***...B..".";.$.L.. .05)"*** BEPALING
NULPUNT FUNCTIE ***".A.V.. .10)"Y = 2*X^
2-4*X-30".G.....M...."X-WAARDE BEGIN INT
ERVAL: ";X4......"X-WAARDE EINDE INTER
VAL: ";X5............A$...... .(Y) .1E
.4 . 550......"DE X-WAARDE VOOR HET NULP
UNT NADERT NAAR ";X...&.....0.....
> CLICK IMAGE PREVIEW FOR FULL MODAL