Previous: pltsq Up: ../plot79_p.html Next: pltvb


PLTTX

       SUBROUTINE  PLTTX (TLINES,LOC,LENGTH,EXTLIM)
 C$    (Text String)
 C$    Draw a (possibly multi-line) text string.  The current CORE
 C$    character positioning and font attributes are used, but the
 C$    character height  may  be  adjusted  temporarily  to  force
 C$    plotted line  lengths to  stay  within a  specified  bound.
 C$    SYMTXB, rather than  SYMTX, is  used to draw  the text,  so
 C$    that boldface characters can be obtained if a positive  pen
 C$    diameter  has  been  provided  to  SYMPD.   All   character
 C$    attributes are preserved, but the current point is  updated
 C$    on return to a value displaced  from that at input along  a
 C$    line perpendicular  to  the character  path,  suitable  for
 C$    placement of another block of text by a subsequent call  to
 C$    this routine.  The arguments are:
 C$
 C$    TLINES(*)......Hollerith character string to be drawn.  The
 C$                   special  character  sequence  "$N"  or  "$n"
 C$                   (dollar  N)  in  the  string  represents   a
 C$                   newline,  and   may  be   used  to   request
 C$                   multi-line text.  For example, the string
 C$
 C$                   "title 1$Ntitle 2$ntitle3"
 C$
 C$                   will generate three lines of the form
 C$
 C$                   title 1
 C$                   title 2
 C$                   title 3
 C$
 C$                   In the unlikely event that a $N is  actually
 C$                   needed in the  text, it can  be obtained  by
 C$                   bracketing either character with case switch
 C$                   characters.  With the default <PLOT79>  case
 C$                   switch characters,  this  would be  $<N>  or
 C$                   <$>N.
 C$    LOC............Offset  of  first  character  in  TLINES(*),
 C$                   normally 1.
 C$    LENGTH.........Number of characters  in TLINES(*).  Leading
 C$                   and trailing  blanks in  each line  will  be
 C$                   ignored.
 C$    EXTLIM.........Extent limit,  ignored if  not greater  than
 C$                   0.0.  A positive value limits the length  of
 C$                   the  longest   line  to   EXTLIM,  and   the
 C$                   character  height  for  ALL  lines  will  be
 C$                   temporarily reduced to achieve a fit.
 C$    (14-SEP-87)