POV-Ray : Newsgroups : povray.text.scene-files : Height Field Tiles - Tile B Server Time
22 Dec 2024 18:24:41 EST (-0500)
  Height Field Tiles - Tile B (Message 1 to 1 of 1)  
From: Bill Naylor
Subject: Height Field Tiles - Tile B
Date: 7 Jun 2003 11:41:09
Message: <3EE20794.4030900@hotmail.com>
/*
  This is not part of the code
Here is the code as requested.  Thanks for asking!!
Height Field jpg's to be posted on p.b.images  7JUN2003
It's probably a good idea to put them in the same folder with this code, 
but regardless,
you'll need to change the path so POV knows where the images are.

Good Luck,

Bill
Code follows this line. */

#include "Stones.inc"
#include "Colors.inc"
   

   camera {
 location <1500, 3000, -10>
   right x*image_width/image_height
 look_at <1500, 5, 0>  
   }


   light_source {<1000, 5000, 3000> rgb <.93, .95, .97>}
   light_source {<1500, 300, 1500> rgb 0.8}
   light_source {<1500, 300, -200> rgb 0.8 }
   light_source {<10, 500, 30> rgb <.3, .5, .7>  }
   light_source {<3000, 500, 30> rgb <.3, .5, .7>  }

sky_sphere {
  pigment {
    gradient y
    color_map { [0.0 color rgb <0.7,0.7,1.0>] [1.0 color blue 0.5] }
  }
}


#declare TileB =
union {

height_field { // frame and swirl
 jpeg "D:\Images\POVRenders\POVcode\Fractint\HFs\BWFR006"
  smooth
  texture { T_Grnt14 scale 0.25 } // texture
 scale <3000, 130, 3000>
 translate -1500*z
 translate -129*y
 } // HF

height_field { // rough rock base
 jpeg "D:\Images\POVRenders\POVcode\Fractint\HFs\BWFR029"
  smooth
 texture { T_Grnt14 scale 0.25 } // texture
 scale <4000, -110, 3000>  // <3000, -130, 3000> for square tile
 translate -1500*z
 translate -500*x  // for rectangle only
// translate -64*y
} // HF

height_field {  // rosette
 jpeg "D:\Images\POVRenders\POVcode\Fractint\HFs\BWFR024"
  smooth
 texture { T_Grnt14 scale 0.25 } // texture
 scale <875, -123, 875>
 translate 1125*x
 translate -437.5*z
// translate -84*y
} // HF

 } // union
                
                
object {TileB }


Post a reply to this message

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