// Last edited on 2009-10-10 18:41:05 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_fosca_preta =
  texture{
    pigment{ color rgb < 0.00, 0.00, 0.00 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

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

#declare tx_fosca2 =
  texture{
    pigment{ color rgb < 1.00, 0.10, 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 mesa_prancha =
 box {
  < 0.00, 0.00,  0.00 >,
  < 3.00, 3.00,  0.10 >
  texture{ tx_fosca }
 }

#declare mesa_pe =
 box {
  < 0.00, 0.00,  0.00 >,
  < 0.25, 0.25, -2.00 >
  texture{ tx_fosca }
 }

#declare mesa =
 union{
  object{ mesa_prancha }
  object{ mesa_pe translate < 0.00, 0.00, 0.00 >}
  object{ mesa_pe translate < 0.00, 2.75, 0.00 >}
  object{ mesa_pe translate < 2.75, 0.00, 0.00 >}
  object{ mesa_pe translate < 2.75, 2.75, 0.00 >}
 }

#declare monitor =
 union {

  box {
   < 0.00, 0.00, 0.00>,
   < 0.20, 2.00, 1.50>
   texture{ tx_fosca_branca }
  }

  box {
   < 0.00, 0.20, 0.20>,
   < 0.30, 1.80, 1.30>
   texture{ tx_fosca_preta }
  }

  box {
   < 0.00, 0.90, 0.00>,
   < 0.20, 1.10, -0.20>
   texture{ tx_fosca_branca }
  }

  box {
   < -0.20, 0.70, -0.20>,
   < 0.40, 1.30, -0.30>
   texture{ tx_fosca_branca }
  }

 }

#declare teclado =
 union {
  box {
   < 0.00, 0.00, 0.00>,
   < 0.50, 2.00, 0.10>
   texture{ tx_fosca_branca }
  }

 }

#declare computador =
 union {
  object{ monitor }
  object{ teclado translate <0.50, 0.00, -0.30>}
 }

#declare unidade =
 union {
  object{ computador }
  object{ mesa translate <-1.50, -0.5, -0.40>}
 }

#declare roleta = seed(513);
#macro fileira(altura)

 #local n_unidades = 5;
 #local c_unidades = 0;
 #local falha = int(rand(roleta) * n_unidades);

 union{
  box {
   < 0.00,  0.00, 0.00>,
   < 6.00, 20.00, 0.20 * altura>
   texture{ tx_fosca }
  }
  #while (c_unidades < n_unidades)
   #if (c_unidades != falha)
    object{ unidade translate <2.00, 1.00 + c_unidades * 4.00, 2.30 + 0.20 * altura>}
   #end
   #local c_unidades = c_unidades + 1;
  #end
 }
#end

#macro fileiras(n_fileiras)
 #local c_fileiras = 0;

 union {
  #while (c_fileiras < n_fileiras)
   object{ fileira(c_fileiras + 1) translate <0.00 + -6.00 * c_fileiras, 0.00, 0.00 >}
   #local c_fileiras = c_fileiras + 1;
  #end
 }
#end

#declare parede =
 box {
  < 0.00, 0.00, 0.00>,
  < 0.50, 20.00, 8.0>
  texture{ tx_fosca_branca }
 }

#declare tx_quadro =
 texture {
  pigment{
   image_map {
    jpeg "quadro.jpg"
   }
   scale <2, 2, 1>
  }
  finish{ diffuse 0.8 ambient}
 }

#declare quadro =
 box {
  < 0.00, 0.00, 0.00>,
  < 2.00, 2.00, 0.1>
  texture{ tx_quadro }
 }

union {
 object{ eixos(4.00) }
 object{ parede translate <-12.50, 0.00, 0.00>}
 text{
  ttf "arial.ttf"
  "LAB DOS SONHOS" 0.3, 0
  texture{ tx_fosca2 }
  rotate 90 * x
  rotate 90 * z
  translate < -11.90, 5.00, 5.00>
 }
 object{ fileiras(3) }

 object{ quadro
  rotate 90 * y
  rotate 90 * x
  translate < -11.90, 1.00, 4.00>
 }
}

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

#include "camlight.inc"
camlight(<-10.00,5.00,-1.00>,21.0,<10,10,5>,50.0,z,1.2)