POV-Ray : Newsgroups : povray.general : ANNOUNCE: Dispersion for windows : Re: ANNOUNCE: Dispersion for windows Server Time
12 Aug 2024 21:16:26 EDT (-0400)
  Re: ANNOUNCE: Dispersion for windows  
From: Mike
Date: 8 Jan 1999 21:20:55
Message: <3696BC81.B5855EC@aol.com>
Before I say anything I'd like to comment that this news server fills up
if you're away for more than a day!

Anyway, here's the original source for the splash screen image:

//#include "colors.inc"

camera {location <10, 15, -20>
    look_at <0, 3, 0>
    angle 35
    }


background {color rgb <.5, .5, .5>}

//light_source {<5, 10, 1> color rgb <1, 1, 1> fade_distance 10
fade_power 2}

//two strip lights
box {<4.75, 14.75, -5>, <6.25, 15.25, 3>
pigment {color rgbt <1, 1, 1>}
finish {ambient 10}
no_shadow
}

box {<7.75, 14.75, -5>, <9.25, 15.25, 3>
pigment {color rgbt <1, 1, 1>}
finish {ambient 10}
no_shadow
}

light_source {<5.5, 14, -1> color rgb <.8, .8, .8> fade_distance 10
fade_power 2
area_light <1.5, 0, 0>, <0, 0, 4>, 1, 2
adaptive 1
}

light_source {<8.5, 14, -1> color rgb <.8, .8, .8> fade_distance 10
fade_power 2
area_light <1.5, 0, 0>, <0, 0, 4>, 1, 2
adaptive 1
}

sphere {<0, 3, 0>, 3
pigment {color rgbf <.97, .975, .98, .95> }
finish {phong 0 phong_size 90 reflection .2}
interior {caustics .75 ior 1.5 dispersion 1.1 disp_nelems 40
fade_distance 6 fade_power 2 }
scale 1
hollow
}

plane {y, 0
pigment {checker color rgb <1, 1, 1>, color rgb <.9, .9, .9> scale 10}
finish {diffuse .9 reflection .2}
}


//end transmission :)

It would be a good idea to comment out the area lights and reduce the
disp_nelems to around 10 or 20 on the first try.  Also, you should watch
out for the bug I mentioned in the readme.  If you stop the render the
dispersion may stop working next time you start one.  You have to close
the program and restart it if this happens.  Such is life in betaville.

Here's another scene.  It's actually the first one I made with the
patch, but I liked the sphere better.  You make the call:

//#include "colors.inc"

camera {location <10, 15, -20>
    look_at <0, 3, 0>
    angle 40
    }


background {color rgb <.5, .5, .5>}

light_source {<10, 5, 2> color rgb <1, 1, 1>}

cylinder {<0, .0001, 0>, <0, 6, 0>, 2
pigment {color rgb <1, 1, 1> transmit 1}
finish {phong 1 phong_size 20 }
interior {ior 1.5 dispersion 1.1 disp_nelems 30 caustics .5}
scale 1
}

plane {y, 0
pigment {checker color rgb <1, 1, 1>, color rgb <.9, .9, .9> scale 10}
finish {diffuse .9 reflection .2}
}


Ken wrote:
> 
> Dear Mike,
> 
> I have tried repeatedly to repeat the sphere you have on the splash
> screen of this patch and regardless of the setting I try I am unable
> to achive any colored dispersion what so ever. This is also true of
> other shapes and settings. Would you be so kind as to provide an
> example of working code so that I may learn by your example.
> 
> Thank you for your continued support.
> 
> --
> Ken Tyler
> 
> tyl### [at] pacbellnet


Post a reply to this message

Copyright 2003-2023 Persistence of Vision Raytracer Pty. Ltd.