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

#version 3.6;
global_settings {
  max_trace_level 6
  assumed_gamma 2.2
  }

#declare Rn=seed(5);

camera {
  location <100, 90, -320>
  look_at <100, -200, 0>
  angle 120
  }

light_source {<-1000, 300, 1000> color rgb <0.5, 0.25, 0.15>}

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=60; #declare I=0; #while(I<Inum)
    disc { <0, 0, 0> y, 12, 10
      texture {pigment {color rgbt <1, 1, 1, 0.9>} }
      finish {
        ambient 0.3
        diffuse 0.8
        reflection 1
        specular 1
        }
      no_shadow
      rotate x*2*(I+K)
      #declare Xp=40*(K-Knum/2)+20*(Kdev-0.5);
      #declare Zp=40*(J-Jnum/4)+20*(Jdev-0.5);
      #declare Dyp=0.0001*(Xp*Xp+Zp*Zp);
      translate <Xp, 0.12*(pow(I,1.5)-Inum/2)*2-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.03>}