POV-Ray : Newsgroups : povray.binaries.scene-files : Help with light code : Help with light code Server Time
1 May 2024 01:31:24 EDT (-0400)
  Help with light code  
From: Pedro Graterol
Date: 15 Mar 1999 10:10:23
Message: <36ed22df.0@news.povray.org>
#include "colors.inc" // Standard Color definitions
#include "textures.inc"
#include "finish.inc"

camera
{
  location  <0.0 , 2.0 ,-5.00>
  look_at   <0.0 ,0.5 , 0.0>
}

light_source {<0,0.75,0>Turquoise media_attenuation on}
light_source {<-30,100,-30>  Gold}

background { Black}

plane
{
  y,
  -1.0
  hollow on
 texture{ tiles
{
  texture
  {
    pigment { Silver   }
    finish { ambient 0.2 }
  }
  tile2
  texture
  {
    pigment { granite }
    finish { specular 0.3 reflection 0.2 }
  }
}scale 5
}interior {caustics 0.5}
}



 #declare ariadna = texture {
  pigment {
   spiral1 12   //was spiral2
    turbulence 0.8
    //frequency 3
    scale 3
    color_map {
    [0.25 rgbf <1.0, 1.1, 1.0, 0.0>]
    [0.25 rgbf <1.0, 1.0, 1.0, 1.0>]
    [0.75 rgbf <1.0, 1.0, 1.0, 1.0>]
    [0.75 rgbf <1.0, 1.0, 1.0, 0.0>]
  }
    rotate <90,0,0>
  }
}
texture {
  pigment {
    spiral2 12
    turbulence 0.8
    //frequency 3
    scale 3
    color_map {
    [0.25 rgbf <1.0, 1.0, 1.0, 0.0>]
    [0.25 rgbf <1.0, 1.0, 1.0, 1.0>]
    [0.75 rgbf <1.0, 1.0, 1.0, 1.0>]
    [0.75 rgbf <1.0, 1.0, 1.0, 0.0>]
  }
    rotate <0,90,0>   }
  finish {Dull}


#declare base=
sphere{<0,0,0> 1.50 translate<0,1,0> hollow texture {ariadna}interior {ior
1.000292}}
#declare base2=
sphere{<0,0,0> 1.10 translate<0,1,0> hollow rotate 45*y texture {ariadna
rotate 45*y}interior {ior 1.000292}}

#declare esfera=union{

object {base }
object {base2}
}
object {esfera}

cylinder
{
  0*y,  5*y,  0.75

  translate <2.5,-1,-1>
  texture{ tiles
{
  texture      {
    pigment { Silver   }     finish { Mirror }
  }
  tile2
  texture    // full texture of tile #2
  {
    pigment { granite }
    finish { specular 0.3 reflection 0.2 }
  }}}}


cylinder
{
  0*y,  25*y, 4

  translate <-8,-2,22>
  texture{ tiles
{
  texture      {
    pigment { Silver   }     finish { Mirror }
  }
  tile2
  texture      {
    pigment { granite }
    finish { specular 0.3 reflection 0.2 }
  }}}}



--
Marjorie Graterol
http://www.emediez.com


Post a reply to this message

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