Grapes/win 2.6
[Don't Edit]
----------
BGstretchOn BGfile
0 
----------
UserFunction
0
----------
y = f(x)
2
(1/2)x^2-1/2
0 1 2 0 1
(1/4)x^2
0 1 2 0 1
----------
0 = f(x,y)
0
----------
Point
20
P
1 3 1
P
1
0



t  1.00000000000000E-0001
1 0
1 1 0 1 0 1 1 1 0
6 0 1
Q
1 9 1
Q
P.x+P.y
P.xP.y



t  1.00000000000000E-0001
1 0
2 1 0 1 0 0 1 1 0
6 0 1
R
0 0 1
S
2 0 1
S
0
0
1


t  1.00000000000000E-0001
0 0
0 1 15 1 0 0 1 1 0
4 0 2
T
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



t  1.00000000000000E-0001
0 0
0 1 0 1 0 0 1 1 0
3 0 1
----------
Segments
1
3 1 1 2 0 2 0 1
0 
1 2 0 0 0 0 0 0 0 0 0 
----------
paramater
14
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 0.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 2.60000000000000E+0000 0
1 1  1.00000000000000E-0001
-2.50000000000000E+0000 0
1 1  1.00000000000000E-0001
-2.80000000000000E+0000 0
1 1  1.00000000000000E-0001
-2.40000000000000E+0000 0
1 1  1.00000000000000E-0001
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 0.00000000000000E+0000 0
1 1  1.00000000000000E-0001
 1.00000000000000E+0000 0
1 1  1.00000000000000E-0001
1 1 1
----------
KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle
1 4 2 1 1 0
DrawMode
1
AfterImageColorNo, CanAImg
2 1
circleMode
1
----------
ScaleX
Vlow,VHigh,label
0 890 x
x
AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter
1 0 1 0
NUmber,Base
5  1.00000000000000E+0000
High,Low
 2.48333000000000E+0000 -2.51667000000000E+0000
----------
ScaleY
Vlow,VHigh,label
0 890 y
AxesVisible,ScaleVisible,Svaluevisible
1 0 1
NUmber,Base
5  1.00000000000000E+0000
High,Low
 2.50000000000000E+0000 -2.50000000000000E+0000
----------
ScaleS
SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenter
0 1 0 1 28 0 1
----------
Yvalue
1 1
----------
Iinterval
Svalue Evalue sliceNo
1 -1
1 1
40
Dfuncno Efuncno AreaQ
1 0 0
----------
Yvalue Function List
9
y1
y2
y3
y4
y5
y6
y7
y8
y9
----------
Panel Position
0 0 0 113 258 0 344 0 1 0 0 1 1 0 1 0 
1
----------
MEMO SECTION
Style, Color, BGcolor , Size, PositionX, positionY
3 1 0 10 0 0 0

76
#//初期化
#k := 1
#Px := 1
#Py := 0
#draw  //描画
#ClrAimg　//残像消去


#-------------------------
#//円周上を動かす(半径固定)
#for t :=  0 to 2 * Pi　step 0.2
#  Px := k * cos(t)
#  Py := k * sin(t)
#  draw
#next t
#t:=0
#Px:=k*cos(t)
#Py:=k*sin(t)
#draw


#------------------
#//円周上を動かす(半径Auto)
#    calc　//描画はせず計算のみ
#ClrAimg
#for k := 10 to 0 step -1
#  for t :=0 to 6.28　step 0.2
#    Px := k * cos(t)/10
#    Py := k * sin(t)/10
#    draw
#  next t
#next k
#Px := 1
#Py := 0
#draw


#------------------
#//平面全体を変換する
#ClrAImg
#for t := 3 to -3 step -0.2
#  for s := 3 to -3 step -0.2
#    Px := s
#    Py := t
#    draw
#  next s
#next t
#Px :=1
#Py :=0
#draw
#---


#------------------
#//平面全体を変換する（高速）
#    Px := 3
#    Py := 3
#    calc　//描画はせず計算のみ
#ClrAImg
#for t := 3 to -2.5 step -0.2
#  for s := 3 to -3 step -0.2
#    Px := s
#    Py := t
#    calc　//描画はせず計算のみ
#  next s
#  draw
#next t
#Px :=1
#Py :=0
#draw
#---

#HideScript
#On k Change
#Px:=k
#Py:=0
----------
9
 145 21 0
 145 21 0
 145 21 0
 4 24 1
 4 24 1
 4 24 1
 4 24 1
 4 24 1
 4 24 1
----------