blob: ea263f3e24c44f7bccfc5f7cc5ab4afd0aa1627c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
%!PS EPSF
%%Title: Typesetting along arcs
%%Creator: cgl
%%CreationDate: June 4 1996
%%BoundingBox: -100 50 100 125
%%Pages: 1
%%EndProlog
%%Page: 1 1
/Courier findfont 10 scalefont setfont
%150 650 translate
%
/text (happybirthday) def
60 rotate
0 1 12{0 100 moveto
dup%double loop var
text exch 1 getinterval show
-10 rotate
}for
stroke
showpage
|