home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / polyray / dat / animate / robarm / robtex.inc < prev    next >
Encoding:
Text File  |  1992-10-10  |  1.6 KB  |  75 lines
  1. define position_cylindrical 3
  2. define position_objectx 1
  3. define lookup_sawtooth 1
  4.  
  5. //
  6. // Some metallic surfaces
  7. //
  8. define brass_color  <0.71, 0.65, 0.26>
  9. define copper_color <0.72, 0.45, 0.20>
  10. define bronze_color <0.55, 0.47, 0.14>
  11. define silver_color <0.90, 0.91, 0.98>
  12.  
  13. define brass
  14. texture {
  15.    surface {
  16.       color brass_color
  17.       ambient 0.2
  18.       diffuse 0.7
  19.       specular brass_color, 0.75
  20.       microfacet Phong 10
  21.       reflection 0.75
  22.       }
  23.    }
  24.  
  25. define chrome
  26. texture {
  27.    surface {
  28.       color silver_color
  29.       ambient 0.2
  30.       diffuse 0.7
  31.       specular silver_color, 0.75
  32.       microfacet Phong 5
  33.       reflection 0.2
  34.       }
  35.    }
  36.  
  37. define light_wood
  38. texture {
  39.    noise surface {
  40.       ambient 0.2
  41.       diffuse 0.7
  42.       specular white, 0.5
  43.       microfacet Reitz 10
  44.       position_fn position_cylindrical
  45.       position_scale 1
  46.       lookup_fn lookup_sawtooth
  47.       octaves 3
  48.       turbulence 1
  49.       color_map(
  50.          [0.0, 0.8, <1, 0.72, 0.25>, <1, 0.72, 0.25>]
  51.          [0.8, 1.0, <0.5, 0.5, 0.07>, <0.4, 0.4, 0.035>])
  52.       }
  53.    scale <0.4, 0.4, 0.4>
  54.    }
  55.  
  56. define jade
  57. texture {
  58.    noise surface {
  59.       color white
  60.       ambient 0.3
  61.       diffuse 0.8
  62.       specular 0.3
  63.       microfacet Reitz 5
  64.       position_fn position_objectx
  65.       lookup_fn   lookup_sawtooth
  66.       octaves     3
  67.       turbulence  3
  68.       color_map(
  69.          [0.0, 0.8, <0.1, 0.6, 0.1>, <0.0, 0.3, 0.0>]
  70.          [0.8, 1.0, <0.1, 0.6, 0.1>, <0.0, 0.2, 0.0>])
  71.       }
  72.     rotate <80, 0, 0>
  73.     scale <0.5, 0.5, 0.5>
  74.    }
  75.