home *** CD-ROM | disk | FTP | other *** search
/ World of Graphics / WOGRAPH.BIN / 510.CLIP6.V < prev    next >
Text File  |  1992-02-23  |  1KB  |  58 lines
  1.  
  2. //      clip.v -- test out clipping cones
  3.  
  4. #include color.vc
  5.  
  6. studio {
  7.     from 1 -6 4
  8.     at 0 0 0
  9.     up 0 0 1
  10.     angle 35
  11.     res 640 480
  12.     antialias adaptive
  13.     aspect 4/3
  14.     background {
  15.         greys.map
  16.     }
  17.     ambient white * .2
  18. }
  19.  
  20. light {
  21.     type point
  22.     falloff 0
  23.     position 1 -.5 5
  24.     color white * .5
  25. }
  26. light {
  27.     type point
  28.     falloff 0
  29.     position -2 -4 5
  30.     color white * .5
  31. }
  32.  
  33. //      base surface
  34.  
  35. surface {
  36.     diff plum * .5          // dark plum
  37. }
  38. ring { center 0 0 0 normal 0 0 1 radius 1000
  39.     clip { apex -2 0 0 base 2 0 0 radius .3 outside }
  40.     clip { apex -2 1 .2 base 2 1 -.2 radius .3 outside }
  41.     clip { apex -2 -1 -.5 base 2 -1 .5 radius .3 outside }
  42. }
  43.  
  44. transform { rotate 0 30 0 }
  45.  
  46. surf { diff 0 .5 1 }
  47. ring { center 0 0 0 normal 0 0 1 radius 1000
  48.     clip { apex -2 0 0 base 2 0 0 radius .3 inside }
  49. }
  50. ring { center 0 0 0 normal 0 0 1 radius 1000
  51.     clip { apex -2 1 .2 base 2 1 -.2 radius .3 inside }
  52. }
  53. ring { center 0 0 0 normal 0 0 1 radius 1000
  54.     clip { apex -2 -1 -.5 base 2 -1 .5 radius .3 inside }
  55. }
  56.  
  57.  
  58.