home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / X / mit / demos / gpc / tests / specular.v11 < prev    next >
Encoding:
Text File  |  1991-02-13  |  32.1 KB  |  742 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.v11
  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.r11";
  36.     Default_view_specification  1  500 parallel;
  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. % ****************************************************************** %
  69. % Create a ramped light table                                        %
  70. % ****************************************************************** %
  71.     Define_light
  72.       % Index in light source table   %  1
  73.       % Light source color components %  1.000000    0.000000    0.000000
  74.       % Non-directional light source  %  Ambient_light
  75.      ; 
  76.     Define_light
  77.       % Index in light source table   %  2
  78.       % Light source color components %  0.500000    1.000000    0.500000
  79.       % Directional     light source  %  Directional_light {
  80.       % Direction                     %  1           1          -1       }
  81.     ;
  82.     Define_light
  83.       % Index in light source table   %  3
  84.       % Light source color components %  0.500000    0.500000    1.000000
  85.       % Positional      light source  %  Positional_light {
  86.       % Position                      %  0           100         200
  87.       % Attenuation                   %  0.500000    0.005000            }
  88.     ;                        
  89.     Define_light
  90.       % Index in light source table   %  4
  91.       % Light source color components %  1.000000    0.500000    0.500000
  92.       % Spot            light source  %  Spot_light      {
  93.       % Position                      %  0          -100         500
  94.       % Direction                     %  0           0           -1
  95.       % Concentration                 %  10.00000
  96.       % Spread angle in degrees       %  32
  97.       % Attenuation                   %  1.000000    0.000000            }
  98.     ;                        
  99.  
  100.  
  101. % ****************************************************************** %
  102. %                                                                    % 
  103. %                                                                    % 
  104. %                        Begin Test Loop                             % 
  105. %                                                                    % 
  106. % ****************************************************************** %
  107. Begin_test  1  ; 
  108.     Text3  -450  -450  0 "Specular Test: NURB true parallel";
  109.     Text3  -450  -495  0 "specular.v11";
  110.  
  111. % ****************************************************************** % 
  112. %                                                                    % 
  113. %                        Row 1 Column 1                              %
  114. %                                                                    % 
  115. % ****************************************************************** %
  116.   % ********************************************************** %
  117.   % Interior_pattern_index should have no effect               %
  118.   % because Interior_style is SOLID                            %
  119.   % ********************************************************** %
  120.   Interior_pattern_index  1;
  121.   Interior_shading  1;
  122.   Surface_properties
  123.     % Ambient reflection coefficient    %  0.200000
  124.     % Diffuse reflection coefficient    %  0.250000
  125.     % Specular reflection coefficient   %  0.000000
  126.     % Specularity true-color components %  0  0  1
  127.     % Specular exponent                 %  8
  128.     % Transparency coefficient          %  1
  129.   ; 
  130.   Backface_properties
  131.     % Ambient reflection coefficient    %  0.200000
  132.     % Diffuse reflection coefficient    %  0.250000
  133.     % Specular reflection coefficient   %  1.000000
  134.     % Specularity true-color components %  0  0  1
  135.     % Specular exponent                 %  8
  136.     % Transparency coefficient          %  1
  137.   ; 
  138.   Light_state
  139.     activate_list { 1  2}
  140.     deactivate_list { 3}
  141.   ;
  142.  
  143.   % *************************************************************** %
  144.   % Matrix operations to position graphics                          %
  145.   % *************************************************************** %
  146.   Apply_to_global3  0  ;
  147.   Apply_to_local3 3 replace ;
  148.   Execute_structure 20  ;
  149.   Apply_to_local3 4 replace ;
  150.   Execute_structure 21  ;
  151.  
  152. % ****************************************************************** % 
  153. %                                                                    % 
  154. %                        Row 1 Column 2                              %
  155. %                                                                    % 
  156. % ****************************************************************** %
  157.   % ********************************************************** %
  158.   % Interior_pattern_index should have no effect               %
  159.   % because Interior_style is SOLID                            %
  160.   % ********************************************************** %
  161.   Interior_pattern_index  2;
  162.   Interior_shading  2;
  163.   Surface_properties
  164.     % Ambient reflection coefficient    %  0.200000
  165.     % Diffuse reflection coefficient    %  0.250000
  166.     % Specular reflection coefficient   %  0.333333
  167.     % Specularity true-color components %  0  0  1
  168.     % Specular exponent                 %  8
  169.     % Transparency coefficient          %  1
  170.   ; 
  171.   Backface_properties
  172.     % Ambient reflection coefficient    %  0.200000
  173.     % Diffuse reflection coefficient    %  0.250000
  174.     % Specular reflection coefficient   %  0.666667
  175.     % Specularity true-color components %  0  0  1
  176.     % Specular exponent                 %  8
  177.     % Transparency coefficient          %  1
  178.   ; 
  179.  
  180.   % *************************************************************** %
  181.   % Matrix operations to position graphics                          %
  182.   % *************************************************************** %
  183.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  184.   Apply_to_global3  0  ;
  185.   Apply_to_local3 3 replace ;
  186.   Execute_structure 20  ;
  187.   Apply_to_local3 4 replace ;
  188.   Execute_structure 21  ;
  189.  
  190. % ****************************************************************** % 
  191. %                                                                    % 
  192. %                        Row 1 Column 3                              %
  193. %                                                                    % 
  194. % ****************************************************************** %
  195.   % ********************************************************** %
  196.   % Interior_pattern_index should have no effect               %
  197.   % because Interior_style is SOLID                            %
  198.   % ********************************************************** %
  199.   Interior_pattern_index  3;
  200.   Interior_shading  3;
  201.   Surface_properties
  202.     % Ambient reflection coefficient    %  0.200000
  203.     % Diffuse reflection coefficient    %  0.250000
  204.     % Specular reflection coefficient   %  0.666667
  205.     % Specularity true-color components %  0  0  1
  206.     % Specular exponent                 %  8
  207.     % Transparency coefficient          %  1
  208.   ; 
  209.   Backface_properties
  210.     % Ambient reflection coefficient    %  0.200000
  211.     % Diffuse reflection coefficient    %  0.250000
  212.     % Specular reflection coefficient   %  0.333333
  213.     % Specularity true-color components %  0  0  1
  214.     % Specular exponent                 %  8
  215.     % Transparency coefficient          %  1
  216.   ; 
  217.  
  218.   % *************************************************************** %
  219.   % Matrix operations to position graphics                          %
  220.   % *************************************************************** %
  221.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  222.   Apply_to_global3  0  ;
  223.   Apply_to_local3 3 replace ;
  224.   Execute_structure 20  ;
  225.   Apply_to_local3 4 replace ;
  226.   Execute_structure 21  ;
  227.  
  228. % ****************************************************************** % 
  229. %                                                                    % 
  230. %                        Row 1 Column 4                              %
  231. %                                                                    % 
  232. % ****************************************************************** %
  233.   % ********************************************************** %
  234.   % Interior_pattern_index should have no effect               %
  235.   % because Interior_style is SOLID                            %
  236.   % ********************************************************** %
  237.   Interior_pattern_index  4;
  238.   Interior_shading  4;
  239.   Surface_properties
  240.     % Ambient reflection coefficient    %  0.200000
  241.     % Diffuse reflection coefficient    %  0.250000
  242.     % Specular reflection coefficient   %  1.000000
  243.     % Specularity true-color components %  0  0  1
  244.     % Specular exponent                 %  8
  245.     % Transparency coefficient          %  1
  246.   ; 
  247.   Backface_properties
  248.     % Ambient reflection coefficient    %  0.200000
  249.     % Diffuse reflection coefficient    %  0.250000
  250.     % Specular reflection coefficient   %  0.000000
  251.     % Specularity true-color components %  0  0  1
  252.     % Specular exponent                 %  8
  253.     % Transparency coefficient          %  1
  254.   ; 
  255.  
  256.   % *************************************************************** %
  257.   % Matrix operations to position graphics                          %
  258.   % *************************************************************** %
  259.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  260.   Apply_to_global3  0  ;
  261.   Apply_to_local3 3 replace ;
  262.   Execute_structure 20  ;
  263.   Apply_to_local3 4 replace ;
  264.   Execute_structure 21  ;
  265.  
  266. % ****************************************************************** % 
  267. %                                                                    % 
  268. %                        Row 2 Column 1                              %
  269. %                                                                    % 
  270. % ****************************************************************** %
  271.   % ********************************************************** %
  272.   % Interior_pattern_index should have no effect               %
  273.   % because Interior_style is SOLID                            %
  274.   % ********************************************************** %
  275.   Interior_pattern_index  5;
  276.   Interior_shading  1;
  277.   Surface_properties
  278.     % Ambient reflection coefficient    %  0.200000
  279.     % Diffuse reflection coefficient    %  0.250000
  280.     % Specular reflection coefficient   %  0.000000
  281.     % Specularity true-color components %  0  0  1
  282.     % Specular exponent                 %  8
  283.     % Transparency coefficient          %  1
  284.   ; 
  285.   Backface_properties
  286.     % Ambient reflection coefficient    %  0.200000
  287.     % Diffuse reflection coefficient    %  0.250000
  288.     % Specular reflection coefficient   %  1.000000
  289.     % Specularity true-color components %  0  0  1
  290.     % Specular exponent                 %  8
  291.     % Transparency coefficient          %  1
  292.   ; 
  293.   Light_state
  294.     activate_list { 1  3}
  295.     deactivate_list { 2}
  296.   ;
  297.  
  298.   % *************************************************************** %
  299.   % Matrix operations to position graphics                          %
  300.   % *************************************************************** %
  301.   Pop_matrix3  ; 
  302.   Concat_matrix3  2  0 postconcat  ;         % Move down one row %
  303.   Push_matrix3  ; 
  304.   Apply_to_global3  0  ;
  305.   Apply_to_local3 3 replace ;
  306.   Execute_structure 20  ;
  307.   Apply_to_local3 4 replace ;
  308.   Execute_structure 21  ;
  309.  
  310. % ****************************************************************** % 
  311. %                                                                    % 
  312. %                        Row 2 Column 2                              %
  313. %                                                                    % 
  314. % ****************************************************************** %
  315.   % ********************************************************** %
  316.   % Interior_pattern_index should have no effect               %
  317.   % because Interior_style is SOLID                            %
  318.   % ********************************************************** %
  319.   Interior_pattern_index  6;
  320.   Interior_shading  2;
  321.   Surface_properties
  322.     % Ambient reflection coefficient    %  0.200000
  323.     % Diffuse reflection coefficient    %  0.250000
  324.     % Specular reflection coefficient   %  0.333333
  325.     % Specularity true-color components %  0  0  1
  326.     % Specular exponent                 %  8
  327.     % Transparency coefficient          %  1
  328.   ; 
  329.   Backface_properties
  330.     % Ambient reflection coefficient    %  0.200000
  331.     % Diffuse reflection coefficient    %  0.250000
  332.     % Specular reflection coefficient   %  0.666667
  333.     % Specularity true-color components %  0  0  1
  334.     % Specular exponent                 %  8
  335.     % Transparency coefficient          %  1
  336.   ; 
  337.  
  338.   % *************************************************************** %
  339.   % Matrix operations to position graphics                          %
  340.   % *************************************************************** %
  341.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  342.   Apply_to_global3  0  ;
  343.   Apply_to_local3 3 replace ;
  344.   Execute_structure 20  ;
  345.   Apply_to_local3 4 replace ;
  346.   Execute_structure 21  ;
  347.  
  348. % ****************************************************************** % 
  349. %                                                                    % 
  350. %                        Row 2 Column 3                              %
  351. %                                                                    % 
  352. % ****************************************************************** %
  353.   % ********************************************************** %
  354.   % Interior_pattern_index should have no effect               %
  355.   % because Interior_style is SOLID                            %
  356.   % ********************************************************** %
  357.   Interior_pattern_index  1;
  358.   Interior_shading  3;
  359.   Surface_properties
  360.     % Ambient reflection coefficient    %  0.200000
  361.     % Diffuse reflection coefficient    %  0.250000
  362.     % Specular reflection coefficient   %  0.666667
  363.     % Specularity true-color components %  0  0  1
  364.     % Specular exponent                 %  8
  365.     % Transparency coefficient          %  1
  366.   ; 
  367.   Backface_properties
  368.     % Ambient reflection coefficient    %  0.200000
  369.     % Diffuse reflection coefficient    %  0.250000
  370.     % Specular reflection coefficient   %  0.333333
  371.     % Specularity true-color components %  0  0  1
  372.     % Specular exponent                 %  8
  373.     % Transparency coefficient          %  1
  374.   ; 
  375.  
  376.   % *************************************************************** %
  377.   % Matrix operations to position graphics                          %
  378.   % *************************************************************** %
  379.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  380.   Apply_to_global3  0  ;
  381.   Apply_to_local3 3 replace ;
  382.   Execute_structure 20  ;
  383.   Apply_to_local3 4 replace ;
  384.   Execute_structure 21  ;
  385.  
  386. % ****************************************************************** % 
  387. %                                                                    % 
  388. %                        Row 2 Column 4                              %
  389. %                                                                    % 
  390. % ****************************************************************** %
  391.   % ********************************************************** %
  392.   % Interior_pattern_index should have no effect               %
  393.   % because Interior_style is SOLID                            %
  394.   % ********************************************************** %
  395.   Interior_pattern_index  2;
  396.   Interior_shading  4;
  397.   Surface_properties
  398.     % Ambient reflection coefficient    %  0.200000
  399.     % Diffuse reflection coefficient    %  0.250000
  400.     % Specular reflection coefficient   %  1.000000
  401.     % Specularity true-color components %  0  0  1
  402.     % Specular exponent                 %  8
  403.     % Transparency coefficient          %  1
  404.   ; 
  405.   Backface_properties
  406.     % Ambient reflection coefficient    %  0.200000
  407.     % Diffuse reflection coefficient    %  0.250000
  408.     % Specular reflection coefficient   %  0.000000
  409.     % Specularity true-color components %  0  0  1
  410.     % Specular exponent                 %  8
  411.     % Transparency coefficient          %  1
  412.   ; 
  413.  
  414.   % *************************************************************** %
  415.   % Matrix operations to position graphics                          %
  416.   % *************************************************************** %
  417.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  418.   Apply_to_global3  0  ;
  419.   Apply_to_local3 3 replace ;
  420.   Execute_structure 20  ;
  421.   Apply_to_local3 4 replace ;
  422.   Execute_structure 21  ;
  423.  
  424. % ****************************************************************** % 
  425. %                                                                    % 
  426. %                        Row 3 Column 1                              %
  427. %                                                                    % 
  428. % ****************************************************************** %
  429.   % ********************************************************** %
  430.   % Interior_pattern_index should have no effect               %
  431.   % because Interior_style is SOLID                            %
  432.   % ********************************************************** %
  433.   Interior_pattern_index  3;
  434.   Interior_shading  1;
  435.   Surface_properties
  436.     % Ambient reflection coefficient    %  0.200000
  437.     % Diffuse reflection coefficient    %  0.250000
  438.     % Specular reflection coefficient   %  0.000000
  439.     % Specularity true-color components %  0  0  1
  440.     % Specular exponent                 %  8
  441.     % Transparency coefficient          %  1
  442.   ; 
  443.   Backface_properties
  444.     % Ambient reflection coefficient    %  0.200000
  445.     % Diffuse reflection coefficient    %  0.250000
  446.     % Specular reflection coefficient   %  1.000000
  447.     % Specularity true-color components %  0  0  1
  448.     % Specular exponent                 %  8
  449.     % Transparency coefficient          %  1
  450.   ; 
  451.   Light_state
  452.     activate_list { 1  4}
  453.     deactivate_list { 3}
  454.   ;
  455.  
  456.   % *************************************************************** %
  457.   % Matrix operations to position graphics                          %
  458.   % *************************************************************** %
  459.   Pop_matrix3  ; 
  460.   Concat_matrix3  2  0 postconcat  ;         % Move down one row %
  461.   Push_matrix3  ; 
  462.   Apply_to_global3  0  ;
  463.   Apply_to_local3 3 replace ;
  464.   Execute_structure 20  ;
  465.   Apply_to_local3 4 replace ;
  466.   Execute_structure 21  ;
  467.  
  468. % ****************************************************************** % 
  469. %                                                                    % 
  470. %                        Row 3 Column 2                              %
  471. %                                                                    % 
  472. % ****************************************************************** %
  473.   % ********************************************************** %
  474.   % Interior_pattern_index should have no effect               %
  475.   % because Interior_style is SOLID                            %
  476.   % ********************************************************** %
  477.   Interior_pattern_index  4;
  478.   Interior_shading  2;
  479.   Surface_properties
  480.     % Ambient reflection coefficient    %  0.200000
  481.     % Diffuse reflection coefficient    %  0.250000
  482.     % Specular reflection coefficient   %  0.333333
  483.     % Specularity true-color components %  0  0  1
  484.     % Specular exponent                 %  8
  485.     % Transparency coefficient          %  1
  486.   ; 
  487.   Backface_properties
  488.     % Ambient reflection coefficient    %  0.200000
  489.     % Diffuse reflection coefficient    %  0.250000
  490.     % Specular reflection coefficient   %  0.666667
  491.     % Specularity true-color components %  0  0  1
  492.     % Specular exponent                 %  8
  493.     % Transparency coefficient          %  1
  494.   ; 
  495.  
  496.   % *************************************************************** %
  497.   % Matrix operations to position graphics                          %
  498.   % *************************************************************** %
  499.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  500.   Apply_to_global3  0  ;
  501.   Apply_to_local3 3 replace ;
  502.   Execute_structure 20  ;
  503.   Apply_to_local3 4 replace ;
  504.   Execute_structure 21  ;
  505.  
  506. % ****************************************************************** % 
  507. %                                                                    % 
  508. %                        Row 3 Column 3                              %
  509. %                                                                    % 
  510. % ****************************************************************** %
  511.   % ********************************************************** %
  512.   % Interior_pattern_index should have no effect               %
  513.   % because Interior_style is SOLID                            %
  514.   % ********************************************************** %
  515.   Interior_pattern_index  5;
  516.   Interior_shading  3;
  517.   Surface_properties
  518.     % Ambient reflection coefficient    %  0.200000
  519.     % Diffuse reflection coefficient    %  0.250000
  520.     % Specular reflection coefficient   %  0.666667
  521.     % Specularity true-color components %  0  0  1
  522.     % Specular exponent                 %  8
  523.     % Transparency coefficient          %  1
  524.   ; 
  525.   Backface_properties
  526.     % Ambient reflection coefficient    %  0.200000
  527.     % Diffuse reflection coefficient    %  0.250000
  528.     % Specular reflection coefficient   %  0.333333
  529.     % Specularity true-color components %  0  0  1
  530.     % Specular exponent                 %  8
  531.     % Transparency coefficient          %  1
  532.   ; 
  533.  
  534.   % *************************************************************** %
  535.   % Matrix operations to position graphics                          %
  536.   % *************************************************************** %
  537.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  538.   Apply_to_global3  0  ;
  539.   Apply_to_local3 3 replace ;
  540.   Execute_structure 20  ;
  541.   Apply_to_local3 4 replace ;
  542.   Execute_structure 21  ;
  543.  
  544. % ****************************************************************** % 
  545. %                                                                    % 
  546. %                        Row 3 Column 4                              %
  547. %                                                                    % 
  548. % ****************************************************************** %
  549.   % ********************************************************** %
  550.   % Interior_pattern_index should have no effect               %
  551.   % because Interior_style is SOLID                            %
  552.   % ********************************************************** %
  553.   Interior_pattern_index  6;
  554.   Interior_shading  4;
  555.   Surface_properties
  556.     % Ambient reflection coefficient    %  0.200000
  557.     % Diffuse reflection coefficient    %  0.250000
  558.     % Specular reflection coefficient   %  1.000000
  559.     % Specularity true-color components %  0  0  1
  560.     % Specular exponent                 %  8
  561.     % Transparency coefficient          %  1
  562.   ; 
  563.   Backface_properties
  564.     % Ambient reflection coefficient    %  0.200000
  565.     % Diffuse reflection coefficient    %  0.250000
  566.     % Specular reflection coefficient   %  0.000000
  567.     % Specularity true-color components %  0  0  1
  568.     % Specular exponent                 %  8
  569.     % Transparency coefficient          %  1
  570.   ; 
  571.  
  572.   % *************************************************************** %
  573.   % Matrix operations to position graphics                          %
  574.   % *************************************************************** %
  575.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  576.   Apply_to_global3  0  ;
  577.   Apply_to_local3 3 replace ;
  578.   Execute_structure 20  ;
  579.   Apply_to_local3 4 replace ;
  580.   Execute_structure 21  ;
  581.  
  582. % ****************************************************************** % 
  583. %                                                                    % 
  584. %                        Row 4 Column 1                              %
  585. %                                                                    % 
  586. % ****************************************************************** %
  587.   % ********************************************************** %
  588.   % Interior_pattern_index should have no effect               %
  589.   % because Interior_style is SOLID                            %
  590.   % ********************************************************** %
  591.   Interior_pattern_index  1;
  592.   Interior_shading  1;
  593.   Surface_properties
  594.     % Ambient reflection coefficient    %  0.200000
  595.     % Diffuse reflection coefficient    %  0.250000
  596.     % Specular reflection coefficient   %  0.000000
  597.     % Specularity true-color components %  0  0  1
  598.     % Specular exponent                 %  8
  599.     % Transparency coefficient          %  1
  600.   ; 
  601.   Backface_properties
  602.     % Ambient reflection coefficient    %  0.200000
  603.     % Diffuse reflection coefficient    %  0.250000
  604.     % Specular reflection coefficient   %  1.000000
  605.     % Specularity true-color components %  0  0  1
  606.     % Specular exponent                 %  8
  607.     % Transparency coefficient          %  1
  608.   ; 
  609.   Light_state
  610.     activate_list   { 1  2  3  4}
  611.     deactivate_list { }
  612.   ;
  613.  
  614.   % *************************************************************** %
  615.   % Matrix operations to position graphics                          %
  616.   % *************************************************************** %
  617.   Pop_matrix3  ; 
  618.   Concat_matrix3  2  0 postconcat  ;         % Move down one row %
  619.   Push_matrix3  ; 
  620.   Apply_to_global3  0  ;
  621.   Apply_to_local3 3 replace ;
  622.   Execute_structure 20  ;
  623.   Apply_to_local3 4 replace ;
  624.   Execute_structure 21  ;
  625.  
  626. % ****************************************************************** % 
  627. %                                                                    % 
  628. %                        Row 4 Column 2                              %
  629. %                                                                    % 
  630. % ****************************************************************** %
  631.   % ********************************************************** %
  632.   % Interior_pattern_index should have no effect               %
  633.   % because Interior_style is SOLID                            %
  634.   % ********************************************************** %
  635.   Interior_pattern_index  2;
  636.   Interior_shading  2;
  637.   Surface_properties
  638.     % Ambient reflection coefficient    %  0.200000
  639.     % Diffuse reflection coefficient    %  0.250000
  640.     % Specular reflection coefficient   %  0.333333
  641.     % Specularity true-color components %  0  0  1
  642.     % Specular exponent                 %  8
  643.     % Transparency coefficient          %  1
  644.   ; 
  645.   Backface_properties
  646.     % Ambient reflection coefficient    %  0.200000
  647.     % Diffuse reflection coefficient    %  0.250000
  648.     % Specular reflection coefficient   %  0.666667
  649.     % Specularity true-color components %  0  0  1
  650.     % Specular exponent                 %  8
  651.     % Transparency coefficient          %  1
  652.   ; 
  653.  
  654.   % *************************************************************** %
  655.   % Matrix operations to position graphics                          %
  656.   % *************************************************************** %
  657.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  658.   Apply_to_global3  0  ;
  659.   Apply_to_local3 3 replace ;
  660.   Execute_structure 20  ;
  661.   Apply_to_local3 4 replace ;
  662.   Execute_structure 21  ;
  663.  
  664. % ****************************************************************** % 
  665. %                                                                    % 
  666. %                        Row 4 Column 3                              %
  667. %                                                                    % 
  668. % ****************************************************************** %
  669.   % ********************************************************** %
  670.   % Interior_pattern_index should have no effect               %
  671.   % because Interior_style is SOLID                            %
  672.   % ********************************************************** %
  673.   Interior_pattern_index  3;
  674.   Interior_shading  3;
  675.   Surface_properties
  676.     % Ambient reflection coefficient    %  0.200000
  677.     % Diffuse reflection coefficient    %  0.250000
  678.     % Specular reflection coefficient   %  0.666667
  679.     % Specularity true-color components %  0  0  1
  680.     % Specular exponent                 %  8
  681.     % Transparency coefficient          %  1
  682.   ; 
  683.   Backface_properties
  684.     % Ambient reflection coefficient    %  0.200000
  685.     % Diffuse reflection coefficient    %  0.250000
  686.     % Specular reflection coefficient   %  0.333333
  687.     % Specularity true-color components %  0  0  1
  688.     % Specular exponent                 %  8
  689.     % Transparency coefficient          %  1
  690.   ; 
  691.  
  692.   % *************************************************************** %
  693.   % Matrix operations to position graphics                          %
  694.   % *************************************************************** %
  695.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  696.   Apply_to_global3  0  ;
  697.   Apply_to_local3 3 replace ;
  698.   Execute_structure 20  ;
  699.   Apply_to_local3 4 replace ;
  700.   Execute_structure 21  ;
  701.  
  702. % ****************************************************************** % 
  703. %                                                                    % 
  704. %                        Row 4 Column 4                              %
  705. %                                                                    % 
  706. % ****************************************************************** %
  707.   % ********************************************************** %
  708.   % Interior_pattern_index should have no effect               %
  709.   % because Interior_style is SOLID                            %
  710.   % ********************************************************** %
  711.   Interior_pattern_index  4;
  712.   Interior_shading  4;
  713.   Surface_properties
  714.     % Ambient reflection coefficient    %  0.200000
  715.     % Diffuse reflection coefficient    %  0.250000
  716.     % Specular reflection coefficient   %  1.000000
  717.     % Specularity true-color components %  0  0  1
  718.     % Specular exponent                 %  8
  719.     % Transparency coefficient          %  1
  720.   ; 
  721.   Backface_properties
  722.     % Ambient reflection coefficient    %  0.200000
  723.     % Diffuse reflection coefficient    %  0.250000
  724.     % Specular reflection coefficient   %  0.000000
  725.     % Specularity true-color components %  0  0  1
  726.     % Specular exponent                 %  8
  727.     % Transparency coefficient          %  1
  728.   ; 
  729.  
  730.   % *************************************************************** %
  731.   % Matrix operations to position graphics                          %
  732.   % *************************************************************** %
  733.   Concat_matrix3  1  0 postconcat  ;         % Move over one column %
  734.   Apply_to_global3  0  ;
  735.   Apply_to_local3 3 replace ;
  736.   Execute_structure 20  ;
  737.   Apply_to_local3 4 replace ;
  738.   Execute_structure 21  ;
  739.  
  740. End_test  ; 
  741. Sleep 5 ;
  742.