// Last edited on 2009-07-24 12:38:04 by stolfilocal
// Processed by remove-cam-lights

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

#declare raio = 2.000;

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

#declare preto = 
  texture {
    pigment { color rgb < 0.00, 0.00, 0.00 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

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

#declare marrom =
  texture {
    pigment {color rgb < 0.90, 0.65, 0.20 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 } 
  }

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

#declare amarelo = 
  texture {
    pigment { color rgb < 1.00, 1.00, 0.00 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare verde = 
  texture {
    pigment { color rgb < 0.10, 0.85, 0.10 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare vermelho = 
  texture {
    pigment { color rgb < 0.85, 0.05, 0.10 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare colher =
  difference{
    object{ 
      sphere {
        <0,0,0>, 0.5
        texture {amarelo}
      }
    }
    object{
      union{
        box {
          <1,-1,0>, <-1,1,1>
          texture {amarelo}
        }
        sphere {
          <0,0,0>, 0.4
          texture {verde}
        }
      }
    }
  }

#declare pegador =
  difference{
    object{ 
      sphere {
        <0,0,0>, 0.5
        texture {amarelo}
      }
    }
    object{
      union{
        cylinder {
          <0,0,-0.1>, <0,0,0.1>, 0.5
          texture {amarelo}
        }
        sphere {
          <0,0,0>, 0.4
          texture {verde}
        }
      }
    }
  }

#declare apoio =
  union {
    object{
    cylinder {
      <0,0,0>, <0,0,2>, 0.25
      texture {azul}
    }}
    object{
    sphere {
      <0,0,0> , 0.25
      texture {cinza}
    }
    translate <0,0,2>
    }
   }

#declare apoio_simples =
  cylinder {
    <0,0,0>, <0,0,2>, 0.25
    texture {azul}
  }

#macro folha()
  union {
    object {
      apoio_simples
      scale<0,0,0.5>
      rotate <-90,0,0>
    }
    object {
      colher
      translate <0,1.5,0>
    }
  }
#end

#macro folha2()
  union {
    object {
      apoio_simples
      scale<0,0,0.5>
      rotate <-90,0,0>
    }
    object {
      pegador
      translate <0,1.5,0>
    }
  }
#end

#macro cabo(alfa)
  union{
    object {
      apoio
      rotate <-90,0,0>
    }
    object {
      folha()
      rotate <alfa,0,0>
      translate <0,2,0>
    }
  }
#end

#macro cabo2(alfa)
  union{
    object {
      apoio
      rotate <-90,0,0>
    }
    object {
      folha2()
      rotate <alfa,0,0>
      translate <0,2,0>
    }
  }
#end

#macro cabo_mestre(c1_alfa, c2_alfa, beta, teta)
  union{
    object {
      apoio
      scale<0,0,2>
      rotate<180,0,0>
      
    }
    object {
      sphere {
        <0,0,0>, 0.25
        texture {cinza}
      }
    }
    object {
      cabo(c1_alfa)
      rotate <beta,0,teta>
      translate <0,0,-4>
    }
    object {
      cabo2(c2_alfa)
      rotate <beta,0,teta+180>
      translate <0,0,-4>
    }
  }
#end

#macro cabo_apoio_mestre(zappa, c1_alfa, c2_alfa, beta, teta)
  union{
    object {
      apoio
      rotate <90,0,0>
      translate <0,2,0>
    }
    object {
      cabo_mestre(c1_alfa, c2_alfa, beta, teta)
      rotate <zappa,0,0>
      translate <0,2,0>
    }
  }
#end

object{ cabo_apoio_mestre( 20, 70, 80, -40,  0) translate <0,-10,0> }

object{ cabo_apoio_mestre(150, 60, 10, -20, 10) }

// Original camera parameters:
// #local cam_ctr = <0.00,-1.00,0.00>
// #local cam_vec = (<20.00,5.00,0.00>-<0.00,-1.00,0.00>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<0.00,0.00,0.00>,<10,10,5>,20.0,z,1.0)