Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
$o .= <<END;
gsave
- /Helvetica-Bold findfont 7 scalefont setfont
+ /Helvetica-Bold findfont 6.5 scalefont setfont
END
foreach (split /\n/, $data) {
s{\#.*}{};
$money += 4 * $repi;
$veeps += 2 * $repi;
- my $sqx = 4.2;
- my $sqy = 3.5;
+ my $sqx = 4.1;
+ my $sqy = 3.2;
$o .= <<END;
% place $x $y $money $veeps $ruby
gsave ${\ chip($anychip, 0) } grestore
-4 1 moveto ($money) show
- -2 -3.0 translate
+ -1.5 -3.0 translate
gsave
newpath -$sqx -$sqy moveto