// TOWERS / No.4 '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, 50, -280>
  look_at <50, -300, 0>
  angle 140
  }

light_source {<-1000, 300, 1000> color rgb <0.6, 0.6, 0.2>}

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(Xp/Zp)
      #declare Dyp=0.0003*(Xp*Xp+Zp*Zp);
      translate <Xp, (I-Inum/2)*3-Dyp, Zp>
      }
  #declare I=I+1; #end
  #declare J=J+1; #end
  #declare K=K+1; #end
  }

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