chiark
/
gitweb
/
~ian
/
pandemic-rising-tide.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9f531e7
)
wip track cubes
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sat, 2 Mar 2019 16:48:39 +0000
(16:48 +0000)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sat, 2 Mar 2019 16:48:39 +0000
(16:48 +0000)
generate-board
patch
|
blob
|
history
diff --git
a/generate-board
b/generate-board
index 925e88cd679422f5b08c6542ad26b5d0e1188353..9a5374fff66d522582233eb00750e9787bbb14a0 100755
(executable)
--- a/
generate-board
+++ b/
generate-board
@@
-463,6
+463,7
@@
END
}
our $cube_sz = 7 * MM2PT;
+our $cube_gap = $cube_sz * 0.2;
sub water_cube(){
my $s = $cube_sz;
@@
-500,7
+501,9
@@
sub sea_track(){
o(" gsave ",
psvec($pos[$i] + mkvec(-0.0 * $token_sz, $dy/2))," translate\n");
o(" 0 0 moveto",
- " ",psvec(mkvec( $token_sz * 1.25, 0 )), " rlineto stroke\n");
+ " ",psvec(mkvec( $token_sz * 1.25 + $cube_sz, 0 )), " rlineto stroke\n");
+ o(" ",($token_sz * 0.6 + $cube_gap)," ",($cube_gap + $hs_lw),
+ " translate\n");
water_cube();
o(" grestore\n");
}