🚀 go-pugleaf

Thanks to everyone who answered my question on laserwriter postscript
font names.  For the benefit of everyone else (I got a number of requests
for this) here is a list of the names, and also two Postscript
fragments to help you get them out of your LW.

[side note:  now that programs like RSG3 and Word 3.0 have postscript
windows, why don't we all start sharing our favorite Postscript programs?
It's a whole new programming language in there, folks!]

chuq

  Screen Font Name       Resource   LaserWriter Plus Rom Font Name
  ----------------       --------   ------------------------------
  Zapf Dinbats           13         ZapfDingbats
  Bookman                14         Bookman-Light
                                    Bookman-LightItalic
                                    Bookman-Demi
                                    Bookman-DemiItalic
  N Helvetical Narrow    15         Helvetica-Narrow
                                    Helvetica-Narrow-Oblique
                                    Helvetica-Narrow-Bold
                                    Helvetica-Narrow-BoldOblique
  Palatino               16         Palatino-Roman
                                    Palatino-Italic
                                    Palatino-Bold
                                    Palatino-BoldItalic
  Zapf Chancery          18         ZapfChancery-MediumItalic
  Avant Garde            33         AvantGarde-Book
                                    AvantGarde-BookOblique
                                    AvantGarde-Demi
                                    AvantGarde-DemiOblique
  New Century Schlbk     34         NewCenturySchlbk-Roman
                                    NewCenturySchlbk-Italic
                                    NewCenturySchlbk-Bold
                                    NewCenturySchlbk-BoldItalic

Of course, if you're bored you can always regenerate the list of names by:

	FontDirectory
	{pop ==} forall

It's only slightly more difficult to print the list on real, live paper:

	%!
	% print out all the font names in the font directory

	FontDirectory
	/inch {72 mul} def
	1 inch 10 inch translate
	/Courier findfont 10 scalefont setfont
	{0 0 moveto pop 45 string cvs show 0 -12 translate} forall
	showpage
Chuq Von Rospach	chuq@sun.COM

It's only a model...