Grapes/win 2.8 [Don't Edit] 3.14 ---------- BGstretchOn BGfile 0 ---------- UserFunction 0 ---------- y = f(x) 0 ---------- 0 = f(x,y) 1 1 1 x^2/a^2 +y^2/b^2 =1 0 255 2 1 4 1 0 1 X ---------- Point 22 1 2 3 4 5 6 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 8 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 P 1 6 2 P acost bsint 0 t 0.1 0 0 16711680 16711680 16777215 1 0 0 1 1 0 0 1 0 1 0 Q 1 7 2 Q (-P).x (-P).y 0 t 0.1 0 0 16711680 16711680 16777215 1 0 0 1 1 0 0 1 0 1 0 R 1 0 2 R (P+V).x (P+V).y 0 t 0.1 0 0 16711680 16711680 16777215 0 0 0 1 1 0 0 3 0 1 0 S 1 0 2 S (-R).x (-R).y 0 t 0.1 0 0 16711680 16711680 16777215 0 0 0 1 1 0 0 3 0 1 0 T 1 2 2 T aV.x/[V] bV.y/[V] 0 t 0.1 0 0 16711680 16711680 16777215 1 0 0 1 1 0 0 3 0 1 0 U 2 3 2 U ((a+b)V/[OV]).x ((a+b)V/[OV]).y [UT] t 0.1 1 0 16711680 16711680 16777215 1 0 0 1 1 0 0 1 0 2 0 V 1 0 2 V sint /b -cost/ a 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 1 1 0 0 2 0 1 0 A 0 0 1 B 0 0 1 C 0 0 1 D 0 0 1 E 0 0 1 F 0 0 1 G 0 0 1 H 0 0 1 I 0 0 1 J 0 0 1 K 0 0 1 L 0 0 1 M 0 0 1 N 0 0 1 O 1 0 2 O 0 0 0 t 0.1 0 0 16777215 16711680 16777215 1 0 0 1 1 0 0 3 0 1 0 ---------- Segments 2 2 1 1 48896 16777215 2 0 1 0 0 0 1 3 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 1 1 48896 16777215 2 0 1 0 0 0 2 4 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ---------- paramater 14 2 0 1 1 0.5 1 1 1 0 1 1 0.1 1 2 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 4 0 1 1 0.1 1 0 6.4 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 -210 0 1 1 2 1 3 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 2.2 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 1 80 ---------- KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle 2 4 2 1 1 0 1 1 0 1 0 32 0 DrawMode SegmentShowSync 1 0 AfterImageColorNo, CanAImg,MaxAimgN0 2 1 3001 circleMode 1 ---------- ScaleX Vlow,VHigh,label 0 914 x x AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible 1 0 0 0 0 NUmber,Base,Linterval,numberR 7 1 1 7 High,Low 5.44901488320563 -5.56303330956545 ---------- ScaleY Vlow,VHigh,label 0 914 y AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible 1 0 0 0 0 NUmber,Base,Linterval,NumbeerR 7 1 1 7 High,Low 5.88297291842827 -5.11345749859267 ---------- ScaleS SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed 1 1 0 1 12 0 0 0 0 0 12 0 0 0 ---------- Yvalue 1 1 ---------- Iinterval Svalue Evalue sliceNo 1 -1 1 1 40 10 Dfuncno Efuncno AreaQ 1 0 0 ---------- Yvalue Function List 6 y1 y2 y3 y4 y5 y6 ---------- Panel Position 0 0 35 35 80 87 222 120 0 1 0 0 1 0 1 0 1 ---------- PetaMEMO SECTION Style, Color, BGcolor , Size, PositionX, positionY 3 0 0 12 0 0 0 48 楕円の平行な接戦と楕円に接する 円の中心Uと原点Oとの距離は、 恒に{a+b}に等しい。 {a=}!{a}, {b=}!{b}, OU=!{a+b} #//AutoDraw #a:=1 #b:=1 #HideObj(U) #draw #ClrAImg #ShowObj(U) #Call(A) #wait(1000) #for a:=1 to 2 step 0.1 #draw #next a #Call(A) #wait(1000) #for a:=2 to 3 step 0.1 #draw #next a #Call(A) #wait(1000) #for a:=3 to 0.4 step -0.1 #draw #next a #Call(A) #for a:=0.4 to 2 step 0.1 #draw #next a #for b:=1 to 3 step 0.1 #draw #next b #Call(A) #for b:=3 to 1 step -0.1 #draw #next b #b:=1 #for t:=-270 to -210 step 3 #draw #next t #draw #hidescript //A #for t:=-270 to 90 step 3 #draw #next t ---------- 11 4 27 1 6 36 0 6 36 0 6 36 0 6 36 0 6 36 0 6 36 0 6 36 0 6 36 0 6 36 0 4 24 0 ---------- Table SECTION RowNo, ColumnNo 0 10 200 Table Data 60 60 60 60 60 60 60 60 60 60 ---------- SimpleMemo SECTION 0 ----------