/* The "new media" using 'sampling_method 2' in minipatch by Mike
Hough is used so you need that first:
http://members.xoom.com/POVRAY3/minipatch.zip
and it uses the same setup as Super Patch or Photon Patch, that is to
say the DLLs of 3.1e not 3.1g */

// Glowing Agate/Amber ?

global_settings {
max_trace_level 3 // raise this if needed to
 }

#include "colors.inc"

  camera {
// spherical_camera
// h_angle 360
// v_angle 180
    location <-10, 8, -19>
    look_at <0, 0, 0>
    angle 50
}

background { color rgb <0.2, 0.4, 0.8>*0 }

light_source { <-2,.75,-2> color rgb <.75,.5,.25> // was rgb .75
before
         fade_distance 8 fade_power 1 media_attenuation on}
// light_source { <25,25,-75> color rgb .5 media_interaction off}

plane {y, -5 pigment {color rgb 1}}

blob {
      threshold .5
        sphere {<2,1,1>,4,1}
        sphere {<-2,0,-1>,5,1}
        sphere {<0,-1,-3>,6,1}
        sphere {<-1,0,0>,4,1}
   sturm
pigment {color rgbf <1, 1, 1, 1>}
normal {granite -.9 scale 9 scallop_wave}
finish {ambient .05 diffuse .5 specular .4 roughness .006 phong .1
phong_size 8 reflection .1 reflection_exponent .5}
interior {
media { // emission <.8,.75,.3>
scattering {3, <.75,.667,.33>*.25 extinction .5}
sample_method 2
samples 1, 1
intervals 3
jitter 0
absorption 1.25*<.1, .25, .75>
density {
// agate agate_turb .2
bozo // granite
turbulence .9
color_map {
[0 color rgb <.5, .25, .5>*.25]
[1 color rgb <.25, .5, 1>*.25]
}
scale 2
}
}
media { // emission <.8,.75,.3>
scattering {4, <.667,.5,.25>*.33 extinction .75}
sample_method 2
samples 1, 1
intervals 3
jitter 0
absorption 1.5*<.25, .5, .75>
density {
agate agate_turb .9
 // bozo // granite
// turbulence 1.2
color_map {
[0 color rgb <.75, .5, .5>*.25]
[1 color rgb <1, .25, .75>*.25]
}
scale 2
}
}
media { // emission <.8,.75,.3> // for no lights
scattering {1, <.25,.5,.25>*.125 extinction .25}
sample_method 2
samples 1, 1
intervals 3
jitter 0
absorption 1*<.25, .5, .75>
density {
// agate agate_turb .9
bozo // granite
turbulence .3
color_map {
[0 color rgb <.75, .25, .25>*.125]
[1 color rgb <1, .25, .5>*.125]
}
scale 2
}
} ior 1.6 caustics .1 fade_distance 4 fade_power 2
}
hollow
 rotate <-30,90,-60>
}
/* END */


--
omniVERSE
http://members.aol.com/inversez/POVring.htm

Post a reply to this message