NAME: SetTextStyle

     USE: This procedure sets several areas of information for the
          display of graphic text, including the font, style, and
          character magnification factor.  Errors are returned through
          GraphResult.  The following constants are declared in
          the graph unit:

                              Set/GetTextStyle
         -----------------------------------------------------------

                 DefaultFont    = 0;    " Bit-Mapped fonts "

                 TripleFont     = 1;    " Stroked fonts "
                 SmallFont      = 2;
                 SansSerifFont  = 3;
                 GothicFont     = 4;

                 HorizDir       = 0;  Left to Right
                 VertDir        = 1;  Top to Bottom
                 NormSize       = 1;


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

     SYNTAX: SetTextStyle(FontType : Word; Direction : Word;
                          CharSize : CharSizeType);