小物を描画します。
//**********************************************************************************
#local Rbase_s = 20; #local Rbase_y = Rbase_s; #local Rbase_add = 60;
#while ( Rbase_y < 360 )
#local Scale_xyz = 5; #local Rotate_y = 0; #local Rotate_add = 30;
#while ( Rotate_y < 360 )
object { Acce_obj translate < -5, 0, 0 >
scale < 1*Scale_xyz, 2*Scale_xyz, 1*Scale_xyz > rotate < 0, Rotate_y, 90 >
#if (0 = mod( Rbase_y-Rbase_s, 120 )) pigment { color rgb < 1.2, 0.6, 1.2 > }
#else pigment { color rgb < 1.2, 1.2, 0.6 > } #end
translate < 0, 0, 60 > rotate < -20, Rbase_y, 0 > }
#local Rotate_y = Rotate_y + Rotate_add; #end
#local Rbase_y = Rbase_y + Rbase_add; #end
//**********************************************************************************