Skip to content

Instantly share code, notes, and snippets.

@gwollman

gwollman/type-samples.ps

Created February 26, 2022 03:17
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save gwollman/a637eb3fb7e5ee61624426b7698e4b7d to your computer and use it in GitHub Desktop.
Save gwollman/a637eb3fb7e5ee61624426b7698e4b7d to your computer and use it in GitHub Desktop.
Download ZIP
A trivial program to generate type samples of the standard PostScript fonts
Raw
type-samples.ps
%!PS-
/fonts [ /Bookman-Light /Times-Roman /Palatino-Roman /NewCenturySchlbk-Roman
/AvantGarde-Book /ZapfChancery-MediumItalic /Courier /Helvetica
/Symbol /ZapfDingbats ] def
/size 36 def
/leading 12 def
/showit {
dup
findfont size scalefont setfont
( ) cvs
gsave show grestore
0 size leading add rmoveto
} def
50 50 moveto
fonts { showit } forall
showpage
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment