NAME: SetViewPort

     USE: Defines a specified portion of the screen as the active
          screen.

     DEPENDENCY:  Must first be in graphics mode.  The unit Graph
                  must also be placed in the uses section.

     SYNTAX: SetViewPort(X1, Y1, X2, Y2 : word; Clip : Boolean);