home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / graphic / qrt / qrt15inp.zoo / object.qrt < prev    next >
Text File  |  1989-06-17  |  8KB  |  242 lines
  1.            { ******************************************
  2.  
  3.                 QRT source for 8 spheres connected by
  4.                 reflecting cylenders.  The spheres
  5.                 form the corners of a cube.
  6.  
  7.              ****************************************** }
  8.  
  9.            FILE_NAME = object.raw
  10.  
  11.  
  12.            { ** Instance definitions for quadratics to save
  13.                 typing. These quadratics are the cylenders
  14.                 that connect the spheres                    ** }
  15.  
  16.  
  17.            BEGIN_INSTANCES
  18.  
  19.                    QUADRATIC ( loc     = (0, 0, 0),
  20.                        name    = X_AXIS_QUAD
  21.  
  22.                        a       = 0,
  23.                        b       = 1,
  24.                        c       = 1,
  25.                        d       = 120,
  26.  
  27.                        xmin    =    0,     xmax = 100,
  28.                        ymin    =  -11,     ymax =  11,
  29.                        zmin    =  -11,     zmax =  11,
  30.  
  31.                        diff    = ( 0,  0 , 0),
  32.                        mirror  = (0.9, 0.9, 0.9),
  33.                        dither  = 0
  34.                      )
  35.  
  36.                    QUADRATIC ( loc     = (0, 0, 0),
  37.                        name    = Y_AXIS_QUAD
  38.  
  39.                        a       = 1,
  40.                        b       = 0,
  41.                        c       = 1,
  42.                        d       = 120,
  43.  
  44.                        xmin    =  -11,     xmax =  11,
  45.                        ymin    =    0,     ymax = 100,
  46.                        zmin    =  -11,     zmax =  11,
  47.  
  48.                        diff    = ( 0,  0 , 0),
  49.                        mirror  = (0.9, 0.9, 0.9),
  50.                        dither  = 0
  51.                      )
  52.  
  53.                    QUADRATIC ( loc     = (0, 0, 0),
  54.                        name    = Z_AXIS_QUAD
  55.  
  56.                        a       = 1,
  57.                        b       = 1,
  58.                        c       = 0,
  59.                        d       = 120,
  60.  
  61.                        xmin    =  -11,     xmax =  11,
  62.                        ymin    =  -11,     ymax =  11,
  63.                        zmin    =    0,     zmax = 100,
  64.  
  65.                        diff    = ( 0,  0 , 0),
  66.                        mirror  = (0.9, 0.9, 0.9),
  67.                        dither  = 0
  68.                      )
  69.  
  70.  
  71.            END_INSTANCES
  72.  
  73.  
  74.            { ** A pattern for the ground ** }
  75.  
  76.            PATTERN ( x_size = 50,
  77.                      y_size = 50,
  78.                      name   = CHECK,
  79.  
  80.                      RECTANGLE (
  81.                        start_x = 0,
  82.                        start_y = 0,
  83.                        end_x   = 25,
  84.                        end_y   = 25,
  85.                        diff    = (1, 0.2, 0.2)
  86.                      )
  87.                      RECTANGLE (
  88.                        start_x = 25,
  89.                        start_y = 25,
  90.                        end_x   = 50,
  91.                        end_y   = 50,
  92.                        diff    = (1, 0.2, 0.2)
  93.                      )
  94.                    )
  95.  
  96.  
  97.            { ** The actual world starts here ** }
  98.  
  99.            BEGIN_BBOX
  100.  
  101.                BEGIN_BBOX       { ** This is the lower half ** }
  102.  
  103.                    BEGIN_BBOX
  104.  
  105.                        SPHERE ( loc = (0, 0, 0),        { ** back ** }
  106.                                 radius = 20,
  107.                                 diff = (1, 0.1, 0.1),
  108.                               )
  109.  
  110.                        SPHERE ( loc = (100, 0, 0),
  111.                                 radius = 20,
  112.                                 diff = (1, 0.1, 0.1),
  113.                               )
  114.  
  115.                        INSTANCE_OF ( name = X_AXIS_QUAD,
  116.                                      loc  = (0, 0, 0)
  117.                                    )
  118.  
  119.                    END_BBOX
  120.  
  121.                    BEGIN_BBOX                           { ** front ** }
  122.                        SPHERE ( loc = (0, 0, 100),
  123.                                 radius = 20,
  124.                                 diff = (1, 0.1, 0.1),
  125.                               )
  126.  
  127.                        SPHERE ( loc = (100, 0, 100),
  128.                                 radius = 20,
  129.                                 diff = (1, 0.1, 0.1),
  130.                               )
  131.  
  132.                        INSTANCE_OF ( name = X_AXIS_QUAD,
  133.                                      loc  = (0, 0, 100)
  134.                                    )
  135.  
  136.                    END_BBOX
  137.  
  138.                    INSTANCE_OF ( name = Z_AXIS_QUAD,
  139.                                  loc  = (0, 0, 0)
  140.                                )
  141.  
  142.                    INSTANCE_OF ( name = Z_AXIS_QUAD,
  143.                                  loc  = (100, 0, 0)
  144.                                )
  145.  
  146.                END_BBOX
  147.  
  148.                BEGIN_BBOX       { ** This is the upper half ** }
  149.  
  150.                    BEGIN_BBOX                           { ** back ** }
  151.  
  152.                        SPHERE ( loc = (0, 100, 0),
  153.                                 radius = 20,
  154.                                 diff = (1, 0.1, 0.1),
  155.                               )
  156.  
  157.                        SPHERE ( loc = (100, 100, 0),
  158.                                 radius = 20,
  159.                                 diff = (1, 0.1, 0.1),
  160.                               )
  161.  
  162.                        INSTANCE_OF ( name = X_AXIS_QUAD,
  163.                                      loc  = (0, 100, 0)
  164.                                    )
  165.  
  166.                    END_BBOX
  167.  
  168.                    BEGIN_BBOX                           { ** front ** }
  169.  
  170.                        SPHERE ( loc = (0, 100, 100),
  171.                                 radius = 20,
  172.                                 diff = (1, 0.1, 0.1),
  173.                               )
  174.  
  175.                        SPHERE ( loc = (100, 100, 100),
  176.                                 radius = 20,
  177.                                 diff = (1, 0.1, 0.1),
  178.                               )
  179.  
  180.                        INSTANCE_OF ( name = X_AXIS_QUAD,
  181.                                      loc  = (0, 100, 100)
  182.                                    )
  183.  
  184.                    END_BBOX
  185.  
  186.                    INSTANCE_OF ( name = Z_AXIS_QUAD,
  187.                                  loc  = (0, 100, 0)
  188.                                )
  189.  
  190.                    INSTANCE_OF ( name = Z_AXIS_QUAD,
  191.                                  loc  = (100, 100, 0)
  192.                                )
  193.  
  194.                END_BBOX
  195.  
  196.                { ** four vertical cylenders ** }
  197.  
  198.                INSTANCE_OF ( name = Y_AXIS_QUAD,
  199.                              loc  = (0, 0, 0)
  200.                            )
  201.  
  202.                INSTANCE_OF ( name = Y_AXIS_QUAD,
  203.                              loc  = (0, 0, 100)
  204.                            )
  205.  
  206.                INSTANCE_OF ( name = Y_AXIS_QUAD,
  207.                              loc  = (100, 0, 0)
  208.                            )
  209.  
  210.                INSTANCE_OF ( name = Y_AXIS_QUAD,
  211.                              loc  = (100, 0, 100)
  212.                            )
  213.  
  214.            END_BBOX
  215.  
  216.            PARALLELOGRAM ( loc  = (-10000, -60, -10000),
  217.                            v1   = ( 20000,   0,      0),
  218.                            v2   = (     0,   0,  20000),
  219.  
  220.                            pattern = check,
  221.                            xmult   = 2,
  222.                            ymult   = 2,
  223.                            diff    = (0.1, 1, 0.1)
  224.                          )
  225.  
  226.            OBSERVER ( loc    = (-50, 70, 250),
  227.                       lookat = (50, 50, 50)
  228.                     )
  229.  
  230.            LAMP ( loc = (70, 250, 350),
  231.                   radius = 5,
  232.                   dist = 350
  233.                 )
  234.  
  235.            FOC_LENGTH = 70
  236.  
  237.            SKY  ( horiz  = (0, 0, 0.55),
  238.                   zenith = (0, 0, 0.25),
  239.                   dither = 4
  240.                 )
  241.  
  242.