OS/2 Professional/OS2PRO194.ISO/os2/graphic/qrt/samples.doc

Text File | 1989-03-26 | 21.8 KB | 793 lines

                               QRT Sample Programs


        Introduction

        The following are actual QRT input  files.  They can be used as a
        guide to suggested QRT  indenting  style, or as a quick reference
        to QRT commands.  They both use most  of the advanced features of
        QRT, and would be good examples of  QRT programming.  These files
        require QRT 1.4 or later to run correctly.



        File One


           {**************************************************

               Walls with sphere - demonstrates pattern
               mapping to sphere surfaces.

               Rendered with QRT ray tracer on Amiga 1000

               - Steve Koren   8 Jun 88

            **************************************************}


           FILE_NAME = Wall_Sphere.RAW

           { *********   Some pattern definitions ********** }

           PATTERN ( x_size = 16,           { ** A stripe pattern ** }
                     y_size = 8,            { ** for the sphere ** }
                     name   = MIRROR_STRIPE,

                     RECTANGLE (
                       start_x = 0, start_y = 0,
                       end_x   = 16, end_y   = 4,

                       diff    = (.1, .1, .1),
                       mirror  = (.8, .8, .8),
                     )
                   )

           PATTERN ( x_size = 60,        { ** Checkered pattern ** }
                     y_size = 60,
                     name   = CHECK,
                     RECTANGLE (


        QRT Ray Tracer               Page 1           QRT Sample Programs












                       start_x = 0,
                       start_y = 0,
                       end_x   = 30,
                       end_y   = 30,
                       diff    = (.1,1.0,.1),
                     )
                     RECTANGLE (
                       start_x = 30,
                       start_y = 30,
                       end_x   = 60,
                       end_y   = 60,
                       diff    = (.1,1.0,.1),
                     )
                   )

           PATTERN ( x_size = 40,        { ** Checkered pattern ** }
                     y_size = 40,
                     name   = CHECK_BLUE,
                     RECTANGLE (
                       start_x = 0,
                       start_y = 0,
                       end_x   = 20,
                       end_y   = 20,
                       diff    = (.7,.2,.7)
                       amb     = (.32, .32, .32),
                       reflect = .55
                       sreflect= 20
                     )
                     RECTANGLE (
                       start_x = 20,
                       start_y = 20,
                       end_x   = 40,
                       end_y   = 40,
                       diff    = (.7,.5,.7),
                       amb     = (.32, .32, .32),
                       reflect = .55
                       sreflect= 20
                     )
                   )
           PATTERN ( x_size = 80,               { ** brick pattern ** }
                     y_size = 50,
                     name   = BRICK,
                     RECTANGLE (                { 1st half brick 1 }
                       start_x = 0, start_y = 2,
                       end_x   = 18, end_y   = 23,
                       diff    = (1.00, .20, .20);
                     )
                     RECTANGLE (                { 2nd hald brick 1 }
                       start_x = 62, start_y = 2,
                       end_x   = 80, end_y   = 23,
                       diff    = (1.00, .20, .20);


        QRT Ray Tracer               Page 2           QRT Sample Programs












                     )
                     RECTANGLE (                { brick 2 }
                       start_x = 22, start_y = 2,
                       end_x   = 58, end_y   = 23,
                       diff    = (.80, .20, .20);
                     )
                     RECTANGLE (                { brick 3 }
                       start_x = 2, start_y = 27,
                       end_x   = 38, end_y   = 48,
                       diff    = (.85, .35, .10);
                     )
                     RECTANGLE (                { brick 4 }
                       start_x = 42, start_y = 27,
                       end_x   = 78, end_y   = 48,
                       diff    = (.70, .25, .20);
                     )
                   )

           { *******************  OBJECTS  ******************* }

           { ** ground ** }

           PARALLELOGRAM ( loc  = (  -10000, 0,  -10000),
                           v1   = (20000, 0,    0),
                           v2   = (  0, 0, 20000),

                           diff = (  .8, .8, 0),
                           pattern = CHECK
                           xmult = 2
                           ymult = 2
                         )


           BEGIN_BBOX

               BEGIN_BBOX

                   SPHERE ( loc = (200, 50, -80),
                            radius = 35,
                            diff = (.7, .3, .5),

                            pattern = MIRROR_STRIPE,
                            xmult   = 1.5,
                            ymult   = 1.5
                          )

                   QUADRATIC ( loc = (200, 0, -80),

                               a    = 1,
                               b    = 0,
                               c    = 1,


        QRT Ray Tracer               Page 3           QRT Sample Programs












                               d    = 150,
                               xmin = -13,
                               xmax = 13,
                               ymin = 0,
                               ymax = 50,
                               zmin = -13,
                               zmax = 13,

                               diff = (.1, .1, .1),
                               mirror = (.8, .8, .8)
                             )

               END_BBOX


               BEGIN_BBOX

                   SPHERE ( loc      = (200, 90, 80),
                            radius   = 35,
                            diff     = (.3, .3, .8),
                            amb      = (.32, .32, .32),
                            reflect  = .40
                            sreflect = 20

                            pattern = CHECK_BLUE,
                            xmult   = 1.0,
                            ymult   = 1.0
                          )

                   QUADRATIC ( loc = (200, 0, 80),

                               a    = 1,
                               b    = 0,
                               c    = 1,
                               d    = 150,
                               xmin = -13,
                               xmax = 13,
                               ymin = 0,
                               ymax = 90,
                               zmin = -13,
                               zmax = 13,

                               diff = (.1, .1, .1),
                               mirror = (.8, .8, .8)
                             )

               END_BBOX

           END_BBOX




        QRT Ray Tracer               Page 4           QRT Sample Programs












           BEGIN_BBOX

               { ** a small brick wall ** }

               PARALLELOGRAM ( loc = (150, 00, -15),
                               v1  = (0, 0, 30),
                               v2  = (0, 100, 0)

                               diff = (1, 1, 1),
                               pattern = BRICK

                               xmult = .5,
                               ymult = .5
                             )

               PARALLELOGRAM ( loc = (150, 00, -15),
                               v1  = (100, 0, 0),
                               v2  = (0, 100, 0)

                               diff = (1, 1, 1),
                               pattern = BRICK

                               xmult = .5,
                               ymult = .5
                             )

               PARALLELOGRAM ( loc = (150, 00, 15),
                               v1  = (100, 0, 0),
                               v2  = (0, 100, 0)

                               diff = (1, 1, 1),
                               pattern = BRICK

                               xmult = .5,
                               ymult = .5
                             )

           END_BBOX


           { ** An observer ** }

           OBSERVER ( loc    = (-20 , 70, -40),
                      lookat = (200, 50, 0)
                    )

           { ** A lamp ** }

           LAMP ( loc = (120, 120, -50),
                  radius = 5,
                  dist = 80


        QRT Ray Tracer               Page 5           QRT Sample Programs












                )

           LAMP ( loc = (120, 150, 80),
                  radius = 5,
                  dist = 70
                )

           SKY  ( horiz  = (.2, .2, .55),
                  zenith = (.1, .1, .25),
                  dither = 4
                )

           DEFAULT ( x_res = 320,      { ** parameters for Amiga ** }
                     y_res = 400
                     aspect= .56
                   )

           FOC_LENGTH = 50



































        QRT Ray Tracer               Page 6           QRT Sample Programs













        FILE 2


           { **************************************************

              Glass table with vase and candy bowl.  This
              is the first test of glass surfaces, and came out
              surprisingly well - it actually does look like
              glass!  This image requires QRT 1.4 to run.

              Rendered with QRT rayracing system

              Steve Koren -  23 AUG 88

             ************************************************** }


           FILE_NAME = Table.RAW

           PATTERN ( x_size = 80,
                     y_size = 30,
                     name   = BLOCK,

                     RECTANGLE (
                       start_x = 3,  start_y = 3,
                       end_x   = 77, end_y   = 27,
                       diff    = (.8, .7, .4);
                     )
                   )

           PATTERN ( x_size = 90,
                     y_size = 90,
                     name   = FLOOR,

                     RECTANGLE (
                       start_x = 0,  start_y = 0,
                       end_x   = 55, end_y   = 55,
                       diff    = (.1, .8, .1)
                     )

                     RECTANGLE (
                       start_x = 60, start_y = 0
                       end_x   = 85  end_y   = 55
                       diff    = (.2, .3, .8)
                     )

                     RECTANGLE (
                       start_x = 0,  start_y = 60
                       end_x   = 55  end_y   = 85
                       diff    = (.2, .3, .8)


        QRT Ray Tracer               Page 7           QRT Sample Programs












                     )
                   )

           BEGIN_INSTANCES

             { ** glass table leg - hollow glass cylender ** }

             NAME = table_leg;
             BEGIN_BBOX

               QUADRATIC ( loc     = (0, 0, 0),
                           a       = 1, b  = 0, c  = 1,
                           d       = 300,

                           xmin    = -18, xmax = 18,
                           ymin    = 0,   ymax = 70,
                           zmin    = -18, zmax = 18,

                           diff    = (0, 0, 0),
                           trans   = (.7, .7, .7),
                           mirror  = (.25, .25, .25),
                           index   = 1.33,
                           density = (.022, .022, .022)
                         )

               QUADRATIC ( loc     = (0, 0, 0),
                           a       = 1, b  = 0, c  = 1,
                           d       = 144,

                           xmin    = -12, xmax = 12,
                           ymin    = 0,   ymax = 70,
                           zmin    = -12, zmax = 12,

                           diff    = (0, 0, 0),
                           trans   = (1, 1, 1),
                           mirror  = (.1, .1, .1),
                           index   = 1.33,
                           density = (.022, .022, .022)
                         )
             END_BBOX

           END_INSTANCES

           { ******************** GROUND ********************** }

           PARALLELOGRAM ( loc = (-10000, 0, -10000),
                           v1  = (0,0, 20000),
                           v2  = (20000, 0, 0)

                           diff    = (.1, .1, .1),
                           pattern = BLOCK


        QRT Ray Tracer               Page 8           QRT Sample Programs












                         )


           { ******************** OBJECTS ********************** }

           { ** FLOOR ** }

           PARALLELOGRAM ( loc  = (80, .01, -20),
                           v1   = (240, 0, 0),
                           v2   = (0, 0, 240),
                           diff = (0, 0, 0)

                           pattern = FLOOR
                           xmult   = .8,
                           ymult   = .8
                         )

           { ** TABLE LEGS ** }

           BEGIN_BBOX
             INSTANCE_OF ( name   = table_leg,
                           loc    = (140, 0, 40)
                         )

             INSTANCE_OF ( name   = table_leg,
                           loc    = (260, 0, 40)
                         )
           END_BBOX

           BEGIN_BBOX
             INSTANCE_OF ( name   = table_leg,
                           loc    = (140, 0, 160)
                         )

             INSTANCE_OF ( name   = table_leg,
                           loc    = (260, 0, 160)
                         )
           END_BBOX

           { ** TABLE TOP ** }

           BEGIN_BBOX

             PARALLELOGRAM ( loc      = (100, 70, 0),
                             v1       = (0, 0, 200),
                             v2       = (200, 0, 0),

                             diff     = (0, 0, 0),
                             trans    = (.7, .7, .7),
                             mirror   = (.23, .23, .23),
                             index    = 1.33,


        QRT Ray Tracer               Page 9           QRT Sample Programs












                             density  = (.015, .015, .015)
                           )

             PARALLELOGRAM ( loc      = (100, 85, 0),
                             v1       = (0, 0, 200),
                             v2       = (200, 0, 0),

                             diff     = (0, 0, 0),
                             trans    = (1, 1, 1),
                             mirror   = (.25, .25, .25),
                             index    = 1.33,
                             density  = (.015, .015, .015)
                           )


             { ** SIDES ** }

             PARALLELOGRAM ( loc = (100, 70, 0),
                             v1  = (0, 0, 200),
                             v2  = (0, 15, 0),

                             diff     = (0, 0, 0),
                             trans    = (.7, .7, .7),
                             mirror   = (.23, .23, .23),
                             index    = 1.33,
                             density  = (.016, .016, .016)
                           )

             PARALLELOGRAM ( loc = (100, 70, 0),
                             v1  = (200, 0, 0),
                             v2  = (0, 15, 0),

                             diff     = (0, 0, 0),
                             trans    = (.7, .7, .7),
                             mirror   = (.23, .23, .23),
                             index    = 1.33,
                             density  = (.016, .016, .016)
                           )

             PARALLELOGRAM ( loc = (100, 70, 200),
                             v1  = (200, 0, 0),
                             v2  = (0, 15, 0),

                             diff     = (0, 0, 0),
                             trans    = (.7, .7, .7),
                             mirror   = (.23, .23, .23),
                             index    = 1.33,
                             density  = (.016, .016, .016)
                           )

             PARALLELOGRAM ( loc = (300, 70, 0),


        QRT Ray Tracer               Page 10          QRT Sample Programs












                             v1  = (0, 0, 200),
                             v2  = (0, 15, 0),

                             diff     = (0, 0, 0),
                             trans    = (.7, .7, .7),
                             mirror   = (.23, .23, .23),
                             index    = 1.33,
                             density  = (.016, .016, .016)
                           )

           END_BBOX

           { ** CANDY BOWL  & VASE ** }

           BEGIN_BBOX

             BEGIN_BBOX
               QUADRATIC ( loc     = (200, 100, 100),
                           a       = 1, b  = 2, c  = 1,
                           d       = 900,

                           xmin    = -30, xmax = 30,
                           ymin    = -15, ymax = 0,
                           zmin    = -30, zmax = 30,

                           diff    = (1, .1, .1),
                           reflect = .8
                           sreflect= 20
                         )

               SPHERE   ( loc      = (185, 95, 110),
                          radius   = 7,
                          diff     = (.1, .1, 1)
                        )

               SPHERE   ( loc      = (200, 93, 80),
                          radius   = 7,
                          diff     = (.1, 1, .1)
                        )

             END_BBOX

             { ** VASE ** }

             BEGIN_BBOX

               QUADRATIC ( loc     = (260, 85, 50),
                           a       = 1, b = 0, c = 1,
                           d       = 100,

                           xmin    = -10, xmax = 10,


        QRT Ray Tracer               Page 11          QRT Sample Programs












                           ymin    = 0,   ymax = 50,
                           zmin    = -10, zmax = 10,

                           diff    = (.1, .7, .1),
                           reflect = .7,
                           sreflect=20
                         )
             END_BBOX

           END_BBOX

           OBSERVER ( loc    = (-50, 180, -30)
                      lookat = (180, 50, 100)
                    )

           SKY ( horiz  = (.10, .1, .75)
                 zenith = (.10, .1, .60)
                 dither = 4
               )

           LAMP ( loc = (150, 250, -80)
                  radius = 5,
                  dist = 250
                )

           LAMP ( loc = (250, 50, 250),
                  radius = 5,
                  dist   = 60
                )


           DEFAULT ( x_res = 320,       { Amiga parameters }
                     y_res = 400
                     aspect= .56
                   )

           FOC_LENGTH = 50
















        QRT Ray Tracer               Page 12          QRT Sample Programs