[UP]


Manual Reference Pages  - textsize (3)

NAME

textsize(3f) - [M_draw:TEXT] Set text size of a character in the current SOFTWARE font in world units. (LICENSE:PD)

CONTENTS

Synopsis
Description
Example

SYNOPSIS

subroutine textsize(width, height) real,intent(in) :: width real,intent(in) :: height

DESCRIPTION

Set the maximum size of a character in the current font. Width and height are values in world units. This applies to software text, but may not apply to hardware fonts depending upon the output device. This must be done after the font being scaled is loaded. To keep text of different sizes aligned along the same baseline not that you typically need to subtract the descender height from the Y position

EXAMPLE

Sample program:

   program demo_textsize
   use M_draw
   implicit none
   integer :: i,ii
   integer :: ipaws
      !! set up long bar as plotting area
      call prefsize(900,150)
      call vinit(’ ’) ! start graphics using device $M_DRAW_DEVICE
      call ortho2(-30.0, 30.0, -5.0, 5.0)
      call font(’times.r’)

call move2(-23.0,-4.5) call color(D_WHITE) call textsize(2.0,2.0) call move2(-27.5,-3.0) call draw2( 27.5,-3.0) call move2(-27.5,-3.0)

do i=1,7 ii=nint((i*20)*0.30) call linewidth(nint(ii*2.35)) call textsize(real(i),real(i)) call color(D_MAGENTA) call drawstr(’aA’) enddo

ipaws=getkey()

call vexit()

end program demo_textsize


textsize (3) March 11, 2021
Generated by manServer 1.08 from 99e3f868-eb2f-475b-a5a8-5b7ca61deac3 using man macros.