_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

INTERPOLATION.SB

FILE INFORMATION

FILENAME(S): INTERPOLATION.SB

FILE TYPE(S): PRG

FILE SIZE: 2.7K

FIRST SEEN: 2025-10-20 14:30:26

APPEARS ON: 1 disk(s)

FILE HASH

53ca1d222a32eb13cb50f5376646cffd771553c2dfc4cbfe665162213809534e

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SCIENTIFIC BASIC INTERPOLATION.SB PRG Treasure Chest - Klaus Der Suhler 20 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0C 08 05 00 3A 8A  20 31 30 30 00 31 08 0A  |......:. 100.1..|
00000010: 00 8F 20 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.. *************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000030: 2A 00 56 08 14 00 8F 20  2A 20 20 20 20 50 4F 4C  |*.V.... *    POL|
00000040: 59 4E 4F 4D 49 4E 54 45  52 50 4F 4C 41 54 49 4F  |YNOMINTERPOLATIO|
00000050: 4E 20 20 20 20 2A 00 7B  08 1E 00 8F 20 2A 2A 2A  |N    *.{.... ***|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 A0 08 28 00  |***********...(.|
00000080: 8F 20 31 34 2E 30 37 2E  31 39 38 37 20 20 20 20  |. 14.07.1987    |
00000090: 20 20 4D 41 52 54 49 4E  20 41 48 4C 42 4F 52 4E  |  MARTIN AHLBORN|
000000A0: 00 A6 08 2D 00 3A 00 C7  08 2F 00 8F 20 55 4E 54  |...-.:.../.. UNT|
000000B0: 45 52 50 52 4F 47 52 41  4D 4D 20 59 3D 50 4F 4C  |ERPROGRAMM Y=POL|
000000C0: 59 4E 4F 4D 28 58 29 00  D1 08 32 00 2E 50 4F 4C  |YNOM(X)...2..POL|
000000D0: 59 00 E8 08 37 00 8B 20  4E B8 37 20 A7 20 59 B7  |Y...7.. N.7 . Y.|
000000E0: A5 50 4F 28 58 29 3A 8E  00 F3 08 3C 00 59 B7 46  |.PO(X):....<.Y.F|
000000F0: 28 31 29 00 01 09 41 00  81 20 49 B7 32 20 A4 20  |(1)...A.. I.2 . |
00000100: 4E 00 17 09 46 00 59 B7  59 AC 28 58 AB 58 28 49  |N...F.Y.Y.(X.X(I|
00000110: 29 29 AA 46 28 49 29 00  1D 09 4B 00 82 00 23 09  |)).F(I)...K...#.|
00000120: 50 00 8E 00 29 09 5A 00  3A 00 39 09 64 00 99 22  |P...).Z.:.9.d.."|
00000130: 93 22 3A 9B 31 30 AB 33  30 00 5B 09 96 00 85 22  |.":.10.30.[...."|
00000140: C1 4E 5A 41 48 4C 20 44  45 52 20 D3 54 55 45 54  |.NZAHL DER .TUET|
00000150: 5A 53 54 45 4C 4C 45 4E  22 3B 4E 00 71 09 AA 00  |ZSTELLEN";N.q...|
00000160: 86 20 58 28 4E 29 2C 46  28 4E 29 2C 46 31 28 4E  |. X(N),F(N),F1(N|
00000170: 29 00 77 09 BE 00 3A 00  85 09 C8 00 81 20 49 B7  |).w...:...... I.|
00000180: 31 20 A4 20 4E 00 97 09  D2 00 99 22 58 22 49 3B  |1 . N......"X"I;|
00000190: 3A 85 20 58 28 49 29 00  C9 09 D7 00 8B 20 49 B6  |:. X(I)...... I.|
000001A0: 31 20 A7 20 8B 20 58 28  49 29 B8 B7 58 28 49 AB  |1 . . X(I)..X(I.|
000001B0: 31 29 20 A7 20 99 22 41  55 46 53 54 45 49 47 45  |1) . ."AUFSTEIGE|
000001C0: 4E 44 21 22 3A 89 32 31  30 00 E5 09 DC 00 99 A3  |ND!":.210.......|
000001D0: 31 35 29 22 91 46 28 58  22 49 22 29 22 3B 3A 85  |15)".F(X"I")";:.|
000001E0: 20 46 28 49 29 00 F4 09  E1 00 46 31 28 49 29 B7  | F(I).....F1(I).|
000001F0: 46 28 49 29 00 FA 09 E6  00 82 00 20 0A EB 00 8F  |F(I)....... ....|
00000200: 20 4D 49 4E 49 4D 55 4D  20 55 4E 44 20 4D 41 58  | MINIMUM UND MAX|
00000210: 49 4D 55 4D 20 44 45 52  20 46 2D 57 45 52 54 45  |IMUM DER F-WERTE|
00000220: 00 36 0A F0 00 4D 49 4E  B7 46 28 31 29 3A 4D 41  |.6...MIN.F(1):MA|
00000230: 58 B7 46 28 31 29 00 44  0A FA 00 81 20 49 B7 32  |X.F(1).D.... I.2|
00000240: 20 A4 20 4E 00 5E 0A 04  01 8B 20 46 28 49 29 B6  | . N.^.... F(I).|
00000250: 4D 41 58 20 A7 20 4D 41  58 B7 46 28 49 29 00 78  |MAX . MAX.F(I).x|
00000260: 0A 0E 01 8B 20 46 28 49  29 B8 4D 49 4E 20 A7 20  |.... F(I).MIN . |
00000270: 4D 49 4E B7 46 28 49 29  00 7E 0A 18 01 82 00 84  |MIN.F(I).~......|
00000280: 0A 22 01 3A 00 AA 0A 2C  01 8F 20 45 52 52 45 43  |.".:...,.. ERREC|
00000290: 48 4E 45 4E 20 44 45 52  20 4B 4F 45 46 46 49 5A  |HNEN DER KOEFFIZ|
000002A0: 49 45 4E 54 45 4E 20 44  45 53 00 D0 0A 36 01 8F  |IENTEN DES...6..|
000002B0: 20 49 4E 54 45 52 50 4F  4C 41 54 49 4F 4E 53 50  | INTERPOLATIONSP|
000002C0: 4F 4C 59 4E 4F 4D 53 20  4D 49 54 48 49 4C 46 45  |OLYNOMS MITHILFE|
000002D0: 00 F2 0A 40 01 8F 20 44  45 52 20 44 49 56 49 44  |...@.. DER DIVID|
000002E0: 49 45 52 54 45 4E 20 44  49 46 46 45 52 45 4E 5A  |IERTEN DIFFERENZ|
000002F0: 45 4E 00 F8 0A 4A 01 8F  00 08 0B 5E 01 81 20 49  |EN...J.....^.. I|
00000300: B7 31 20 A4 20 4E AB 31  00 18 0B 68 01 81 20 4A  |.1 . N.1...h.. J|
00000310: B7 31 20 A4 20 4E AB 49  00 3D 0B 72 01 46 28 4A  |.1 . N.I.=.r.F(J|
00000320: 29 B7 28 46 28 4A AA 31  29 AB 46 28 4A 29 29 AD  |).(F(J.1).F(J)).|
00000330: 28 58 28 4A AA 49 29 AB  58 28 4A 29 29 00 47 0B  |(X(J.I).X(J)).G.|
00000340: 7C 01 82 20 4A 2C 49 00  4D 0B 86 01 3A 00 73 0B  ||.. J,I.M...:.s.|
00000350: 90 01 8F 20 45 52 53 54  45 4C 4C 45 4E 20 44 45  |... ERSTELLEN DE|
00000360: 52 20 46 55 4E 4B 54 49  4F 4E 20 50 4F 4C 59 28  |R FUNKTION POLY(|
00000370: 58 29 2C 00 92 0B 9A 01  8F 20 46 41 4C 4C 53 20  |X),...... FALLS |
00000380: 4E 3C 37 20 28 46 4E 20  4C 41 45 4E 47 45 3C 38  |N<7 (FN LAENGE<8|
00000390: 38 29 00 A2 0B A4 01 8B  20 4E B6 36 20 A7 20 35  |8)...... N.6 . 5|
000003A0: 30 30 00 B0 0B B8 01 46  24 B7 22 46 28 31 29 22  |00.....F$."F(1)"|
000003B0: 00 BE 0B C2 01 81 20 49  B7 32 20 A4 20 4E 00 D8  |...... I.2 . N..|
000003C0: 0B CC 01 49 24 B7 DF 28  24 33 30 AA 49 29 20 3A  |...I$..($30.I) :|
000003D0: 8F 20 5A 49 46 46 45 52  00 02 0C D6 01 46 24 B7  |. ZIFFER.....F$.|
000003E0: 22 28 22 AA 46 24 AA 22  29 2A 28 58 2D 58 28 22  |"(".F$.")*(X-X("|
000003F0: AA 49 24 AA 22 29 29 2B  46 28 22 AA 49 24 AA 22  |.I$."))+F(".I$."|
00000400: 29 22 00 08 0C E0 01 82  00 18 0C EA 01 96 A5 20  |)"............. |
00000410: 50 4F 28 58 29 B7 46 24  00 1E 0C EF 01 3A 00 3E  |PO(X).F$.....:.>|
00000420: 0C F4 01 8F 20 41 55 53  47 41 42 45 20 44 45 52  |.... AUSGABE DER|
00000430: 20 4B 4F 45 46 46 49 5A  49 45 4E 54 45 4E 00 55  | KOEFFIZIENTEN.U|
00000440: 0C FE 01 99 22 11 CB 4F  45 46 46 49 5A 49 45 4E  |...."..OEFFIZIEN|
00000450: 54 45 4E 3A 22 00 63 0C  08 02 81 20 49 B7 31 20  |TEN:".c.... I.1 |
00000460: A4 20 4E 00 77 0C 12 02  99 22 46 28 22 49 22 29  |. N.w...."F("I")|
00000470: 3D 22 20 46 28 49 29 00  7D 0C 17 02 82 00 90 0C  |=" F(I).}.......|
00000480: 1C 02 8B 20 4E B6 36 20  A7 20 2E 4D 45 4E 55 45  |... N.6 . .MENUE|
00000490: 00 AF 0C 21 02 99 22 11  C9 4E 54 45 52 50 4F 4C  |...!.."..NTERPOL|
000004A0: 41 54 49 4F 4E 53 50 4F  4C 59 4E 4F 4D 3A 22 00  |ATIONSPOLYNOM:".|
000004B0: BD 0C 26 02 99 22 59 3D  20 22 20 46 24 00 C3 0C  |..&.."Y= " F$...|
000004C0: 2B 02 3A 00 CE 0C 30 02  2E 4D 45 4E 55 45 00 F0  |+.:...0..MENUE..|
000004D0: 0C 35 02 99 22 11 12 D7  92 45 52 54 45 54 41 42  |.5.."....ERTETAB|
000004E0: 45 4C 4C 45 20 2F 20 12  C7 92 52 41 50 48 3F 22  |ELLE / ...RAPH?"|
000004F0: 00 04 0D 3A 02 EB 3A A1  20 41 24 3A F2 20 EF 20  |...:..:. A$:. . |
00000500: DB 20 41 24 00 21 0D 3F  02 8B 20 41 24 B7 22 57  |. A$.!.?.. A$."W|
00000510: 22 20 A7 20 2E 57 45 52  54 45 54 41 42 45 4C 4C  |" . .WERTETABELL|
00000520: 45 00 35 0D 44 02 8B 20  41 24 B8 B6 22 47 22 20  |E.5.D.. A$.."G" |
00000530: A7 20 35 37 30 00 3B 0D  4E 02 3A 00 5A 0D 58 02  |. 570.;.N.:.Z.X.|
00000540: 8F 20 2A 2A 2A 2A 20 46  55 4E 4B 54 49 4F 4E 53  |. **** FUNKTIONS|
00000550: 47 52 41 50 48 20 2A 2A  2A 2A 00 74 0D 62 02 8F  |GRAPH ****.t.b..|
00000560: 20 50 41 52 41 4D 45 54  45 52 20 46 45 53 54 4C  | PARAMETER FESTL|
00000570: 45 47 45 4E 00 7A 0D 67  02 8F 00 92 0D 6C 02 99  |EGEN.z.g.....l..|
00000580: 22 4D 49 4E 2E 20 59 2D  D7 45 52 54 20 20 22 4D  |"MIN. Y-.ERT  "M|
00000590: 49 4E 00 A6 0D 6E 02 99  A3 31 31 29 22 91 22 3B  |IN...n...11)".";|
000005A0: 3A 85 20 4D 49 4E 00 BE  0D 70 02 99 22 4D 41 58  |:. MIN...p.."MAX|
000005B0: 2E 20 59 2D D7 45 52 54  20 20 22 4D 41 58 00 D2  |. Y-.ERT  "MAX..|
000005C0: 0D 72 02 99 A3 31 31 29  22 91 22 3B 3A 85 20 4D  |.r...11)".";:. M|
000005D0: 41 58 00 E9 0D 76 02 53  58 B7 33 32 30 AD 28 58  |AX...v.SX.320.(X|
000005E0: 28 4E 29 AB 58 28 31 29  29 00 00 0E 80 02 53 59  |(N).X(1)).....SY|
000005F0: B7 32 30 30 AD 28 20 4D  41 58 AB 4D 49 4E 20 29  |.200.( MAX.MIN )|
00000600: 00 10 0E 8A 02 4D 58 B7  AB 58 28 31 29 AC 53 58  |.....MX..X(1).SX|
00000610: 00 20 0E 94 02 4D 59 B7  AB 4D 49 4E 20 AC 53 59  |. ...MY..MIN .SY|
00000620: 00 36 0E 9E 02 44 58 B7  31 30 AE 28 AB BE 20 D2  |.6...DX.10.(.. .|
00000630: 20 53 58 AA 31 29 00 40  0E A8 02 44 59 B7 44 58  | SX.1).@...DY.DX|
00000640: 00 55 0E D0 02 FA 20 31  2C 36 3A 8D 2E 4B 4F B0  |.U.... 1,6:..KO.|
00000650: 4B 52 45 55 5A 00 71 0E  DA 02 FA 20 99 20 32 34  |KREUZ.q.... . 24|
00000660: 2C 30 2C 22 C5 49 4E 48  45 49 54 3A 22 AA DC 44  |,0,".INHEIT:"..D|
00000670: 58 00 77 0E DC 02 3A 00  92 0E DF 02 8F 20 53 54  |X.w...:...... ST|
00000680: 55 45 54 5A 50 55 4E 4B  54 45 20 50 4C 4F 54 54  |UETZPUNKTE PLOTT|
00000690: 45 4E 00 A0 0E E4 02 81  20 49 B7 31 20 A4 20 4E  |EN...... I.1 . N|
000006A0: 00 B1 0E E9 02 EA 20 58  28 49 29 2C 46 31 28 49  |...... X(I),F1(I|
000006B0: 29 00 B7 0E EB 02 82 00  BD 0E EE 02 3A 00 DC 0E  |)...........:...|
000006C0: F8 02 8F 20 49 4E 54 45  52 50 4F 4C 49 45 52 45  |... INTERPOLIERE|
000006D0: 4E 44 45 20 5A 45 49 43  48 4E 45 4E 00 E8 0E FA  |NDE ZEICHNEN....|
000006E0: 02 58 31 B7 58 28 31 29  00 FD 0E FC 02 58 B7 58  |.X1.X(1).....X.X|
000006F0: 31 3A 8D 2E 50 4F 4C 59  3A 59 31 B7 59 00 1B 0F  |1:..POLY:Y1.Y...|
00000700: 02 03 81 20 58 B7 58 31  AA 31 AD 53 58 20 A4 20  |... X.X1.1.SX . |
00000710: 58 28 4E 29 20 A9 20 31  AD 53 58 00 26 0F 07 03  |X(N) . 1.SX.&...|
00000720: 8D 2E 50 4F 4C 59 00 38  0F 0C 03 FB 20 58 31 2C  |..POLY.8.... X1,|
00000730: 59 31 20 A4 20 58 2C 59  00 46 0F 0E 03 58 31 B7  |Y1 . X,Y.F...X1.|
00000740: 58 3A 59 31 B7 59 00 4C  0F 11 03 82 00 5F 0F 13  |X:Y1.Y.L....._..|
00000750: 03 EB 3A A1 41 24 3A EE  41 24 B7 22 22 3A F2 00  |..:.A$:.A$."":..|
00000760: 6F 0F 16 03 FA 20 F8 3A  89 2E 4D 45 4E 55 45 00  |o.... .:..MENUE.|
00000770: 75 0F 1B 03 3A 00 93 0F  20 03 2E 57 45 52 54 45  |u...:... ..WERTE|
00000780: 54 41 42 45 4C 4C 45 3A  20 8F 20 2A 2A 2A 2A 2A  |TABELLE: . *****|
00000790: 2A 2A 2A 00 A9 0F 2A 03  85 22 D3 43 48 52 49 54  |***...*..".CHRIT|
000007A0: 54 57 45 49 54 45 22 3B  53 00 CC 0F 2F 03 53 58  |TWEITE";S.../.SX|
000007B0: B7 BE D2 28 58 28 4E 29  AB 58 28 31 29 29 AB 34  |...(X(N).X(1)).4|
000007C0: 3A 8F 20 5A 2E 20 52 55  4E 44 45 4E 00 E3 0F 31  |:. Z. RUNDEN...1|
000007D0: 03 53 59 B7 BE D2 28 4D  41 58 20 AB 4D 49 4E 20  |.SY...(MAX .MIN |
000007E0: 29 AB 34 00 FB 0F 34 03  99 22 11 20 20 58 22 A3  |).4...4..".  X".|
000007F0: 31 35 29 22 50 4F 4C 59  28 58 29 00 13 10 3E 03  |15)"POLY(X)...>.|
00000800: 81 20 58 B7 58 28 31 29  20 A4 20 58 28 4E 29 20  |. X.X(1) . X(N) |
00000810: A9 20 53 00 28 10 48 03  99 20 E3 28 58 2C 53 58  |. S.(.H.. .(X,SX|
00000820: 29 20 20 A3 31 35 29 3B  00 3D 10 4D 03 8D 2E 50  |)  .15);.=.M...P|
00000830: 4F 4C 59 3A 99 20 E3 28  59 2C 53 59 29 00 43 10  |OLY:. .(Y,SY).C.|
00000840: 52 03 82 00 4F 10 5C 03  89 2E 4D 45 4E 55 45 00  |R...O.\...MENUE.|
00000850: 55 10 7A 03 3A 00 5B 10  26 75 3A 00 69 10 30 75  |U.z.:.[.&u:.i.0u|
00000860: 2E 4B 4F B0 4B 52 45 55  5A 00 8D 10 35 75 8F 20  |.KO.KREUZ...5u. |
00000870: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000880: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 00 AE 10  |-------------...|
00000890: 3A 75 8F 20 55 4E 54 45  52 50 52 4F 47 52 41 4D  |:u. UNTERPROGRAM|
000008A0: 4D 20 5A 55 4D 20 5A 45  49 43 48 4E 45 4E 00 CE  |M ZUM ZEICHNEN..|
000008B0: 10 44 75 8F 20 45 49 4E  45 53 20 4B 4F 4F 52 44  |.Du. EINES KOORD|
000008C0: 49 4E 41 54 45 4E 4B 52  45 55 5A 45 53 2E 00 DF  |INATENKREUZES...|
000008D0: 10 4E 75 8F 20 50 41 52  41 4D 45 54 45 52 3A 00  |.Nu. PARAMETER:.|
000008E0: 03 11 58 75 8F 20 4D 58  2C 4D 59 20 20 4D 49 54  |..Xu. MX,MY  MIT|
000008F0: 54 45 4C 50 55 4E 4B 54  4B 4F 4F 52 44 49 4E 41  |TELPUNKTKOORDINA|
00000900: 54 45 4E 00 27 11 62 75  8F 20 53 58 2C 53 59 20  |TEN.'.bu. SX,SY |
00000910: 20 50 55 4E 4B 54 45 20  50 52 4F 20 45 49 4E 48  | PUNKTE PRO EINH|
00000920: 45 49 54 20 58 2C 59 00  4B 11 6C 75 8F 20 44 58  |EIT X,Y.K.lu. DX|
00000930: 2C 44 59 20 20 45 49 4E  48 45 49 54 45 4E 20 2F  |,DY  EINHEITEN /|
00000940: 20 4D 41 52 4B 49 45 52  55 4E 47 00 6F 11 80 75  | MARKIERUNG.o..u|
00000950: 8F 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |. --------------|
00000960: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 00  |---------------.|
00000970: 7D 11 94 75 FA 20 9C 3A  FC 20 30 2C 30 00 9D 11  |}..u. .:. 0,0...|
00000980: 9E 75 FB 20 30 2C 4D 59  20 A4 20 33 31 39 2C 4D  |.u. 0,MY . 319,M|
00000990: 59 20 20 3A 8F 20 58 2D  41 43 48 53 45 00 BD 11  |Y  :. X-ACHSE...|
000009A0: A8 75 FB 20 4D 58 2C 30  20 A4 20 4D 58 2C 31 39  |.u. MX,0 . MX,19|
000009B0: 39 20 20 3A 8F 20 59 2D  41 43 48 53 45 00 CF 11  |9  :. Y-ACHSE...|
000009C0: B2 75 FC 20 4D 58 2C 4D  59 2C 53 58 2C 53 59 00  |.u. MX,MY,SX,SY.|
000009D0: ED 11 BC 75 8F 20 20 45  49 4E 48 45 49 54 53 4D  |...u.  EINHEITSM|
000009E0: 41 52 4B 49 45 52 55 4E  47 45 4E 20 58 00 16 12  |ARKIERUNGEN X...|
000009F0: C6 75 81 58 B7 AB 28 4D  58 AD 53 58 29 B2 44 58  |.u.X..(MX.SX).DX|
00000A00: AC 44 58 20 A4 20 28 33  31 39 AB 4D 58 29 AD 53  |.DX . (319.MX).S|
00000A10: 58 20 A9 20 44 58 00 2D  12 D0 75 FB 20 58 2C AB  |X . DX.-..u. X,.|
00000A20: 33 AD 53 59 20 A4 20 58  2C 33 AD 53 59 00 33 12  |3.SY . X,3.SY.3.|
00000A30: DA 75 82 00 51 12 E4 75  8F 20 20 45 49 4E 48 45  |.u..Q..u.  EINHE|
00000A40: 49 54 53 4D 41 52 4B 49  45 52 55 4E 47 45 4E 20  |ITSMARKIERUNGEN |
00000A50: 59 00 7A 12 EE 75 81 59  B7 AB 28 4D 59 AD 53 59  |Y.z..u.Y..(MY.SY|
00000A60: 29 B2 44 59 AC 44 59 20  A4 20 28 31 39 39 AB 4D  |).DY.DY . (199.M|
00000A70: 59 29 AD 53 59 20 A9 20  44 59 00 91 12 F8 75 FB  |Y).SY . DY....u.|
00000A80: 20 AB 33 AD 53 58 2C 59  20 A4 20 33 AD 53 58 2C  | .3.SX,Y . 3.SX,|
00000A90: 59 00 97 12 02 76 82 00  9D 12 52 76 8E 00 00 00  |Y....v....Rv....|
......:. 100.1.... *********************
*********.V.... *    POLYNOMINTERPOLATIO
N    *.{.... ***************************
***. .(.. 14.07.1987      MARTIN AHLBORN
...-.:.G./.. UNTERPROGRAMM Y=POLYNOM(X).
Q.2..POLY...7.. N.7 . Y..PO(X):....<.Y.F
(1)...A.. I.2 . N...F.Y.Y.(X.X(I)).F(I).
..K...#.P...).Z.:.9.D..".":.10.30.[...."
ANZAHL DER STUETZSTELLEN";N.Q.... X(N),F
(N),F1(N).W...:...H.. I.1 . N...R.."X"I;
:. X(I).I.W.. I.1 . . X(I)..X(I.1) . ."A
UFSTEIGEND!":.210.......15)".F(X"I")";:.
 F(I).....F1(I).F(I)....... .... MINIMUM
 UND MAXIMUM DER F-WERTE.6...MIN.F(1):MA
X.F(1).D.... I.2 . N.^.... F(I).MAX . MA
X.F(I).X.... F(I).MIN . MIN.F(I).~......
.".:...,.. ERRECHNEN DER KOEFFIZIENTEN D
ES.P.6.. INTERPOLATIONSPOLYNOMS MITHILFE
...@.. DER DIVIDIERTEN DIFFERENZEN...J..
...^.. I.1 . N.1...H.. J.1 . N.I.=.R.F(J
).(F(J.1).F(J)).(X(J.I).X(J)).G.|.. J,I.
M...:.S.... ERSTELLEN DER FUNKTION POLY(
X),...... FALLS N<7 (FN LAENGE<88)......
 N.6 . 500.....F$."F(1)"...B.. I.2 . N.X
.L.I$..($30.I) :. ZIFFER...V.F$."(".F$."
)*(X-X(".I$."))+F(".I$.")"............. 
PO(X).F$.....:.>.... AUSGABE DER KOEFFIZ
IENTEN.U....".KOEFFIZIENTEN:".C.... I.1 
. N.W...."F("I")=" F(I).}.......... N.6 
. .MENUE...!..".INTERPOLATIONSPOLYNOM:".
..&.."Y= " F$.C.+.:.N.0..MENUE...5.."..W
.ERTETABELLE / .G.RAPH?"...:..:. A$:. . 
. A$.!.?.. A$."W" . .WERTETABELLE.5.D.. 
A$.."G" . 570.;.N.:.Z.X.. **** FUNKTIONS
GRAPH ****.T.B.. PARAMETER FESTLEGEN.Z.G
.....L.."MIN. Y-WERT  "MIN...N...11)".";
:. MIN...P.."MAX. Y-WERT  "MAX.R.R...11)
".";:. MAX...V.SX.320.(X(N).X(1)).....SY
.200.( MAX.MIN ).....MX..X(1).SX. ...MY.
.MIN .SY.6...DX.10.(.. R SX.1).@...DY.DX
.U.P.. 1,6:..KO.KREUZ.Q.Z.. . 24,0,"EINH
EIT:"..DX.W...:...... STUETZPUNKTE PLOTT
EN. .... I.1 . N...... X(I),F1(I).......
....:...... INTERPOLIERENDE ZEICHNEN....
.X1.X(1).....X.X1:..POLY:Y1.Y...... X.X1
.1.SX . X(N) . 1.SX.&.....POLY.8.... X1,
Y1 . X,Y.F...X1.X:Y1.Y.L....._....:.A$:.
A$."":..O.... .:..MENUE.U...:... ..WERTE
TABELLE: . ********...*.."SCHRITTWEITE";
S.L./.SX..R(X(N).X(1)).4:. Z. RUNDEN...1
.SY..R(MAX .MIN ).4...4..".  X".15)"POLY
(X)...>.. X.X(1) . X(N) . S.(.H.. .(X,SX
)  .15);.=.M...POLY:. .(Y,SY).C.R...O.\.
..MENUE.U.Z.:.[.&U:.I.0U.KO.KREUZ...5U. 
-----------------------------...:U. UNTE
RPROGRAMM ZUM ZEICHNEN.N.DU. EINES KOORD
INATENKREUZES....NU. PARAMETER:...XU. MX
,MY  MITTELPUNKTKOORDINATEN.'.BU. SX,SY 
 PUNKTE PRO EINHEIT X,Y.K.LU. DX,DY  EIN
HEITEN / MARKIERUNG.O..U. --------------
---------------.}..U. .:. 0,0....U. 0,MY
 . 319,MY  :. X-ACHSE....U. MX,0 . MX,19
9  :. Y-ACHSE.O..U. MX,MY,SX,SY....U.  E
INHEITSMARKIERUNGEN X...FU.X..(MX.SX).DX
.DX . (319.MX).SX . DX.-.PU. X,.3.SY . X
,3.SY.3.ZU..Q..U.  EINHEITSMARKIERUNGEN 
Y.Z..U.Y..(MY.SY).DY.DY . (199.MY).SY . 
DY....U. .3.SX,Y . 3.SX,Y....V....RV....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL