Previous: dem54 Up: ../plot79_d.html Next: dem56
SUBROUTINE DEM55 (NIN,NOUT)
C$ (DEM55 - Hershey Fonts)
C$ Construct tables of the correspondences between text
C$ characters and various font and case variants. The input
C$ file must contain lines with ***ONE*** leading blank, of
C$ the following form:
C$
C$ 1) Plot title (60 characters)
C$ 2) Text column title
C$ 3) Title for all font columns
C$ 4) 2-character font identifier (UC/LC and 1/2/3/4 will
C$ be automatically appended).
C$ 5) 1..4 character representation of a text character
C$ (repeat as many times as needed)
C$ 6) blank line to terminate data group
C$
C$ Any number of these data groups may be provided. A new
C$ plot will be made for each. Execution terminates when a
C$ title line is found beginning with a blank character.
C$
C$ The table constructed looks as follows:
C$
C$ -----------------------------------------------
C$ | Page Title | <== YBXTTL
C$ -----------------------------------------------
C$ | | Font Name | <== YBXNAM
C$ -----------------------------------------------
C$ | Text | ID1 | ID2 | .... | ID9 | <== YBXLAB
C$ -----------------------------------------------
C$ | | | | .... | |
C$ ... ... ... ... ... ... ... <== YBOX
C$ | | | | .... | |
C$ -----------------------------------------------
C$
C$ The coding is arranged such that by simply changing the
C$ appropriate DATA statement initialization values, any
C$ reasonable page size and format may be obtained.
C$
C$ (20-JUL-89)