// Last edited on 2013-11-04 20:25:42 by stolfilocal
// Processed by remove-cam-lights

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.85, 0.30 > }
    finish{ diffuse 0.2 reflection 0.7*< 1.00, 0.85, 0.30 > ambient 0.1 }
  }

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

#declare tx_xadrez =
  texture{
    pigment{ checker color rgb < 0.10, 0.32, 0.60 >, color rgb < 1.00, 0.97, 0.90 > }
    finish{ diffuse 0.9 ambient 0.1 }
    scale 2.0
  }

#macro botoes (linha, coluna)
   union {
    #declare i = 0;
    #declare b = 3;

 #while (i < linha )
    #declare j = 0;
    #declare a = -7;
    #declare c = -4;
    #while (j < coluna)

      #if (mod(coluna, 2) = 0)
        cylinder { < a, b, c > , < a, b, c-0.5 > , 1.5 }
      #else
        cylinder { < a, b, c > , < a, b, c-4 > , 1.5 }
      #end

      #declare a = a + 8.5;
      #declare j = j+1;

    #end

  #declare b = b - 4.5;
  #declare i = i+1;

 #end

}

#end

#macro switches(quantidade)
    union {
      #declare g = 0;
      #declare a = -8;
      #declare b = -7.5;
      #declare c = -4;

      #while (g < quantidade)
        box { < a, b, c >, < a+2, b+3, c-3 > texture {tx_fosca}}
        box { < a, b+1, c-3 >, < a+2, b+2, c-5 >  texture {tx_plastico}}

      #declare g = g + 1;
      #declare a = a + 8.5;

    #end

}

#end

#macro lights(quant)
    union {
      #declare i = 0;
      #declare b = 3;

    #while (i < linha )
      #declare j = 0;
      #declare a = -7;
      #declare c = -4;
          #while (j < coluna)

         #if (coluna%2 = 0)
            cylinder { < a, b, c > , < a, b, c-0.5 > , 1.5 }
         #else
            cylinder { < a, b, c > , < a, b, c-4 > , 1.5 }

          #end

      #declare a = a + 8.5;
      #declare j = j+1;

    #end

  #declare b = b - 4.5;
  #declare i = i+1;

 #end

}

#end

#declare plataforma =
     box { < -10, -9, 4 >, < 14, 9, -4 > }

#declare bot = botoes(5, 2);
#declare sw = switches(3);

union {
   object {bot texture {tx_fosca} }
   object {sw}
   object {plataforma texture {tx_plastico} }
}

#include "camlight.inc"
#declare centro_cena = < 2.00, 0.00, 0.00 >;
#declare raio_cena = 30.0;
#declare dir_camera = < 5.00, 1.00, -150.00 >;
#declare dist_camera = 60.0;
#declare intens_luz = 1.00;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , y, intens_luz)