0 setgray 0 setlinecap
1 setlinewidth 0 setlinejoin
10 setmiterlimit [ ] 0 setdash newpath
/languagelevel where
% If level not equal to 1 then
{pop languagelevel
% set strokeadjust and
1 ne
% overprint to their defaults
{false setstrokeadjust false setoverprint
} if
} if
}bind def
/EndEPSF { %def
count op_count sub {pop} repeat
% Clean up dict stack
countdictstack dict_count sub {end} repeat
b4_Inc_state restore
} bind def
%%EndProlog
%%BeginSetup
%%IncludeFont: Times-Roman
%%IncludeFont: Times-Italic
%%EndSetup
%%Page: 1 1
%%BeginPageSetup
/pgsave save def
%%EndPageSetup
/F1 40 /Times-Roman SF
...Set some text with F1...
/F2 40 /Times-Italic SF
...Set some text with F2...
F1 sf
...Set some more text with F1...
F2 sf
...Set some more text with F2...
BeginEPSF
65.2 10 translate
%
.80 .80 scale
%
-4 -4 translate
%
EPS
4 4 604 403 rect
%
clip newpath
%
Position the EPS file
Scale to desired size
Move to lower left of the
Set up clipping path
Set the clipping path
%%BeginDocument: ARTWORK.EPS
%!PS-Adobe-3.0 EPSF-3.0
%%BoundingBox: 4 4 608 407
%%Title: (ARTWORK.EPS)
%%CreationDate: (10/17/90) (5:04 PM)
%%EndComments
...PostScript code for illustration..
showpage
28
(1 May 92)