🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.postscript
Article #2499

How to print a font sampler . . . . . .

#2499
From: Paul Haeberli
Date: Thu, 12 Jul 1990 01:21
40 lines
1159 bytes
%!
%	tryfont -
%		Draw all the standard characters in a font.  Place this
%	after the font definition if it isn't a standard font
%
%				Paul Haeberli - 1990
%
%
/Times-Roman		% name the font to draw here 
%
%
findfont 0.5 scalefont setfont
0.0 setgray

/centershow {
dup
stringwidth pop -2 div 0 rmoveto
show
} def

72 72 scale

4.0 9.0 moveto
(AaBbCcDdEeFf) centershow
4.0 8.0 moveto
(GgHhIiJjKkLl) centershow
4.0 7.0 moveto
(MmNnOoPpQqRr) centershow
4.0 6.0 moveto
(SsTtUuVvWwXx) centershow
4.0 5.0 moveto
(YyZz) centershow
4.0 4.0 moveto
(1234567890) centershow
4.0 3.0 moveto
(`~!@#$%^&*\(\)_+,.) centershow
4.0 2.0 moveto
(-={}[]|\\:";'<>,?/) centershow

showpage
Technical Details
Message-ID: <63900@sgi.sgi.com>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!zaphod.mps.ohio-state.edu!mips!sgi!paul@manray.asd.sgi.com

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!zaphod.mps.ohio-state.edu!mips!sgi!paul@manray.asd.sgi.com
From: paul@manray.asd.sgi.com (Paul Haeberli)
Newsgroups: comp.lang.postscript,comp.sys.sgi,comp.sys.next
Subject: How to print a font sampler . . . . . .
Message-ID: <63900@sgi.sgi.com>
Date: 12 Jul 90 01:21:36 GMT
Sender: paul@manray.asd.sgi.com
Organization: Silicon Graphics, Inc., Mountain View, CA
Lines: 40