home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / polyray / dat / texture / lapis.pi < prev    next >
Encoding:
Text File  |  1994-01-28  |  654 b   |  29 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3.  
  4. // Set up the camera
  5. viewpoint {
  6.    from <0,2,-6>
  7.    at <0,0,0>
  8.    up <0,1,0>
  9.    angle 20
  10.    resolution 256, 256
  11.    }
  12.  
  13. background midnight_blue
  14. light <-10, 8, -10>
  15. light < 10, 8, -10>
  16.  
  17. include "../colors.inc"
  18. include "lapis.inc"
  19.  
  20. static define lapis_layer3_fn noise(5*P, 2)
  21. static define lapis_layer1_fn noise(15*P, 5)
  22. define Lapis_Lazuli
  23. texture {
  24.    layered
  25.       texture { special shiny { color lapis_layer2[lapis_layer3_fn] } },
  26.       texture { special shiny { color lapis_layer1[lapis_layer1_fn] } }
  27.    }
  28. object { sphere <0, 0, 0>, 1 Lapis_Lazuli }
  29.