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 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 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 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 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 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
3 0 2 0 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 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 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 0 
1 0
1 1 0.1 1 2 0 
1 0
1 1 0.1 1 0 0 
1 0
1 1 0.1 1 0 0 
1 0
1 1 0.1 1 0 0 
1 0
1 1 0.1 1 0 0 
4 0
1 1 0.1 1 0 0 
6.4 0
1 1 0.1 1 0 0 
1 0
1 1 0.1 1 0 0 
-210 0
1 1 2 1 3 0 
1 0
1 1 0.1 1 0 0 
1 0
1 1 0.1 1 0 0 
2.2 0
1 1 0.1 1 0 0 
1 0
1 1 0.1 1 0 0 
1 1 80
----------
KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle
2 4 2 1 1 0 1 1 0 1 0 32 0 0
DrawMode SegmentShowSync
1 0
AfterImageColorNo, CanAImg,MaxAimgN0
2 1 3001
circleMode
1
----------
ScaleX
Vlow,VHigh,label
0 877 x
x
AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible
1 0 0 0 0
NUmber,Base,Linterval,numberR
7 1 1 7
High,Low
5.49316288124849 -5.60810294153632
----------
ScaleY
Vlow,VHigh,label
0 877 y
AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible
1 0 0 0 0
NUmber,Base,Linterval,NumbeerR
7 1 1 7
High,Low
5.94808291804851 -5.17856291804851
----------
ScaleS
SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed
1 1 0 1 18 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 71 71 71 489 208 489 0 1 0 0 1 0 1 0
1
----------
PetaMEMO SECTION
Style, Color, BGcolor , Size, PositionX, positionY
3 0 0 14 0 0 0

51
An ellipse O(a, b) and a circle U
touch each other externally,
and both a pair of parallel lines.

Show that the distance of
two circles; OU=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
0 -37 1
6 34 0
6 34 0
6 34 0
6 34 0
6 34 0
6 34 0
6 34 0
6 34 0
6 34 0
0 -40 0
----------
Table SECTION
RowNo, ColumnNo
0 10 200
Table Data


60 60 60 60 60 60 60 60 60 60
----------
SimpleMemo SECTION
0
----------