The Compositor's Proof
A printer's proof sheet showing artkit's paragraph flow: a round medallion, a justified block, two columns.
How it is made
A motto is set inside a round medallion with tfflow and a hand-written circle boundary procedure. A body paragraph is justified with tfblock, and a two-column colophon set with tfcols genuinely spills from the first column into the second.
Details
- Category
- Lettering and type
- Tags
- layout
- Libraries
- artkit
- Added
- 2026-08-07
- Built in
- issue #16
- Page size
- 620 × 760 points
Source
View source the whole program in a scrolling window, or read gallery/compositors_proof.ps on GitHub. To draw it yourself, from a checkout of the repository:
pscat --page 620x760 gallery/compositors_proof.ps
The first 40 of 81 lines of the source
%!PS-Adobe-3.0
%%Title: The Compositor's Proof (issue #16, artkit paragraph flow)
%%BoundingBox: 0 0 620 760
%%EndComments
% A printer's proof sheet for artkit's new paragraph-flow section
% (lib/artkit.ps): a motto set inside a round medallion via tfflow and
% a hand-written boundsproc (available width computed straight off the
% circle's own equation -- the "arbitrary region" capability tfblock/
% tfcols are just convenience wrappers over), a justified body
% paragraph under tfblock, and a two-column colophon under tfcols,
% carrying one run of copy from the first column into the second. Run
% from the repo root:
%
% pscat --page 620x760 gallery/compositors_proof.ps
(lib/artkit.ps) run
0 srand
% --- parchment page -----------------------------------------------------
0.97 0.95 0.90 setrgbcolor clippath fill
0.45 0.35 0.22 setrgbcolor 1.5 setlinewidth
newpath 20 20 moveto 600 20 lineto 600 740 lineto 20 740 lineto closepath stroke
newpath 26 26 moveto 594 26 lineto 594 734 lineto 26 734 lineto closepath stroke
0.18 0.13 0.08 setrgbcolor
% corner ornaments -- a small star at each inside corner
0.55 0.40 0.20 setrgbcolor
newpath 36 36 8 4 5 star fill
newpath 36 724 8 4 5 star fill
newpath 584 36 8 4 5 star fill
newpath 584 724 8 4 5 star fill
0.18 0.13 0.08 setrgbcolor
% --- medallion: motto set inside a circle (tfflow, arbitrary region) ----
/MEDX 310 def /MEDY 640 def /MEDR 78 def
0.45 0.35 0.22 setrgbcolor 1.2 setlinewidth
newpath MEDX MEDY MEDR 0 360 arc stroke
newpath MEDX MEDY MEDR 6 sub 0 360 arc stroke