# SETGTEXTROTATION (W*S)

Graphics Subroutine: Sets the orientation angle of the font text output in degrees. The current orientation is used in calls to OUTGTEXT.

## Module

USE IFQWIN

CALL SETGTEXTROTATION (degree-tenths)

degree-tenths | (Input) INTEGER(4). Angle of orientation, in tenths of degrees, of the font text output.

The orientation of the font text output is set in tenths of degrees. Horizontal is 0°, and angles increase counterclockwise so that 900 (90°) is straight up, 1800 (180°) is upside down and left, 2700 (270°) is straight down, and so forth. If the user specifies a value greater than 3600 (360°), the subroutine takes a value equal to:

      MODULO (user-specified tenths of degrees, 3600)

Although SETGTEXTROTATION accepts arguments in tenths of degrees, only increments of one full degree differ visually from each other on the screen.

Bitmap fonts cannot be rotated; TruType fonts should be used instead.

## Example

     ! Build as a Graphics ap.
     USE IFQWIN
     INTEGER(2) fontnum, numfonts
     INTEGER(4) oldcolor, deg
     TYPE (xycoord) pos
     numfonts = INITIALIZEFONTS ( )
     fontnum = SETFONT ('t''Arial''h18w10i')
     CALL MOVETO (INT2(10), INT2(30), pos)
     CALL OUTGTEXT('Straight text')
     deg = -1370
     CALL SETGTEXTROTATION(deg)
     oldcolor = SETCOLORRGB(Z'008080')
     CALL OUTGTEXT('Slanted text')
     END

Parent topic: Graphics Library Routines

## See Also

GETGTEXTROTATION