Path: utzoo!attcan!uunet!husc6!linus!mbunix!ted From: ted@mitre-bedford.ARPA (Edward J. Ede) Newsgroups: comp.lang.postscript Subject: Re: Need LaserWriter Plus Font names for use in Postscript programming Message-ID: <31722@linus.UUCP> Date: 12 May 88 14:48:06 GMT References: <4395@dasys1.UUCP> Sender: news@linus.UUCP Reply-To: ted@mbunix (Ede) Organization: The MITRE Corporation, Bedford, Mass. Lines: 67 In article <4395@dasys1.UUCP> cohen@dasys1.UUCP (David Cohen) writes: >My partner and I are interested in using all the fonts in the LaserWriter + >in the postscript programs that we are writing but unfortunately, none of the >postscript books that we have (the 3 Adobe books and the Sybex book) seem to >have any information on font names except for those supplied in the original >LaserWriter. Can anyone out there supply us with a list of all the correct >font names or at least supply us with a pointer to this information? Here's some PostScript that will print a list and a few other bits of information. Sorry, the list is not sorted in any particular fashion. ------------------------------ cut ---------------------------------- %! /LabelFont /Times-Roman findfont 12 scalefont def /Lead 14 def /LM 20 def /Tab 160 def /TM 670 def /BM 30 def /Name 50 string def /Line 740 def /Helvetica findfont 20 scalefont setfont statusdict begin LM Line moveto (Printername:) show LM 120 add Line moveto Name printername show LM 370 add Line moveto (Page Count:) show LM 490 add Line moveto pagecount ( ) cvs show /Line Line 25 sub store LM Line moveto (Product:) show LM 120 add Line moveto product show LM 370 add Line moveto (Vers / Rev:) show LM 490 add Line moveto version show ( / ) show revision ( ) cvs show end /y TM def /LM 40 def LabelFont setfont FontDirectory { pop % pop font dict, leave key on top Name cvs dup % convert key into a string LM y moveto show % print name /y y Lead sub dup BM lt {pop 280 0 translate TM} if def } forall showpage ------------------------------ cut ---------------------------------- Here's the list of the fonts: Helvetica, Helvetica-Bold, Helvetica-Oblique, Helvetica-BoldOblique, Courier, Courier-Bold, Courier-Oblique, Courier-BoldOblique, Times-Roman, Times-Italic, Times-Bold, Times-BoldItalic, NewCenturySchblk-Roman, NewCenturySchblk-Italic, NewCenturySchblk-Bold, NewCenturySchblk-BoldItalic, Helvetica-Narrow, Helvetica-Narrow-Bold, Helvetica-Narrow-Oblique, Helvetica-Narrow-BoldOblique, Bookman-Light, Bookman-Demi, Bookman-LightItalic, Bookman-DemiItalic, AvantGarde-Book, AvantGarde-Demi, AvantGarde-BookItalic, AvantGarde-DemiItalic, Palatino-Roman, Palatino-Italic, Palatino-Bold, Palatino-BoldItalic, ZapfDingbats, ZaphChancery-MediumItalic, Symbol Ted Ede -- ted@mitre-bedford.arpa -- The MITRE Corporation -- Burlington Road | -- Bedford MA, 01730 -- Mail Stop B015 -- (617) 271-2524 -- | | - this line intentionally left blank - | +---------------------------------------------------------------------------+