10 LINE=49152 20 HARDCOPY=49155 30 CLEAR=49158 40 GOTO 65 50 Y=:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: 60 RETURN 65 IF Z=0 THEN Z=1:LOAD"STAR-SUPPORT",8,1 66 SYS CLEAR:S1=5:S2=0:S3=0:S4=7 70 POKE 53281,S2:POKE 53280,S3:POKE 646,S4 80 PRINT"[147]" 90 PRINT:PRINT" FUNKTIONSKURVEN 100 [153]:[153]" VON TILMAN SOHR 110 PRINT:PRINT" (C) SEPTEMBER 1987 120 [153]"" 130 [153]" 1. EINGEBEN DER FUNKTION" 140 [153]" 2. KOORDINATENSYSTEM FESTLEGEN UND 145 PRINT" FUNKTIONEN LOESCHEN 150 [153]" 3. FUNKTION DRUCKEN" 155 [153]" 4. SYSTEM-VARIABLEN AENDERN" 160 [161]A$:[139]A$[179]"1"[176]A$[177]"4"[167]160 170 [145][197](A$)[137] 500,1000,1500,2000 499 [143] EINGEBEN DER FUNKTION 500 [153]"LOAD" 510 [153]" EINGEBEN DER FUNKTION :" 515 [139] F[179][177]1 [167] [153]"ERST DIE KOORDINATEN EINGEBEN":[141] 10000:[137] 80 520 [153]" F(X) = ";F$ 525 [151] 211,8:[151]214,5:[158] 58640:[151] 19,1:[133]F$ 530 [139] F$[178]""[167] 500 531 [151] 19,0 535 [129]T[178]2114[164]2187:[151]T,58:[130] 540 T[178]0:[129]R[178]1[164][195](F$) 545 S[178]0:T[178]T[170]1 550 A$[178][202](F$,R,1) 560 B$[178][202](F$,R,3) 570 [139] A$[178]"+" [167] S[178]170 580 [139] A$[178]"-" [167] S[178]171 590 [139] A$[178]"*" [167] S[178]172 600 [139] A$[178]"/" [167] S[178]173 610 [139] A$[178]"^" [167] S[178]174 620 [139] A$[178]"(null)" [167] S[178]255 630 [139] B$[178]"SQR" [167] S[178]186 640 [139] B$[178]"LOG" [167] S[178]188 650 [139] B$[178]"COS" [167] S[178]190 660 [139] B$[178]"SIN" [167] S[178]191 670 [139] B$[178]"TAN" [167] S[178]192 680 [139] B$[178]"ATN" [167] S[178]193 690 [139] B$[178]"ABS" [167] S[178]182 700 [139] S[179][177]0 [167] 720 710 S[178][198](A$) 720 [151] 2113[170]T,S 730 [139] S[177]180 [175] S[179][177]255 [167] R[178]R[170]2 740 [130]:[151] 2115[170]T,142 750 LX[178][171]1 760 [129] T[178]NX [164] MX [169] S1[173](EE[172]1.2) 770 X[178]T[170]10[174][171]6 780 [141] 50 790 Y[178]Y[172]EE[170]AY 800 X[178]T[172]EE[172]1.2[170]AX 805 [139] Y[179]0 [176] Y[177]959 [167] LX[178][171]1:[137] 840 810 [139] LX[178][171]1 [167] 830 820 [158] LINE,1,Y,X,LY,LX 830 LX[178]X:LY[178]Y 840 [130] 850 [137] 80 1000 [143] KOORDINATENSYSTEM FESTLEGEN 1010 [158] CLEAR:[153]"LOAD" 1020 F[178]1:[153]" KOORDINATENSYSTEM FESTLEGEN :" 1030 [153] 1040 [133]"WIE GROSS IST X MAXIMAL ";MX 1045 [139] MX[179][178]0[167]1040 1050 [133]" MINIMAL ";NX 1055 [139] NX[177][178]0[167]1050 1057 [153] 1060 [133]"WIE GROSS IST Y MAXIMAL ";MY 1065 [139] MY[179][178]0[167]1060 1070 [133]" MINIMAL ";NY 1075 [139] NY[177][178]0[167]1070 1080 EE[178]959[173](MY[171]NY) 1085 H[178]10[173]EE 1090 [139] MX[179]H [176] NX[177][171]H [176] MY[179]H [176] NY[177][171]H [167] 1040 1100 AX[178][171]NX[172]EE[172]1.2:AY[178][171]NY[172]EE 1110 [158] LINE,1,AY,0,AY,EE[172](MX[171]NX)[172]1.2 1120 [158] LINE,1,0,AX,959,AX 1130 [129]T[178][181](NX)[170]1[164]MX[171]1:[158] LINE,1,AY[171]5,(AX[170]T[172]EE[172]1.2),AY[170]5,(AX[170]T[172]EE[172]1.2):[130] 1140 [129]T[178][181](NY)[170]1[164]MY[171]1:[158] LINE,1,AY[170]T[172]EE,AX[171]6,AY[170]T[172]EE,AX[170]6:[130] 1150 [158] LINE,1,959,AX,950,AX[171]10 1160 [158] LINE,1,959,AX,950,AX[170]10 1170 [158] LINE,1,AY,EE[172](MX[171]NX)[172]1.2,AY[171]10,EE[172](MX[171]NX)[172]1.2[171]10 1180 [158] LINE,1,AY,EE[172](MX[171]NX)[172]1.2,AY[170]10,EE[172](MX[171]NX)[172]1.2[171]10 1190 [137] 80 1500 [143] FUNKTION DRUCKEN 1510 [153]"LOAD" 1520 [153]" FUNKTIONEN DRUCKEN" 1530 [158] HARDCOPY, (MX[171]NX)[172]EE[172]1.2 1540 [137] 80 2000 [153]"LOAD" 2010 [153]"SYSTEMVARIABLEN AENDERN :" 2020 [153]"" 2030 [133]"ABSTAND DER LINIEN AUF DER X-ACHSE 5CMDCMDCMD"; S1 2040 [133]"HINTERGRUNDSFARBE 0CMDCMDCMD";S2 2050 [139] S2[179]0 [176] S2[177]15 [167] 2040 2060 [133]"RAMENFARBE 0CMDCMDCMD";S3 2070 [139] S3[179]0 [176] S3[177]15 [167] 2060 2080 [133]"ZEICHENFARBE 7CMDCMDCMD";S4 2090 [139] S4[179]0 [176] S4[177]15 [167] 2080 2100 [137] 70 10000 [143] AUF TESTENDRUCK WARTEN 10010 [153]"TASTE DRUECKEN ..." 10020 [161]A$:[139]A$[178]""[167]10020 10030 [142]