gsqfnt
Purpose
Returns information about the current font.
C Syntax
void gsqfnt_ (font)
int *font;
FORTRAN Syntax
subroutine gsqfnt (font)
INTEGER font (32)
Pascal Syntax
PROCEDURE gsqfnt_ (
VAR font: ARRAY [1..32| of INTEGER
): INTEGER [PUBLIC|;
Description
The gsqfnt subroutine returns information about the
active font.
Parameters
font Contains, on return, the character-
istics of the current font. The fol-
lowing table describes the information
in the array. Each entry is a word.
Dimensions are in pixels and the origin
is at the lower left corner of the
character box.
Entry Description
1 Class: 1 = compressed; 2 = uncompressed IBM 5081
Display format (always 1 for printers and plot-
ters).
2 Font ID.
Entry Description
3 Style.
4 Attribute flags:
bit 31 bold
bit 30 italic
bit 00 proportionally spaced.
(This entry always has all bits set to 0 for
printers and plotters.)
5 Number of characters. For printers and plotters,
this is the number of fonts S 128.
6 Character baseline. For printers and plotters, no
text alignment is allowed and this value is always
-1.
7 Character capsline. For printers and plotters, no
text alignment is allowed and this value is always
-1.
8 Character width. For printers and plotters, the
character width is given in pixels. For a propor-
tionally spaced font, the width value represents
the maximum width allowed.
9 Character height. For printers and plotters, the
character height is given in pixels.
10 Underscore top line. For printers and plotters,
underscoring is not available and this value is
always -1.
11 Underscore bottom line. For printers and plot-
ters, underscoring is not available and this value
is always -1.
12-32 Reserved.