🚀 go-pugleaf

In article <90Nov10.185352est.20181@me.utoronto.ca> sun@me.utoronto.ca (Andy Sun Anu-guest) wrote:
> 
> I am writing something that needs to know the maximum character height of
> a scaled font. Ideally I want to get the maximum height of a string of a
> particular font, which is a local maximum depending on the characters (i.e.
> aero will have a smaller font height than AERO). Right now I am defining the 
> scale explictly as a variable so that I can refer to it later but that's
> not flexible/intelligent enough to do the job. Any help will be appreciated.

To get the bounding box of a string in the current font, you can use 

	gsave newpath 0 0 moveto
	  (Some String) true charpath flattenpath pathbbox
        grestore

But getting the height of the current font is a bit trickier:

/currentfont-vextent {  % leaves two numbers on the stack:
			% maximum distances which the current font extends
			% above the baseline, and below (likely negative).
			% This fails if the currentfont doesn't have a 
			% FontBBox defined (unlikely).
    currentfont /FontBBox get dup 0 get exch 1 get
      currentfont /FontMatrix get dtransform		% left bottom
    exch pop						% bottom
    currentfont /FontBBox get dup 2 get exch 3 get
      currentfont /FontMatrix get dtransform		% bottom right top
    exch pop						% bottom top
    exch
} def