Grapes/3D 1.21 [Don't Edit] ---------- UserFunction 1 1 1 4r^2/([OX]^2+4r^2)·FX-(0,0,8r^3/(1+4r^2)) ---------- Point 22 1 3 5 0 0 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 0 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 0 0 1 T 0 0 1 U 0 0 1 V 0 0 1 A 6 0 1 A f(aroll(s,0)) 0 2Pi s 0.02 a 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 f(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,-2r) s 0.1 t 0.1 0 0 0 175 16711680 16744576 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 1 0 1 1 0.01 1 1 -30 0 1 1 2 1 0 0 0 1 1 0.01 1 0 0 0 1 1 0.1 1 0 0.196349540849362 0 1 1 0.1 1 0 72 0 1 1 1 1 2 72 0 1 1 1 1 3 360 0 1 1 1 1 0 1 0 1 1 0.1 1 0 0.4 0 1 1 0.1 1 4 4 0 1 1 0.1 1 5 20 0 1 1 0.005 1 6 -2 0 1 1 1 1 7 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.14826038159371 4.85173961840629 -4.15544332210999 5.84455667789001 MeshMode , Axiswidth , Sfontsize , Axismode 0 4 32 0 0.2 4 ViewPoint 4 20 13.2127255070172 4.23448694424138 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 491 540 790 254 703 0 7000 1 1 1 1 1 1 0 ---------- MEMO SECTION Style, Color, BGcolor , Size, PositionX, positionY 3 1 0 12 45 ‹…‚Ì”ĵŒa{r} •½ŽË}–@ #HideScript//D #on n change #m:=n #calc #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 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 4 24 0 ----------