home *** CD-ROM | disk | FTP | other *** search
- /* created by Loyd Towe, CIS 70614,1721, as an experiment in transparent
- * objects. be warned, you will need some SERIOUS computing power to
- * render this at 640x480.
- *
- */
-
- #include "colors.inc"
- #include "textures.inc"
- #include "shapes.inc"
-
- camera {
- location < 0 4 -20 >
- direction < 0 0 1 >
- up < 0 1 0 >
- right < 1.33 0 0 >
- look_at < 0 0 0 >
- }
-
- object {
- difference {
- sphere {<0 0 0> 5}
- sphere {<0 0 0> 4.999} // very very very thin bubble wall
- }
- texture{
- spotted // for the oily swirl on the surface.
- turbulence 0.8 // mix it up pretty good.
- ior 1.075 // bend the light just ever so slightly.
- specular 1.0 // the surface is both shiny and ->
- roughness 0.001 // dull at the same time ->
- reflection 0.01 // wierd huh?...
- phong 0.25 // make sure the phong is not overpowering.
- phong_size 20 // the phong mostly exposes the outline of the bubble.
- colour_map { // here's the red/blue/green oily swirl color map.
- [0.000 0.333 colour red 1.000 green 0.970 blue 0.970 alpha 1
- colour red 0.970 green 0.970 blue 1.000 alpha 1]
- [0.333 0.666 colour red 0.970 green 0.970 blue 1.000 alpha 1
- colour red 0.970 green 1.000 blue 0.970 alpha 1]
- [0.666 1.000 colour red 0.970 green 1.000 blue 0.970 alpha 1
- colour red 1.000 green 0.970 blue 0.970 alpha 1]
- }
- }
- bounded_by { sphere { <0 0 0> 5.1} }
- }
-
- object {
- plane { <0 1 0> -6 }
- texture {
- checker color Gray50 color Gray55
- scale <10 10 10>
- ambient 0.3
- }
- }
-
- object {
- light_source{<0 15 -20> color White
- }
- }
-
- object {
- light_source{<0 15 20> color White
- }
- }
-
- object {
- light_source{<0 15 80> color White
- }
- }
-