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