I got a more or less similar effect (not identical, but I suppose
acceptable) by converting it to an emitting media and tuning the
density colors until it looked similar:

sphere {<0, 0, 0>, 2
  pigment {color rgbt<1, 1, 1, 1>}
  interior
  { media
    { emission .0001
      density
      { spherical density_map
        {
          [ 0.00 color rgb<0.70, 0.45, 0.00>*.2 ]
          [ 0.82 color rgb<1.00, 0.70, 0.00> ]
          [ 0.84 color rgb<1.00, 1.00, 0.50> ]
          [ 1.00 color rgb<1.00, 1.00, 1.00>*30 ]
        }
      }
      scale 0.5
    }
  }
  hollow
  scale <3000, 3000, 2000>
  translate<0, 300, 3000>
}


-- 
#macro N(D)#if(D>99)cylinder{M()#local D=div(D,104);M().5,2pigment{rgb M()}}
N(D)#end#end#macro M()<mod(D,13)-6mod(div(D,13)8)-3,10>#end blob{
N(11117333955)N(4254934330)N(3900569407)N(7382340)N(3358)N(970)}//  - Warp -

Post a reply to this message