Previous: symtx3 Up: ../plot79_s.html Next: symtxt
SUBROUTINE SYMTXB (TEXT,ISTART,LENTXT)
C$ (Symbol Text - Boldface)
C$ Plot a boldface text string by repeatedly drawing each
C$ character around the circumference of a small circle whose
C$ diameter simulates a thick pen. The default pen diameter
C$ can be altered by calling routine SYMPD.
C$
C$ The current orientation and size attributes for text are
C$ assumed. The current point determines the location where
C$ the text is drawn, and is unchanged on return. The
C$ arguments are:
C$
C$ TEXT(*).....INTEGER array or Hollerith string defining
C$ characters to be plotted. For convenience,
C$ leading and trailing blanks are ***IGNORED***
C$ when justifying the text left, right, or
C$ centered. In the rare cases where such blanks
C$ are required, a substitution character should
C$ be defined to be equivalent to one of the
C$ Hershey blank characters.
C$ ISTART......Index of starting character in TEXT(*),
C$ counting from 1 from the left. If LENTXT .LT.
C$ 0, this indicates that symbol numbers begin in
C$ TEXT(ISTART).
C$ LENTXT......Number of characters in TEXT(*) to plot. If
C$ LENTXT .GT. 0, TEXT(*) contains packed
C$ Hollerith characters. If LENTXT .LT. 0, then
C$ TEXT(*) contains IABS(LENTXT) Hershey symbol
C$ numbers (one/word) defining the characters to
C$ be plotted. only the first "MAXSYM" (=150)
C$ characters will be plotted if a packed string
C$ is passed. This restriction arises from the
C$ dimension of NUMSYM(*) below, and may be easily
C$ changed if required.
C$
C$ (11-SEP-85)