// TOWERS / No.6 '06.04
// by Tsutomu HIGO  URL:http://www.asahi-net.or.jp/~nj2t-hg/

#version 3.6;
global_settings {
  max_trace_level 5
  assumed_gamma 2.2
  }

#declare Rn=seed(5);

camera {
  location <230, 140, -340>
  look_at <30, -110, 0>
  angle 120
  }

light_source {<0, 0, 0> color rgb <0.6, 0.4, 0.3>}

union {
  #declare Knum=40; #declare K=0; #while(K<Knum)
  #declare Jnum=40; #declare J=0; #while(J<Jnum)
    #declare Kdev=rand(Rn);
    #declare Jdev=rand(Rn);
  #declare Inum=50; #declare I=0; #while(I<Inum)
    disc { <0, 0, 0> y, 10, 8
      texture {pigment {color rgbt <1, 1, 1, 0.9>} }
      finish {
        ambient 0.3
        diffuse 0.8
        reflection 1
        specular 1
        }
      no_shadow
      #declare Xp=40*(K-Knum/2)+20*(Kdev-0.5);
      #declare Zp=40*(J-Jnum/4)+20*(Jdev-0.5);
      rotate x*2*I rotate y*atan(Zp/Xp)
      #declare Dyp=0.003*(Xp*Xp+Zp*Zp);
      translate <Xp, (I-Inum/2)*2+0.2*Dyp, Zp>
      }
  #declare I=I+1; #end
  #declare J=J+1; #end
  #declare K=K+1; #end
  }

background {color rgb <0.05, 0.07, 0.02>}