|
|
Warp,
Thanks a bunch for posting the source code for this. It's really elegant.
How long does it take to render this on your machine?
"Warp" <war### [at] tagpovrayorg> wrote in message
news:428a5544@news.povray.org...
> Dave Matthews <dma### [at] wrmnwestmnscuedu> wrote:
>> Excellently done! Could you post the source, please? Or at least the
>> settings? I've tried similar things, with very poor results.
>
> camera { location -z*29 look_at 0 angle 20 }
> plane { z, -30 pigment { rgb .6 } finish { ambient 1 } }
> light_source
> { -z*29+y*10-x*10, 1 media_interaction off
> photons { reflection off refraction off }
> }
>
> global_settings
> { photons
> { count 1000000
> media 200
> }
> }
>
> union
> { intersection
> { quadric { <0, -1, 0>, <0, 0, 0>, <-1, 0, 0>, 0 }
> box { <-.4*.4, .4, -.1>, <.5, -.4, .1> }
> bounded_by { box { <-.4*.4, .4, -.1>, <.5, -.4, .1> } }
> pigment { rgb 0 }
> photons { target reflection on collect off }
> finish { reflection 1 ambient 0 diffuse 0 }
> }
> intersection
> { quadric { <0, -1, 0>, <0, 0, 0>, <-1, 0, 0>, 0 }
> box { <-.4*.4, .4, -.2>, <.5, -.4, .2> }
> bounded_by { box { <-.4*.4, .4, -.2>, <.5, -.4, .2> } }
> pigment { rgb <1,.9,.8> }
> photons { target collect off }
> translate x*.001
> }
> scale 9
> translate x*4.5
> }
>
> box
> { <-9, -4, -.11>, <5, 4, .11> hollow
> pigment { rgbt 1 }
> photons { pass_through }
> interior { media { scattering { 1, 1 extinction .001 } } }
> }
>
> #include "transforms.inc"
>
> #macro Light(YOffset, PointAtYOffset, Color)
> light_source
> { <-4, YOffset, 0>, Color*5
> cylinder radius .05 falloff .1 point_at y*(YOffset+PointAtYOffset)
> parallel point_at y*(YOffset+PointAtYOffset)
> }
> cylinder
> { -x*.01, -x, .2
> pigment { rgb Color }
> finish { specular .5 }
> #if(PointAtYOffset != 0)
> Reorient_Trans(-x, -x*4-y*PointAtYOffset)
> #end
> translate <-4, YOffset, 0>
> }
> #end
>
> #declare YInd = 3.375;
> #declare ColorInd = 0;
> #while(YInd >= -3.4)
> Light(YInd, 0, <ColorInd, .8, 1-ColorInd>)
> #declare YInd = YInd-.75;
> #declare ColorInd = ColorInd+1/9;
> #end
Post a reply to this message
|
|