chiark
/
gitweb
/
~ianmdlvl
/
quacks.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
pumpkin books adjustments from play
[quacks.git]
/
pumpkin-books.ps.pl
diff --git
a/pumpkin-books.ps.pl
b/pumpkin-books.ps.pl
index b0f07fac10bd7e343785a88c56908aee3c444fca..2b3dbbe275ba637b3d2d9804fa3c79c5fa4390f4 100755
(executable)
--- a/
pumpkin-books.ps.pl
+++ b/
pumpkin-books.ps.pl
@@
-214,7
+214,7
@@
END
}
sub book_blue () {
}
sub book_blue () {
- my $o = general_book($blue, [qw(4
10 18
)]);
+ my $o = general_book($blue, [qw(4
9 17
)]);
$o .= <<END;
/Times-Bold findfont 15 scalefont setfont $black
$o .= <<END;
/Times-Bold findfont 15 scalefont setfont $black
@@
-323,7
+323,7
@@
END
$o .= exposition(<<END);
The value of this chip is
1 higher than the number of pumpkins
$o .= exposition(<<END);
The value of this chip is
1 higher than the number of pumpkins
-
previously placed
in the pot (but max.4)
+in the pot (but max.4)
END
$o;
END
$o;
@@
-379,7
+379,7
@@
END
}
sub book_yellow () {
}
sub book_yellow () {
- my $o = general_book($yellow, [qw(5 11 1
8
)]);
+ my $o = general_book($yellow, [qw(5 11 1
9
)]);
$o .= <<END;
gsave
$o .= <<END;
gsave