:L0 1#PctrR 1#HltCr 2#EndCr 8gLC C15 p*2=n1
%PI 5000#OtCnt 0n81gRx 0n82gRy 0n83gRz 0.9#ScrGX #ScrGY 1#PXYSz 1#PGrSz
:L1 C8 0n7n8 2gLxgLygLz 0.05n9 0.05n10
gsL 10gC :L2 0n7 :L3 3+N7c=*N8c=gx
3+N7c=*N8s=gy N7sgz gp N9ni7 N1 zN7<_G3_N10ni8 N1 zN8<_G2_gE
N82 - 85= Z<_G9_15ni82 N82gRy 15n81gRx 15n83gRz C10 G1
:L9 C8 9gC 1P1J1 1P7J2 1#PctrR 1#PXYSz #PGrSz 500#OtCnt E
:L8 14gC 4jN81 j+4,3 5jN82 j+5,3 6jN83 j+6,3
1P15J4 11P15J5 21P15J6 9gC R
:L10 0.2T*, %PC R
:L15
1j;[(3+cost)*cosu,(3+cost)*sinu,sint]
2j;0≦t≦2π 0≦u≦2π
3j; [゜]
R :E
G3cc3cs
前のページ
ATHPトップページ