KURVENANP.C64
FILE INFORMATION
FILENAME(S): KURVENANP.C64
FILE TYPE(S): PRG
FILE SIZE: 6.5K
FIRST SEEN: 2025-11-30 01:12:42
APPEARS ON: 2 disk(s)
FILE HASH
362aa5fe312bf0be562fa758a9e107d6936616134bcbd02e2c20f152323a2d9a
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10712 12 87 | KURVENANP.C64 | PRG | C64er, DuncanTwain | 14 | 0 | DOWNLOAD FILE |
| 10712 12 87 | KURVENANP.C64 | PRG | DuncanTwain | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 01 00 8F 20 2D 2D 2D 2D 2D 20 4E 41 |..&.... ----- NA|
00000010: 43 48 4C 41 44 45 4E 20 47 52 41 46 49 4B 20 2D |CHLADEN GRAFIK -|
00000020: 2D 2D 2D 2D 2D 2D 00 39 08 02 00 8B 20 41 24 B2 |------.9.... A$.|
00000030: 22 4E 22 20 A7 20 31 30 30 00 62 08 03 00 99 C7 |"N" . 100.b.....|
00000040: 28 31 34 37 29 C7 28 31 37 29 22 47 52 41 46 49 |(147).(17)"GRAFI|
00000050: 4B 20 4E 41 43 48 4C 41 44 45 4E 20 28 4A 2F 4E |K NACHLADEN (J/N|
00000060: 29 22 00 77 08 04 00 A1 20 41 24 3A 8B 20 41 24 |)".w.... A$:. A$|
00000070: B2 22 22 20 A7 20 34 00 8A 08 05 00 8B 20 41 24 |."" . 4...... A$|
00000080: B2 22 4E 22 20 A7 20 31 30 30 00 A8 08 06 00 41 |."N" . 100.....A|
00000090: 24 B2 22 4E 22 3A 93 22 53 59 53 47 52 41 46 2E |$."N":."SYSGRAF.|
000000A0: 4F 42 4A 22 2C 38 2C 31 00 CF 08 0A 00 8F 2A 2A |OBJ",8,1......**|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000000D0: F6 08 14 00 8F 2A 20 20 20 20 20 20 20 20 20 20 |.....* |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 2A 00 1D 09 1E 00 8F 2A 20 20 20 | *......* |
00000100: 20 20 20 20 4B 55 52 56 45 4E 41 4E 50 41 53 53 | KURVENANPASS|
00000110: 55 4E 47 20 20 20 20 20 20 20 20 20 2A 00 44 09 |UNG *.D.|
00000120: 28 00 8F 2A 20 20 20 20 20 20 20 20 20 20 20 20 |(..* |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 20 20 20 2A 00 6B 09 32 00 8F 2A 53 54 41 54 49 | *.k.2..*STATI|
00000150: 53 54 49 4B 2D 50 52 4F 47 52 2E 20 5A 55 52 20 |STIK-PROGR. ZUR |
00000160: 45 58 50 4F 4E 45 4E 54 2E 20 2A 00 92 09 3C 00 |EXPONENT. *...<.|
00000170: 8F 2A 52 45 47 52 45 53 53 49 4F 4E 53 41 4E 41 |.*REGRESSIONSANA|
00000180: 4C 59 53 45 20 49 4E 43 4C 2E 20 47 52 41 46 49 |LYSE INCL. GRAFI|
00000190: 4B 2A 00 B9 09 46 00 8F 2A 20 20 48 45 49 4D 4F |K*...F..* HEIMO|
000001A0: 20 50 4F 4E 4E 41 54 48 20 20 48 41 4D 42 55 52 | PONNATH HAMBUR|
000001B0: 47 20 31 39 38 37 20 20 2A 00 E0 09 50 00 8F 2A |G 1987 *...P..*|
000001C0: 20 20 20 20 20 20 20 20 43 36 34 20 2D 20 56 45 | C64 - VE|
000001D0: 52 53 49 4F 4E 20 20 20 20 20 20 20 20 20 20 2A |RSION *|
000001E0: 00 07 0A 5A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...Z..**********|
000001F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000200: 2A 2A 2A 2A 2A 2A 2A 00 36 0A 64 00 9C 3A 9E 20 |*******.6.d..:. |
00000210: 34 39 31 35 32 3A 9E 20 34 39 32 34 32 3A 8F 20 |49152:. 49242:. |
00000220: 47 52 41 46 49 4B 53 50 45 49 43 48 45 52 20 53 |GRAFIKSPEICHER S|
00000230: 49 43 48 45 52 4E 00 52 0A 69 00 8F 3A 47 52 41 |ICHERN.R.i..:GRA|
00000240: 50 48 49 43 31 2C 31 3A 47 4F 53 55 42 20 34 30 |PHIC1,1:GOSUB 40|
00000250: 30 30 00 78 0A 6E 00 8F 20 2D 2D 2D 2D 2D 20 56 |00.x.n.. ----- V|
00000260: 41 52 49 41 42 4C 45 20 2D 2D 2D 2D 2D 2D 2D 2D |ARIABLE --------|
00000270: 2D 2D 2D 2D 2D 2D 2D 2D 00 C3 0A 78 00 53 58 B2 |--------...x.SX.|
00000280: 30 3A 53 59 B2 30 3A 51 58 B2 30 3A 51 59 B2 30 |0:SY.0:QX.0:QY.0|
00000290: 3A 58 59 B2 30 3A 42 B2 30 3A 4D B2 30 3A 52 B2 |:XY.0:B.0:M.0:R.|
000002A0: 30 3A 53 B2 30 3A 4E B2 30 3A 49 B2 30 3A 4A B2 |0:S.0:N.0:I.0:J.|
000002B0: 30 3A 47 B2 30 3A 41 B2 30 3A 58 31 B2 30 3A 59 |0:G.0:A.0:X1.0:Y|
000002C0: 31 B2 30 00 05 0B 82 00 42 42 B2 33 31 39 3A 42 |1.0.....BB.319:B|
000002D0: 48 B2 31 39 39 3A 57 B2 30 3A 4D 58 B2 AB 31 45 |H.199:W.0:MX..1E|
000002E0: 31 32 3A 4C 58 B2 31 45 31 32 3A 4D 59 B2 AB 31 |12:LX.1E12:MY..1|
000002F0: 45 31 32 3A 4C 58 B2 31 45 31 32 3A 58 32 B2 30 |E12:LX.1E12:X2.0|
00000300: 3A 59 32 B2 30 00 42 0B 8C 00 58 55 B2 30 3A 58 |:Y2.0.B...XU.0:X|
00000310: 4F B2 30 3A 59 55 B2 30 3A 59 4F B2 30 3A 52 41 |O.0:YU.0:YO.0:RA|
00000320: B2 30 3A 52 44 B2 30 3A 54 41 B2 30 3A 54 42 B2 |.0:RD.0:TA.0:TB.|
00000330: 30 3A 58 B2 30 3A 59 B2 30 3A 42 4C B2 30 3A 44 |0:X.0:Y.0:BL.0:D|
00000340: B2 30 00 52 0B 96 00 41 24 B2 22 22 3A 42 24 B2 |.0.R...A$."":B$.|
00000350: 22 22 00 58 0B A0 00 8F 00 6D 0B AA 00 96 A5 20 |"".X.....m..... |
00000360: 45 28 58 29 B2 42 AC BD 28 4D AC 58 29 00 91 0B |E(X).B..(M.X)...|
00000370: B4 00 96 A5 20 58 28 58 29 B2 52 41 AC 58 AA 54 |.... X(X).RA.X.T|
00000380: 41 3A 96 A5 20 59 28 59 29 B2 52 44 AC 59 AA 54 |A:.. Y(Y).RD.Y.T|
00000390: 42 00 97 0B BE 00 8F 00 BD 0B C8 00 8F 20 2D 2D |B............ --|
000003A0: 2D 2D 2D 20 54 49 54 45 4C 2C 45 52 4B 4C 41 45 |--- TITEL,ERKLAE|
000003B0: 52 55 4E 47 20 2D 2D 2D 2D 2D 2D 2D 2D 00 DC 0B |RUNG --------...|
000003C0: D2 00 97 20 35 33 32 38 30 2C 30 3A 97 20 35 33 |... 53280,0:. 53|
000003D0: 32 38 31 2C 30 3A 99 C7 28 33 30 29 00 1D 0C DC |281,0:..(30)....|
000003E0: 00 99 C7 28 31 34 37 29 C7 28 31 38 29 22 20 20 |...(147).(18)" |
000003F0: 20 20 20 20 20 45 58 50 4F 4E 45 4E 54 49 45 4C | EXPONENTIEL|
00000400: 4C 45 20 20 41 4E 50 41 53 53 55 4E 47 20 20 20 |LE ANPASSUNG |
00000410: 20 20 20 20 20 20 22 C7 28 31 34 36 29 00 23 0C | ".(146).#.|
00000420: E6 00 99 00 4F 0C F0 00 99 22 20 44 55 52 43 48 |....O...." DURCH|
00000430: 20 45 49 4E 45 20 41 4E 5A 41 48 4C 20 56 4F 4E | EINE ANZAHL VON|
00000440: 20 4E 20 50 55 4E 4B 54 45 4E 20 41 55 53 22 00 | N PUNKTEN AUS".|
00000450: 7E 0C FA 00 99 22 57 45 52 54 45 50 41 41 52 45 |~...."WERTEPAARE|
00000460: 4E 20 4C 45 47 54 20 44 49 45 53 45 53 20 50 52 |N LEGT DIESES PR|
00000470: 4F 47 52 41 4D 4D 20 44 49 45 20 41 4D 22 00 AB |OGRAMM DIE AM"..|
00000480: 0C 04 01 99 22 42 45 53 54 45 4E 20 41 4E 47 45 |...."BESTEN ANGE|
00000490: 50 41 53 53 54 45 20 45 58 50 4F 4E 45 4E 54 49 |PASSTE EXPONENTI|
000004A0: 41 4C 46 55 4E 4B 54 49 4F 4E 22 00 DA 0C 0E 01 |ALFUNKTION".....|
000004B0: 99 22 59 3D 41 2A 45 5E 28 42 2A 58 29 2E 44 45 |."Y=A*E^(B*X).DE|
000004C0: 52 20 4B 4F 52 52 45 4C 41 54 49 4F 4E 53 4B 4F |R KORRELATIONSKO|
000004D0: 45 46 46 49 5A 49 45 4E 54 22 00 07 0D 18 01 99 |EFFIZIENT"......|
000004E0: 22 52 20 55 4E 44 20 44 49 45 20 53 54 41 4E 44 |"R UND DIE STAND|
000004F0: 41 52 44 41 42 57 45 49 43 48 55 4E 47 20 53 20 |ARDABWEICHUNG S |
00000500: 57 45 52 44 45 4E 22 00 37 0D 22 01 99 22 41 4E |WERDEN".7.".."AN|
00000510: 47 45 47 45 42 45 4E 20 55 4E 44 20 4D 41 4E 20 |GEGEBEN UND MAN |
00000520: 4B 41 4E 4E 20 42 45 4C 49 45 42 49 47 45 20 59 |KANN BELIEBIGE Y|
00000530: 2D 57 45 52 54 45 22 00 65 0D 2C 01 99 22 41 55 |-WERTE".e.,.."AU|
00000540: 53 20 45 49 4E 47 45 47 45 42 45 4E 45 4E 20 58 |S EINGEGEBENEN X|
00000550: 2D 57 45 52 54 45 4E 20 42 45 52 45 43 48 4E 45 |-WERTEN BERECHNE|
00000560: 4E 2E 22 3A 99 00 94 0D 36 01 99 22 20 45 49 4E |N.":....6.." EIN|
00000570: 20 53 43 41 54 54 45 52 44 49 41 47 52 41 4D 4D | SCATTERDIAGRAMM|
00000580: 20 55 4E 44 20 44 49 45 20 45 52 4D 49 54 54 45 | UND DIE ERMITTE|
00000590: 4C 54 45 22 00 BE 0D 40 01 99 22 4B 55 52 56 45 |LTE"...@.."KURVE|
000005A0: 20 57 45 52 44 45 4E 20 47 45 5A 45 49 43 48 4E | WERDEN GEZEICHN|
000005B0: 45 54 2E 20 41 55 46 20 44 49 45 53 45 22 00 EC |ET. AUF DIESE"..|
000005C0: 0D 4A 01 99 22 57 45 49 53 45 20 4B 41 4E 4E 20 |.J.."WEISE KANN |
000005D0: 44 49 45 20 51 55 41 4C 49 54 41 45 54 20 44 45 |DIE QUALITAET DE|
000005E0: 52 20 41 4E 50 41 53 53 55 4E 47 22 00 0B 0E 54 |R ANPASSUNG"...T|
000005F0: 01 99 22 45 49 4E 47 45 53 43 48 41 45 54 5A 54 |.."EINGESCHAETZT|
00000600: 20 57 45 52 44 45 4E 2E 22 3A 99 00 37 0E 5E 01 | WERDEN.":..7.^.|
00000610: 99 22 20 53 4F 47 45 4E 41 4E 4E 54 45 20 41 55 |." SOGENANNTE AU|
00000620: 53 52 45 49 53 53 45 52 2D 57 45 52 54 45 20 53 |SREISSER-WERTE S|
00000630: 4F 4C 4C 54 45 4E 22 00 62 0E 68 01 99 22 56 4F |OLLTEN".b.h.."VO|
00000640: 52 20 45 49 4E 45 52 20 47 45 4E 41 55 45 52 45 |R EINER GENAUERE|
00000650: 4E 20 42 45 52 45 43 48 4E 55 4E 47 20 4E 4F 43 |N BERECHNUNG NOC|
00000660: 48 22 00 7E 0E 72 01 99 22 45 4E 54 46 45 52 4E |H".~.r.."ENTFERN|
00000670: 54 20 57 45 52 44 45 4E 2E 22 3A 99 3A 99 00 A0 |T WERDEN.":.:...|
00000680: 0E 7C 01 99 C7 28 31 38 29 22 54 41 53 54 45 20 |.|...(18)"TASTE |
00000690: 44 52 55 45 43 4B 45 4E 21 22 C7 28 31 34 36 29 |DRUECKEN!".(146)|
000006A0: 00 B7 0E 86 01 A1 20 41 24 3A 8B 20 41 24 B2 22 |...... A$:. A$."|
000006B0: 22 20 A7 20 33 39 30 00 DD 0E 90 01 8F 20 2D 2D |" . 390...... --|
000006C0: 2D 2D 2D 20 48 41 55 50 54 4D 45 4E 55 45 20 2D |--- HAUPTMENUE -|
000006D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F1 0E |-------------...|
000006E0: 9A 01 99 C7 28 31 34 37 29 3A 99 3A 99 3A 99 3A |....(147):.:.:.:|
000006F0: 99 00 1D 0F A4 01 99 A3 34 29 22 57 45 52 54 45 |........4)"WERTE|
00000700: 20 56 4F 4E 20 48 41 4E 44 20 45 49 4E 47 45 42 | VON HAND EINGEB|
00000710: 45 4E 2E 2E 2E 2E 2E 2E 2E 31 22 3A 99 00 49 0F |EN.......1":..I.|
00000720: AE 01 99 A3 34 29 22 57 45 52 54 45 20 41 55 53 |....4)"WERTE AUS|
00000730: 20 44 41 54 45 49 20 4C 45 53 45 4E 2E 2E 2E 2E | DATEI LESEN....|
00000740: 2E 2E 2E 2E 2E 32 22 3A 99 00 75 0F B8 01 99 A3 |.....2":..u.....|
00000750: 34 29 22 47 52 41 46 49 4B 20 5A 45 49 47 45 4E |4)"GRAFIK ZEIGEN|
00000760: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000770: 2E 33 22 3A 99 00 A1 0F C2 01 99 A3 34 29 22 54 |.3":........4)"T|
00000780: 45 58 54 4D 4F 44 55 53 20 45 49 4E 53 43 48 41 |EXTMODUS EINSCHA|
00000790: 4C 54 45 4E 2E 2E 2E 2E 2E 2E 2E 2E 2E 34 22 3A |LTEN.........4":|
000007A0: 99 00 CD 0F CC 01 99 A3 34 29 22 45 58 50 4F 4E |........4)"EXPON|
000007B0: 45 4E 54 49 41 4C 46 55 4E 4B 54 49 4F 4E 20 42 |ENTIALFUNKTION B|
000007C0: 45 52 45 43 48 4E 45 4E 2E 35 22 3A 99 00 F9 0F |ERECHNEN.5":....|
000007D0: D6 01 99 A3 34 29 22 57 45 52 54 45 20 42 45 52 |....4)"WERTE BER|
000007E0: 45 43 48 4E 45 4E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |ECHNEN..........|
000007F0: 2E 2E 2E 2E 2E 36 22 3A 99 00 27 10 E0 01 99 A3 |.....6":..'.....|
00000800: 34 29 22 50 52 4F 47 52 41 4D 4D 45 4E 44 45 2E |4)"PROGRAMMENDE.|
00000810: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000820: 2E 37 22 3A 99 3A 99 00 50 10 EA 01 99 A3 31 30 |.7":.:..P.....10|
00000830: 29 C7 28 31 38 29 22 42 49 54 54 45 20 57 41 45 |).(18)"BITTE WAE|
00000840: 48 4C 45 4E 20 53 49 45 21 22 C7 28 31 34 36 29 |HLEN SIE!".(146)|
00000850: 00 73 10 F4 01 A1 20 41 24 3A 8B 20 C5 28 41 24 |.s.... A$:. .(A$|
00000860: 29 B3 31 20 B0 20 C5 28 41 24 29 B1 37 20 A7 20 |).1 . .(A$).7 . |
00000870: 35 30 30 00 8D 10 FE 01 99 C7 28 31 34 37 29 3A |500.......(147):|
00000880: 8B 20 C5 28 41 24 29 B2 37 20 A7 20 80 00 B9 10 |. .(A$).7 . ....|
00000890: 08 02 91 20 C5 28 41 24 29 20 8D 20 31 30 30 30 |... .(A$) . 1000|
000008A0: 2C 32 30 30 30 2C 33 30 30 30 2C 34 30 30 30 2C |,2000,3000,4000,|
000008B0: 35 30 30 30 2C 36 30 30 30 00 C3 10 12 02 89 20 |5000,6000...... |
000008C0: 34 31 30 00 E9 10 1C 02 8F 20 2D 2D 2D 2D 2D 20 |410...... ----- |
000008D0: 45 4E 44 45 20 48 41 55 50 54 50 52 4F 47 52 41 |ENDE HAUPTPROGRA|
000008E0: 4D 4D 20 2D 2D 2D 2D 2D 2D 00 0E 11 E8 03 8F 20 |MM ------...... |
000008F0: 2D 2D 2D 2D 2D 20 57 45 52 54 45 20 56 4F 4E 20 |----- WERTE VON |
00000900: 48 41 4E 44 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 25 |HAND ---------.%|
00000910: 11 ED 03 8D 20 34 30 30 30 3A 8F 20 54 45 58 54 |.... 4000:. TEXT|
00000920: 4D 4F 44 55 53 00 5D 11 F2 03 8B 20 57 B2 31 20 |MODUS.].... W.1 |
00000930: A7 20 99 22 57 45 52 54 45 20 53 43 48 4F 4E 20 |. ."WERTE SCHON |
00000940: 56 4F 52 48 41 4E 44 45 4E 21 22 3A 81 20 49 B2 |VORHANDEN!":. I.|
00000950: 30 20 A4 20 35 30 30 3A 82 20 49 3A 8E 00 65 11 |0 . 500:. I:..e.|
00000960: FC 03 57 B2 31 00 93 11 06 04 99 22 57 49 45 56 |..W.1......"WIEV|
00000970: 49 45 4C 45 20 57 45 52 54 45 20 57 45 52 44 45 |IELE WERTE WERDE|
00000980: 4E 20 56 45 52 57 45 4E 44 45 54 20 3F 22 3A 85 |N VERWENDET ?":.|
00000990: 4E 3A 99 00 A0 11 10 04 86 20 57 28 32 2C 4E 29 |N:....... W(2,N)|
000009A0: 00 C4 11 1A 04 99 22 42 49 54 54 45 20 57 45 52 |......"BITTE WER|
000009B0: 54 45 50 41 41 52 45 20 45 49 4E 47 45 42 45 4E |TEPAARE EINGEBEN|
000009C0: 21 22 3A 99 00 D2 11 24 04 81 20 49 B2 31 20 A4 |!":....$.. I.1 .|
000009D0: 20 4E 00 00 12 2E 04 99 49 2C 22 58 3D 22 3B 3A | N......I,"X=";:|
000009E0: 85 57 28 31 2C 49 29 3A 99 C7 28 31 34 35 29 2C |.W(1,I):..(145),|
000009F0: 2C 22 59 3D 22 3B 3A 85 57 28 30 2C 49 29 3A 99 |,"Y=";:.W(0,I):.|
00000A00: 00 25 12 38 04 8D 20 31 33 30 30 3A 8F 20 5A 57 |.%.8.. 1300:. ZW|
00000A10: 49 53 43 48 45 4E 57 45 52 54 45 20 42 45 52 45 |ISCHENWERTE BERE|
00000A20: 43 48 4E 45 4E 00 2D 12 42 04 82 20 49 00 63 12 |CHNEN.-.B.. I.c.|
00000A30: 4C 04 99 C7 28 31 34 37 29 3A 99 3A 99 22 53 4F |L...(147):.:."SO|
00000A40: 4C 4C 45 4E 20 44 49 45 20 57 45 52 54 45 20 47 |LLEN DIE WERTE G|
00000A50: 45 53 50 45 49 43 48 45 52 54 20 57 45 52 44 45 |ESPEICHERT WERDE|
00000A60: 4E 3F 22 00 87 12 56 04 A1 20 41 24 3A 8B 20 41 |N?"...V.. A$:. A|
00000A70: 24 B3 B1 22 4A 22 20 AF 20 41 24 B3 B1 22 4E 22 |$.."J" . A$.."N"|
00000A80: 20 A7 20 31 31 31 30 00 9B 12 60 04 8B 20 41 24 | . 1110...`.. A$|
00000A90: B2 22 4E 22 20 A7 20 31 31 39 30 00 C6 12 6A 04 |."N" . 1190...j.|
00000AA0: 99 3A 99 22 4E 41 4D 45 20 44 45 52 20 44 41 54 |.:."NAME DER DAT|
00000AB0: 45 49 20 28 31 31 20 5A 45 49 43 48 45 4E 29 22 |EI (11 ZEICHEN)"|
00000AC0: 3B 3A 85 20 42 24 00 E4 12 74 04 42 24 B2 C8 28 |;:. B$...t.B$..(|
00000AD0: 42 24 2C 31 31 29 AA 22 2E 44 41 54 22 AA 22 2C |B$,11).".DAT".",|
00000AE0: 53 2C 57 22 00 F3 12 7E 04 9F 20 31 2C 38 2C 32 |S,W"...~.. 1,8,2|
00000AF0: 2C 42 24 00 FC 12 88 04 98 31 2C 4E 00 22 13 92 |,B$......1,N."..|
00000B00: 04 81 20 49 B2 31 20 A4 20 4E 3A 98 31 2C 57 28 |.. I.1 . N:.1,W(|
00000B10: 31 2C 49 29 3A 98 31 2C 57 28 30 2C 49 29 3A 82 |1,I):.1,W(0,I):.|
00000B20: 20 49 00 2A 13 9C 04 A0 20 31 00 50 13 A6 04 8D | I.*.... 1.P....|
00000B30: 20 31 35 30 30 3A 8F 20 53 43 41 54 54 45 52 44 | 1500:. SCATTERD|
00000B40: 49 41 47 52 41 4D 4D 20 5A 45 49 43 48 4E 45 4E |IAGRAMM ZEICHNEN|
00000B50: 00 56 13 B0 04 8E 00 7B 13 14 05 8F 20 2D 2D 2D |.V.....{.... ---|
00000B60: 20 5A 57 49 53 43 48 45 4E 57 45 52 54 45 20 42 | ZWISCHENWERTE B|
00000B70: 45 52 45 43 48 4E 45 4E 20 2D 2D 00 90 13 19 05 |ERECHNEN --.....|
00000B80: 57 28 32 2C 49 29 B2 BC 28 57 28 30 2C 49 29 29 |W(2,I)..(W(0,I))|
00000B90: 00 A1 13 1E 05 53 58 B2 53 58 AA 57 28 31 2C 49 |.....SX.SX.W(1,I|
00000BA0: 29 00 B2 13 28 05 53 59 B2 53 59 AA 57 28 32 2C |)...(.SY.SY.W(2,|
00000BB0: 49 29 00 CA 13 32 05 51 58 B2 51 58 AA 57 28 31 |I)...2.QX.QX.W(1|
00000BC0: 2C 49 29 AC 57 28 31 2C 49 29 00 E2 13 3C 05 51 |,I).W(1,I)...<.Q|
00000BD0: 59 B2 51 59 AA 57 28 32 2C 49 29 AC 57 28 32 2C |Y.QY.W(2,I).W(2,|
00000BE0: 49 29 00 FA 13 46 05 58 59 B2 58 59 AA 57 28 31 |I)...F.XY.XY.W(1|
00000BF0: 2C 49 29 AC 57 28 32 2C 49 29 00 16 14 50 05 8B |,I).W(2,I)...P..|
00000C00: 20 57 28 31 2C 49 29 B1 4D 58 20 A7 20 4D 58 B2 | W(1,I).MX . MX.|
00000C10: 57 28 31 2C 49 29 00 32 14 5A 05 8B 20 57 28 31 |W(1,I).2.Z.. W(1|
00000C20: 2C 49 29 B3 4C 58 20 A7 20 4C 58 B2 57 28 31 2C |,I).LX . LX.W(1,|
00000C30: 49 29 00 4E 14 64 05 8B 20 57 28 30 2C 49 29 B1 |I).N.d.. W(0,I).|
00000C40: 4D 59 20 A7 20 4D 59 B2 57 28 30 2C 49 29 00 6A |MY . MY.W(0,I).j|
00000C50: 14 6E 05 8B 20 57 28 30 2C 49 29 B3 4C 59 20 A7 |.n.. W(0,I).LY .|
00000C60: 20 4C 59 B2 57 28 30 2C 49 29 00 70 14 78 05 8E | LY.W(0,I).p.x..|
00000C70: 00 95 14 DC 05 8F 20 2D 2D 2D 20 53 43 41 54 54 |...... --- SCATT|
00000C80: 45 52 44 49 41 47 52 41 4D 4D 20 2D 2D 2D 2D 2D |ERDIAGRAMM -----|
00000C90: 2D 2D 2D 2D 2D 00 B8 14 E6 05 81 20 49 B2 31 20 |-----...... I.1 |
00000CA0: A4 20 4E AB 31 3A 8F 20 53 4F 52 54 49 45 52 45 |. N.1:. SORTIERE|
00000CB0: 4E 20 4E 41 43 48 20 58 00 C8 14 F0 05 81 20 4A |N NACH X...... J|
00000CC0: B2 49 AA 31 20 A4 20 4E 00 E4 14 FA 05 8B 20 57 |.I.1 . N...... W|
00000CD0: 28 31 2C 49 29 B3 B2 57 28 31 2C 4A 29 20 A7 20 |(1,I)..W(1,J) . |
00000CE0: 31 35 36 30 00 20 15 04 06 57 28 31 2C 30 29 B2 |1560. ...W(1,0).|
00000CF0: 57 28 31 2C 49 29 3A 57 28 30 2C 30 29 B2 57 28 |W(1,I):W(0,0).W(|
00000D00: 30 2C 49 29 3A 57 28 31 2C 49 29 B2 57 28 31 2C |0,I):W(1,I).W(1,|
00000D10: 4A 29 3A 57 28 30 2C 49 29 B2 57 28 30 2C 4A 29 |J):W(0,I).W(0,J)|
00000D20: 00 40 15 0E 06 57 28 31 2C 4A 29 B2 57 28 31 2C |.@...W(1,J).W(1,|
00000D30: 30 29 3A 57 28 30 2C 4A 29 B2 57 28 30 2C 30 29 |0):W(0,J).W(0,0)|
00000D40: 00 4C 15 18 06 82 20 4A 3A 82 20 49 00 84 15 22 |.L.... J:. I..."|
00000D50: 06 9E 20 34 39 31 35 32 3A 9E 20 34 39 31 38 30 |.. 49152:. 49180|
00000D60: 3A 9E 20 34 39 32 30 32 2C 36 2C 30 3A 8F 20 47 |:. 49202,6,0:. G|
00000D70: 52 41 46 49 4B 20 4C 4F 45 53 43 48 45 4E 20 46 |RAFIK LOESCHEN F|
00000D80: 41 52 42 45 00 A7 15 2C 06 8F 3A 47 52 41 50 48 |ARBE...,..:GRAPH|
00000D90: 49 43 31 2C 31 3A 43 4F 4C 4F 52 30 2C 31 3A 43 |IC1,1:COLOR0,1:C|
00000DA0: 4F 4C 4F 52 31 2C 37 00 D7 15 36 06 9E 20 34 39 |OLOR1,7...6.. 49|
00000DB0: 33 35 32 2C 30 2C 30 2C 33 31 39 2C 30 2C 31 3A |352,0,0,319,0,1:|
00000DC0: 9E 20 34 39 33 35 32 2C 33 31 39 2C 30 2C 33 31 |. 49352,319,0,31|
00000DD0: 39 2C 31 39 39 2C 31 00 0C 16 40 06 8F 3A 44 52 |9,199,1...@..:DR|
00000DE0: 41 57 20 31 2C 30 2C 30 20 54 4F 20 33 31 39 2C |AW 1,0,0 TO 319,|
00000DF0: 30 20 54 4F 20 33 31 39 2C 31 39 39 20 54 4F 20 |0 TO 319,199 TO |
00000E00: 30 2C 31 39 39 20 54 4F 20 30 2C 30 00 45 16 4A |0,199 TO 0,0.E.J|
00000E10: 06 9E 20 34 39 33 35 32 2C 33 31 39 2C 31 39 39 |.. 49352,319,199|
00000E20: 2C 30 2C 31 39 39 2C 31 3A 9E 20 34 39 33 35 32 |,0,199,1:. 49352|
00000E30: 2C 30 2C 31 39 39 2C 30 2C 30 2C 31 3A 8F 20 52 |,0,199,0,0,1:. R|
00000E40: 41 48 4D 45 4E 00 6D 16 54 06 58 55 B2 4C 58 AB |AHMEN.m.T.XU.LX.|
00000E50: 28 4D 58 AB 4C 58 29 AC 2E 30 32 3A 58 4F B2 4D |(MX.LX)..02:XO.M|
00000E60: 58 AA 28 4D 58 AB 4C 58 29 AC 2E 30 32 00 95 16 |X.(MX.LX)..02...|
00000E70: 5E 06 59 55 B2 4C 59 AB 28 4D 59 AB 4C 59 29 AC |^.YU.LY.(MY.LY).|
00000E80: 2E 30 32 3A 59 4F B2 4D 59 AA 28 4D 59 AB 4C 59 |.02:YO.MY.(MY.LY|
00000E90: 29 AC 2E 30 32 00 B6 16 68 06 52 41 B2 42 42 AD |)..02...h.RA.BB.|
00000EA0: 28 58 4F AB 58 55 29 3A 52 44 B2 AB 42 48 AD 28 |(XO.XU):RD..BH.(|
00000EB0: 59 4F AB 59 55 29 00 DD 16 72 06 54 41 B2 AB 42 |YO.YU)...r.TA..B|
00000EC0: 42 AC 58 55 AD 28 58 4F AB 58 55 29 3A 54 42 B2 |B.XU.(XO.XU):TB.|
00000ED0: 42 48 AC 59 4F AD 28 59 4F AB 59 55 29 00 EB 16 |BH.YO.(YO.YU)...|
00000EE0: 7C 06 81 20 49 B2 31 20 A4 20 4E 00 09 17 86 06 ||.. I.1 . N.....|
00000EF0: 58 B2 A5 58 28 57 28 31 2C 49 29 29 3A 59 B2 A5 |X..X(W(1,I)):Y..|
00000F00: 59 28 57 28 30 2C 49 29 29 00 3F 17 90 06 9E 34 |Y(W(0,I)).?....4|
00000F10: 39 33 35 32 2C 58 AB 33 2C 59 2C 58 AA 33 2C 59 |9352,X.3,Y,X.3,Y|
00000F20: 2C 31 3A 9E 34 39 33 35 32 2C 58 2C 59 AB 33 2C |,1:.49352,X,Y.3,|
00000F30: 58 2C 59 AA 33 2C 31 3A 8F 20 4B 52 45 55 5A 00 |X,Y.3,1:. KREUZ.|
00000F40: 6F 17 91 06 8F 3A 44 52 41 57 31 2C 58 2D 33 2C |o....:DRAW1,X-3,|
00000F50: 59 20 54 4F 20 58 2B 33 2C 59 3A 44 52 41 57 31 |Y TO X+3,Y:DRAW1|
00000F60: 2C 58 2C 59 2D 33 20 54 4F 20 58 2C 59 2B 33 00 |,X,Y-3 TO X,Y+3.|
00000F70: 77 17 9A 06 82 20 49 00 8F 17 A4 06 A1 20 41 24 |w.... I...... A$|
00000F80: 3A 8B 20 41 24 B2 22 22 20 A7 20 31 37 30 30 00 |:. A$."" . 1700.|
00000F90: A7 17 AE 06 9E 20 34 39 32 34 32 3A 8F 20 54 45 |..... 49242:. TE|
00000FA0: 58 54 4D 4F 44 55 53 00 D9 17 AF 06 8F 3A 49 46 |XTMODUS......:IF|
00000FB0: 20 50 45 45 4B 28 32 33 38 29 3D 37 39 20 54 48 | PEEK(238)=79 TH|
00000FC0: 45 4E 20 47 52 41 50 48 49 43 35 3A 45 4C 53 45 |EN GRAPHIC5:ELSE|
00000FD0: 20 47 52 41 50 48 49 43 30 00 F5 17 B8 06 99 22 | GRAPHIC0......"|
00000FE0: 58 55 20 3D 20 20 22 4C 58 2C 22 58 4F 20 3D 20 |XU = "LX,"XO = |
00000FF0: 20 22 4D 58 22 00 11 18 C2 06 99 22 59 55 20 3D | "MX"......"YU =|
00001000: 20 20 22 4C 59 2C 22 59 4F 20 3D 20 20 22 4D 59 | "LY,"YO = "MY|
00001010: 22 00 29 18 CC 06 A1 20 41 24 3A 8B 20 41 24 B2 |".).... A$:. A$.|
00001020: 22 22 20 A7 20 31 37 34 30 00 2F 18 D6 06 8E 00 |"" . 1740./.....|
00001030: 54 18 D0 07 8F 20 2D 2D 2D 2D 2D 20 57 45 52 54 |T.... ----- WERT|
00001040: 45 20 41 55 53 20 44 41 54 45 49 20 2D 2D 2D 2D |E AUS DATEI ----|
00001050: 2D 2D 2D 2D 00 6B 18 D5 07 8D 20 34 30 30 30 3A |----.k.... 4000:|
00001060: 8F 20 54 45 58 54 4D 4F 44 55 53 00 A3 18 DA 07 |. TEXTMODUS.....|
00001070: 8B 20 57 B2 31 20 A7 20 99 22 57 45 52 54 45 20 |. W.1 . ."WERTE |
00001080: 53 43 48 4F 4E 20 56 4F 52 48 41 4E 44 45 4E 21 |SCHON VORHANDEN!|
00001090: 22 3A 81 20 49 B2 30 20 A4 20 35 30 30 3A 82 20 |":. I.0 . 500:. |
000010A0: 49 3A 8E 00 AB 18 E4 07 57 B2 31 00 D8 18 EE 07 |I:......W.1.....|
000010B0: 99 22 20 44 49 45 20 44 41 54 45 49 20 4D 55 53 |." DIE DATEI MUS|
000010C0: 53 20 45 49 4E 20 42 45 53 54 49 4D 4D 54 45 53 |S EIN BESTIMMTES|
000010D0: 20 46 4F 52 4D 41 54 22 00 02 19 F8 07 99 22 48 | FORMAT"......"H|
000010E0: 41 42 45 4E 3A 20 20 20 20 20 31 2E 41 4E 5A 41 |ABEN: 1.ANZA|
000010F0: 48 4C 20 44 45 52 20 57 45 52 54 45 50 41 41 52 |HL DER WERTEPAAR|
00001100: 45 22 00 27 19 02 08 99 22 20 20 20 20 20 20 20 |E".'...." |
00001110: 20 20 20 20 31 2E 57 45 52 54 20 58 2C 20 31 2E | 1.WERT X, 1.|
00001120: 57 45 52 54 20 59 22 00 52 19 0C 08 99 22 20 20 |WERT Y".R...." |
00001130: 20 20 20 20 20 20 20 20 20 32 2E 57 45 52 54 20 | 2.WERT |
00001140: 58 2C 20 32 2E 57 45 52 54 20 59 20 2E 2E 2E 22 |X, 2.WERT Y ..."|
00001150: 3A 99 00 81 19 16 08 99 22 44 49 45 53 45 20 44 |:......."DIESE D|
00001160: 41 54 45 49 45 4E 20 57 45 52 44 45 4E 20 55 4E |ATEIEN WERDEN UN|
00001170: 54 45 52 20 4D 45 4E 55 45 50 55 4E 4B 54 20 31 |TER MENUEPUNKT 1|
00001180: 22 00 B1 19 20 08 99 22 45 52 53 54 45 4C 4C 54 |"... .."ERSTELLT|
00001190: 2E 20 53 49 45 20 54 52 41 47 45 4E 20 44 49 45 |. SIE TRAGEN DIE|
000011A0: 20 45 4E 44 55 4E 47 20 2E 44 41 54 20 2E 22 3A | ENDUNG .DAT .":|
000011B0: 99 00 D3 19 2A 08 99 22 20 41 4C 4C 45 53 20 4B |....*.." ALLES K|
000011C0: 4C 41 52 2E 2E 31 20 20 41 43 48 20 53 4F 4F 2E |LAR..1 ACH SOO.|
000011D0: 2E 32 22 00 F7 19 34 08 A1 20 41 24 3A 8B 20 C5 |.2"...4.. A$:. .|
000011E0: 28 41 24 29 B3 31 20 B0 20 C5 28 41 24 29 B1 32 |(A$).1 . .(A$).2|
000011F0: 20 A7 20 32 31 30 30 00 0D 1A 3E 08 8B 20 C5 28 | . 2100...>.. .(|
00001200: 41 24 29 B2 32 20 A7 20 57 B2 30 3A 8E 00 3E 1A |A$).2 . W.0:..>.|
00001210: 48 08 99 3A 99 22 57 49 45 20 48 45 49 53 53 54 |H..:."WIE HEISST|
00001220: 20 44 45 4E 4E 20 44 49 45 20 44 41 54 45 49 20 | DENN DIE DATEI |
00001230: 28 45 4E 44 55 4E 47 20 2E 44 41 54 29 22 00 47 |(ENDUNG .DAT)".G|
00001240: 1A 52 08 85 20 42 24 00 58 1A 5C 08 42 24 B2 42 |.R.. B$.X.\.B$.B|
00001250: 24 AA 22 2C 53 2C 52 22 00 66 1A 66 08 9F 31 2C |$.",S,R".f.f..1,|
00001260: 38 2C 32 2C 42 24 00 6F 1A 70 08 84 31 2C 4E 00 |8,2,B$.o.p..1,N.|
00001270: 7C 1A 7A 08 86 20 57 28 32 2C 4E 29 00 8A 1A 84 ||.z.. W(2,N)....|
00001280: 08 81 20 49 B2 31 20 A4 20 4E 00 A2 1A 8E 08 84 |.. I.1 . N......|
00001290: 31 2C 57 28 31 2C 49 29 3A 84 31 2C 57 28 30 2C |1,W(1,I):.1,W(0,|
000012A0: 49 29 00 C7 1A 98 08 8D 20 31 33 30 30 3A 8F 20 |I)...... 1300:. |
000012B0: 5A 57 49 53 43 48 45 4E 57 45 52 54 45 20 42 45 |ZWISCHENWERTE BE|
000012C0: 52 45 43 48 4E 45 4E 00 CF 1A A2 08 82 20 49 00 |RECHNEN...... I.|
000012D0: D7 1A AC 08 A0 20 31 00 F4 1A B6 08 8D 20 31 35 |..... 1...... 15|
000012E0: 30 30 3A 8F 20 53 43 41 54 54 45 52 44 49 41 47 |00:. SCATTERDIAG|
000012F0: 52 41 4D 4D 00 FA 1A C0 08 8E 00 1F 1B B8 0B 8F |RAMM............|
00001300: 20 2D 2D 2D 2D 2D 20 47 52 41 46 49 4B 20 5A 45 | ----- GRAFIK ZE|
00001310: 49 47 45 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |IGEN ----------.|
00001320: 5A 1B C2 0B 8B 20 57 B2 30 20 A7 20 99 22 44 41 |Z.... W.0 . ."DA|
00001330: 20 46 45 48 4C 45 4E 20 4E 4F 43 48 20 44 49 45 | FEHLEN NOCH DIE|
00001340: 20 57 45 52 54 45 21 22 3A 81 20 49 B2 30 20 A4 | WERTE!":. I.0 .|
00001350: 20 35 30 30 3A 82 20 49 3A 8E 00 7F 1B CC 0B 9E | 500:. I:.......|
00001360: 20 34 39 31 35 32 3A 9E 20 34 39 32 30 32 2C 36 | 49152:. 49202,6|
00001370: 2C 30 3A 8F 20 47 52 41 46 49 4B 20 45 49 4E 00 |,0:. GRAFIK EIN.|
00001380: 95 1B CD 0B 8F 3A 47 52 41 50 48 49 43 31 3A 52 |.....:GRAPHIC1:R|
00001390: 45 54 55 52 4E 00 B0 1B D6 0B A1 20 41 24 3A 8B |ETURN...... A$:.|
000013A0: 20 C5 28 41 24 29 B3 B1 34 20 A7 20 33 30 32 30 | .(A$)..4 . 3020|
000013B0: 00 CB 1B E0 0B 89 20 34 30 31 30 3A 8F 20 54 45 |...... 4010:. TE|
000013C0: 58 54 4D 4F 44 55 53 20 45 49 4E 00 F0 1B A0 0F |XTMODUS EIN.....|
000013D0: 8F 20 2D 2D 2D 2D 2D 20 54 45 58 54 4D 4F 44 55 |. ----- TEXTMODU|
000013E0: 53 20 45 49 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |S EIN ----------|
000013F0: 00 0C 1C AA 0F 9E 20 34 39 32 34 32 3A 8F 20 54 |...... 49242:. T|
00001400: 45 58 54 4D 4F 44 55 53 20 45 49 4E 00 3E 1C AB |EXTMODUS EIN.>..|
00001410: 0F 8F 3A 49 46 20 50 45 45 4B 28 32 33 38 29 3D |..:IF PEEK(238)=|
00001420: 37 39 20 54 48 45 4E 20 47 52 41 50 48 49 43 35 |79 THEN GRAPHIC5|
00001430: 3A 45 4C 53 45 20 47 52 41 50 48 49 43 30 00 44 |:ELSE GRAPHIC0.D|
00001440: 1C B4 0F 8E 00 6D 1C 88 13 8F 20 2D 4C 4F 47 41 |.....m.... -LOGA|
00001450: 52 49 54 48 4D 49 53 43 48 45 20 47 45 52 41 44 |RITHMISCHE GERAD|
00001460: 45 20 42 45 52 45 43 48 4E 45 4E 20 2D 00 84 1C |E BERECHNEN -...|
00001470: 8A 13 8D 20 34 30 30 30 3A 8F 20 54 45 58 54 4D |... 4000:. TEXTM|
00001480: 4F 44 55 53 00 BA 1C 8D 13 8B 20 57 B2 30 20 A7 |ODUS...... W.0 .|
00001490: 20 99 22 44 41 20 46 45 48 4C 45 4E 20 44 49 45 | ."DA FEHLEN DIE|
000014A0: 20 57 45 52 54 45 21 22 3A 81 20 49 B2 30 20 A4 | WERTE!":. I.0 .|
000014B0: 20 35 30 30 3A 82 20 49 3A 8E 00 C2 1C 8F 13 47 | 500:. I:......G|
000014C0: B2 31 00 F6 1C 92 13 42 4C B2 28 51 58 AC 53 59 |.1.....BL.(QX.SY|
000014D0: AB 53 58 AC 58 59 29 AD 28 4E AC 51 58 AB 53 58 |.SX.XY).(N.QX.SX|
000014E0: AC 53 58 29 3A 8F 20 41 43 48 53 45 4E 41 42 53 |.SX):. ACHSENABS|
000014F0: 43 48 4E 49 54 54 00 02 1D 97 13 42 B2 BD 28 42 |CHNITT.....B..(B|
00001500: 4C 29 00 2D 1D 9C 13 4D B2 28 4E AC 58 59 AB 53 |L).-...M.(N.XY.S|
00001510: 58 AC 53 59 29 AD 28 4E AC 51 58 AB 53 58 AC 53 |X.SY).(N.QX.SX.S|
00001520: 58 29 3A 8F 20 53 54 45 49 47 55 4E 47 00 77 1D |X):. STEIGUNG.w.|
00001530: A6 13 52 B2 28 4E AC 58 59 AB 53 58 AC 53 59 29 |..R.(N.XY.SX.SY)|
00001540: AD BA 28 28 4E AC 51 58 AB 53 58 AC 53 58 29 AC |..((N.QX.SX.SX).|
00001550: 28 4E AC 51 59 AB 53 59 AC 53 59 29 29 3A 8F 20 |(N.QY.SY.SY)):. |
00001560: 4B 4F 52 52 45 4C 41 54 49 4F 4E 53 4B 4F 45 46 |KORRELATIONSKOEF|
00001570: 46 49 5A 49 45 4E 54 00 B8 1D B0 13 81 20 49 B2 |FIZIENT...... I.|
00001580: 31 20 A4 20 4E 3A 44 B2 A5 45 28 57 28 31 2C 49 |1 . N:D..E(W(1,I|
00001590: 29 29 AB 57 28 30 2C 49 29 3A 8F 20 53 54 41 4E |)).W(0,I):. STAN|
000015A0: 44 41 52 44 41 42 57 45 49 43 48 55 4E 47 20 42 |DARDABWEICHUNG B|
000015B0: 45 52 45 43 48 4E 45 4E 00 D5 1D B5 13 53 B2 53 |ERECHNEN.....S.S|
000015C0: AA 44 AC 44 3A 82 20 49 3A 53 B2 BA 28 53 AD 28 |.D.D:. I:S..(S.(|
000015D0: 4E AB 32 29 29 00 F0 1D BA 13 8D 20 34 30 31 30 |N.2))...... 4010|
000015E0: 3A 8F 20 54 45 58 54 4D 4F 44 55 53 20 45 49 4E |:. TEXTMODUS EIN|
000015F0: 00 2D 1E C4 13 99 3A 99 22 49 4E 20 44 45 52 20 |.-....:."IN DER |
00001600: 45 58 50 4F 4E 45 4E 54 49 41 4C 47 4C 45 49 43 |EXPONENTIALGLEIC|
00001610: 48 55 4E 47 22 3A 99 22 20 20 20 59 20 3D 20 41 |HUNG":." Y = A|
00001620: 2A 45 5E 28 42 2A 58 29 20 49 53 54 22 00 40 1E |*E^(B*X) IST".@.|
00001630: CE 13 99 3A 99 22 20 20 20 42 20 3D 20 22 2C 4D |...:." B = ",M|
00001640: 00 55 1E D8 13 99 3A 99 22 20 20 20 41 20 3D 20 |.U....:." A = |
00001650: 22 2C 42 3A 99 00 7C 1E E2 13 99 22 44 45 52 20 |",B:..|...."DER |
00001660: 4B 4F 52 52 45 4C 41 54 49 4F 4E 53 4B 4F 45 46 |KORRELATIONSKOEF|
00001670: 46 49 5A 49 45 4E 54 20 49 53 54 22 00 91 1E EC |FIZIENT IST"....|
00001680: 13 99 3A 99 22 20 20 20 52 20 3D 20 22 2C 52 3A |..:." R = ",R:|
00001690: 99 00 C1 1E F6 13 99 22 44 49 45 20 4D 49 54 54 |......."DIE MITT|
000016A0: 4C 45 52 45 20 53 54 41 4E 44 41 52 44 41 42 57 |LERE STANDARDABW|
000016B0: 45 49 43 48 55 4E 47 20 42 45 54 52 41 45 47 54 |EICHUNG BETRAEGT|
000016C0: 22 00 D6 1E 00 14 99 3A 99 22 20 20 20 53 20 3D |"......:." S =|
000016D0: 20 22 2C 53 3A 99 00 01 1F 0A 14 99 3A 99 22 42 | ",S:.......:."B|
000016E0: 49 54 54 45 20 54 41 53 54 45 20 44 52 55 45 43 |ITTE TASTE DRUEC|
000016F0: 4B 45 4E 21 20 28 5F 20 3D 20 4D 45 4E 55 45 29 |KEN! (_ = MENUE)|
00001700: 22 00 18 1F 14 14 A1 20 41 24 3A 8B 20 41 24 B2 |"...... A$:. A$.|
00001710: 22 22 A7 20 35 31 34 30 00 29 1F 1E 14 8B 20 41 |"". 5140.).... A|
00001720: 24 B2 22 5F 22 20 A7 20 8E 00 51 1F 28 14 41 B2 |$."_" . ..Q.(.A.|
00001730: 31 3A 9E 20 34 39 31 35 32 3A 9E 34 39 32 30 32 |1:. 49152:.49202|
00001740: 2C 36 2C 30 3A 8F 20 47 52 41 46 49 4B 20 45 49 |,6,0:. GRAFIK EI|
00001750: 4E 00 62 1F 29 14 8F 3A 47 4F 53 55 42 20 33 30 |N.b.)..:GOSUB 30|
00001760: 30 30 00 80 1F 32 14 81 20 49 B2 4C 58 20 A4 20 |00...2.. I.LX . |
00001770: 4D 58 20 A9 20 28 4D 58 AB 4C 58 29 AD 31 30 30 |MX . (MX.LX).100|
00001780: 00 A8 1F 3C 14 58 31 B2 A5 58 28 49 29 3A 59 31 |...<.X1..X(I):Y1|
00001790: B2 A5 59 28 A5 45 28 49 29 29 3A 8B 20 59 31 B3 |..Y(.E(I)):. Y1.|
000017A0: 30 20 A7 20 35 31 39 35 00 CD 1F 46 14 9E 20 34 |0 . 5195...F.. 4|
000017B0: 39 32 36 36 20 58 31 2C 59 31 2C 31 3A 8F 20 50 |9266 X1,Y1,1:. P|
000017C0: 55 4E 4B 54 20 5A 45 49 43 48 4E 45 4E 00 E0 1F |UNKT ZEICHNEN...|
000017D0: 47 14 8F 3A 44 52 41 57 20 31 2C 58 31 2C 59 31 |G..:DRAW 1,X1,Y1|
000017E0: 00 E8 1F 4B 14 82 20 49 00 00 20 50 14 A1 20 41 |...K.. I.. P.. A|
000017F0: 24 3A 8B 20 41 24 B2 22 22 20 A7 20 35 32 30 30 |$:. A$."" . 5200|
00001800: 00 18 20 5A 14 8B 20 41 24 B2 22 5F 22 20 A7 20 |.. Z.. A$."_" . |
00001810: 8D 20 34 30 30 30 3A 8E 00 36 20 64 14 8B 20 41 |. 4000:..6 d.. A|
00001820: B2 31 20 A7 20 41 B2 30 3A 8D 20 34 30 30 30 3A |.1 . A.0:. 4000:|
00001830: 89 20 35 32 30 30 00 59 20 6E 14 8B 20 41 B2 30 |. 5200.Y n.. A.0|
00001840: 20 A7 20 41 B2 31 3A 9E 20 34 39 31 35 32 3A 9E | . A.1:. 49152:.|
00001850: 34 39 32 30 32 2C 36 2C 30 00 7A 20 6F 14 8F 3A |49202,6,0.z o..:|
00001860: 49 46 20 41 3D 30 20 54 48 45 4E 20 41 3D 31 3A |IF A=0 THEN A=1:|
00001870: 47 4F 53 55 42 20 33 30 30 30 00 85 20 78 14 89 |GOSUB 3000.. x..|
00001880: 20 35 32 30 30 00 AA 20 70 17 8F 20 2D 2D 2D 2D | 5200.. p.. ----|
00001890: 2D 20 57 45 52 54 45 20 42 45 52 45 43 48 4E 45 |- WERTE BERECHNE|
000018A0: 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 00 C1 20 7A 17 8D |N --------.. z..|
000018B0: 20 34 30 30 30 3A 8F 20 54 45 58 54 4D 4F 44 55 | 4000:. TEXTMODU|
000018C0: 53 00 FB 20 84 17 8B 20 47 B2 30 20 AF 20 57 B2 |S.. ... G.0 . W.|
000018D0: 30 20 A7 20 99 22 42 49 54 54 45 20 47 45 42 45 |0 . ."BITTE GEBE|
000018E0: 4E 20 53 49 45 20 5A 55 45 52 53 54 20 57 45 52 |N SIE ZUERST WER|
000018F0: 54 45 20 45 49 4E 20 55 4E 44 22 00 35 21 8E 17 |TE EIN UND".5!..|
00001900: 8B 20 47 B2 30 20 A7 20 99 22 42 49 54 54 45 20 |. G.0 . ."BITTE |
00001910: 44 49 45 20 4B 55 52 56 45 20 42 45 52 45 43 48 |DIE KURVE BERECH|
00001920: 4E 45 4E 21 22 3A 81 20 49 B2 30 20 A4 20 35 30 |NEN!":. I.0 . 50|
00001930: 30 3A 82 3A 8E 00 62 21 98 17 99 3A 99 22 20 41 |0:.:..b!...:." A|
00001940: 55 46 20 44 45 52 20 42 41 53 49 53 20 44 45 52 |UF DER BASIS DER|
00001950: 20 52 45 47 52 45 53 53 49 4F 4E 53 4B 55 52 56 | REGRESSIONSKURV|
00001960: 45 22 00 92 21 A2 17 99 22 4B 4F 45 4E 4E 45 4E |E"..!..."KOENNEN|
00001970: 20 42 45 4C 49 45 42 49 47 45 20 57 45 52 54 45 | BELIEBIGE WERTE|
00001980: 20 42 45 52 45 43 48 4E 45 54 20 57 45 52 44 45 | BERECHNET WERDE|
00001990: 4E 22 00 C3 21 AC 17 99 3A 99 22 20 5A 55 52 55 |N"..!...:." ZURU|
000019A0: 45 43 4B 20 5A 55 4D 20 4D 45 4E 55 45 20 4B 4F |ECK ZUM MENUE KO|
000019B0: 4D 4D 45 4E 20 53 49 45 20 44 55 52 43 48 20 5F |MMEN SIE DURCH _|
000019C0: 22 3A 99 00 D6 21 B6 17 85 22 57 45 52 54 20 58 |":...!..."WERT X|
000019D0: 20 3D 22 3B 41 24 00 E7 21 C0 17 8B 20 41 24 B2 | =";A$..!... A$.|
000019E0: 22 5F 22 20 A7 20 8E 00 F3 21 CA 17 58 B2 C5 28 |"_" . ...!..X..(|
000019F0: 41 24 29 00 FF 21 D4 17 59 B2 A5 45 28 58 29 00 |A$)..!..Y..E(X).|
00001A00: 13 22 DE 17 99 C7 28 31 34 35 29 2C 2C 22 59 20 |."....(145),,"Y |
00001A10: 3D 22 59 00 1D 22 E8 17 89 36 30 36 30 00 00 00 |="Y.."...6060...|
00001A20: 20 | |
..&.... ----- NACHLADEN GRAFIK -------.9
.... A$."N" . 100.B....G(147)G(17)"GRAFI
K NACHLADEN (J/N)".W.... A$:. A$."" . 4.
..... A$."N" . 100.....A$."N":."SYSGRAF.
OBJ",8,1.O....**************************
*******......*
*......* KURVENANPASSUNG
*.D.(..*
*.K.2..*STATISTIK-PROGR. ZUR EXPONENT
. *...<..*REGRESSIONSANALYSE INCL. GRAFI
K*...F..* HEIMO PONNATH HAMBURG 1987
*...P..* C64 - VERSION *
...Z..*********************************.
6.D..:. 49152:. 49242:. GRAFIKSPEICHER S
ICHERN.R.I..:GRAPHIC1,1:GOSUB 4000.X.N..
----- VARIABLE ----------------.C.X.SX.
0:SY.0:QX.0:QY.0:XY.0:B.0:M.0:R.0:S.0:N.
0:I.0:J.0:G.0:A.0:X1.0:Y1.0.....BB.319:B
H.199:W.0:MX..1E12:LX.1E12:MY..1E12:LX.1
E12:X2.0:Y2.0.B...XU.0:XO.0:YU.0:YO.0:RA
.0:RD.0:TA.0:TB.0:X.0:Y.0:BL.0:D.0.R...A
$."":B$."".X. ...M..... E(X).B..(M.X)...
.... X(X).RA.X.TA:.. Y(Y).RD.Y.TB.......
..H.. ----- TITEL,ERKLAERUNG --------...
R.. 53280,0:. 53281,0:.G(30)......G(147)
G(18)" EXPONENTIELLE ANPASSUNG
"G(146).#.....O...." DURCH EINE AN
ZAHL VON N PUNKTEN AUS".~...."WERTEPAARE
N LEGT DIESES PROGRAMM DIE AM"......"BES
TEN ANGEPASSTE EXPONENTIALFUNKTION".Z...
."Y=A*E^(B*X).DER KORRELATIONSKOEFFIZIEN
T"......"R UND DIE STANDARDABWEICHUNG S
WERDEN".7.".."ANGEGEBEN UND MAN KANN BEL
IEBIGE Y-WERTE".E.,.."AUS EINGEGEBENEN X
-WERTEN BERECHNEN.":....6.." EIN SCATTER
DIAGRAMM UND DIE ERMITTELTE"...@.."KURVE
WERDEN GEZEICHNET. AUF DIESE"...J.."WEI
SE KANN DIE QUALITAET DER ANPASSUNG"...T
.."EINGESCHAETZT WERDEN.":..7.^.." SOGEN
ANNTE AUSREISSER-WERTE SOLLTEN".B.H.."VO
R EINER GENAUEREN BERECHNUNG NOCH".~.R..
"ENTFERNT WERDEN.":.:.. .|..G(18)"TASTE
DRUECKEN!"G(146)...... A$:. A$."" . 390.
..... ----- HAUPTMENUE --------------...
...G(147):.:.:.:........4)"WERTE VON HAN
D EINGEBEN.......1":..I.....4)"WERTE AUS
DATEI LESEN.........2":..U.....4)"GRAFI
K ZEIGEN.................3":....B...4)"T
EXTMODUS EINSCHALTEN.........4":..M.L...
4)"EXPONENTIALFUNKTION BERECHNEN.5":....
V...4)"WERTE BERECHNEN...............6":
..'.....4)"PROGRAMMENDE.................
.7":.:..P.....10)G(18)"BITTE WAEHLEN SIE
!"G(146).S.... A$:. E(A$).1 . E(A$).7 .
500......G(147):. E(A$).7 . ....... E(A$
) . 1000,2000,3000,4000,5000,6000.C....
410...... ----- ENDE HAUPTPROGRAMM -----
-...... ----- WERTE VON HAND ---------.%
.... 4000:. TEXTMODUS.].... W.1 . ."WERT
E SCHON VORHANDEN!":. I.0 . 500:. I:..E.
..W.1......"WIEVIELE WERTE WERDEN VERWEN
DET ?":.N:.. .... W(2,N).D...."BITTE WER
TEPAARE EINGEBEN!":..R.$.. I.1 . N......
I,"X=";:.W(1,I):.G(145),,"Y=";:.W(0,I):.
.%.8.. 1300:. ZWISCHENWERTE BERECHNEN.-.
B.. I.C.L..G(147):.:."SOLLEN DIE WERTE G
ESPEICHERT WERDEN?"...V.. A$:. A$.."J" .
A$.."N" . 1110...`.. A$."N" . 1190.F.J.
.:."NAME DER DATEI (11 ZEICHEN)";:. B$..
.T.B$.H(B$,11).".DAT".",S,W"...~.. 1,8,2
,B$......1,N.".... I.1 . N:.1,W(1,I):.1,
W(0,I):. I.*... 1.P.... 1500:. SCATTERD
IAGRAMM ZEICHNEN.V.....{.... --- ZWISCHE
NWERTE BERECHNEN --.....W(2,I)..(W(0,I))
.....SX.SX.W(1,I)...(.SY.SY.W(2,I).J.2.Q
X.QX.W(1,I).W(1,I)...<.QY.QY.W(2,I).W(2,
I)...F.XY.XY.W(1,I).W(2,I)...P.. W(1,I).
MX . MX.W(1,I).2.Z.. W(1,I).LX . LX.W(1,
I).N.D.. W(0,I).MY . MY.W(0,I).J.N.. W(0
,I).LY . LY.W(0,I).P.X........ --- SCATT
ERDIAGRAMM ----------...... I.1 . N.1:.
SORTIEREN NACH X.H.... J.I.1 . N...... W
(1,I)..W(1,J) . 1560. ...W(1,0).W(1,I):W
(0,0).W(0,I):W(1,I).W(1,J):W(0,I).W(0,J)
.@...W(1,J).W(1,0):W(0,J).W(0,0).L.... J
:. I...".. 49152:. 49180:. 49202,6,0:. G
RAFIK LOESCHEN FARBE...,..:GRAPHIC1,1:CO
LOR0,1:COLOR1,7.W.6.. 49352,0,0,319,0,1:
. 49352,319,0,319,199,1...@..:DRAW 1,0,0
TO 319,0 TO 319,199 TO 0,199 TO 0,0.E.J
.. 49352,319,199,0,199,1:. 49352,0,199,0
,0,1:. RAHMEN.M.T.XU.LX.(MX.LX)..02:XO.M
X.(MX.LX)..02...^.YU.LY.(MY.LY)..02:YO.M
Y.(MY.LY)..02...H.RA.BB.(XO.XU):RD..BH.(
YO.YU)...R.TA..BB.XU.(XO.XU):TB.BH.YO.(Y
O.YU)...|.. I.1 . N.....X..X(W(1,I)):Y..
Y(W(0,I)).?....49352,X.3,Y,X.3,Y,1:.4935
2,X,Y.3,X,Y.3,1:. KREUZ.O....:DRAW1,X-3,
Y TO X+3,Y:DRAW1,X,Y-3 TO X,Y+3.W.... I.
..... A$:. A$."" . 1700...... 49242:. TE
XTMODUS.Y....:IF PEEK(238)=79 THEN GRAPH
IC5:ELSE GRAPHIC0......"XU = "LX,"XO =
"MX"...B.."YU = "LY,"YO = "MY".).L..
A$:. A$."" . 1740./.V...T.P.. ----- WERT
E AUS DATEI --------.K.U.. 4000:. TEXTMO
DUS...Z.. W.1 . ."WERTE SCHON VORHANDEN!
":. I.0 . 500:. I:......W.1.X...." DIE D
ATEI MUSS EIN BESTIMMTES FORMAT"......"H
ABEN: 1.ANZAHL DER WERTEPAARE".'....
" 1.WERT X, 1.WERT Y".R...."
2.WERT X, 2.WERT Y ...":.......
"DIESE DATEIEN WERDEN UNTER MENUEPUNKT 1
"... .."ERSTELLT. SIE TRAGEN DIE ENDUNG
.DAT .":..S.*.." ALLES KLAR..1 ACH SOO.
.2"...4.. A$:. E(A$).1 . E(A$).2 . 2100.
..>.. E(A$).2 . W.0:..>.H..:."WIE HEISST
DENN DIE DATEI (ENDUNG .DAT)".G.R.. B$.
X.\.B$.B$.",S,R".F.F..1,8,2,B$.O.P..1,N.
|.Z.. W(2,N)...... I.1 . N......1,W(1,I)
:.1,W(0,I).G.... 1300:. ZWISCHENWERTE BE
RECHNEN.O.... I.W... 1...... 1500:. SCA
TTERDIAGRAMM............ ----- GRAFIK ZE
IGEN ----------.Z.B.. W.0 . ."DA FEHLEN
NOCH DIE WERTE!":. I.0 . 500:. I:...L..
49152:. 49202,6,0:. GRAFIK EIN...M..:GR
APHIC1:RETURN...V.. A$:. E(A$)..4 . 3020
.K.... 4010:. TEXTMODUS EIN... .. -----
TEXTMODUS EIN ----------...... 49242:. T
EXTMODUS EIN.>....:IF PEEK(238)=79 THEN
GRAPHIC5:ELSE GRAPHIC0.D.....M.... -LOGA
RITHMISCHE GERADE BERECHNEN -...... 4000
:. TEXTMODUS...... W.0 . ."DA FEHLEN DIE
WERTE!":. I.0 . 500:. I:..B...G.1.....B
L.(QX.SY.SX.XY).(N.QX.SX.SX):. ACHSENABS
CHNITT.....B..(BL).-...M.(N.XY.SX.SY).(N
.QX.SX.SX):. STEIGUNG.W...R.(N.XY.SX.SY)
..((N.QX.SX.SX).(N.QY.SY.SY)):. KORRELAT
IONSKOEFFIZIENT...... I.1 . N:D..E(W(1,I
)).W(0,I):. STANDARDABWEICHUNG BERECHNEN
.U...S.S.D.D:. I:S..(S.(N.2))...... 4010
:. TEXTMODUS EIN.-.D..:."IN DER EXPONENT
IALGLEICHUNG":." Y = A*E^(B*X) IST".@.
N..:." B = ",M.U.X..:." A = ",B:..|.
..."DER KORRELATIONSKOEFFIZIENT IST"....
..:." R = ",R:..A...."DIE MITTLERE STA
NDARDABWEICHUNG BETRAEGT".V....:." S =
",S:.......:."BITTE TASTE DRUECKEN! (_
= MENUE)"...... A$:. A$."". 5140.).... A
$."_" . ..Q.(.A.1:. 49152:.49202,6,0:. G
RAFIK EIN.B.)..:GOSUB 3000...2.. I.LX .
MX . (MX.LX).100...<.X1..X(I):Y1..Y(.E(I
)):. Y1.0 . 5195.M.F.. 49266 X1,Y1,1:. P
UNKT ZEICHNEN...G..:DRAW 1,X1,Y1...K.. I
.. P.. A$:. A$."" . 5200.. Z.. A$."_" .
. 4000:..6 D.. A.1 . A.0:. 4000:. 5200.Y
N.. A.0 . A.1:. 49152:.49202,6,0.Z O..:
IF A=0 THEN A=1:GOSUB 3000.. X.. 5200..
P.. ----- WERTE BERECHNEN --------.A Z..
4000:. TEXTMODUS.. ... G.0 . W.0 . ."BI
TTE GEBEN SIE ZUERST WERTE EIN UND".5!..
. G.0 . ."BITTE DIE KURVE BERECHNEN!":.
I.0 . 500:.:..B!...:." AUF DER BASIS DER
REGRESSIONSKURVE"..!..."KOENNEN BELIEBI
GE WERTE BERECHNET WERDEN".C!...:." ZURU
ECK ZUM MENUE KOMMEN SIE DURCH _":..V!..
."WERT X =";A$..!... A$."_" . ...!J.X.E(
A$)..!T.Y..E(X).."...G(145),,"Y ="Y.."..
.6060...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL