🚀 go-pugleaf

In article <11954@sun.uucp> chuq@sun.UUCP (Chuq Von Rospach) writes:
>
>I have a related question.  What are the font names for all of these in
>Postscript?  I can't find that information anywhere (the adobe books, the
>laserwriter manual, the manhattan phone book...).  If I want to use Zapf
>Chancery in a Postscript program, I need to be able to define the font, but
>there seems to be no documentation on what it is.  Of course, I could just
>snarf a Postscript program from something like Word output, but the
>documentation should really sve me this hassle...
>
>chuq
>
>Chuq Von Rospach	chuq@sun.COM
>
>It's only a model...

	The following bit of postscript will produce the desired
	response direct to the printer tray. (This should work on a
	LaserWriter, and does work on a LaserWriter Plus).

/Courier findfont 10 scalefont setfont
/x 50 def /y 700 def
/nl {  x /y y 14 sub def y moveto
	/Courier findfont 10 scalefont setfont } def
/buf 80 string def
200 750 moveto
statusdict /product get show
( rev. ) show
statusdict /revision get buf cvs show
( Fonts ) show
x y moveto
FontDirectory
{
	exch dup
	buf cvs show
	exch 230 y moveto
	( ------ ) show
	/FontInfo get /FullName get buf cvs show
	findfont 10 scalefont setfont
	500 y moveto (ABCDE) show
	nl
	} forall
showpage