home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 90 / CD Actual 90.iso / Software3D / VirtualLight / VLight1.3win32.exe / Examples / Level1 / Defshaders.vs < prev    next >
Encoding:
Text File  |  2002-10-07  |  325 b   |  9 lines

  1. ReadArchive "statics.vib"
  2.  
  3. Declare ground = Shader [ PlainSurface [ Color '.9,.95,.95' Kd 0.9 ] ]
  4.  
  5. Declare primitive = Shader [ PlainSurface [ Color '.96, .8, .69' Kd 0.85 Ks(0.25,'1,1,1') Kr 0.1 BlinnSpecularBRDF 10 ] ]
  6.  
  7. Declare infocus = Shader [ PlainSurface [ Color '1, 0, 0' Kd 0.95 ] ]
  8.  
  9. static i = '.65,.65,.65'