// Last edited on 2009-10-10 18:42:35 by stolfilocal
// Processed by remove-cam-lights

#macro eixo(ponta,cor,nome)
  union{
    sphere{ <0,0,0>, 0.02 }
    cylinder{ <0,0,0>, 0.91*ponta, 0.02 }
    cone{ 0.90*ponta, 0.06, ponta, 0.00 }
    texture{ pigment{ color rgb cor } finish{ ambient 0.5 diffuse 0.5 } }
  }
#end
#macro eixos(tamanho)
  union{
    object{ eixo( <tamanho,0,0>, <1.0,0.2,0.2>, "X") }
    object{ eixo( <0,tamanho,0>, <0.0,0.8,0.0>, "Y") }
    object{ eixo( <0,0,tamanho>, <0.3,0.3,1.0>, "Z") }
  }
#end

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare tx_plastico =
  texture{
    pigment{ color rgb < 0.10, 0.80, 1.00 > }
    finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
  }

#declare tx_fosca =
  texture{
    pigment{ color rgb < 1.00, 0.80, 0.10 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

#declare tx_espelho =
  texture{
    pigment{ color rgb < 1.00, 0.90, 0.70 > }
    finish{ diffuse 0.1 reflection 0.8*< 1.00, 0.90, 0.70 > ambient 0.1 }
  }

#declare tx_vidro =
  texture{
    pigment{ color rgb < 0.97, 0.98, 1.00 > filter 0.70 }
    finish{ diffuse 0.03 reflection 0.25 ambient 0.02 specular 0.25 roughness 0.005 }
  }

#declare raio = 2.000;

#declare parede_frontal =
  box{ < +1.00, 0, +1.00 >,
  0.10 texture{ tx_fosca }
  }

#declare tabua =
  box{ < 1, 0, +1.00 >,
      < 2, 2, +1.10 >
      texture{ tx_fosca }
  }

#declare perna_1 =
  box{
   < 1, 0, +1.00 >,
   < 1.2, 0.1, 0 >
   texture{ tx_fosca }
  }

#declare perna_2 =
  box{
   < 1.8, 0, +1.00 >,
   < 2, 0.1, 0 >
   texture{ tx_fosca }
  }

#declare perna_3 =
  box{
   < 2, 1.9, +1.10 >,
  < 2.2 , 2 , 0 >
   texture{ tx_fosca }
  }

#declare perna_4 =
  box{
   < 1, 2, +1.10 >,
   < 1.2, 1.9, 0 >
   texture{ tx_fosca }
  }

#declare base =
  box{
   < 1, 0, 0 > ,
   < 2.2 , 2 , -0.1 >
   texture{ tx_fosca }
  }

#macro fileira(x1,y1,z1,x2,y2,z2)
  box{
   <x1,y1,z1>,
   <x2,y2,z2>
   texture{ tx_fosca }
  }
#end

#macro mesa(xi, yi, zi)
  object{ tabua translate<xi,yi,zi>}
  object{ perna_1 translate<xi,yi,zi> }
  object{ perna_2 translate<xi,yi,zi> }
  object{ perna_3 translate<xi,yi,zi> }
  object{ perna_4 translate<xi,yi,zi> }
#end

union{
  //object{ eixos(3.00) }
  mesa(0,0,0)
  mesa(-1,3,0)
  mesa(-2,6,0)
  mesa(-3,9,0)
  object { fileira(5,-5,0,-10,12,-0.1) texture { tx_plastico } }
}

#include "camlight.inc"
camlight(<-2.5,+3.5,0.00>,14.0,<10,10,5>,30.0,z,1.2)