repis();
o <<END;
+ gsave
+ /Times-Roman findfont 4.0 scalefont setfont
+ 4 97 moveto (cover) show
+ 6 93.5 moveto (up) show
+ 4 89 moveto
+ /Helvetica-Bold-Italic findfont 3.5 scalefont setfont (35) show
+ 1 0 rmoveto
+ /Helvetica-Bold findfont 3.5 scalefont setfont (15) show
+ grestore
+
gsave
$paper_x $x_cut sub $y_top 7 sub translate