From 0f419ed29fd15e8ad16a87ddcfd0f74916c5630d Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Sun, 3 Mar 2019 16:02:27 +0000 Subject: [PATCH] stack vertical --- generate-board | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/generate-board b/generate-board index 465a7ed..1d62df9 100755 --- a/generate-board +++ b/generate-board @@ -608,11 +608,13 @@ sub sea_track(){ " ",psvec(mkvec( $dx + $cube_sz, 0 )), " rlineto stroke\n"); } - o(" ",($token_sz * 0.6 + $cube_gap)," ",($cube_gap + $hs_lw), + o(" ",($token_sz * 0.6 + $cube_gap)," ", + ($cube_gap + $hs_lw), " translate\n"); - water_cubes(2); - my $new_n = $track->[$i+1] - 2; - o(" ", 0.5 * (water_cubes_sz(2) - water_cubes_sz($new_n)), + my $bottom = int(($track->[$i+1] + 1) / 2); + water_cubes($bottom); + my $new_n = $track->[$i+1] - $bottom; + o(" ", 0.5 * (water_cubes_sz($bottom) - water_cubes_sz($new_n)), " ", (water_cubes_sz(2)-water_cubes_sz(1)), " translate\n"); water_cubes($new_n); } -- 2.30.2