戦闘機の形状

 球、円錐、円柱、立方体等の基本立体により戦闘機の形状を造ります。
//**********************************************************************************
#local Fighter_seg =
 union {
  union { sphere { 90*z,4 } cone { 60*z,10,90*z,4 } cylinder { 0, 60*z, 10 } sphere { 0,10 } }
//
  object { Cockpit_seg translate < 0,-25,-40> scale 0.4 }
  superellipsoid { < 0.24, 0.24 > scale < 8, 10, 40 > translate <-10, -10, -40 > }
  box { <-10,0,0>,<10,-15,-60> }
  superellipsoid { < 0.24, 0.24 > scale < 8, 10, 40 > translate < 10, -10, -40 > }
  //
  object { Spark_seg scale <0.08,0.08,3> translate <-77,-14,-45> }
  union { sphere { 0,8 }
       cylinder { 0, -30*z, 8 }
       cone { -20*z,8,-40*z,7 } translate <-77,-14,-45> }
  object { Wing_L rotate <0,60,2> translate <0,0,-44> }
  superellipsoid { < 0.28, 0.28 > scale < 30, 4, 30 > rotate 45*y translate < 0, -10, -30 > }
  object { Wing_R rotate <0,-60,-2> translate <0,0,-44> }
  union { sphere { 0,8 }
       cylinder { 0, -30*z, 8 }
       cone { -20*z,8,-40*z,7 } translate <77,-14,-45> }
  object { Spark_seg scale <0.08,0.08,3> translate <77,-14,-45> }
  //
  union { sphere { -18*z,8 scale <1,1,4> }
       cylinder { -(18*4)*z, -(18*4+10)*z, 8 }
       cone { -(18*4+10)*z,8,-(18*4+10+14)*z,7 } translate -5*y }
  object { Wing_R rotate < 90, 90, 0 > scale <0.4,0.4,0.6> translate <4,-15,-74> }
  //
  object { Wing_L scale <0.4,0.4,0.3> rotate <0, 60, 2> translate < 5, 5,-89> }
  object { Wing_R scale <0.4,0.4,0.3> rotate <0,-60,-2> translate <-5, 5,-89> }
 }
//**********************************************************************************