home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / X / mit / demos / gpc / objects / fourv.vrb < prev    next >
Encoding:
Text File  |  1991-02-13  |  2.0 KB  |  98 lines
  1. %-----------------------------------------------------------------------
  2. |    Sample File ngca1.vrb
  3. |    Display a index_polygons3 cube
  4. |
  5. |    That is tranformed by the contents of Matrix entry 0
  6. |
  7. |    Sample BIF Verb File
  8. -----------------------------------------------------------------------%
  9.  
  10. read_geometry_file "ncga1.geo" "gen.geo" "qm.geo" "tri.geo";
  11.  
  12. identity3 0;
  13. view_mapping3 1 -1.73 1.73 -1.73 1.73 perspective 0 0 3.4 2 -2 ;
  14. define_view_specification 1 0 1 xy_clip front_clip back_clip 0 .5 0 .5;
  15. define_view_specification 2 0 1 xy_clip front_clip back_clip .5 1.0 .0 0.5;
  16. define_view_specification 3 0 1 xy_clip front_clip back_clip .0 0.5 .5 1.0;
  17. define_view_specification 4 0 1 xy_clip front_clip back_clip .5 1.0 .5 1.0;
  18.  
  19.  
  20. identity3 0;
  21. identity3 5;
  22. identity3 10;
  23. identity3 20;
  24.  
  25. rotate_xyz3 21 -3 5 -7 replace;
  26. rotate_xyz3 11 3 5 7 replace;
  27. rotate_xyz3 6 10 0 0 replace;
  28. rotate_xyz3 1 0 1 0 replace;
  29.  
  30. hlhs_removal hlhs_enable;
  31.  
  32.  
  33. interior_style solid;
  34.  
  35.  
  36. define_light 1 1 1 1;
  37.  
  38. define_light
  39.     3
  40.     1 1 1
  41.     directional_light { -1 0 0 };
  42.  
  43. define_light
  44.     4
  45.     1 1 1
  46.     directional_light { 0  0 -1 };
  47.  
  48. define_light
  49.     6
  50.     1 1 1
  51.     directional_light { -1 -1 -1 };
  52.  
  53.  
  54. %
  55.     surface_properties .0 1. 1. 1 1 1 3 0;
  56.     interior_shading 2;
  57. %
  58. interior_lighting 3;
  59.  
  60. begin_test 180;
  61.     define_light
  62.         5
  63.         1 1 1
  64.         directional_light { 0 -1 0 }
  65.         ld_transform { 5 };
  66.  
  67. light_state activate_list{1} deactivate_list{} ;
  68. surface_properties .5 1. 1. 1 1 1 10 0;
  69.  
  70.     active_view 1;
  71.     interior_shading 2;
  72.     light_state activate_list{3} deactivate_list{} ;
  73.     execute_structure 2;
  74.  
  75.     active_view 2;
  76.     interior_shading 1;
  77.     light_state activate_list{4} deactivate_list{3} ;
  78.     execute_structure 20;
  79.  
  80.     active_view 3;
  81.     interior_shading 2;
  82.     light_state activate_list{5} deactivate_list{4} ;
  83.     execute_structure 1;
  84.  
  85.  
  86.     active_view 4;
  87.     light_state activate_list{6} deactivate_list{5} ;
  88.     interior_shading 2;
  89.     interior_lighting 4;
  90.     execute_structure 3;
  91.  
  92.     concat_matrix3  6  5 postconcat;
  93.     concat_matrix3  1  0 postconcat;
  94.     concat_matrix3 11 10 preconcat;
  95.     concat_matrix3 21 20 preconcat;
  96. end_test;
  97.  
  98.