NAME: Rectangle

     USE: Procedure to draw a rectangle using the current line style
          and color.

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

     SYNTAX: Rectangle(X1, Y1, X2, Y2 : Integer);