Article View: comp.lang.postscript
Article #613Re: Changing resident font name
From: Amanda Walker
Date: Mon, 19 Jun 1989 20:37
Date: Mon, 19 Jun 1989 20:37
43 lines
1880 bytes
1880 bytes
Well, one major problem is that Helvetica Condensed and Helvetica Narrow
are *not* the same font. I'd suggest either:
- getting the real Helvetica Condensed screen fonts from Adobe or SUMEX-AIM
or
- define the Helvetica Narrow fonts. They are simply Helvetica with a
modified transformation matrix.
Here is some PostScript to do this (at least, it works for me):
------------------
% Helvetica Narrow PostScript font
8 dict begin
/FontType 3 def
/FontMatrix [.00082 0 0 .001 0 0] def
/FontBBox [0 0 1000 1000] def
/Encoding StandardEncoding def
/BaseFont /Helvetica findfont 1000 scalefont def
/String 1 string def
/BuildChar {
exch begin
String exch 0 exch put
BaseFont setfont String stringwidth
newpath 0 0 moveto String false charpath flattenpath pathbbox
setcachedevice
0 0 moveto
String show
end
} def
currentdict
end /Helvetica-Narrow exch definefont pop
------------------
The same can be done for the other fonts in the family. I've gone one step
further and made four Macintosh PostScript font files that I've stuck into
my system folder. This way they are as easy to use as any other downloadable
fonts.
--
Amanda Walker <amanda@intercon.UUCP>
--
"Some of the worst mistakes in history have resulted from trying to apply
methods that work fine in one field to another where they don't." -James Hogan
Technical Details
Message-ID:
<19-Jun-89.165032@192.41.214.2>Path:
arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.milw.wisc.edu!cs.utexas.edu!uunet!intercon!amanda@intercon.UUCPReferences:
<81398@ti-csl.csc.ti.com>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.milw.wisc.edu!cs.utexas.edu!uunet!intercon!amanda@intercon.UUCP From: amanda@intercon.UUCP (Amanda Walker) Newsgroups: comp.lang.postscript Subject: Re: Changing resident font name Message-ID: <19-Jun-89.165032@192.41.214.2> Date: 19 Jun 89 20:37:04 GMT References: <81398@ti-csl.csc.ti.com> Sender: news@intercon.UUCP Reply-To: amanda@intercon.UUCP (Amanda Walker) Organization: InterCon Systems Corporation Lines: 43