home *** CD-ROM | disk | FTP | other *** search
/ Stone Design / Stone Design.iso / Stone_Friends / Wave / WavesWorld / Source / Shaders / TexturingAndModeling:AProceduralApproach / DPShaders / DPPerturb.sl < prev    next >
Encoding:
Text File  |  1995-03-22  |  241 b   |  14 lines

  1. #include "proctext.h"
  2.  
  3. surface
  4. DPPerturb ()
  5. {
  6.     point Psh;
  7.     float ss, tt;
  8.  
  9.     Psh = transform("shader", P) * 0.2;
  10.     ss = s + 0.1 * snoise(Psh);
  11.     tt = t + 0.05 * snoise(Psh+(1.5,6.7,3.4));
  12.     Ci = texture("example.tx", ss, tt);
  13. }
  14.