Grapes/3D 1.21
[Don't Edit]
----------
UserFunction
2 1 2 1 1
2(Sqrt(ac(ac-x^2))-ac)/x^2
f([OX])·FX+(0,0,-c-f(1))
----------
Point
22 1 3 5 8 9 0 0 4 0 6 0 0 7 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
1 2 1
P
roll(m(2Pi/n),0)


s 0.1


t 0.1
1 0 0
0 16711680 16744576 0 0 0 1 1
1 0 1 1 0 0 0
Q
1 4 1
Q
roll(um(2Pi/n),0)


s 0.1


t 0.1
1 0 0
0 16711680 16744576 0 0 0 1 1
1 0 1 1 0 0 0
R
6 4 1
R
(1-t)P+tQ
0
1
t 0.02


m 0.1
1 0 0
0 16711680 16744576 0 0 0 1 1
1 0 1 1 0 0 0
S
1 0 1
S
(0,0,-f(1))


s 0.1


t 0.1
0 0 0
11468800 175 16777215 1 0 0 1 1
2 0 6 1 0 0 0
T
1 0 1
T
(0,0,0)


s 0.1


t 0.1
0 0 0
175 16711680 16744576 0 0 0 1 1
3 0 1 1 0 0 0
U
0 0 1
V
0 0 1
A
6 0 1
A
g(roll(t,0))
0
2Pi
t 0.005


m 0.01
0 0 0
16777215 11468800 16777215 1 0 0 1 1
1 0 2 1 0 0 0
B
0 0 1
C
6 0 1
C
g(R)
0
1
t 0.02


m 1
0 1 0
16777215 11468800 11468800 1 0 0 1 1
1 0 1 1 0 0 0
D
0 0 1
E
0 0 1
F
1 0 1
F
(0,0,c)


s 0.1


t 0.1
0 0 0
175 16711680 16711680 0 0 0 1 1
1 0 1 1 0 0 0
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 3
O
(0,0,0)


s 0.1


t 0.1
0 0 0
16777215 16711680 16711680 1 0 0 1 1
3 0 1 1 0 0 0
----------
Segments
0
----------
paramater
14
-0.22 0
1 1 0.02 1 1
0.7 0
1 1 0.02 1 0
-50 0
1 1 1 1 2
1.1 0
1 1 0.1 1 0
0.196349540849362 0
1 1 0.1 1 0
72 0
1 1 1 1 3
72 0
1 1 1 1 4
360 0
1 1 1 1 0
1 0
1 1 0.1 1 0
0.25 0
1 1 0.005 1 0
4 0
1 1 0.1 0 0
20 0
1 1 0.005 0 5
-2 0
1 1 1 1 6
1 0
1 1 0.1 1 0
1 1 1
----------
KakuMode LogMode AreaMode
1 2 1 0 0 1
DrawMode SegmentShowSync
1 0
AfterImageColorNo, CanAImg
0 1
----------
ScaleS
Vlow,VHigh
-5.09270482603815 4.90729517396185
-4.84433221099888 5.15566778900112
MeshMode , Axiswidth , Sfontsize , Axismode
0 4 32 0 0.2 4
ViewPoint
4 20 32.0964285259191 4.73060327919923 0 0 0 1
----------
ViewPosition
5
30 20 25 30
-70 20 25 30
60 20 25 30
-90 90 25 30
-90 0 25 30
----------
Panel Position
443 492 780 256 655 0 0 1 1 1 1 1 1 0
----------
MEMO SECTION
Style, Color, BGcolor , Size, PositionX, positionY
3 1 0 12
44
•ú•¨–Ê‚Ö‚Ì’†S“Š‰e
’†S{(0,0,c)}
#HideScript//D
#on n change
#m:=n
#Draw

#//‰Šú‰ğ
#ClrAImg
#m:=0
#draw

#//‡‚É•`‰ĉ
#for m:=0 to n
#draw
#//SetAImg
#next

#//ˆê“x‚É•\ŽĤ
#//SetAImg
#m:=n
#draw

#//‰Ħ‰ñ“]
#t:=viewH
#for p:=t to t+360
# SetViewPoint(p,viewV,viewD,viewA)
# Draw
#next p

#//c‰ñ“]
#t:=viewV
#for p:=t to t+360
# SetViewPoint(viewH,p,viewD,viewA)
# Draw
#next p

#//ŽÎ‰ñ“](MoonSalto)
#s:=viewH
#t:=viewV
#for p:=0 to 360
# SetViewPoint(s+p,t+p,viewD,viewA)
# Draw
#next p
----------
11
4 24 1
4 83 1
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
----------