Grapes/3D 1.21 [Don't Edit] ---------- UserFunction 0 ---------- Point 22 1 2 3 4 6 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 5 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 P 7 0 1 P a(cosPit,scosPit,sinPit) -1 1 s 0.2 -1/2 1/2 t 0.05 0 0 1 16777215 16711680 16768477 1 0 0 1 1 0 3 0 2 1 0 0 0 Q 7 0 1 Q a(scosPit,cosPit,sinPit) -1/2 1/2 t 0.05 -1 1 s 0.2 0 0 1 16777215 16711680 16768477 1 0 0 1 1 0 3 0 2 1 0 0 0 R 7 0 1 R -P -1/2 1/2 t 0.05 -1 1 s 0.2 0 0 1 16777215 16711680 16768477 1 0 0 1 1 0 3 0 2 1 0 0 0 S 7 0 1 S -Q -1 1 s 0.2 -1/2 1/2 t 0.05 0 0 1 16777215 16711680 16768477 1 0 0 1 1 0 3 0 2 1 0 0 0 T 7 0 1 T a(s,cosPit,sinPit) -b b s 0.2 -Pi Pi t 0.05 0 0 1 16777215 36608 52992 0 0 0 1 1 0 3 0 1 1 0 0 0 U 7 0 1 U a(cosPit,s,sinPit) -b b s 0.2 -1 1 t 0.05 0 0 1 16777215 255 12632319 0 0 0 1 1 0 3 0 1 1 0 0 0 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 3 O (0,0,0) s 0.1 t 0.1 0 0 0 16777215 16711680 16711680 1 0 0 1 1 0 3 0 1 1 0 0 0 ---------- Segments 0 ---------- paramater 14 4.5 0 1 1 0.5 1 1 2 0 1 1 0.1 1 2 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 1 0 1 0 1 1 0.1 0 3 1 0 1 1 0.05 0 4 390 0 1 1 0.1 1 0 30 0 1 1 0.1 1 0 1 1 80 ---------- KakuMode LogMode AreaMode 1 2 1 0 0 1 DrawMode SegmentShowSync 1 1 AfterImageColorNo, CanAImg 2 1 ---------- ScaleS Vlow,VHigh -5 5 -4.83818770226537 4.83818770226537 MeshMode , Axiswidth , Sfontsize , Axismode 0 3 24 0 1 4 ViewPoint 30 30 38.958228983025 21.749602473037 0 0 0 1 0 ---------- ViewPosition 5 30 20 25 30 -70 20 25 30 60 20 25 30 -90 90 25 30 -90 0 25 30 ---------- Panel Position 206 0 0 495 0 0 0 1 0 0 1 0 1 0 ---------- MEMO SECTION Style, Color, BGcolor , Size, PositionX, positionY 3 16711680 0 12 30 #//貫通体表示 #InvShowObj(P,Q,R,S) #//円柱(赤)表示 #InvShowObj(U) #draw #//円柱(緑)表示 #InvShowObj(T) #draw #//【横回転】 #v:=viewH #for u:=v to v+360 step 2 # SetViewPoint(u,viewV,viewD,viewA) # draw #next u #//【縦回転】 #v:=viewV #for u:=v to v+360 step 2 # SetViewPoint(viewH,u,viewD,viewA) # draw #next u #//【斜回転】 #for u:=30 to 390 step 2 # SetViewPoint(u,u,viewD,viewA) # draw #next u ---------- 11 7 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 4 24 0 ---------- Table SECTION RowNo, ColumnNo 0 10 Table Data ---------- SimpleMemo SECTION 0 ----------