Ok, I've long since replaced the code that made it ugly, but this is the
result of changing it again...

#version unofficial MegaPov 0.6;
camera {location z*100 up y*3 right x*4 look_at 0}
$seed1=seed(1305987);
$A=0;
#while (A < 60)
  $A=A+1;
  light_source {
    <rand(seed1)-.5,rand(seed1)-.5,rand(seed1)-.5>*100,
    <rand(seed1)-.5,rand(seed1)-.5,rand(seed1)-.5>*3
    spotlight
    point_at <rand(seed1)-.5,rand(seed1)-.5,rand(seed1)-.5>*100
    radius 90*rand(seed1)
    falloff 90*rand(seed1)
  }
  cylinder {
    $pos1=<rand(seed1)-.5,.3*rand(seed1),rand(seed1)-.5>*100;
    pos1,
    pos1+y*40*rand(seed1)
    rand(seed1)//*5
    pigment{rgb 1}
    no_image
  }
#end
sphere{0,150 pigment{rgb 1} double_illuminate}

Post a reply to this message

Attachments:
Download 'lightsphere.jpg' (44 KB)

Preview of image 'lightsphere.jpg'