home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d2xx / d267 / diglib.lha / Diglib / diglib.zoo / diglib / GSCWID.FOR < prev    next >
Encoding:
Text File  |  1989-06-20  |  560 b   |  14 lines
  1.         FUNCTION GSCWID()
  2. C
  3. C       THIS FUNCTION RETURNS THE "WDITH" OF A CAPITAL LETTER
  4. C       IN THE CHARACTER STROKE TABLE.   ALL CHARACTERS ARE STROKED
  5. C       FROM POINTS (COORDINATE PAIRS) STORED IN A STROKE TABLE.
  6. C       CAPITAL LETTERS ARE DEFINED ON A GRID SO THAT (0,0) IS AT THE
  7. C       LOWER LEFT CORNER OF THE CHARACTER CELL, AND (GSCWID(),GSCHIT())
  8. C       IS AT THE UPPER RIGHT BOUNDARY.   NOTE, GSCWID() INCLUDES THE
  9. C       SPACE BETWEEN CHARACTERS, THAT IS, CHARACTERS ARE GSCWID() APART.
  10. C
  11.         GSCWID = 9.0
  12.         RETURN
  13.         END
  14.