// MOON / Red Disk '03.09
// By Tsutomu HIGO  URL: http://www.asahi-net.or.jp/~nj2t-hg/

#version 3.5;
global_settings {
  max_trace_level 5
  assumed_gamma 2.2
  }

#declare Tmax = 240;
#declare Hmax = 240;

#declare H = 0.1; #while (H<Hmax)
  #declare T = 0; #while (T<Tmax)
    box { <-0.25, -0.25, -0.25> < 0.25, 0.25, 0.25>
      rotate z*(90/Hmax*H)
      rotate y*(90/Tmax*T-60)
      translate <H/4, 0, 0>
      rotate y*(360/Tmax*T-800/(H/20+1))
      texture {
        pigment {color rgbt <1, 0.1, 0, 0.8>}
        finish {
          ambient 0
          diffuse 1
          reflection 0.7
          specular 0.8
          phong 0.5
          brilliance 1
          }
        }
      no_shadow
      }
    #declare T = T+1; #end
  #declare H = H+1; #end

background { color rgb <0, 0.1, 0.2> }

camera {
  location <20, 164, 150>
  angle 31
  look_at <0, -11, 1>
  }

light_source { <-6000, 14000, 2000> color rgb <1, 1, 1> }