home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / polyray / dat / misc / dnoise.pi < prev    next >
Encoding:
Text File  |  1992-09-20  |  1.1 KB  |  67 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3.  
  4. // Set up the camera
  5. viewpoint {
  6.    from <0, 0, -8>
  7.    at   <0, 0,  0>
  8.    up   <0, 1,  0>
  9.    angle 45
  10.    hither 1
  11.    resolution 256, 256
  12.    }
  13.  
  14. include "..\colors.inc"
  15. background <0, 0, 0>
  16. light <-20, 5, -20>
  17. light < 20, 5, -20>
  18.  
  19. define bumpy_red
  20. texture {
  21.    noise surface {
  22.       color <1.0, 0.3, 0.3>
  23.       normal 1
  24.       frequency 2
  25.       bump_scale 2
  26.       ambient 0.1
  27.       diffuse 0.5
  28.       specular white, 0.7
  29.       microfacet Reitz 10
  30.       }
  31.    scale <0.3, 0.3, 0.3>
  32.    }
  33.  
  34. define rippled_red
  35. texture {
  36.    noise surface {
  37.       color <1.0, 0.3, 0.3>
  38.       normal 2
  39.       frequency 20
  40.       bump_scale 2
  41.       ambient 0.1
  42.       diffuse 0.5
  43.       specular white, 0.7
  44.       microfacet Reitz 10
  45.       }
  46.    translate <-4, 0, 0>
  47.    }
  48.  
  49. define dented_red
  50. texture {
  51.    noise surface {
  52.       color <1.0, 0.3, 0.3>
  53.       normal 3
  54.       octaves 2
  55.       turbulence 3
  56.       ambient 0.1
  57.       diffuse 0.5
  58.       specular white, 0.7
  59.       microfacet Reitz 10
  60.       }
  61.    }
  62.  
  63. object {
  64.    sphere <0, 0, 0>, 2
  65.    rippled_red
  66.    }
  67.