home *** CD-ROM | disk | FTP | other *** search
/ World of Graphics / WOGRAPH.BIN / 519.CHALK.VO < prev    next >
Text File  |  1992-02-13  |  1KB  |  66 lines
  1.  
  2. //      pool chalk, centered at 0 0 0
  3.  
  4. //      paper wrap
  5.  
  6. surf { diff 1 .2 .2 }
  7.  
  8. //      bottom
  9.  
  10. polygon { points 4
  11.     vertex -.5 -.5 0
  12.     vertex  .5 -.5 0
  13.     vertex  .5  .5 0
  14.     vertex -.5  .5 0
  15. }
  16.  
  17. //      sides
  18.  
  19. polygon { points 4
  20.     vertex -.5 -.5 0
  21.     vertex -.5 -.5 1
  22.     vertex  .5 -.5 1
  23.     vertex  .5 -.5 0
  24. }
  25. polygon { points 4
  26.     vertex -.5 -.5 0
  27.     vertex -.5 -.5 1
  28.     vertex -.5  .5 1
  29.     vertex -.5  .5 0
  30. }
  31. polygon { points 4
  32.     vertex  .5  .5 0
  33.     vertex  .5  .5 1
  34.     vertex  .5 -.5 1
  35.     vertex  .5 -.5 0
  36. }
  37. polygon { points 4
  38.     vertex  .5  .5 0
  39.     vertex  .5  .5 1
  40.     vertex -.5  .5 1
  41.     vertex -.5  .5 0
  42. }
  43.  
  44. //      blue chalk surface
  45.  
  46. surf {
  47.     diff .1 .3 .8
  48.     fuzz .1
  49. //        shine 5 white * .2
  50. }
  51. ring {
  52.     center 0 0 1 normal 0 0 1 min_radius .3 max_radius .8
  53.     clip { center -.5 0 0 normal  1 0 0 }
  54.     clip { center  .5 0 0 normal -1 0 0 }
  55.     clip { center 0 -.5 0 normal 0  1 0 }
  56.     clip { center 0  .5 0 normal 0 -1 0 }
  57. }
  58. sphere {
  59.     center 0 0 1.2
  60.     radius sqrt((.2*.2) + (.3*.3))
  61.     clip { center 0 0 1 normal 0 0 -1 }
  62. }
  63.  
  64.  
  65.  
  66.