home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / BICUBE.DAT < prev    next >
Encoding:
Text File  |  1991-09-06  |  1.5 KB  |  73 lines

  1. // Persistence of Vision Raytracer
  2. // Sample quartic file
  3. // by Alexander Enzmann
  4.  
  5.  
  6. #include "shapes.dat"
  7. #include "colors.dat"
  8. #include "textures.dat"
  9.  
  10. // a cubic shape, like a cube with smoothed edges in appearance 
  11. object
  12.    quartic
  13.    < 1.0   0.0   0.0    0.0     0.0   0.0   0.0   0.0   0.0    0.0
  14.      0.0   0.0   0.0    0.0     0.0   0.0   0.0   0.0   0.0    0.0
  15.      1.0   0.0   0.0    0.0     0.0   0.0   0.0   0.0   0.0    0.0
  16.      1.0   0.0   0.0    0.0  -1000.0 >
  17.    rotate <20.0 40.0 30.0>
  18.    end_quartic
  19.    texture
  20.      color CRed
  21.      phong 1.0
  22.      phongsize 10
  23.      ambient 0.2
  24.      diffuse 0.8
  25.    end_texture
  26.    rotate <-45 0 0>
  27.    translate <0 0 20>
  28.    color CRed
  29. end_object
  30.  
  31. // Put down checkered floor 
  32. {
  33. object
  34.    plane <0.0  1.0  0.0> -20.0 end_plane
  35.    texture
  36.       checker colour NavyBlue colour MidnightBlue
  37.       scale < 20.0 20.0 20.0 >
  38.       ambient 0.8
  39.       diffuse 0.2
  40.    end_texture
  41. end_object
  42. }
  43. view_point
  44.    location  <0.0  2.0 -10.0>
  45.    look_at   <0.0  0.0   0.0>
  46.    up        <0.0  1.0   0.0>
  47.    right     <1.33 0.0   0.0>
  48. end_view_point
  49.  
  50. object
  51.    sphere<0.0 0.0 0.0> 1 end_sphere
  52.    translate <50 100 0>
  53.    texture
  54.      colour White
  55.      ambient 1.0
  56.      diffuse 0.0
  57.    end_texture
  58.    light_source
  59.    colour White
  60. end_object
  61.  
  62. object
  63.    sphere <0.0 0.0 0.0> 1 end_sphere
  64.    translate <-200 30 -300>
  65.    texture
  66.      colour White
  67.      ambient 1.0
  68.      diffuse 0.0
  69.    end_texture
  70.    light_source
  71.    colour White
  72. end_object
  73.