Code below:
//
#include "colors.inc"
//#version unofficial MegaPov 0.5;

#declare modclock=0.55;

#declare zoom1=modclock*<0,775,4800>;

camera {
    location <0, 0, -4800>+<0,0,4100*clock>      //location <0, 0,
-2700>
    look_at <-20, 0, 0>
    angle 45
    //rotate <-30+58*(modclock^2),0,0>
    rotate <0,28*clock,0>
    }

#declare poww=2^(-1+8*clock); //&
#declare rrr=seed(2043);
#declare nl=0;
#while (nl<1)
        #declare patpt=<rand(rrr)-0.5,rand(rrr)-0.5,rand(rrr)-0.5>;

        light_source {  <0,0,0>
                color White*4
                //spotlight    radius 100   falloff 9       point_at y
//patpt //y
                media_interaction on
                //tate 360*<0,0,nl/8>
                }

        #declare ns=0;
        #while (ns<5800)
                sphere
{(60+800*(rand(rrr)^poww))*vnormalize(<rand(rrr)-0.5,rand(rrr)-0.5,rand(rrr)-0.5>),1+4*rand(rrr)
pigment {White} finish {ambient 0.0525}}
        #declare ns=ns+1;
        #end
#declare nl=nl+1;
#end

//sphere {<0,0,-500>,50 pigment {White} finish {ambient 0.25}}

//background{White}

light_source{<0,1000,-200>  color White*1 media_interaction   off//on
}

#declare j=.022;

#declare n=13;
#declare c=0.018;

sphere{0,5000 pigment{rgbft 1}   hollow interior{

media {
   intervals 13
   variance 0.8/128/(n^0.33)
   scattering { 2, red 0.05*c blue 0.001*c green 0.02*c}
   samples int(n^0.5), 10*n
   confidence 1-(0.10^n)
   variance 0.10^n//1/1000
   ratio 0.9
 }
  }}

Post a reply to this message

Attachments:
Download 'spot08e2h05.mpg' (417 KB)