KURVENANP.C128
FILE INFORMATION
FILENAME(S): KURVENANP.C128
FILE TYPE(S): PRG
FILE SIZE: 6.5K
FIRST SEEN: 2025-11-30 01:12:42
APPEARS ON: 2 disk(s)
FILE HASH
8b7300e7d0e06d226e1d98e5c4ca5ac6d19887b71a8802101046c68608c9397a
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10712 12 87 | KURVENANP.C128 | PRG | C64er, DuncanTwain | 22 | 4 | DOWNLOAD FILE |
| 10712 12 87 | KURVENANP.C128 | PRG | DuncanTwain | 22 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 26 1C 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 3F 1C 02 00 8F 20 49 46 20 |------.?.... IF |
00000030: 41 24 3D 22 4E 22 20 54 48 45 4E 20 31 30 30 00 |A$="N" THEN 100.|
00000040: 74 1C 03 00 8F 20 50 52 49 4E 54 43 48 52 24 28 |t.... PRINTCHR$(|
00000050: 31 34 37 29 43 48 52 24 28 31 37 29 22 47 52 41 |147)CHR$(17)"GRA|
00000060: 46 49 4B 20 4E 41 43 48 4C 41 44 45 4E 20 28 4A |FIK NACHLADEN (J|
00000070: 2F 4E 29 22 00 91 1C 04 00 8F 20 47 45 54 20 41 |/N)"...... GET A|
00000080: 24 3A 49 46 20 41 24 3D 22 22 20 54 48 45 4E 20 |$:IF A$="" THEN |
00000090: 34 00 AA 1C 05 00 8F 20 49 46 20 41 24 3D 22 4E |4...... IF A$="N|
000000A0: 22 20 54 48 45 4E 20 31 30 30 00 CD 1C 06 00 8F |" THEN 100......|
000000B0: 20 41 24 3D 22 4E 22 3A 4C 4F 41 44 22 53 59 53 | A$="N":LOAD"SYS|
000000C0: 47 52 41 46 2E 4F 42 4A 22 2C 38 2C 31 00 F4 1C |GRAF.OBJ",8,1...|
000000D0: 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000F0: 2A 2A 2A 2A 00 1B 1D 14 00 8F 2A 20 20 20 20 20 |****......* |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 20 20 20 20 20 2A 00 42 1D 1E 00 | *.B...|
00000120: 8F 2A 20 20 20 20 20 20 20 4B 55 52 56 45 4E 41 |.* KURVENA|
00000130: 4E 50 41 53 53 55 4E 47 20 20 20 20 20 20 20 20 |NPASSUNG |
00000140: 20 2A 00 69 1D 28 00 8F 2A 20 20 20 20 20 20 20 | *.i.(..* |
00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000160: 20 20 20 20 20 20 20 20 2A 00 90 1D 32 00 8F 2A | *...2..*|
00000170: 53 54 41 54 49 53 54 49 4B 2D 50 52 4F 47 52 2E |STATISTIK-PROGR.|
00000180: 20 5A 55 52 20 45 58 50 4F 4E 45 4E 54 2E 20 2A | ZUR EXPONENT. *|
00000190: 00 B7 1D 3C 00 8F 2A 52 45 47 52 45 53 53 49 4F |...<..*REGRESSIO|
000001A0: 4E 53 41 4E 41 4C 59 53 45 20 49 4E 43 4C 2E 20 |NSANALYSE INCL. |
000001B0: 47 52 41 46 49 4B 2A 00 DE 1D 46 00 8F 2A 20 20 |GRAFIK*...F..* |
000001C0: 48 45 49 4D 4F 20 50 4F 4E 4E 41 54 48 20 20 48 |HEIMO PONNATH H|
000001D0: 41 4D 42 55 52 47 20 31 39 38 37 20 20 2A 00 05 |AMBURG 1987 *..|
000001E0: 1E 50 00 8F 2A 20 20 20 20 20 20 20 43 31 32 38 |.P..* C128|
000001F0: 20 2D 20 56 45 52 53 49 4F 4E 20 20 20 20 20 20 | - VERSION |
00000200: 20 20 20 20 2A 00 2C 1E 5A 00 8F 2A 2A 2A 2A 2A | *.,.Z..*****|
00000210: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000220: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 63 1E 64 |************.c.d|
00000230: 00 9C 3A 8F 20 53 59 53 20 34 39 31 35 32 3A 53 |..:. SYS 49152:S|
00000240: 59 53 20 34 39 32 34 32 3A 52 45 4D 20 47 52 41 |YS 49242:REM GRA|
00000250: 46 49 4B 53 50 45 49 43 48 45 52 20 53 49 43 48 |FIKSPEICHER SICH|
00000260: 45 52 4E 00 73 1E 69 00 DE 31 2C 31 3A 8D 20 34 |ERN.s.i..1,1:. 4|
00000270: 30 30 30 00 99 1E 6E 00 8F 20 2D 2D 2D 2D 2D 20 |000...n.. ----- |
00000280: 56 41 52 49 41 42 4C 45 20 2D 2D 2D 2D 2D 2D 2D |VARIABLE -------|
00000290: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E4 1E 78 00 53 58 |---------...x.SX|
000002A0: B2 30 3A 53 59 B2 30 3A 51 58 B2 30 3A 51 59 B2 |.0:SY.0:QX.0:QY.|
000002B0: 30 3A 58 59 B2 30 3A 42 B2 30 3A 4D B2 30 3A 52 |0:XY.0:B.0:M.0:R|
000002C0: B2 30 3A 53 B2 30 3A 4E B2 30 3A 49 B2 30 3A 4A |.0:S.0:N.0:I.0:J|
000002D0: B2 30 3A 47 B2 30 3A 41 B2 30 3A 58 31 B2 30 3A |.0:G.0:A.0:X1.0:|
000002E0: 59 31 B2 30 00 26 1F 82 00 42 42 B2 33 31 39 3A |Y1.0.&...BB.319:|
000002F0: 42 48 B2 31 39 39 3A 57 B2 30 3A 4D 58 B2 AB 31 |BH.199:W.0:MX..1|
00000300: 45 31 32 3A 4C 58 B2 31 45 31 32 3A 4D 59 B2 AB |E12:LX.1E12:MY..|
00000310: 31 45 31 32 3A 4C 58 B2 31 45 31 32 3A 58 32 B2 |1E12:LX.1E12:X2.|
00000320: 30 3A 59 32 B2 30 00 63 1F 8C 00 58 55 B2 30 3A |0:Y2.0.c...XU.0:|
00000330: 58 4F B2 30 3A 59 55 B2 30 3A 59 4F B2 30 3A 52 |XO.0:YU.0:YO.0:R|
00000340: 41 B2 30 3A 52 44 B2 30 3A 54 41 B2 30 3A 54 42 |A.0:RD.0:TA.0:TB|
00000350: B2 30 3A 58 B2 30 3A 59 B2 30 3A 42 4C B2 30 3A |.0:X.0:Y.0:BL.0:|
00000360: 44 B2 30 00 73 1F 96 00 41 24 B2 22 22 3A 42 24 |D.0.s...A$."":B$|
00000370: B2 22 22 00 79 1F A0 00 8F 00 8E 1F AA 00 96 A5 |."".y...........|
00000380: 20 45 28 58 29 B2 42 AC BD 28 4D AC 58 29 00 B2 | E(X).B..(M.X)..|
00000390: 1F B4 00 96 A5 20 58 28 58 29 B2 52 41 AC 58 AA |..... X(X).RA.X.|
000003A0: 54 41 3A 96 A5 20 59 28 59 29 B2 52 44 AC 59 AA |TA:.. Y(Y).RD.Y.|
000003B0: 54 42 00 B8 1F BE 00 8F 00 DE 1F C8 00 8F 20 2D |TB............ -|
000003C0: 2D 2D 2D 2D 20 54 49 54 45 4C 2C 45 52 4B 4C 41 |---- TITEL,ERKLA|
000003D0: 45 52 55 4E 47 20 2D 2D 2D 2D 2D 2D 2D 2D 00 FD |ERUNG --------..|
000003E0: 1F D2 00 97 20 35 33 32 38 30 2C 30 3A 97 20 35 |.... 53280,0:. 5|
000003F0: 33 32 38 31 2C 30 3A 99 C7 28 33 30 29 00 3E 20 |3281,0:..(30).> |
00000400: DC 00 99 C7 28 31 34 37 29 C7 28 31 38 29 22 20 |....(147).(18)" |
00000410: 20 20 20 20 20 20 20 20 20 20 20 47 45 52 41 44 | GERAD|
00000420: 45 4E 41 4E 50 41 53 53 55 4E 47 20 20 20 20 20 |ENANPASSUNG |
00000430: 20 20 20 20 20 20 20 22 C7 28 31 34 36 29 00 44 | ".(146).D|
00000440: 20 E6 00 99 00 70 20 F0 00 99 22 20 44 55 52 43 | ....p ..." DURC|
00000450: 48 20 45 49 4E 45 20 41 4E 5A 41 48 4C 20 56 4F |H EINE ANZAHL VO|
00000460: 4E 20 4E 20 50 55 4E 4B 54 45 4E 20 41 55 53 22 |N N PUNKTEN AUS"|
00000470: 00 9F 20 FA 00 99 22 57 45 52 54 45 50 41 41 52 |.. ..."WERTEPAAR|
00000480: 45 4E 20 4C 45 47 54 20 44 49 45 53 45 53 20 50 |EN LEGT DIESES P|
00000490: 52 4F 47 52 41 4D 4D 20 44 49 45 20 41 4D 22 00 |ROGRAMM DIE AM".|
000004A0: CC 20 04 01 99 22 42 45 53 54 45 4E 20 41 4E 47 |. ..."BESTEN ANG|
000004B0: 45 50 41 53 53 54 45 20 45 58 50 4F 4E 45 4E 54 |EPASSTE EXPONENT|
000004C0: 49 41 4C 46 55 4E 4B 54 49 4F 4E 22 00 FB 20 0E |IALFUNKTION".. .|
000004D0: 01 99 22 59 3D 41 2A 45 5E 28 42 2A 58 29 2E 44 |.."Y=A*E^(B*X).D|
000004E0: 45 52 20 4B 4F 52 52 45 4C 41 54 49 4F 4E 53 4B |ER KORRELATIONSK|
000004F0: 4F 45 46 46 49 5A 49 45 4E 54 22 00 28 21 18 01 |OEFFIZIENT".(!..|
00000500: 99 22 52 20 55 4E 44 20 44 49 45 20 53 54 41 4E |."R UND DIE STAN|
00000510: 44 41 52 44 41 42 57 45 49 43 48 55 4E 47 20 53 |DARDABWEICHUNG S|
00000520: 20 57 45 52 44 45 4E 22 00 58 21 22 01 99 22 41 | WERDEN".X!".."A|
00000530: 4E 47 45 47 45 42 45 4E 20 55 4E 44 20 4D 41 4E |NGEGEBEN UND MAN|
00000540: 20 4B 41 4E 4E 20 42 45 4C 49 45 42 49 47 45 20 | KANN BELIEBIGE |
00000550: 59 2D 57 45 52 54 45 22 00 86 21 2C 01 99 22 41 |Y-WERTE"..!,.."A|
00000560: 55 53 20 45 49 4E 47 45 47 45 42 45 4E 45 4E 20 |US EINGEGEBENEN |
00000570: 58 2D 57 45 52 54 45 4E 20 42 45 52 45 43 48 4E |X-WERTEN BERECHN|
00000580: 45 4E 2E 22 3A 99 00 B5 21 36 01 99 22 20 45 49 |EN.":...!6.." EI|
00000590: 4E 20 53 43 41 54 54 45 52 44 49 41 47 52 41 4D |N SCATTERDIAGRAM|
000005A0: 4D 20 55 4E 44 20 44 49 45 20 45 52 4D 49 54 54 |M UND DIE ERMITT|
000005B0: 45 4C 54 45 22 00 DF 21 40 01 99 22 4B 55 52 56 |ELTE"..!@.."KURV|
000005C0: 45 20 57 45 52 44 45 4E 20 47 45 5A 45 49 43 48 |E WERDEN GEZEICH|
000005D0: 4E 45 54 2E 20 41 55 46 20 44 49 45 53 45 22 00 |NET. AUF DIESE".|
000005E0: 0D 22 4A 01 99 22 57 45 49 53 45 20 4B 41 4E 4E |."J.."WEISE KANN|
000005F0: 20 44 49 45 20 51 55 41 4C 49 54 41 45 54 20 44 | DIE QUALITAET D|
00000600: 45 52 20 41 4E 50 41 53 53 55 4E 47 22 00 2C 22 |ER ANPASSUNG".,"|
00000610: 54 01 99 22 45 49 4E 47 45 53 43 48 41 45 54 5A |T.."EINGESCHAETZ|
00000620: 54 20 57 45 52 44 45 4E 2E 22 3A 99 00 58 22 5E |T WERDEN.":..X"^|
00000630: 01 99 22 20 53 4F 47 45 4E 41 4E 4E 54 45 20 41 |.." SOGENANNTE A|
00000640: 55 53 52 45 49 53 53 45 52 2D 57 45 52 54 45 20 |USREISSER-WERTE |
00000650: 53 4F 4C 4C 54 45 4E 22 00 83 22 68 01 99 22 56 |SOLLTEN".."h.."V|
00000660: 4F 52 20 45 49 4E 45 52 20 47 45 4E 41 55 45 52 |OR EINER GENAUER|
00000670: 45 4E 20 42 45 52 45 43 48 4E 55 4E 47 20 4E 4F |EN BERECHNUNG NO|
00000680: 43 48 22 00 9F 22 72 01 99 22 45 4E 54 46 45 52 |CH".."r.."ENTFER|
00000690: 4E 54 20 57 45 52 44 45 4E 2E 22 3A 99 3A 99 00 |NT WERDEN.":.:..|
000006A0: C1 22 7C 01 99 C7 28 31 38 29 22 54 41 53 54 45 |."|...(18)"TASTE|
000006B0: 20 44 52 55 45 43 4B 45 4E 21 22 C7 28 31 34 36 | DRUECKEN!".(146|
000006C0: 29 00 D8 22 86 01 A1 20 41 24 3A 8B 20 41 24 B2 |).."... A$:. A$.|
000006D0: 22 22 20 A7 20 33 39 30 00 FE 22 90 01 8F 20 2D |"" . 390.."... -|
000006E0: 2D 2D 2D 2D 20 48 41 55 50 54 4D 45 4E 55 45 20 |---- HAUPTMENUE |
000006F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 12 |--------------..|
00000700: 23 9A 01 99 C7 28 31 34 37 29 3A 99 3A 99 3A 99 |#....(147):.:.:.|
00000710: 3A 99 00 3E 23 A4 01 99 A3 34 29 22 57 45 52 54 |:..>#....4)"WERT|
00000720: 45 20 56 4F 4E 20 48 41 4E 44 20 45 49 4E 47 45 |E VON HAND EINGE|
00000730: 42 45 4E 2E 2E 2E 2E 2E 2E 2E 31 22 3A 99 00 6A |BEN.......1":..j|
00000740: 23 AE 01 99 A3 34 29 22 57 45 52 54 45 20 41 55 |#....4)"WERTE AU|
00000750: 53 20 44 41 54 45 49 20 4C 45 53 45 4E 2E 2E 2E |S DATEI LESEN...|
00000760: 2E 2E 2E 2E 2E 2E 32 22 3A 99 00 96 23 B8 01 99 |......2":...#...|
00000770: A3 34 29 22 47 52 41 46 49 4B 20 5A 45 49 47 45 |.4)"GRAFIK ZEIGE|
00000780: 4E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |N...............|
00000790: 2E 2E 33 22 3A 99 00 C2 23 C2 01 99 A3 34 29 22 |..3":...#....4)"|
000007A0: 54 45 58 54 4D 4F 44 55 53 20 45 49 4E 53 43 48 |TEXTMODUS EINSCH|
000007B0: 41 4C 54 45 4E 2E 2E 2E 2E 2E 2E 2E 2E 2E 34 22 |ALTEN.........4"|
000007C0: 3A 99 00 EE 23 CC 01 99 A3 34 29 22 45 58 50 4F |:...#....4)"EXPO|
000007D0: 4E 45 4E 54 49 41 4C 46 55 4E 4B 54 49 4F 4E 20 |NENTIALFUNKTION |
000007E0: 42 45 52 45 43 48 4E 45 4E 2E 35 22 3A 99 00 1A |BERECHNEN.5":...|
000007F0: 24 D6 01 99 A3 34 29 22 57 45 52 54 45 20 42 45 |$....4)"WERTE BE|
00000800: 52 45 43 48 4E 45 4E 2E 2E 2E 2E 2E 2E 2E 2E 2E |RECHNEN.........|
00000810: 2E 2E 2E 2E 2E 2E 36 22 3A 99 00 48 24 E0 01 99 |......6":..H$...|
00000820: A3 34 29 22 50 52 4F 47 52 41 4D 4D 45 4E 44 45 |.4)"PROGRAMMENDE|
00000830: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000840: 2E 2E 37 22 3A 99 3A 99 00 71 24 EA 01 99 A3 31 |..7":.:..q$....1|
00000850: 30 29 C7 28 31 38 29 22 42 49 54 54 45 20 57 41 |0).(18)"BITTE WA|
00000860: 45 48 4C 45 4E 20 53 49 45 21 22 C7 28 31 34 36 |EHLEN SIE!".(146|
00000870: 29 00 94 24 F4 01 A1 20 41 24 3A 8B 20 C5 28 41 |)..$... A$:. .(A|
00000880: 24 29 B3 31 20 B0 20 C5 28 41 24 29 B1 37 20 A7 |$).1 . .(A$).7 .|
00000890: 20 35 30 30 00 AE 24 FE 01 99 C7 28 31 34 37 29 | 500..$....(147)|
000008A0: 3A 8B 20 C5 28 41 24 29 B2 37 20 A7 20 80 00 DA |:. .(A$).7 . ...|
000008B0: 24 08 02 91 20 C5 28 41 24 29 20 8D 20 31 30 30 |$... .(A$) . 100|
000008C0: 30 2C 32 30 30 30 2C 33 30 30 30 2C 34 30 30 30 |0,2000,3000,4000|
000008D0: 2C 35 30 30 30 2C 36 30 30 30 00 E4 24 12 02 89 |,5000,6000..$...|
000008E0: 20 34 31 30 00 0A 25 1C 02 8F 20 2D 2D 2D 2D 2D | 410..%... -----|
000008F0: 20 45 4E 44 45 20 48 41 55 50 54 50 52 4F 47 52 | ENDE HAUPTPROGR|
00000900: 41 4D 4D 20 2D 2D 2D 2D 2D 2D 00 2F 25 E8 03 8F |AMM ------./%...|
00000910: 20 2D 2D 2D 2D 2D 20 57 45 52 54 45 20 56 4F 4E | ----- WERTE VON|
00000920: 20 48 41 4E 44 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 | HAND ---------.|
00000930: 46 25 ED 03 8D 20 34 30 30 30 3A 8F 20 54 45 58 |F%... 4000:. TEX|
00000940: 54 4D 4F 44 55 53 00 7E 25 F2 03 8B 20 57 B2 31 |TMODUS.~%... W.1|
00000950: 20 A7 20 99 22 57 45 52 54 45 20 53 43 48 4F 4E | . ."WERTE SCHON|
00000960: 20 56 4F 52 48 41 4E 44 45 4E 21 22 3A 81 20 49 | VORHANDEN!":. I|
00000970: B2 30 20 A4 20 35 30 30 3A 82 20 49 3A 8E 00 86 |.0 . 500:. I:...|
00000980: 25 FC 03 57 B2 31 00 B4 25 06 04 99 22 57 49 45 |%..W.1..%..."WIE|
00000990: 56 49 45 4C 45 20 57 45 52 54 45 20 57 45 52 44 |VIELE WERTE WERD|
000009A0: 45 4E 20 56 45 52 57 45 4E 44 45 54 20 3F 22 3A |EN VERWENDET ?":|
000009B0: 85 4E 3A 99 00 C1 25 10 04 86 20 57 28 32 2C 4E |.N:...%... W(2,N|
000009C0: 29 00 E5 25 1A 04 99 22 42 49 54 54 45 20 57 45 |)..%..."BITTE WE|
000009D0: 52 54 45 50 41 41 52 45 20 45 49 4E 47 45 42 45 |RTEPAARE EINGEBE|
000009E0: 4E 21 22 3A 99 00 F3 25 24 04 81 20 49 B2 31 20 |N!":...%$.. I.1 |
000009F0: A4 20 4E 00 21 26 2E 04 99 49 2C 22 58 3D 22 3B |. N.!&...I,"X=";|
00000A00: 3A 85 57 28 31 2C 49 29 3A 99 C7 28 31 34 35 29 |:.W(1,I):..(145)|
00000A10: 2C 2C 22 59 3D 22 3B 3A 85 57 28 30 2C 49 29 3A |,,"Y=";:.W(0,I):|
00000A20: 99 00 46 26 38 04 8D 20 31 33 30 30 3A 8F 20 5A |..F&8.. 1300:. Z|
00000A30: 57 49 53 43 48 45 4E 57 45 52 54 45 20 42 45 52 |WISCHENWERTE BER|
00000A40: 45 43 48 4E 45 4E 00 4E 26 42 04 82 20 49 00 84 |ECHNEN.N&B.. I..|
00000A50: 26 4C 04 99 C7 28 31 34 37 29 3A 99 3A 99 22 53 |&L...(147):.:."S|
00000A60: 4F 4C 4C 45 4E 20 44 49 45 20 57 45 52 54 45 20 |OLLEN DIE WERTE |
00000A70: 47 45 53 50 45 49 43 48 45 52 54 20 57 45 52 44 |GESPEICHERT WERD|
00000A80: 45 4E 3F 22 00 A8 26 56 04 A1 20 41 24 3A 8B 20 |EN?"..&V.. A$:. |
00000A90: 41 24 B3 B1 22 4A 22 20 AF 20 41 24 B3 B1 22 4E |A$.."J" . A$.."N|
00000AA0: 22 20 A7 20 31 31 31 30 00 BC 26 60 04 8B 20 41 |" . 1110..&`.. A|
00000AB0: 24 B2 22 4E 22 20 A7 20 31 31 39 30 00 E7 26 6A |$."N" . 1190..&j|
00000AC0: 04 99 3A 99 22 4E 41 4D 45 20 44 45 52 20 44 41 |..:."NAME DER DA|
00000AD0: 54 45 49 20 28 31 31 20 5A 45 49 43 48 45 4E 29 |TEI (11 ZEICHEN)|
00000AE0: 22 3B 3A 85 20 42 24 00 05 27 74 04 42 24 B2 C8 |";:. B$..'t.B$..|
00000AF0: 28 42 24 2C 31 31 29 AA 22 2E 44 41 54 22 AA 22 |(B$,11).".DAT"."|
00000B00: 2C 53 2C 57 22 00 14 27 7E 04 9F 20 31 2C 38 2C |,S,W"..'~.. 1,8,|
00000B10: 32 2C 42 24 00 1D 27 88 04 98 31 2C 4E 00 43 27 |2,B$..'...1,N.C'|
00000B20: 92 04 81 20 49 B2 31 20 A4 20 4E 3A 98 31 2C 57 |... I.1 . N:.1,W|
00000B30: 28 31 2C 49 29 3A 98 31 2C 57 28 30 2C 49 29 3A |(1,I):.1,W(0,I):|
00000B40: 82 20 49 00 4B 27 9C 04 A0 20 31 00 71 27 A6 04 |. I.K'... 1.q'..|
00000B50: 8D 20 31 35 30 30 3A 8F 20 53 43 41 54 54 45 52 |. 1500:. SCATTER|
00000B60: 44 49 41 47 52 41 4D 4D 20 5A 45 49 43 48 4E 45 |DIAGRAMM ZEICHNE|
00000B70: 4E 00 77 27 B0 04 8E 00 9C 27 14 05 8F 20 2D 2D |N.w'.....'... --|
00000B80: 2D 20 5A 57 49 53 43 48 45 4E 57 45 52 54 45 20 |- ZWISCHENWERTE |
00000B90: 42 45 52 45 43 48 4E 45 4E 20 2D 2D 00 B1 27 19 |BERECHNEN --..'.|
00000BA0: 05 57 28 32 2C 49 29 B2 BC 28 57 28 30 2C 49 29 |.W(2,I)..(W(0,I)|
00000BB0: 29 00 C2 27 1E 05 53 58 B2 53 58 AA 57 28 31 2C |)..'..SX.SX.W(1,|
00000BC0: 49 29 00 D3 27 28 05 53 59 B2 53 59 AA 57 28 32 |I)..'(.SY.SY.W(2|
00000BD0: 2C 49 29 00 EB 27 32 05 51 58 B2 51 58 AA 57 28 |,I)..'2.QX.QX.W(|
00000BE0: 31 2C 49 29 AC 57 28 31 2C 49 29 00 03 28 3C 05 |1,I).W(1,I)..(<.|
00000BF0: 51 59 B2 51 59 AA 57 28 32 2C 49 29 AC 57 28 32 |QY.QY.W(2,I).W(2|
00000C00: 2C 49 29 00 1B 28 46 05 58 59 B2 58 59 AA 57 28 |,I)..(F.XY.XY.W(|
00000C10: 31 2C 49 29 AC 57 28 32 2C 49 29 00 37 28 50 05 |1,I).W(2,I).7(P.|
00000C20: 8B 20 57 28 31 2C 49 29 B1 4D 58 20 A7 20 4D 58 |. W(1,I).MX . MX|
00000C30: B2 57 28 31 2C 49 29 00 53 28 5A 05 8B 20 57 28 |.W(1,I).S(Z.. W(|
00000C40: 31 2C 49 29 B3 4C 58 20 A7 20 4C 58 B2 57 28 31 |1,I).LX . LX.W(1|
00000C50: 2C 49 29 00 6F 28 64 05 8B 20 57 28 30 2C 49 29 |,I).o(d.. W(0,I)|
00000C60: B1 4D 59 20 A7 20 4D 59 B2 57 28 30 2C 49 29 00 |.MY . MY.W(0,I).|
00000C70: 8B 28 6E 05 8B 20 57 28 30 2C 49 29 B3 4C 59 20 |.(n.. W(0,I).LY |
00000C80: A7 20 4C 59 B2 57 28 30 2C 49 29 00 91 28 78 05 |. LY.W(0,I)..(x.|
00000C90: 8E 00 B6 28 DC 05 8F 20 2D 2D 2D 20 53 43 41 54 |...(... --- SCAT|
00000CA0: 54 45 52 44 49 41 47 52 41 4D 4D 20 2D 2D 2D 2D |TERDIAGRAMM ----|
00000CB0: 2D 2D 2D 2D 2D 2D 00 D9 28 E6 05 81 20 49 B2 31 |------..(... I.1|
00000CC0: 20 A4 20 4E AB 31 3A 8F 20 53 4F 52 54 49 45 52 | . N.1:. SORTIER|
00000CD0: 45 4E 20 4E 41 43 48 20 58 00 E9 28 F0 05 81 20 |EN NACH X..(... |
00000CE0: 4A B2 49 AA 31 20 A4 20 4E 00 05 29 FA 05 8B 20 |J.I.1 . N..)... |
00000CF0: 57 28 31 2C 49 29 B3 B2 57 28 31 2C 4A 29 20 A7 |W(1,I)..W(1,J) .|
00000D00: 20 31 35 36 30 00 41 29 04 06 57 28 31 2C 30 29 | 1560.A)..W(1,0)|
00000D10: B2 57 28 31 2C 49 29 3A 57 28 30 2C 30 29 B2 57 |.W(1,I):W(0,0).W|
00000D20: 28 30 2C 49 29 3A 57 28 31 2C 49 29 B2 57 28 31 |(0,I):W(1,I).W(1|
00000D30: 2C 4A 29 3A 57 28 30 2C 49 29 B2 57 28 30 2C 4A |,J):W(0,I).W(0,J|
00000D40: 29 00 61 29 0E 06 57 28 31 2C 4A 29 B2 57 28 31 |).a)..W(1,J).W(1|
00000D50: 2C 30 29 3A 57 28 30 2C 4A 29 B2 57 28 30 2C 30 |,0):W(0,J).W(0,0|
00000D60: 29 00 6D 29 18 06 82 20 4A 3A 82 20 49 00 AF 29 |).m)... J:. I..)|
00000D70: 22 06 8F 20 53 59 53 20 34 39 31 35 32 3A 53 59 |".. SYS 49152:SY|
00000D80: 53 20 34 39 31 38 30 3A 53 59 53 20 34 39 32 30 |S 49180:SYS 4920|
00000D90: 32 2C 36 2C 30 3A 52 45 4D 20 47 52 41 46 49 4B |2,6,0:REM GRAFIK|
00000DA0: 20 4C 4F 45 53 43 48 45 4E 20 46 41 52 42 45 00 | LOESCHEN FARBE.|
00000DB0: C2 29 2C 06 DE 31 2C 31 3A E7 30 2C 31 3A E7 31 |.),..1,1:.0,1:.1|
00000DC0: 2C 37 00 F8 29 36 06 8F 20 53 59 53 20 34 39 33 |,7..)6.. SYS 493|
00000DD0: 35 32 2C 30 2C 30 2C 33 31 39 2C 30 2C 31 3A 53 |52,0,0,319,0,1:S|
00000DE0: 59 53 20 34 39 33 35 32 2C 33 31 39 2C 30 2C 33 |YS 49352,319,0,3|
00000DF0: 31 39 2C 31 39 39 2C 31 00 24 2A 40 06 E5 20 31 |19,199,1.$*@.. 1|
00000E00: 2C 30 2C 30 20 A4 20 33 31 39 2C 30 20 A4 20 33 |,0,0 . 319,0 . 3|
00000E10: 31 39 2C 31 39 39 20 A4 20 30 2C 31 39 39 20 A4 |19,199 . 0,199 .|
00000E20: 20 30 2C 30 00 65 2A 4A 06 8F 20 53 59 53 20 34 | 0,0.e*J.. SYS 4|
00000E30: 39 33 35 32 2C 33 31 39 2C 31 39 39 2C 30 2C 31 |9352,319,199,0,1|
00000E40: 39 39 2C 31 3A 53 59 53 20 34 39 33 35 32 2C 30 |99,1:SYS 49352,0|
00000E50: 2C 31 39 39 2C 30 2C 30 2C 31 3A 52 45 4D 20 52 |,199,0,0,1:REM R|
00000E60: 41 48 4D 45 4E 00 8D 2A 54 06 58 55 B2 4C 58 AB |AHMEN..*T.XU.LX.|
00000E70: 28 4D 58 AB 4C 58 29 AC 2E 30 32 3A 58 4F B2 4D |(MX.LX)..02:XO.M|
00000E80: 58 AA 28 4D 58 AB 4C 58 29 AC 2E 30 32 00 B5 2A |X.(MX.LX)..02..*|
00000E90: 5E 06 59 55 B2 4C 59 AB 28 4D 59 AB 4C 59 29 AC |^.YU.LY.(MY.LY).|
00000EA0: 2E 30 32 3A 59 4F B2 4D 59 AA 28 4D 59 AB 4C 59 |.02:YO.MY.(MY.LY|
00000EB0: 29 AC 2E 30 32 00 D6 2A 68 06 52 41 B2 42 42 AD |)..02..*h.RA.BB.|
00000EC0: 28 58 4F AB 58 55 29 3A 52 44 B2 AB 42 48 AD 28 |(XO.XU):RD..BH.(|
00000ED0: 59 4F AB 59 55 29 00 FD 2A 72 06 54 41 B2 AB 42 |YO.YU)..*r.TA..B|
00000EE0: 42 AC 58 55 AD 28 58 4F AB 58 55 29 3A 54 42 B2 |B.XU.(XO.XU):TB.|
00000EF0: 42 48 AC 59 4F AD 28 59 4F AB 59 55 29 00 0B 2B |BH.YO.(YO.YU)..+|
00000F00: 7C 06 81 20 49 B2 31 20 A4 20 4E 00 29 2B 86 06 ||.. I.1 . N.)+..|
00000F10: 58 B2 A5 58 28 57 28 31 2C 49 29 29 3A 59 B2 A5 |X..X(W(1,I)):Y..|
00000F20: 59 28 57 28 30 2C 49 29 29 00 67 2B 90 06 8F 20 |Y(W(0,I)).g+... |
00000F30: 53 59 53 34 39 33 35 32 2C 58 2D 33 2C 59 2C 58 |SYS49352,X-3,Y,X|
00000F40: 2B 33 2C 59 2C 31 3A 53 59 53 34 39 33 35 32 2C |+3,Y,1:SYS49352,|
00000F50: 58 2C 59 2D 33 2C 58 2C 59 2B 33 2C 31 3A 52 45 |X,Y-3,X,Y+3,1:RE|
00000F60: 4D 20 4B 52 45 55 5A 00 8D 2B 91 06 E5 31 2C 58 |M KREUZ..+...1,X|
00000F70: AB 33 2C 59 20 A4 20 58 AA 33 2C 59 3A E5 31 2C |.3,Y . X.3,Y:.1,|
00000F80: 58 2C 59 AB 33 20 A4 20 58 2C 59 AA 33 00 95 2B |X,Y.3 . X,Y.3..+|
00000F90: 9A 06 82 20 49 00 AD 2B A4 06 A1 20 41 24 3A 8B |... I..+... A$:.|
00000FA0: 20 41 24 B2 22 22 20 A7 20 31 37 30 30 00 CB 2B | A$."" . 1700..+|
00000FB0: AE 06 8F 20 53 59 53 20 34 39 32 34 32 3A 52 45 |... SYS 49242:RE|
00000FC0: 4D 20 54 45 58 54 4D 4F 44 55 53 00 E5 2B AF 06 |M TEXTMODUS..+..|
00000FD0: 8B 20 C2 28 32 33 38 29 B2 37 39 20 A7 20 DE 35 |. .(238).79 . .5|
00000FE0: 3A D5 20 DE 30 00 01 2C B8 06 99 22 58 55 20 3D |:. .0..,..."XU =|
00000FF0: 20 20 22 4C 58 2C 22 58 4F 20 3D 20 20 22 4D 58 | "LX,"XO = "MX|
00001000: 22 00 1D 2C C2 06 99 22 59 55 20 3D 20 20 22 4C |"..,..."YU = "L|
00001010: 59 2C 22 59 4F 20 3D 20 20 22 4D 59 22 00 35 2C |Y,"YO = "MY".5,|
00001020: CC 06 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 |... A$:. A$."" .|
00001030: 20 31 37 34 30 00 3B 2C D6 06 8E 00 60 2C D0 07 | 1740.;,....`,..|
00001040: 8F 20 2D 2D 2D 2D 2D 20 57 45 52 54 45 20 41 55 |. ----- WERTE AU|
00001050: 53 20 44 41 54 45 49 20 2D 2D 2D 2D 2D 2D 2D 2D |S DATEI --------|
00001060: 00 77 2C D5 07 8D 20 34 30 30 30 3A 8F 20 54 45 |.w,... 4000:. TE|
00001070: 58 54 4D 4F 44 55 53 00 AF 2C DA 07 8B 20 57 B2 |XTMODUS..,... W.|
00001080: 31 20 A7 20 99 22 57 45 52 54 45 20 53 43 48 4F |1 . ."WERTE SCHO|
00001090: 4E 20 56 4F 52 48 41 4E 44 45 4E 21 22 3A 81 20 |N VORHANDEN!":. |
000010A0: 49 B2 30 20 A4 20 35 30 30 3A 82 20 49 3A 8E 00 |I.0 . 500:. I:..|
000010B0: B7 2C E4 07 57 B2 31 00 E4 2C EE 07 99 22 20 44 |.,..W.1..,..." D|
000010C0: 49 45 20 44 41 54 45 49 20 4D 55 53 53 20 45 49 |IE DATEI MUSS EI|
000010D0: 4E 20 42 45 53 54 49 4D 4D 54 45 53 20 46 4F 52 |N BESTIMMTES FOR|
000010E0: 4D 41 54 22 00 0E 2D F8 07 99 22 48 41 42 45 4E |MAT"..-..."HABEN|
000010F0: 3A 20 20 20 20 20 31 2E 41 4E 5A 41 48 4C 20 44 |: 1.ANZAHL D|
00001100: 45 52 20 57 45 52 54 45 50 41 41 52 45 22 00 33 |ER WERTEPAARE".3|
00001110: 2D 02 08 99 22 20 20 20 20 20 20 20 20 20 20 20 |-..." |
00001120: 31 2E 57 45 52 54 20 58 2C 20 31 2E 57 45 52 54 |1.WERT X, 1.WERT|
00001130: 20 59 22 00 5E 2D 0C 08 99 22 20 20 20 20 20 20 | Y".^-..." |
00001140: 20 20 20 20 20 32 2E 57 45 52 54 20 58 2C 20 32 | 2.WERT X, 2|
00001150: 2E 57 45 52 54 20 59 20 2E 2E 2E 22 3A 99 00 8D |.WERT Y ...":...|
00001160: 2D 16 08 99 22 44 49 45 53 45 20 44 41 54 45 49 |-..."DIESE DATEI|
00001170: 45 4E 20 57 45 52 44 45 4E 20 55 4E 54 45 52 20 |EN WERDEN UNTER |
00001180: 4D 45 4E 55 45 50 55 4E 4B 54 20 31 22 00 BD 2D |MENUEPUNKT 1"..-|
00001190: 20 08 99 22 45 52 53 54 45 4C 4C 54 2E 20 53 49 | .."ERSTELLT. SI|
000011A0: 45 20 54 52 41 47 45 4E 20 44 49 45 20 45 4E 44 |E TRAGEN DIE END|
000011B0: 55 4E 47 20 2E 44 41 54 20 2E 22 3A 99 00 DF 2D |UNG .DAT .":...-|
000011C0: 2A 08 99 22 20 41 4C 4C 45 53 20 4B 4C 41 52 2E |*.." ALLES KLAR.|
000011D0: 2E 31 20 20 41 43 48 20 53 4F 4F 2E 2E 32 22 00 |.1 ACH SOO..2".|
000011E0: 03 2E 34 08 A1 20 41 24 3A 8B 20 C5 28 41 24 29 |..4.. A$:. .(A$)|
000011F0: B3 31 20 B0 20 C5 28 41 24 29 B1 32 20 A7 20 32 |.1 . .(A$).2 . 2|
00001200: 31 30 30 00 19 2E 3E 08 8B 20 C5 28 41 24 29 B2 |100...>.. .(A$).|
00001210: 32 20 A7 20 57 B2 30 3A 8E 00 4A 2E 48 08 99 3A |2 . W.0:..J.H..:|
00001220: 99 22 57 49 45 20 48 45 49 53 53 54 20 44 45 4E |."WIE HEISST DEN|
00001230: 4E 20 44 49 45 20 44 41 54 45 49 20 28 45 4E 44 |N DIE DATEI (END|
00001240: 55 4E 47 20 2E 44 41 54 29 22 00 53 2E 52 08 85 |UNG .DAT)".S.R..|
00001250: 20 42 24 00 64 2E 5C 08 42 24 B2 42 24 AA 22 2C | B$.d.\.B$.B$.",|
00001260: 53 2C 52 22 00 72 2E 66 08 9F 31 2C 38 2C 32 2C |S,R".r.f..1,8,2,|
00001270: 42 24 00 7B 2E 70 08 84 31 2C 4E 00 88 2E 7A 08 |B$.{.p..1,N...z.|
00001280: 86 20 57 28 32 2C 4E 29 00 96 2E 84 08 81 20 49 |. W(2,N)...... I|
00001290: B2 31 20 A4 20 4E 00 AE 2E 8E 08 84 31 2C 57 28 |.1 . N......1,W(|
000012A0: 31 2C 49 29 3A 84 31 2C 57 28 30 2C 49 29 00 D3 |1,I):.1,W(0,I)..|
000012B0: 2E 98 08 8D 20 31 33 30 30 3A 8F 20 5A 57 49 53 |.... 1300:. ZWIS|
000012C0: 43 48 45 4E 57 45 52 54 45 20 42 45 52 45 43 48 |CHENWERTE BERECH|
000012D0: 4E 45 4E 00 DB 2E A2 08 82 20 49 00 E3 2E AC 08 |NEN...... I.....|
000012E0: A0 20 31 00 00 2F B6 08 8D 20 31 35 30 30 3A 8F |. 1../... 1500:.|
000012F0: 20 53 43 41 54 54 45 52 44 49 41 47 52 41 4D 4D | SCATTERDIAGRAMM|
00001300: 00 06 2F C0 08 8E 00 2B 2F B8 0B 8F 20 2D 2D 2D |../....+/... ---|
00001310: 2D 2D 20 47 52 41 46 49 4B 20 5A 45 49 47 45 4E |-- GRAFIK ZEIGEN|
00001320: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 66 2F C2 0B | ----------.f/..|
00001330: 8B 20 57 B2 30 20 A7 20 99 22 44 41 20 46 45 48 |. W.0 . ."DA FEH|
00001340: 4C 45 4E 20 4E 4F 43 48 20 44 49 45 20 57 45 52 |LEN NOCH DIE WER|
00001350: 54 45 21 22 3A 81 20 49 B2 30 20 A4 20 35 30 30 |TE!":. I.0 . 500|
00001360: 3A 82 20 49 3A 8E 00 93 2F CC 0B 8F 20 53 59 53 |:. I:.../... SYS|
00001370: 20 34 39 31 35 32 3A 53 59 53 20 34 39 32 30 32 | 49152:SYS 49202|
00001380: 2C 36 2C 30 3A 52 45 4D 20 47 52 41 46 49 4B 20 |,6,0:REM GRAFIK |
00001390: 45 49 4E 00 9C 2F CD 0B DE 31 3A 8E 00 C1 2F D6 |EIN../...1:.../.|
000013A0: 0B 8F 20 47 45 54 20 41 24 3A 49 46 20 56 41 4C |.. GET A$:IF VAL|
000013B0: 28 41 24 29 3C 3E 34 20 54 48 45 4E 20 33 30 32 |(A$)<>4 THEN 302|
000013C0: 30 00 E3 2F E0 0B 8F 20 47 4F 54 4F 20 34 30 31 |0../... GOTO 401|
000013D0: 30 3A 52 45 4D 20 54 45 58 54 4D 4F 44 55 53 20 |0:REM TEXTMODUS |
000013E0: 45 49 4E 00 08 30 A0 0F 8F 20 2D 2D 2D 2D 2D 20 |EIN..0... ----- |
000013F0: 54 45 58 54 4D 4F 44 55 53 20 45 49 4E 20 2D 2D |TEXTMODUS EIN --|
00001400: 2D 2D 2D 2D 2D 2D 2D 2D 00 2A 30 AA 0F 8F 20 53 |--------.*0... S|
00001410: 59 53 20 34 39 32 34 32 3A 52 45 4D 20 54 45 58 |YS 49242:REM TEX|
00001420: 54 4D 4F 44 55 53 20 45 49 4E 00 44 30 AB 0F 8B |TMODUS EIN.D0...|
00001430: 20 C2 28 32 33 38 29 B2 37 39 20 A7 20 DE 35 3A | .(238).79 . .5:|
00001440: D5 20 DE 30 00 4A 30 B4 0F 8E 00 6F 30 88 13 8F |. .0.J0....o0...|
00001450: 20 2D 2D 2D 2D 2D 20 47 45 52 41 44 45 20 42 45 | ----- GERADE BE|
00001460: 52 45 43 48 4E 45 4E 20 2D 2D 2D 2D 2D 2D 2D 00 |RECHNEN -------.|
00001470: 86 30 8A 13 8D 20 34 30 30 30 3A 8F 20 54 45 58 |.0... 4000:. TEX|
00001480: 54 4D 4F 44 55 53 00 BC 30 8D 13 8B 20 57 B2 30 |TMODUS..0... W.0|
00001490: 20 A7 20 99 22 44 41 20 46 45 48 4C 45 4E 20 44 | . ."DA FEHLEN D|
000014A0: 49 45 20 57 45 52 54 45 21 22 3A 81 20 49 B2 30 |IE WERTE!":. I.0|
000014B0: 20 A4 20 35 30 30 3A 82 20 49 3A 8E 00 C4 30 8F | . 500:. I:...0.|
000014C0: 13 47 B2 31 00 F8 30 92 13 42 4C B2 28 51 58 AC |.G.1..0..BL.(QX.|
000014D0: 53 59 AB 53 58 AC 58 59 29 AD 28 4E AC 51 58 AB |SY.SX.XY).(N.QX.|
000014E0: 53 58 AC 53 58 29 3A 8F 20 41 43 48 53 45 4E 41 |SX.SX):. ACHSENA|
000014F0: 42 53 43 48 4E 49 54 54 00 04 31 97 13 42 B2 BD |BSCHNITT..1..B..|
00001500: 28 42 4C 29 00 2F 31 9C 13 4D B2 28 4E AC 58 59 |(BL)./1..M.(N.XY|
00001510: AB 53 58 AC 53 59 29 AD 28 4E AC 51 58 AB 53 58 |.SX.SY).(N.QX.SX|
00001520: AC 53 58 29 3A 8F 20 53 54 45 49 47 55 4E 47 00 |.SX):. STEIGUNG.|
00001530: 79 31 A6 13 52 B2 28 4E AC 58 59 AB 53 58 AC 53 |y1..R.(N.XY.SX.S|
00001540: 59 29 AD BA 28 28 4E AC 51 58 AB 53 58 AC 53 58 |Y)..((N.QX.SX.SX|
00001550: 29 AC 28 4E AC 51 59 AB 53 59 AC 53 59 29 29 3A |).(N.QY.SY.SY)):|
00001560: 8F 20 4B 4F 52 52 45 4C 41 54 49 4F 4E 53 4B 4F |. KORRELATIONSKO|
00001570: 45 46 46 49 5A 49 45 4E 54 00 BA 31 B0 13 81 20 |EFFIZIENT..1... |
00001580: 49 B2 31 20 A4 20 4E 3A 44 B2 A5 45 28 57 28 31 |I.1 . N:D..E(W(1|
00001590: 2C 49 29 29 AB 57 28 30 2C 49 29 3A 8F 20 53 54 |,I)).W(0,I):. ST|
000015A0: 41 4E 44 41 52 44 41 42 57 45 49 43 48 55 4E 47 |ANDARDABWEICHUNG|
000015B0: 20 42 45 52 45 43 48 4E 45 4E 00 D7 31 B5 13 53 | BERECHNEN..1..S|
000015C0: B2 53 AA 44 AC 44 3A 82 20 49 3A 53 B2 BA 28 53 |.S.D.D:. I:S..(S|
000015D0: AD 28 4E AB 32 29 29 00 F2 31 BA 13 8D 20 34 30 |.(N.2))..1... 40|
000015E0: 31 30 3A 8F 20 54 45 58 54 4D 4F 44 55 53 20 45 |10:. TEXTMODUS E|
000015F0: 49 4E 00 2F 32 C4 13 99 3A 99 22 49 4E 20 44 45 |IN./2...:."IN DE|
00001600: 52 20 45 58 50 4F 4E 45 4E 54 49 41 4C 47 4C 45 |R EXPONENTIALGLE|
00001610: 49 43 48 55 4E 47 22 3A 99 22 20 20 20 59 20 3D |ICHUNG":." Y =|
00001620: 20 41 2A 45 5E 28 42 2A 58 29 20 49 53 54 22 00 | A*E^(B*X) IST".|
00001630: 42 32 CE 13 99 3A 99 22 20 20 20 42 20 3D 20 22 |B2...:." B = "|
00001640: 2C 4D 00 57 32 D8 13 99 3A 99 22 20 20 20 41 20 |,M.W2...:." A |
00001650: 3D 20 22 2C 42 3A 99 00 7E 32 E2 13 99 22 44 45 |= ",B:..~2..."DE|
00001660: 52 20 4B 4F 52 52 45 4C 41 54 49 4F 4E 53 4B 4F |R KORRELATIONSKO|
00001670: 45 46 46 49 5A 49 45 4E 54 20 49 53 54 22 00 93 |EFFIZIENT IST"..|
00001680: 32 EC 13 99 3A 99 22 20 20 20 52 20 3D 20 22 2C |2...:." R = ",|
00001690: 52 3A 99 00 C3 32 F6 13 99 22 44 49 45 20 4D 49 |R:...2..."DIE MI|
000016A0: 54 54 4C 45 52 45 20 53 54 41 4E 44 41 52 44 41 |TTLERE STANDARDA|
000016B0: 42 57 45 49 43 48 55 4E 47 20 42 45 54 52 41 45 |BWEICHUNG BETRAE|
000016C0: 47 54 22 00 D8 32 00 14 99 3A 99 22 20 20 20 53 |GT"..2...:." S|
000016D0: 20 3D 20 22 2C 53 3A 99 00 03 33 0A 14 99 3A 99 | = ",S:...3...:.|
000016E0: 22 42 49 54 54 45 20 54 41 53 54 45 20 44 52 55 |"BITTE TASTE DRU|
000016F0: 45 43 4B 45 4E 21 20 28 5F 20 3D 20 4D 45 4E 55 |ECKEN! (_ = MENU|
00001700: 45 29 22 00 1A 33 14 14 A1 20 41 24 3A 8B 20 41 |E)"..3... A$:. A|
00001710: 24 B2 22 22 A7 20 35 31 34 30 00 2B 33 1E 14 8B |$."". 5140.+3...|
00001720: 20 41 24 B2 22 5F 22 20 A7 20 8E 00 5B 33 28 14 | A$."_" . ..[3(.|
00001730: 41 B2 31 3A 8F 20 53 59 53 20 34 39 31 35 32 3A |A.1:. SYS 49152:|
00001740: 53 59 53 34 39 32 30 32 2C 36 2C 30 3A 52 45 4D |SYS49202,6,0:REM|
00001750: 20 47 52 41 46 49 4B 20 45 49 4E 00 66 33 29 14 | GRAFIK EIN.f3).|
00001760: 8D 20 33 30 30 30 00 84 33 32 14 81 20 49 B2 4C |. 3000..32.. I.L|
00001770: 58 20 A4 20 4D 58 20 A9 20 28 4D 58 AB 4C 58 29 |X . MX . (MX.LX)|
00001780: AD 31 30 30 00 AC 33 3C 14 58 31 B2 A5 58 28 49 |.100..3<.X1..X(I|
00001790: 29 3A 59 31 B2 A5 59 28 A5 45 28 49 29 29 3A 8B |):Y1..Y(.E(I)):.|
000017A0: 20 59 31 B3 30 20 A7 20 35 31 39 35 00 D7 33 46 | Y1.0 . 5195..3F|
000017B0: 14 8F 20 53 59 53 20 34 39 32 36 36 20 58 31 2C |.. SYS 49266 X1,|
000017C0: 59 31 2C 31 3A 52 45 4D 20 50 55 4E 4B 54 20 5A |Y1,1:REM PUNKT Z|
000017D0: 45 49 43 48 4E 45 4E 00 E5 33 47 14 E5 20 31 2C |EICHNEN..3G.. 1,|
000017E0: 58 31 2C 59 31 00 ED 33 4B 14 82 20 49 00 05 34 |X1,Y1..3K.. I..4|
000017F0: 50 14 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 |P.. A$:. A$."" .|
00001800: 20 35 32 30 30 00 1D 34 5A 14 8B 20 41 24 B2 22 | 5200..4Z.. A$."|
00001810: 5F 22 20 A7 20 8D 20 34 30 30 30 3A 8E 00 3B 34 |_" . . 4000:..;4|
00001820: 64 14 8B 20 41 B2 31 20 A7 20 41 B2 30 3A 8D 20 |d.. A.1 . A.0:. |
00001830: 34 30 30 30 3A 89 20 35 32 30 30 00 68 34 6E 14 |4000:. 5200.h4n.|
00001840: 8F 20 49 46 20 41 3D 30 20 54 48 45 4E 20 41 3D |. IF A=0 THEN A=|
00001850: 31 3A 53 59 53 20 34 39 31 35 32 3A 53 59 53 34 |1:SYS 49152:SYS4|
00001860: 39 32 30 32 2C 36 2C 30 00 7F 34 6F 14 8B 20 41 |9202,6,0..4o.. A|
00001870: B2 30 20 A7 20 41 B2 31 3A 8D 20 33 30 30 30 00 |.0 . A.1:. 3000.|
00001880: 8A 34 78 14 89 20 35 32 30 30 00 AF 34 70 17 8F |.4x.. 5200..4p..|
00001890: 20 2D 2D 2D 2D 2D 20 57 45 52 54 45 20 42 45 52 | ----- WERTE BER|
000018A0: 45 43 48 4E 45 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 00 |ECHNEN --------.|
000018B0: C6 34 7A 17 8D 20 34 30 30 30 3A 8F 20 54 45 58 |.4z.. 4000:. TEX|
000018C0: 54 4D 4F 44 55 53 00 00 35 84 17 8B 20 47 B2 30 |TMODUS..5... G.0|
000018D0: 20 AF 20 57 B2 30 20 A7 20 99 22 42 49 54 54 45 | . W.0 . ."BITTE|
000018E0: 20 47 45 42 45 4E 20 53 49 45 20 5A 55 45 52 53 | GEBEN SIE ZUERS|
000018F0: 54 20 57 45 52 54 45 20 45 49 4E 20 55 4E 44 22 |T WERTE EIN UND"|
00001900: 00 3A 35 8E 17 8B 20 47 B2 30 20 A7 20 99 22 42 |.:5... G.0 . ."B|
00001910: 49 54 54 45 20 44 49 45 20 4B 55 52 56 45 20 42 |ITTE DIE KURVE B|
00001920: 45 52 45 43 48 4E 45 4E 21 22 3A 81 20 49 B2 30 |ERECHNEN!":. I.0|
00001930: 20 A4 20 35 30 30 3A 82 3A 8E 00 67 35 98 17 99 | . 500:.:..g5...|
00001940: 3A 99 22 20 41 55 46 20 44 45 52 20 42 41 53 49 |:." AUF DER BASI|
00001950: 53 20 44 45 52 20 52 45 47 52 45 53 53 49 4F 4E |S DER REGRESSION|
00001960: 53 4B 55 52 56 45 22 00 97 35 A2 17 99 22 4B 4F |SKURVE"..5..."KO|
00001970: 45 4E 4E 45 4E 20 42 45 4C 49 45 42 49 47 45 20 |ENNEN BELIEBIGE |
00001980: 57 45 52 54 45 20 42 45 52 45 43 48 4E 45 54 20 |WERTE BERECHNET |
00001990: 57 45 52 44 45 4E 22 00 C8 35 AC 17 99 3A 99 22 |WERDEN"..5...:."|
000019A0: 20 5A 55 52 55 45 43 4B 20 5A 55 4D 20 4D 45 4E | ZURUECK ZUM MEN|
000019B0: 55 45 20 4B 4F 4D 4D 45 4E 20 53 49 45 20 44 55 |UE KOMMEN SIE DU|
000019C0: 52 43 48 20 5F 22 3A 99 00 DB 35 B6 17 85 22 57 |RCH _":...5..."W|
000019D0: 45 52 54 20 58 20 3D 22 3B 41 24 00 EC 35 C0 17 |ERT X =";A$..5..|
000019E0: 8B 20 41 24 B2 22 5F 22 20 A7 20 8E 00 F8 35 CA |. A$."_" . ...5.|
000019F0: 17 58 B2 C5 28 41 24 29 00 04 36 D4 17 59 B2 A5 |.X..(A$)..6..Y..|
00001A00: 45 28 58 29 00 18 36 DE 17 99 C7 28 31 34 35 29 |E(X)..6....(145)|
00001A10: 2C 2C 22 59 20 3D 22 59 00 22 36 E8 17 89 36 30 |,,"Y ="Y."6...60|
00001A20: 36 30 00 00 00 20 |60... |
..&.... ----- NACHLADEN GRAFIK -------.?
.... IF A$="N" THEN 100.T.... PRINTCHR$(
147)CHR$(17)"GRAFIK NACHLADEN (J/N)"....
.. GET A$:IF A$="" THEN 4...... IF A$="N
" THEN 100.M.... A$="N":LOAD"SYSGRAF.OBJ
",8,1......*****************************
****......*
*.B....* KURVENANPASSUNG
*.I.(..*
*...2..*STATISTIK-PROGR. ZUR EXPONENT. *
...<..*REGRESSIONSANALYSE INCL. GRAFIK*.
..F..* HEIMO PONNATH HAMBURG 1987 *..
.P..* C128 - VERSION *.,.
Z..*********************************.C.D
..:. SYS 49152:SYS 49242:REM GRAFIKSPEIC
HER SICHERN.S.I..1,1:. 4000...N.. -----
VARIABLE ----------------...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:BH.199:W
.0:MX..1E12:LX.1E12:MY..1E12:LX.1E12:X2.
0:Y2.0.C...XU.0:XO.0:YU.0:YO.0:RA.0:RD.0
:TA.0:TB.0:X.0:Y.0:BL.0:D.0.S...A$."":B$
."".Y. ......... E(X).B..(M.X)....... X(
X).RA.X.TA:.. Y(Y).RD.Y.TB.........H.. -
---- TITEL,ERKLAERUNG --------...R.. 532
80,0:. 53281,0:.G(30).> ...G(147)G(18)"
GERADENANPASSUNG "
G(146).D ....P ..." DURCH EINE ANZAHL VO
N N PUNKTEN AUS".. ..."WERTEPAAREN LEGT
DIESES PROGRAMM DIE AM".L ..."BESTEN ANG
EPASSTE EXPONENTIALFUNKTION".. ..."Y=A*E
^(B*X).DER KORRELATIONSKOEFFIZIENT".(!..
."R UND DIE STANDARDABWEICHUNG S WERDEN"
.X!".."ANGEGEBEN UND MAN KANN BELIEBIGE
Y-WERTE"..!,.."AUS EINGEGEBENEN X-WERTEN
BERECHNEN.":...!6.." EIN SCATTERDIAGRAM
M UND DIE ERMITTELTE"..!@.."KURVE WERDEN
GEZEICHNET. AUF DIESE".."J.."WEISE KANN
DIE QUALITAET DER ANPASSUNG".,"T.."EING
ESCHAETZT WERDEN.":..X"^.." SOGENANNTE A
USREISSER-WERTE SOLLTEN".."H.."VOR EINER
GENAUEREN BERECHNUNG NOCH".."R.."ENTFER
NT WERDEN.":.:..A"|..G(18)"TASTE DRUECKE
N!"G(146).X"... A$:. A$."" . 390.."... -
---- HAUPTMENUE --------------..#...G(14
7):.:.:.:..>#....4)"WERTE VON HAND EINGE
BEN.......1":..J#....4)"WERTE AUS DATEI
LESEN.........2":...#....4)"GRAFIK ZEIGE
N.................3":..B#B...4)"TEXTMODU
S EINSCHALTEN.........4":...#L...4)"EXPO
NENTIALFUNKTION BERECHNEN.5":...$V...4)"
WERTE BERECHNEN...............6":..H$...
.4)"PROGRAMMENDE..................7":.:.
.Q$....10)G(18)"BITTE WAEHLEN SIE!"G(146
)..$... A$:. E(A$).1 . E(A$).7 . 500..$.
..G(147):. E(A$).7 . ..Z$... E(A$) . 100
0,2000,3000,4000,5000,6000..$... 410..%.
.. ----- ENDE HAUPTPROGRAMM ------./%...
----- WERTE VON HAND ---------.F%... 40
00:. TEXTMODUS.~%... W.1 . ."WERTE SCHON
VORHANDEN!":. I.0 . 500:. I:...%..W.1..
%..."WIEVIELE WERTE WERDEN VERWENDET ?":
.N:..A%... W(2,N)..%..."BITTE WERTEPAARE
EINGEBEN!":...%$.. I.1 . N.!&...I,"X=";
:.W(1,I):.G(145),,"Y=";:.W(0,I):..F&8..
1300:. ZWISCHENWERTE BERECHNEN.N&B.. I..
&L..G(147):.:."SOLLEN DIE WERTE GESPEICH
ERT WERDEN?"..&V.. A$:. A$.."J" . A$.."N
" . 1110..&`.. A$."N" . 1190..&J..:."NAM
E DER DATEI (11 ZEICHEN)";:. B$..'T.B$.H
(B$,11).".DAT".",S,W"..'~.. 1,8,2,B$..'.
..1,N.C'... I.1 . N:.1,W(1,I):.1,W(0,I):
. I.K'.. 1.Q'... 1500:. SCATTERDIAGRAMM
ZEICHNEN.W'.....'... --- ZWISCHENWERTE
BERECHNEN --..'..W(2,I)..(W(0,I)).B'..SX
.SX.W(1,I).S'(.SY.SY.W(2,I)..'2.QX.QX.W(
1,I).W(1,I)..(<.QY.QY.W(2,I).W(2,I)..(F.
XY.XY.W(1,I).W(2,I).7(P.. W(1,I).MX . MX
.W(1,I).S(Z.. W(1,I).LX . LX.W(1,I).O(D.
. W(0,I).MY . MY.W(0,I)..(N.. W(0,I).LY
. LY.W(0,I)..(X....(... --- SCATTERDIAGR
AMM ----------.Y(... I.1 . N.1:. SORTIER
EN NACH X..(... J.I.1 . N..)... W(1,I)..
W(1,J) . 1560.A)..W(1,0).W(1,I):W(0,0).W
(0,I):W(1,I).W(1,J):W(0,I).W(0,J).A)..W(
1,J).W(1,0):W(0,J).W(0,0).M)... J:. I..)
".. SYS 49152:SYS 49180:SYS 49202,6,0:RE
M GRAFIK LOESCHEN FARBE.B),..1,1:.0,1:.1
,7..)6.. SYS 49352,0,0,319,0,1:SYS 49352
,319,0,319,199,1.$*@.. 1,0,0 . 319,0 . 3
19,199 . 0,199 . 0,0.E*J.. SYS 49352,319
,199,0,199,1:SYS 49352,0,199,0,0,1:REM R
AHMEN..*T.XU.LX.(MX.LX)..02:XO.MX.(MX.LX
)..02..*^.YU.LY.(MY.LY)..02:YO.MY.(MY.LY
)..02.V*H.RA.BB.(XO.XU):RD..BH.(YO.YU)..
*R.TA..BB.XU.(XO.XU):TB.BH.YO.(YO.YU)..+
|.. I.1 . N.)+..X..X(W(1,I)):Y..Y(W(0,I)
).G+... SYS49352,X-3,Y,X+3,Y,1:SYS49352,
X,Y-3,X,Y+3,1:REM KREUZ..+...1,X.3,Y . X
.3,Y:.1,X,Y.3 . X,Y.3..+... I..+... A$:.
A$."" . 1700.K+... SYS 49242:REM TEXTMO
DUS..+... B(238).79 . .5:U .0..,..."XU =
"LX,"XO = "MX"..,B.."YU = "LY,"YO =
"MY".5,L.. A$:. A$."" . 1740.;,V...`,P.
. ----- WERTE AUS DATEI --------.W,U.. 4
000:. TEXTMODUS..,Z.. W.1 . ."WERTE SCHO
N VORHANDEN!":. I.0 . 500:. I:...,..W.1.
.,..." DIE DATEI MUSS EIN BESTIMMTES FOR
MAT"..-..."HABEN: 1.ANZAHL DER WERTE
PAARE".3-..." 1.WERT X, 1.WERT
Y".^-..." 2.WERT X, 2.WERT Y
...":...-..."DIESE DATEIEN WERDEN UNTER
MENUEPUNKT 1"..- .."ERSTELLT. SIE TRAGEN
DIE ENDUNG .DAT .":...-*.." ALLES KLAR.
.1 ACH SOO..2"...4.. A$:. E(A$).1 . E(A
$).2 . 2100...>.. E(A$).2 . W.0:..J.H..:
."WIE HEISST DENN DIE DATEI (ENDUNG .DAT
)".S.R.. B$.D.\.B$.B$.",S,R".R.F..1,8,2,
B$.{.P..1,N...Z.. W(2,N)...... I.1 . N..
....1,W(1,I):.1,W(0,I).S.... 1300:. ZWIS
CHENWERTE BERECHNEN...... I..... 1../..
. 1500:. SCATTERDIAGRAMM../....+/... ---
-- GRAFIK ZEIGEN ----------.F/B.. W.0 .
."DA FEHLEN NOCH DIE WERTE!":. I.0 . 500
:. I:.../L.. SYS 49152:SYS 49202,6,0:REM
GRAFIK EIN../M..1:..A/V.. GET A$:IF VAL
(A$)<>4 THEN 3020../... GOTO 4010:REM TE
XTMODUS EIN..0 .. ----- TEXTMODUS EIN --
--------.*0... SYS 49242:REM TEXTMODUS E
IN.D0... B(238).79 . .5:U .0.J0....O0...
----- GERADE BERECHNEN -------..0... 40
00:. TEXTMODUS..0... W.0 . ."DA FEHLEN D
IE WERTE!":. I.0 . 500:. I:..D0..G.1..0.
.BL.(QX.SY.SX.XY).(N.QX.SX.SX):. ACHSENA
BSCHNITT..1..B..(BL)./1..M.(N.XY.SX.SY).
(N.QX.SX.SX):. STEIGUNG.Y1..R.(N.XY.SX.S
Y)..((N.QX.SX.SX).(N.QY.SY.SY)):. KORREL
ATIONSKOEFFIZIENT..1... I.1 . N:D..E(W(1
,I)).W(0,I):. STANDARDABWEICHUNG BERECHN
EN.W1..S.S.D.D:. I:S..(S.(N.2))..1... 40
10:. TEXTMODUS EIN./2D..:."IN DER EXPONE
NTIALGLEICHUNG":." Y = A*E^(B*X) IST".
B2N..:." B = ",M.W2X..:." A = ",B:..
~2..."DER KORRELATIONSKOEFFIZIENT IST"..
2...:." R = ",R:..C2..."DIE MITTLERE S
TANDARDABWEICHUNG BETRAEGT".X2...:." S
= ",S:...3...:."BITTE TASTE DRUECKEN! (
_ = MENUE)"..3... A$:. A$."". 5140.+3...
A$."_" . ..[3(.A.1:. SYS 49152:SYS49202
,6,0:REM GRAFIK EIN.F3).. 3000..32.. I.L
X . MX . (MX.LX).100..3<.X1..X(I):Y1..Y(
.E(I)):. Y1.0 . 5195.W3F.. SYS 49266 X1,
Y1,1:REM PUNKT ZEICHNEN..3G.. 1,X1,Y1..3
K.. I..4P.. A$:. A$."" . 5200..4Z.. A$."
_" . . 4000:..;4D.. A.1 . A.0:. 4000:. 5
200.H4N.. IF A=0 THEN A=1:SYS 49152:SYS4
9202,6,0.4O.. A.0 . A.1:. 3000..4X.. 52
00..4P.. ----- WERTE BERECHNEN --------.
F4Z.. 4000:. TEXTMODUS..5... G.0 . W.0 .
."BITTE GEBEN SIE ZUERST WERTE EIN UND"
.:5... G.0 . ."BITTE DIE KURVE BERECHNEN
!":. I.0 . 500:.:..G5...:." AUF DER BASI
S DER REGRESSIONSKURVE"..5..."KOENNEN BE
LIEBIGE WERTE BERECHNET WERDEN".H5...:."
ZURUECK ZUM MENUE KOMMEN SIE DURCH _":.
..5..."WERT X =";A$..5... A$."_" . ...5J
.X.E(A$)..6T.Y..E(X)..6...G(145),,"Y ="Y
."6...6060...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL