NAME: Circle

     USE:  Procedure to draw a circle in the current color using (X,Y)
            as the center point.

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

     SYNTAX:  Circle(100,100,50);
              Circle(Integer, Integer, Integer);


     EXAMPLE: For Loop := 1 to 100 do Circle(150,150,Loop + 50);