home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / X / mit / demos / gpc / tests / specular.v12 < prev    next >
Encoding:
Text File  |  1991-02-13  |  32.1 KB  |  739 lines

  1. %
  2. /*--------------------------------------------------------------------*\
  3. |
  4. |   Copyright (c)1989,1990 National Computer Graphics Association
  5. |
  6. |       Permission is granted to any individual or instititution 
  7. |  to use, copy, or redistribute this software so long as it is not
  8. |    sold for profit, provided this copyright notice is retained.
  9. |
  10. |                         Developed for the
  11. |               National Computer Graphics Association
  12. |                        2722 Merrilee Drive
  13. |                         Fairfax, VA  22031
  14. |                           (703) 698-9600
  15. |
  16. |                                 by
  17. |                SimGraphics Engineering Corporation
  18. |                   1137 Huntington Drive, Suite A
  19. |                      South Pasadena, CA  91030
  20. |                           (213) 255-0900
  21. |---------------------------------------------------------------------
  22. |
  23. | Author    :    SimGraphics Engineering Corporation
  24. | File          :    specular.v12
  25. | Date          :    Fri Sep 28 11:46:32 MDT 1990
  26. | Project       :    Picture Level Benchmark
  27. | Description    :    See specular.doc
  28. | Status    :    Version 1.00
  29. | Revisions     :    Rev 1.0 by HP/DAC
  30. |
  31. \*--------------------------------------------------------------------*/
  32. %
  33.     Configuration rgb double_buffer true_color  ; 
  34.     Read_geometry_file "dst.d11";
  35.     Specify_report_file "specular.r12";
  36.     Default_view_specification  1  500 perspective;
  37.     Active_view  1  ; 
  38.  
  39. % ****************************************************************** %
  40. % Set up static attributes                                           %
  41. % ****************************************************************** %
  42.     HLHS_Removal hlhs_enable ;
  43.     Text_prec Stroke ;
  44.     Char_exp  1 ;
  45.     Text_color  1  1  1 ;
  46.     char_height  30 ;
  47.     Background_color    0.300000  0.300000  0.800000 ;
  48.     Interior_style solid ;
  49.     Interior_color  1  1  1 ;
  50.     Backface_interior_color  1  1  1 ;
  51.     Interior_lighting  4 ;    % (specular) %
  52.     Backface_processing  1  0 ;    % backface_identify but cull_none %
  53.     Edge_flag disable ;
  54.     Surface_approximation_criteria 1 4.00000 4.00000 ;
  55.  
  56. % ****************************************************************** %
  57. % Set up matrix for position geometry on the screen                  %
  58. % ****************************************************************** %
  59.     Translate3  0  -375   400  0 Replace  ;   % Set Initial position  %
  60.     Push_matrix3  ;                           % Push Initial position %
  61.  
  62.     Translate3  1   250     0     0 Replace  ;  % Set Column offset       %
  63.     Translate3  2     0  -200     0 Replace  ;  % Set Row offset          %
  64.     Translate3  3   -20    20  -100 Replace  ;  % Set back sphere offset  %
  65.     Translate3  4    20   -20   100 Replace  ;  % Set front sphere offset %
  66.  
  67. % ****************************************************************** %
  68. % Create a ramped light table                                        %
  69. % ****************************************************************** %
  70.     Define_light
  71.       % Index in light source table   %  1
  72.       % Light source color components %  1.000000    0.000000    0.000000
  73.       % Non-directional light source  %  Ambient_light
  74.      ; 
  75.     Define_light
  76.       % Index in light source table   %  2
  77.       % Light source color components %  0.500000    1.000000    0.500000
  78.       % Directional     light source  %  Directional_light {
  79.       % Direction                     %  1           1          -1       }
  80.     ;
  81.     Define_light
  82.       % Index in light source table   %  3
  83.       % Light source color components %  0.500000    0.500000    1.000000
  84.       % Positional      light source  %  Positional_light {
  85.       % Position                      %  0           100         200
  86.       % Attenuation                   %  0.500000    0.005000            }
  87.     ;                        
  88.     Define_light
  89.       % Index in light source table   %  4
  90.       % Light source color components %  1.000000    0.500000    0.500000
  91.       % Spot            light source  %  Spot_light      {
  92.       % Position                      %  0          -100         500
  93.       % Direction                     %  0           0           -1
  94.       % Concentration                 %  10.00000
  95.       % Spread angle in degrees       %  32
  96.       % Attenuation                   %  1.000000    0.000000            }
  97.     ;                        
  98.  
  99. % ****************************************************************** %
  100. %                                                                    % 
  101. %                                                                    % 
  102. %                        Begin Test Loop                             % 
  103. %                                                                    % 
  104. % ****************************************************************** %
  105. Begin_test  1  ; 
  106.     Text3  -450  -450  0 "Specular Test: NURB true perspective";
  107.     Text3  -450  -495  0 "specular.v12";
  108. % ****************************************************************** % 
  109. %                                                                    % 
  110. %                        Row 1 Column 1                              %
  111. %                                                                    % 
  112. % ****************************************************************** %
  113.   % ********************************************************** %
  114.   % Interior_pattern_index should have no effect               %
  115.   % because Interior_style is SOLID                            %
  116.   % ********************************************************** %
  117.   Interior_pattern_index  1;
  118.   Interior_shading  1;
  119.   Surface_properties
  120.     % Ambient reflection coefficient    %  0.200000
  121.     % Diffuse reflection coefficient    %  0.250000
  122.     % Specular reflection coefficient   %  0.000000
  123.     % Specularity true-color components %  0  0  1
  124.     % Specular exponent                 %  8
  125.     % Transparency coefficient          %  1
  126.   ; 
  127.   Backface_properties
  128.     % Ambient reflection coefficient    %  0.200000
  129.     % Diffuse reflection coefficient    %  0.250000
  130.     % Specular reflection coefficient   %  1.000000
  131.     % Specularity true-color components %  0  0  1
  132.     % Specular exponent                 %  8
  133.     % Transparency coefficient          %  1
  134.   ; 
  135.   Light_state
  136.     activate_list { 1  2}
  137.     deactivate_list { 3}
  138.   ;
  139.  
  140.   % *************************************************************** %
  141.   % Matrix operations to position graphics                          %
  142.   % *************************************************************** %
  143.   Apply_to_global3  0  ;
  144.   Apply_to_local3 3 replace ;
  145.   Execute_structure 20  ;
  146.   Apply_to_local3 4 replace ;
  147.   Execute_structure 21  ;
  148.  
  149. % ****************************************************************** % 
  150. %                                                                    % 
  151. %                        Row 1 Column 2                              %
  152. %                                                                    % 
  153. % ****************************************************************** %
  154.   % ********************************************************** %
  155.   % Interior_pattern_index should have no effect               %
  156.   % because Interior_style is SOLID                            %
  157.   % ********************************************************** %
  158.   Interior_pattern_index  2;
  159.   Interior_shading  2;
  160.   Surface_properties
  161.     % Ambient reflection coefficient    %  0.200000
  162.     % Diffuse reflection coefficient    %  0.250000
  163.     % Specular reflection coefficient   %  0.333333
  164.     % Specularity true-color components %  0  0  1
  165.     % Specular exponent                 %  8
  166.     % Transparency coefficient          %  1
  167.   ; 
  168.   Backface_properties
  169.     % Ambient reflection coefficient    %  0.200000
  170.     % Diffuse reflection coefficient    %  0.250000
  171.     % Specular reflection coefficient   %  0.666667
  172.     % Specularity true-color components %  0  0  1
  173.     % Specular exponent                 %  8
  174.     % Transparency coefficient          %  1
  175.   ; 
  176.  
  177.   % *************************************************************** %
  178.   % Matrix operations to position graphics                          %
  179.   % *************************************************************** %
  180.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  181.   Apply_to_global3  0  ;
  182.   Apply_to_local3 3 replace ;
  183.   Execute_structure 20  ;
  184.   Apply_to_local3 4 replace ;
  185.   Execute_structure 21  ;
  186.  
  187. % ****************************************************************** % 
  188. %                                                                    % 
  189. %                        Row 1 Column 3                              %
  190. %                                                                    % 
  191. % ****************************************************************** %
  192.   % ********************************************************** %
  193.   % Interior_pattern_index should have no effect               %
  194.   % because Interior_style is SOLID                            %
  195.   % ********************************************************** %
  196.   Interior_pattern_index  3;
  197.   Interior_shading  3;
  198.   Surface_properties
  199.     % Ambient reflection coefficient    %  0.200000
  200.     % Diffuse reflection coefficient    %  0.250000
  201.     % Specular reflection coefficient   %  0.666667
  202.     % Specularity true-color components %  0  0  1
  203.     % Specular exponent                 %  8
  204.     % Transparency coefficient          %  1
  205.   ; 
  206.   Backface_properties
  207.     % Ambient reflection coefficient    %  0.200000
  208.     % Diffuse reflection coefficient    %  0.250000
  209.     % Specular reflection coefficient   %  0.333333
  210.     % Specularity true-color components %  0  0  1
  211.     % Specular exponent                 %  8
  212.     % Transparency coefficient          %  1
  213.   ; 
  214.  
  215.   % *************************************************************** %
  216.   % Matrix operations to position graphics                          %
  217.   % *************************************************************** %
  218.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  219.   Apply_to_global3  0  ;
  220.   Apply_to_local3 3 replace ;
  221.   Execute_structure 20  ;
  222.   Apply_to_local3 4 replace ;
  223.   Execute_structure 21  ;
  224.  
  225. % ****************************************************************** % 
  226. %                                                                    % 
  227. %                        Row 1 Column 4                              %
  228. %                                                                    % 
  229. % ****************************************************************** %
  230.   % ********************************************************** %
  231.   % Interior_pattern_index should have no effect               %
  232.   % because Interior_style is SOLID                            %
  233.   % ********************************************************** %
  234.   Interior_pattern_index  4;
  235.   Interior_shading  4;
  236.   Surface_properties
  237.     % Ambient reflection coefficient    %  0.200000
  238.     % Diffuse reflection coefficient    %  0.250000
  239.     % Specular reflection coefficient   %  1.000000
  240.     % Specularity true-color components %  0  0  1
  241.     % Specular exponent                 %  8
  242.     % Transparency coefficient          %  1
  243.   ; 
  244.   Backface_properties
  245.     % Ambient reflection coefficient    %  0.200000
  246.     % Diffuse reflection coefficient    %  0.250000
  247.     % Specular reflection coefficient   %  0.000000
  248.     % Specularity true-color components %  0  0  1
  249.     % Specular exponent                 %  8
  250.     % Transparency coefficient          %  1
  251.   ; 
  252.  
  253.   % *************************************************************** %
  254.   % Matrix operations to position graphics                          %
  255.   % *************************************************************** %
  256.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  257.   Apply_to_global3  0  ;
  258.   Apply_to_local3 3 replace ;
  259.   Execute_structure 20  ;
  260.   Apply_to_local3 4 replace ;
  261.   Execute_structure 21  ;
  262.  
  263. % ****************************************************************** % 
  264. %                                                                    % 
  265. %                        Row 2 Column 1                              %
  266. %                                                                    % 
  267. % ****************************************************************** %
  268.   % ********************************************************** %
  269.   % Interior_pattern_index should have no effect               %
  270.   % because Interior_style is SOLID                            %
  271.   % ********************************************************** %
  272.   Interior_pattern_index  5;
  273.   Interior_shading  1;
  274.   Surface_properties
  275.     % Ambient reflection coefficient    %  0.200000
  276.     % Diffuse reflection coefficient    %  0.250000
  277.     % Specular reflection coefficient   %  0.000000
  278.     % Specularity true-color components %  0  0  1
  279.     % Specular exponent                 %  8
  280.     % Transparency coefficient          %  1
  281.   ; 
  282.   Backface_properties
  283.     % Ambient reflection coefficient    %  0.200000
  284.     % Diffuse reflection coefficient    %  0.250000
  285.     % Specular reflection coefficient   %  1.000000
  286.     % Specularity true-color components %  0  0  1
  287.     % Specular exponent                 %  8
  288.     % Transparency coefficient          %  1
  289.   ; 
  290.   Light_state
  291.     activate_list { 1  3}
  292.     deactivate_list { 2}
  293.   ;
  294.  
  295.   % *************************************************************** %
  296.   % Matrix operations to position graphics                          %
  297.   % *************************************************************** %
  298.   Pop_matrix3  ; 
  299.   Concat_matrix3  2  0 postconcat  ;         % Move down one row %
  300.   Push_matrix3  ; 
  301.   Apply_to_global3  0  ;
  302.   Apply_to_local3 3 replace ;
  303.   Execute_structure 20  ;
  304.   Apply_to_local3 4 replace ;
  305.   Execute_structure 21  ;
  306.  
  307. % ****************************************************************** % 
  308. %                                                                    % 
  309. %                        Row 2 Column 2                              %
  310. %                                                                    % 
  311. % ****************************************************************** %
  312.   % ********************************************************** %
  313.   % Interior_pattern_index should have no effect               %
  314.   % because Interior_style is SOLID                            %
  315.   % ********************************************************** %
  316.   Interior_pattern_index  6;
  317.   Interior_shading  2;
  318.   Surface_properties
  319.     % Ambient reflection coefficient    %  0.200000
  320.     % Diffuse reflection coefficient    %  0.250000
  321.     % Specular reflection coefficient   %  0.333333
  322.     % Specularity true-color components %  0  0  1
  323.     % Specular exponent                 %  8
  324.     % Transparency coefficient          %  1
  325.   ; 
  326.   Backface_properties
  327.     % Ambient reflection coefficient    %  0.200000
  328.     % Diffuse reflection coefficient    %  0.250000
  329.     % Specular reflection coefficient   %  0.666667
  330.     % Specularity true-color components %  0  0  1
  331.     % Specular exponent                 %  8
  332.     % Transparency coefficient          %  1
  333.   ; 
  334.  
  335.   % *************************************************************** %
  336.   % Matrix operations to position graphics                          %
  337.   % *************************************************************** %
  338.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  339.   Apply_to_global3  0  ;
  340.   Apply_to_local3 3 replace ;
  341.   Execute_structure 20  ;
  342.   Apply_to_local3 4 replace ;
  343.   Execute_structure 21  ;
  344.  
  345. % ****************************************************************** % 
  346. %                                                                    % 
  347. %                        Row 2 Column 3                              %
  348. %                                                                    % 
  349. % ****************************************************************** %
  350.   % ********************************************************** %
  351.   % Interior_pattern_index should have no effect               %
  352.   % because Interior_style is SOLID                            %
  353.   % ********************************************************** %
  354.   Interior_pattern_index  1;
  355.   Interior_shading  3;
  356.   Surface_properties
  357.     % Ambient reflection coefficient    %  0.200000
  358.     % Diffuse reflection coefficient    %  0.250000
  359.     % Specular reflection coefficient   %  0.666667
  360.     % Specularity true-color components %  0  0  1
  361.     % Specular exponent                 %  8
  362.     % Transparency coefficient          %  1
  363.   ; 
  364.   Backface_properties
  365.     % Ambient reflection coefficient    %  0.200000
  366.     % Diffuse reflection coefficient    %  0.250000
  367.     % Specular reflection coefficient   %  0.333333
  368.     % Specularity true-color components %  0  0  1
  369.     % Specular exponent                 %  8
  370.     % Transparency coefficient          %  1
  371.   ; 
  372.  
  373.   % *************************************************************** %
  374.   % Matrix operations to position graphics                          %
  375.   % *************************************************************** %
  376.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  377.   Apply_to_global3  0  ;
  378.   Apply_to_local3 3 replace ;
  379.   Execute_structure 20  ;
  380.   Apply_to_local3 4 replace ;
  381.   Execute_structure 21  ;
  382.  
  383. % ****************************************************************** % 
  384. %                                                                    % 
  385. %                        Row 2 Column 4                              %
  386. %                                                                    % 
  387. % ****************************************************************** %
  388.   % ********************************************************** %
  389.   % Interior_pattern_index should have no effect               %
  390.   % because Interior_style is SOLID                            %
  391.   % ********************************************************** %
  392.   Interior_pattern_index  2;
  393.   Interior_shading  4;
  394.   Surface_properties
  395.     % Ambient reflection coefficient    %  0.200000
  396.     % Diffuse reflection coefficient    %  0.250000
  397.     % Specular reflection coefficient   %  1.000000
  398.     % Specularity true-color components %  0  0  1
  399.     % Specular exponent                 %  8
  400.     % Transparency coefficient          %  1
  401.   ; 
  402.   Backface_properties
  403.     % Ambient reflection coefficient    %  0.200000
  404.     % Diffuse reflection coefficient    %  0.250000
  405.     % Specular reflection coefficient   %  0.000000
  406.     % Specularity true-color components %  0  0  1
  407.     % Specular exponent                 %  8
  408.     % Transparency coefficient          %  1
  409.   ; 
  410.  
  411.   % *************************************************************** %
  412.   % Matrix operations to position graphics                          %
  413.   % *************************************************************** %
  414.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  415.   Apply_to_global3  0  ;
  416.   Apply_to_local3 3 replace ;
  417.   Execute_structure 20  ;
  418.   Apply_to_local3 4 replace ;
  419.   Execute_structure 21  ;
  420.  
  421. % ****************************************************************** % 
  422. %                                                                    % 
  423. %                        Row 3 Column 1                              %
  424. %                                                                    % 
  425. % ****************************************************************** %
  426.   % ********************************************************** %
  427.   % Interior_pattern_index should have no effect               %
  428.   % because Interior_style is SOLID                            %
  429.   % ********************************************************** %
  430.   Interior_pattern_index  3;
  431.   Interior_shading  1;
  432.   Surface_properties
  433.     % Ambient reflection coefficient    %  0.200000
  434.     % Diffuse reflection coefficient    %  0.250000
  435.     % Specular reflection coefficient   %  0.000000
  436.     % Specularity true-color components %  0  0  1
  437.     % Specular exponent                 %  8
  438.     % Transparency coefficient          %  1
  439.   ; 
  440.   Backface_properties
  441.     % Ambient reflection coefficient    %  0.200000
  442.     % Diffuse reflection coefficient    %  0.250000
  443.     % Specular reflection coefficient   %  1.000000
  444.     % Specularity true-color components %  0  0  1
  445.     % Specular exponent                 %  8
  446.     % Transparency coefficient          %  1
  447.   ; 
  448.   Light_state
  449.     activate_list { 1  4}
  450.     deactivate_list { 3}
  451.   ;
  452.  
  453.   % *************************************************************** %
  454.   % Matrix operations to position graphics                          %
  455.   % *************************************************************** %
  456.   Pop_matrix3  ; 
  457.   Concat_matrix3  2  0 postconcat  ;         % Move down one row %
  458.   Push_matrix3  ; 
  459.   Apply_to_global3  0  ;
  460.   Apply_to_local3 3 replace ;
  461.   Execute_structure 20  ;
  462.   Apply_to_local3 4 replace ;
  463.   Execute_structure 21  ;
  464.  
  465. % ****************************************************************** % 
  466. %                                                                    % 
  467. %                        Row 3 Column 2                              %
  468. %                                                                    % 
  469. % ****************************************************************** %
  470.   % ********************************************************** %
  471.   % Interior_pattern_index should have no effect               %
  472.   % because Interior_style is SOLID                            %
  473.   % ********************************************************** %
  474.   Interior_pattern_index  4;
  475.   Interior_shading  2;
  476.   Surface_properties
  477.     % Ambient reflection coefficient    %  0.200000
  478.     % Diffuse reflection coefficient    %  0.250000
  479.     % Specular reflection coefficient   %  0.333333
  480.     % Specularity true-color components %  0  0  1
  481.     % Specular exponent                 %  8
  482.     % Transparency coefficient          %  1
  483.   ; 
  484.   Backface_properties
  485.     % Ambient reflection coefficient    %  0.200000
  486.     % Diffuse reflection coefficient    %  0.250000
  487.     % Specular reflection coefficient   %  0.666667
  488.     % Specularity true-color components %  0  0  1
  489.     % Specular exponent                 %  8
  490.     % Transparency coefficient          %  1
  491.   ; 
  492.  
  493.   % *************************************************************** %
  494.   % Matrix operations to position graphics                          %
  495.   % *************************************************************** %
  496.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  497.   Apply_to_global3  0  ;
  498.   Apply_to_local3 3 replace ;
  499.   Execute_structure 20  ;
  500.   Apply_to_local3 4 replace ;
  501.   Execute_structure 21  ;
  502.  
  503. % ****************************************************************** % 
  504. %                                                                    % 
  505. %                        Row 3 Column 3                              %
  506. %                                                                    % 
  507. % ****************************************************************** %
  508.   % ********************************************************** %
  509.   % Interior_pattern_index should have no effect               %
  510.   % because Interior_style is SOLID                            %
  511.   % ********************************************************** %
  512.   Interior_pattern_index  5;
  513.   Interior_shading  3;
  514.   Surface_properties
  515.     % Ambient reflection coefficient    %  0.200000
  516.     % Diffuse reflection coefficient    %  0.250000
  517.     % Specular reflection coefficient   %  0.666667
  518.     % Specularity true-color components %  0  0  1
  519.     % Specular exponent                 %  8
  520.     % Transparency coefficient          %  1
  521.   ; 
  522.   Backface_properties
  523.     % Ambient reflection coefficient    %  0.200000
  524.     % Diffuse reflection coefficient    %  0.250000
  525.     % Specular reflection coefficient   %  0.333333
  526.     % Specularity true-color components %  0  0  1
  527.     % Specular exponent                 %  8
  528.     % Transparency coefficient          %  1
  529.   ; 
  530.  
  531.   % *************************************************************** %
  532.   % Matrix operations to position graphics                          %
  533.   % *************************************************************** %
  534.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  535.   Apply_to_global3  0  ;
  536.   Apply_to_local3 3 replace ;
  537.   Execute_structure 20  ;
  538.   Apply_to_local3 4 replace ;
  539.   Execute_structure 21  ;
  540.  
  541. % ****************************************************************** % 
  542. %                                                                    % 
  543. %                        Row 3 Column 4                              %
  544. %                                                                    % 
  545. % ****************************************************************** %
  546.   % ********************************************************** %
  547.   % Interior_pattern_index should have no effect               %
  548.   % because Interior_style is SOLID                            %
  549.   % ********************************************************** %
  550.   Interior_pattern_index  6;
  551.   Interior_shading  4;
  552.   Surface_properties
  553.     % Ambient reflection coefficient    %  0.200000
  554.     % Diffuse reflection coefficient    %  0.250000
  555.     % Specular reflection coefficient   %  1.000000
  556.     % Specularity true-color components %  0  0  1
  557.     % Specular exponent                 %  8
  558.     % Transparency coefficient          %  1
  559.   ; 
  560.   Backface_properties
  561.     % Ambient reflection coefficient    %  0.200000
  562.     % Diffuse reflection coefficient    %  0.250000
  563.     % Specular reflection coefficient   %  0.000000
  564.     % Specularity true-color components %  0  0  1
  565.     % Specular exponent                 %  8
  566.     % Transparency coefficient          %  1
  567.   ; 
  568.  
  569.   % *************************************************************** %
  570.   % Matrix operations to position graphics                          %
  571.   % *************************************************************** %
  572.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  573.   Apply_to_global3  0  ;
  574.   Apply_to_local3 3 replace ;
  575.   Execute_structure 20  ;
  576.   Apply_to_local3 4 replace ;
  577.   Execute_structure 21  ;
  578.  
  579. % ****************************************************************** % 
  580. %                                                                    % 
  581. %                        Row 4 Column 1                              %
  582. %                                                                    % 
  583. % ****************************************************************** %
  584.   % ********************************************************** %
  585.   % Interior_pattern_index should have no effect               %
  586.   % because Interior_style is SOLID                            %
  587.   % ********************************************************** %
  588.   Interior_pattern_index  1;
  589.   Interior_shading  1;
  590.   Surface_properties
  591.     % Ambient reflection coefficient    %  0.200000
  592.     % Diffuse reflection coefficient    %  0.250000
  593.     % Specular reflection coefficient   %  0.000000
  594.     % Specularity true-color components %  0  0  1
  595.     % Specular exponent                 %  8
  596.     % Transparency coefficient          %  1
  597.   ; 
  598.   Backface_properties
  599.     % Ambient reflection coefficient    %  0.200000
  600.     % Diffuse reflection coefficient    %  0.250000
  601.     % Specular reflection coefficient   %  1.000000
  602.     % Specularity true-color components %  0  0  1
  603.     % Specular exponent                 %  8
  604.     % Transparency coefficient          %  1
  605.   ; 
  606.   Light_state
  607.     activate_list   { 1  2  3  4}
  608.     deactivate_list { }
  609.   ;
  610.  
  611.   % *************************************************************** %
  612.   % Matrix operations to position graphics                          %
  613.   % *************************************************************** %
  614.   Pop_matrix3  ; 
  615.   Concat_matrix3  2  0 postconcat  ;         % Move down one row %
  616.   Push_matrix3  ; 
  617.   Apply_to_global3  0  ;
  618.   Apply_to_local3 3 replace ;
  619.   Execute_structure 20  ;
  620.   Apply_to_local3 4 replace ;
  621.   Execute_structure 21  ;
  622.  
  623. % ****************************************************************** % 
  624. %                                                                    % 
  625. %                        Row 4 Column 2                              %
  626. %                                                                    % 
  627. % ****************************************************************** %
  628.   % ********************************************************** %
  629.   % Interior_pattern_index should have no effect               %
  630.   % because Interior_style is SOLID                            %
  631.   % ********************************************************** %
  632.   Interior_pattern_index  2;
  633.   Interior_shading  2;
  634.   Surface_properties
  635.     % Ambient reflection coefficient    %  0.200000
  636.     % Diffuse reflection coefficient    %  0.250000
  637.     % Specular reflection coefficient   %  0.333333
  638.     % Specularity true-color components %  0  0  1
  639.     % Specular exponent                 %  8
  640.     % Transparency coefficient          %  1
  641.   ; 
  642.   Backface_properties
  643.     % Ambient reflection coefficient    %  0.200000
  644.     % Diffuse reflection coefficient    %  0.250000
  645.     % Specular reflection coefficient   %  0.666667
  646.     % Specularity true-color components %  0  0  1
  647.     % Specular exponent                 %  8
  648.     % Transparency coefficient          %  1
  649.   ; 
  650.  
  651.   % *************************************************************** %
  652.   % Matrix operations to position graphics                          %
  653.   % *************************************************************** %
  654.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  655.   Apply_to_global3  0  ;
  656.   Apply_to_local3 3 replace ;
  657.   Execute_structure 20  ;
  658.   Apply_to_local3 4 replace ;
  659.   Execute_structure 21  ;
  660.  
  661. % ****************************************************************** % 
  662. %                                                                    % 
  663. %                        Row 4 Column 3                              %
  664. %                                                                    % 
  665. % ****************************************************************** %
  666.   % ********************************************************** %
  667.   % Interior_pattern_index should have no effect               %
  668.   % because Interior_style is SOLID                            %
  669.   % ********************************************************** %
  670.   Interior_pattern_index  3;
  671.   Interior_shading  3;
  672.   Surface_properties
  673.     % Ambient reflection coefficient    %  0.200000
  674.     % Diffuse reflection coefficient    %  0.250000
  675.     % Specular reflection coefficient   %  0.666667
  676.     % Specularity true-color components %  0  0  1
  677.     % Specular exponent                 %  8
  678.     % Transparency coefficient          %  1
  679.   ; 
  680.   Backface_properties
  681.     % Ambient reflection coefficient    %  0.200000
  682.     % Diffuse reflection coefficient    %  0.250000
  683.     % Specular reflection coefficient   %  0.333333
  684.     % Specularity true-color components %  0  0  1
  685.     % Specular exponent                 %  8
  686.     % Transparency coefficient          %  1
  687.   ; 
  688.  
  689.   % *************************************************************** %
  690.   % Matrix operations to position graphics                          %
  691.   % *************************************************************** %
  692.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  693.   Apply_to_global3  0  ;
  694.   Apply_to_local3 3 replace ;
  695.   Execute_structure 20  ;
  696.   Apply_to_local3 4 replace ;
  697.   Execute_structure 21  ;
  698.  
  699. % ****************************************************************** % 
  700. %                                                                    % 
  701. %                        Row 4 Column 4                              %
  702. %                                                                    % 
  703. % ****************************************************************** %
  704.   % ********************************************************** %
  705.   % Interior_pattern_index should have no effect               %
  706.   % because Interior_style is SOLID                            %
  707.   % ********************************************************** %
  708.   Interior_pattern_index  4;
  709.   Interior_shading  4;
  710.   Surface_properties
  711.     % Ambient reflection coefficient    %  0.200000
  712.     % Diffuse reflection coefficient    %  0.250000
  713.     % Specular reflection coefficient   %  1.000000
  714.     % Specularity true-color components %  0  0  1
  715.     % Specular exponent                 %  8
  716.     % Transparency coefficient          %  1
  717.   ; 
  718.   Backface_properties
  719.     % Ambient reflection coefficient    %  0.200000
  720.     % Diffuse reflection coefficient    %  0.250000
  721.     % Specular reflection coefficient   %  0.000000
  722.     % Specularity true-color components %  0  0  1
  723.     % Specular exponent                 %  8
  724.     % Transparency coefficient          %  1
  725.   ; 
  726.  
  727.   % *************************************************************** %
  728.   % Matrix operations to position graphics                          %
  729.   % *************************************************************** %
  730.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  731.   Apply_to_global3  0  ;
  732.   Apply_to_local3 3 replace ;
  733.   Execute_structure 20  ;
  734.   Apply_to_local3 4 replace ;
  735.   Execute_structure 21  ;
  736.  
  737. End_test  ; 
  738. Sleep 5 ;
  739.