// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

#include "colors.inc"

#include "colors.inc"

#declare gerador = seed(123456);

#declare predio =
  box {
    <4.5,-4.5,-10>,
    <-4.5,4.5,10>
    pigment{color Yellow}
  }

#declare solo =
  plane {
    <0,0,1>, -10
    pigment{checker color Black, color White}
}

#declare porta =
  box {
    <0.5,-0.5,-2>,
    <-0.5,0.5,2>
    pigment{color Blue}
}

#declare janela_quadrada =
  box {
    <0.5,-0.5,-0.5>,
    <-0.5,0.5,0.5>
}

#declare corte_triangular =
  box {
    <0.8,-0.5,-1>,
    <-0.8,0.5,1>
}

#declare janela_triangular = difference {
  object{janela_quadrada translate<0,0,0.5>}
  object{corte_triangular translate<0,0.5,1> rotate x*26.5651 translate<0,0.5,0> }
  object{corte_triangular translate<0,-0.5,1> rotate x*-26.5651 translate<0,-0.5,0>}
  translate <0,0,-0.5>
}

#declare janela_circular =
  cylinder{
    <0.5,0,0>,
    <-0.5,0,0>
    0.5
  }

union{
  object{solo}
  object{predio}
  object{porta translate<4.1,-3.0,-9>}

  #declare p = 0;

  #declare i=0;
  #declare j=0;
  #declare w=0;

  #declare aa=0;

  #declare bb=-5.0;

  #declare cc=-12.5;

  #while(i<2)
    #if(aa=0)
      #declare aa = 4.1;
    #else
      #declare aa = -4.1;
    #end

    #declare i = i + 1;
    #declare bb=-5;
    #declare j=0;

    #while(j<4)
      #declare bb = bb + 2;
      #declare j = j + 1;
      #declare cc=-12.5;
      #declare w=0;

      #while(w<4)
        #declare cc = cc + 5;
        #declare w = w + 1;

        #if(p=0)
          object{janela_circular pigment {rgb <rand(gerador),rand(gerador),rand(gerador)>} translate<aa,bb,cc>}
        #end

        #if(p=1)
          object{janela_triangular pigment {rgb <rand(gerador),rand(gerador),rand(gerador)>} translate<aa,bb,cc>}
        #end

        #if(p=2)
          object{janela_quadrada pigment {rgb <rand(gerador),rand(gerador),rand(gerador)>} translate<aa,bb,cc>}
          #declare p = -1;
        #end

        #declare p = p + 1;

      #end
    #end
  #end

  #declare i=0;
  #declare j=0;
  #declare w=0;

  #declare a=0;

  #declare b=-5.0;

  #declare c=-12.5;

  #while(i<2)
    #if(a=0)
      #declare a = 4.1;
    #else
      #declare a = -4.1;
    #end

    #declare i = i + 1;
    #declare b=-5;
    #declare j=0;

    #while(j<4)
      #declare b = b + 2;
      #declare j = j + 1;
      #declare c=-12.5;
      #declare w=0;

      #while(w<4)
        #declare c = c + 5;
        #declare w = w + 1;

        #if(p=0)
          object{janela_circular pigment {rgb <rand(gerador),rand(gerador),rand(gerador)>} rotate 90*z translate<b,a,c> }
        #end

        #if(p=1)
          object{janela_triangular pigment {rgb <rand(gerador),rand(gerador),rand(gerador)>} rotate 90*z translate<b,a,c>}
        #end

        #if(p=2)
          object{janela_quadrada pigment {rgb <rand(gerador),rand(gerador),rand(gerador)>} rotate 90*z translate<b,a,c>}
          #declare p = -1;
        #end

        #declare p = p + 1;

      #end
    #end
  #end

rotate z*50
rotate y*20

}

#include "camlight.inc"
camlight(<0,0,0>,<25.00,5,3>,1.00,z,1.0)