/CharterBT-Italic findfont 100 scalefont setfont
230 250 moveto
45 rotate
(Title) show
showpage
quit
#gs -sDEVICE=pbmraw -sOutputFile=rotate1.pbm -g640x480 -r72 rotate1.ps
/CharterBT-Italic findfont 60 scalefont setfont
370 40 moveto
30 30 360 {
30 rotate
(Title) show
} for
showpage
quit
# gs -sDEVICE=pbmraw -sOutputFile=rotate2.pbm -g640x480 -r72 rotate2.ps
/CharterBT-Italic findfont 100 scalefont setfont
220 220 moveto
(Title) show
/CharterBT-Italic findfont 60 scalefont setfont
370 40 moveto
30 30 360 {
30 rotate
(Title) show
} for
showpage
quit
# gs -sDEVICE=pbmraw -sOutputFile=rotate3.pbm -g640x480 -r72 rotate3.ps
/CharterBT-Italic findfont 60 scalefont setfont
/Count 0 def
30 30 360 {
300 200 moveto
Count 30 mul rotate
(Title) show
Count -30 mul rotate
/Tmp Count def
/Count { Tmp 1 add } def
} for
showpage
quit
# gs -sDEVICE=pbmraw -sOutputFile=rotate4.pbm -g640x480 -r72 rotate4.ps
/Count 1 def
320 220 moveto
15 15 360 {
/CharterBT-Italic findfont Count 2.5 mul scalefont setfont
30 rotate
(Title) show
/Tmp Count def
/Count { Tmp 1 add } def
} for
showpage
quit
# gs -sDEVICE=pbmraw -sOutputFile=rotate5.pbm -g640x480 -r72 rotate5.ps
/RotString {
/Count 1 def
moveto
/Text exch def
10 10 360 {
/CharterBT-Italic findfont Count 1.5 mul scalefont setfont
30 rotate
Text show
/Tmp Count def
/Count { Tmp 1 add } def
} for
} def
3 1 scale
(Title) 120 220 RotString
showpage
quit
#gs -sDEVICE=pbmraw -sOutputFile=rotate6.pbm -g640x480 -r72 rotate6.ps
Ghostscript version 2.6.1 (5/28/93) Copyright (C) 1990-1993 Aladdin Enterprises, Menlo Park, CA.