Ah, the elusive flame. I just used nested transmitting egg-shaped
things.
Here's the code if you wanna take a look:

#declare flameb = merge {
   intersection {
      sphere { <0,0,0>,.3 scale <.16,1,.16> }
      plane { -y,.00001 }
   }
   intersection {
      sphere { <0,0,0>,.3 scale <.1599,.2,.1599> }
      plane { y,0 }
   }
}
#declare flame = union {
object { flameb
   texture {
      pigment {
         gradient y
         turbulence 0.2
         translate -.2*y
         scale .38
         color_map {
            [0.0 rgbt<-.5,-.3,1.2,.6>]
            [0.1 rgbt<-.5,-.3,1.2,.6>]
            [0.25 rgbt<.9,.8,.1,.3>]
            [0.4 rgbt<.9,.9,.85,.2>]
            [1.0 rgbt<.9,.9,.85,.2>]
         }
      }
      finish { ambient 2 diffuse 0 }
   }
}
object { flameb scale 1.1 pigment { color rgbt <.9,.8,.6,.5> } finish {
ambient 1 diffuse 0 } }
sphere { <0,0,0>,1 hollow
   texture { pigment { color Clear } }
   finish { ambient 0 diffuse 0 }
   interior {
      media {
         emission <1,.5,0>
         density {
            spherical
            turbulence .1
            color_map {
               [0.0 rgb<.4,.4,.4>]
               [0.2 rgb<.7,.7,.7>]
               [1.0 rgb<1,1,1>]
            }
         }
      }
   }
   scale .12 translate .13*y
}
}
#undef flameb

--
David Fontaine     <dav### [at] faricynet>     ICQ 55354965
Please visit my website: http://www.faricy.net/~davidf/

Post a reply to this message