home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / raytrace / rayslide / rayslide.lha / ray-slides / ray / pacbw.ray < prev    next >
Encoding:
Text File  |  1992-09-13  |  968 b   |  39 lines
  1. /* RAYSHADE source file for simple Pacman */
  2. /* but without the fancy marble floor */
  3.  
  4. eyep 1 -8 2    /* Move just off center so we can
  5.            see inside his mouth */
  6.  
  7. surface mirror ambient .01 .01 .01
  8.     diffuse .5 .05 .05
  9.     specular .8 .8 .8 specpow 20 reflect .1
  10.  
  11. /* Main body */
  12. difference sphere diffuse 1 1 0   2   0 0 0
  13.  box 0 0 0   4 -4 4   rotate 0 1 0   45   translate 0 2 0
  14. end
  15.  
  16. /* Give him a bright red tongue */
  17. intersect cone diffuse 1 0 0   2   0 0 -1.4   1   2.9 0 -1.4
  18.     rotate 0 1 0   45
  19.  box 0 0 0   4 -4 4   rotate 0 1 0   45    translate 0 2 0
  20. end
  21.  
  22. /* Lay the background */
  23. plane diffuse .8 .8 .8   0 0 -5   0 0 1
  24. plane diffuse 1 1 1   0 35 0   0 -1 0
  25.  
  26. /* Give him an eye */
  27. sphere specular .8 .8 .8 specpow 20 reflect .95
  28.     diffuse .01 .01 .01   .2   0 -1.4 1.4
  29.  
  30. /* Lay out the food */
  31. applysurf mirror
  32. sphere .25   2.4 0 0
  33. sphere .25   2.4 5 0
  34. sphere .25   2.4 10 0
  35. sphere .25   2.4 15 0
  36. sphere .25   2.4 20 0
  37. sphere .25   2.4 25 0
  38. sphere .25   2.4 30 0
  39.