// Last edited on DATE TIME by USER
// Processed by remove-cam-lights
background{ color rgb < 1, 1, 1 > }

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

#declare tx_pessoa1 =
              texture{
                pigment{ color rgb < 0.70, 0.50, 0.60 > }
                finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
              }

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

#declare tx_parede =
              texture{
                pigment{ color rgb < 0.20, 0.40, 0.70 > }
                finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
              }

#declare tx_texto =
              texture{
                pigment{ color rgb < 0.30, 0.90, 0.2 > }
                finish{ diffuse 0.8 ambient 0.1 specular 0.5 roughness 0.005 }
              }

#declare roleta = seed(315);

#declare parede =
   box{
    < 0, 0, 0 >,
    < 39, -1, 15 >
    texture {tx_parede}
  }
#declare chao =
   box{
    < 0, 0, 0 >,
    < 39, 40, -1 >
    texture {tx_chao}
  }

#macro chamarTexto(variavel)
union {
  text {ttf "arial.ttf" "Escritura" 0.2, 0
    texture {tx_texto}
    rotate 90*z
    rotate 90*y
    translate <0, 0.4, 0>
  }
  text {ttf "arial.ttf" "da lingua" 0.2, 0
    texture {tx_texto}
    rotate 90*z
    rotate 90*y
    translate <0, 0.4, -1>
  }
  text {ttf "arial.ttf" "portuguesa" 0.2, 0
    texture {tx_texto}
    rotate 90*z
    rotate 90*y
    translate <0, 0, -2>
  }
  text {ttf "arial.ttf" "da idade" 0.2, 0
    texture {tx_texto}
    rotate 90*z
    rotate 90*y
    translate <0, 0.3, -3>
  }
  text {ttf "arial.ttf" variavel 0.2, 0
    texture {tx_texto}
    rotate 90*z
    rotate 90*y
    translate <0, 0.4, -4>
  }
  scale 0.6
}
#end

#declare base =
   box{
    < 0, 0, 0 >,
    < 3, 3, 1 >
  }
#declare placa =
union {
  box{
    < 0, 0, 0 >,
    < 0.6, 3, 4 >
  }
  object {
    chamarTexto("Media")
    translate <0.6, 0, 3>
  }
}
#declare escritura =
union {
    object {
      placa
      translate <1.5, 0, 1>
      texture {tx_cadeiras}
    }
    object {base texture {tx_cadeiras}}
    translate < 2 , 2, 0>
}

#declare perna1 =
  cylinder{
    < 0, 0.75, 2 >,
    < 0, 0, 0 >,
    0.2
  }
#declare perna2 =
  cylinder{
    < 0, 1.25, 2 >,
    < 0, 2, 0 >,
    0.2
  }
#declare corpo =
   box{
    < 0.4, 0.75, 5 >,
    <-0.4, 1.25, 1.6 >
  }
#declare braco1 =
  cylinder{
    < 0, 0, 4 >,
    < 0, 0.75, 4 >,
    0.2
  }
#declare braco2 =
  cylinder{
    < 0, 1.25, 4 >,
    < 0, 2, 4 >,
    0.2
  }
#declare cabeca =
  sphere {
    < 0, 1, 5.6 >,
    0.8
  }

#declare pessoa =
union {
    object {perna1}
    object {perna2}
    object {braco1}
    object {braco2}
    object {corpo}
    object {cabeca}

texture {tx_pessoa1}
translate < 4, 2, 0>
}

#macro Museu (linhas, colunas)
    union {
      #declare j=0;
      #while (j <  linhas)

        #declare i=0;

          #while (i <  colunas)
              union {
                    #if (rand(roleta) < 0.8)
                        object {escritura translate <  8*j, 8*i, 0>}
                    #else
                        object {pessoa translate <  8*j, 8*i, 0>}
                    #end
              }
              #declare i = i+1;
          #end

          #declare j = j+1;
      #end
    }
#end

union {
    object {parede }
    object {
      parede
      rotate 90*z
    }
    object {chao
    translate < 0 , -1, 0>
    }

    object {
      Museu(5, 5)
    }
scale 0.3
}
#include "eixos.inc"
object {eixos(3.00)}

#include "camlight.inc"
#declare centro_cena = < 6.00, 6.00, 4.00 >;
#declare raio_cena = 9.0;
#declare dir_camera = < 3, 1, 0.5 >;
#declare dist_camera = 16.0;
#declare intens_luz = 1.50;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)