%PI 2000#OtCnt 0.8#ScrGX #ScrGY 1#PctrR 1#HltCr 2#EndCr
0gRx 0n82gRy 0gRz C15
:L0 -1.6n7 -3.15n8 C8 0.5gLx 0.5gLy 0.5gLz 0.05n9 0.1n10 gsL
:L1 -1.6n7 :L2 N7c*N8c=gx Z>_G3_
:L3 N7c*N8s=gy N7s gz gZ Z>_hAA0000gc_ gp 9gC
N9ni7 1.6 zN7<_G2_N10ni8 3.15 zN8<_G1_gE
N82 - 80= Z<_G9_15ni82 N82gRy 15n81gRx 15n83gRz @S Z<_0.1T*,_ %PC G0
:L9 9gC 0P1J1 1#PctrR 1#ScrGX#ScrGY 500#OtCnt E

:L8 14gC 4jN81 j+4,3 5jN82 j+5,3 6jN83 j+6,3 1P8J4 14P8J5 27P8J6 9gC R

:L15 ::
1j; [cosθ*cosφ, cosθ*sinφ, sinθ] -π/2≦θ≦π/2 -π≦φ≦π
3j; [゜]
R :E

ゆっくり描画 500#OtCnt

Gcccss


前のページ ＡＴＨＰトップページ