Grapes/win 2.8 [Don't Edit] 3.14 ---------- BGstretchOn BGfile 0 ---------- UserFunction 0 ---------- y = f(x) 2 1 2 1 1 q 0 16744703 3 1 1 d-c 0 0 3 1 1 ---------- 0 = f(x,y) 0 ---------- Point 22 1 4 3 5 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 P 6 0 2 P as-bsins a-bcoss+q 0 0 2Pi s 0.1 0 0 16744703 16744703 16777215 1 1 1 1 1 0 1 8 0 8 0 Q 6 0 2 Q kct-csint d-ccost 0 0 2Pi t 0.1 0 0 255 0 16777215 1 1 0 1 1 0 1 6 0 3 0 R 2 0 2 R as a+q a t 0.1 0 0 255 16744703 16744703 1 0 0 3 1 0 0 3 0 4 0 S 2 0 2 S kct d c t 0.1 0 0 0 8421504 8421504 1 0 0 4 1 0 0 3 0 3 0 T 0 0 1 U 0 0 1 V 0 0 1 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 1 1 1 16744703 16777215 4 0 1 0 0 0 3 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 0 16777215 3 0 1 0 0 0 4 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ---------- paramater 14 1.5 0 1 1 0.05 1 1 1 0 1 1 0.05 1 2 1 0 1 1 0.1 1 3 1 0 1 1 0.05 0 4 1 0 1 1 0.174532925199433 1 0 1 0 1 1 0.174532925199433 1 0 1 0 1 1 0.174532925199433 1 0 -0.5 0 1 1 0.1 0 8 6.25 0 1 1 0.1 1 6 6.25 0 1 1 0.1 1 7 1 0 1 1 0.174532925199433 1 0 1 0 1 1 0.174532925199433 1 0 0 0 1 1 0.1 1 0 1.5 0 1 1 0.02 1 5 1 1 32 ---------- KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle 1 2 1 2 1 0 1 1 0 1 0 32 0 DrawMode SegmentShowSync 1 1 AfterImageColorNo, CanAImg,MaxAimgN0 1 1 3001 circleMode 1 ---------- ScaleX Vlow,VHigh,label 0 1197 x x AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible 1 1 1 0 1 NUmber,Base,Linterval,numberR 4 3.14159265358979 1 4.33 High,Low 23.2453797302554 -4.01086866236224 ---------- ScaleY Vlow,VHigh,label 0 914 y AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible 1 1 1 1 0 NUmber,Base,Linterval,NumbeerR 7 1 1 7.26402948402948 High,Low 13.8191386518207 -6.9930677231605 ---------- ScaleS SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed 1 0 0 1 18 0 1 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 0 0 0 52 232 85 0 0 0 0 1 0 1 0 1 ---------- PetaMEMO SECTION Style, Color, BGcolor , Size, PositionX, positionY 3 0 1 10 0 0 0 57 [桃]トロコイドパラメータ {s} 円の半径 {a=}!{a} 腕の長さ {b=}!{b} [黒]滑りサイクロイドパラメータ {t} 円の半径 {c=}!{c} 滑り係数 {k=}!{k} (1)====> <====(2) #//【値をすべてリセット】 #a:=1 #b:=1 #c:=1 #d:=1 #k:=1 #q:=0 #s:=0 #t:=0 #Draw #//【トロコイド表示】 #ShowObj(P,R,y1) #//【滑りサイクロイド表示】 #ShowObj(Q,S,y2) #//【表示を消す】 #HideObj(P,Q,R,S,y1,y2) #//(1)滑りサイクロイドをトロコイドに一致 #k:=a/b #c:=a/k #d:=a+q #Draw #//(2)トロコイドを滑りサイクロイドに一致 #b:=c #a:=kb #q:=d-a #Draw #//【自動回転】 #for s:=0 to 2Pi step 0.05 #Draw #wait(10) #next #wait(1000) #for t:=0 to 2Pi step 0.05 #Draw #wait(10) #next ---------- 11 747 62 0 79 63 0 514 87 0 5 32 1 5 32 1 5 32 1 5 32 1 5 32 1 5 32 1 5 32 0 4 23 0 ---------- Table SECTION RowNo, ColumnNo 0 10 200 Table Data 60 60 60 60 60 60 60 60 60 60 ---------- SimpleMemo SECTION 0 ----------