chiark / gitweb /
recenter cubes
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 3 Mar 2019 16:03:58 +0000 (16:03 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 3 Mar 2019 16:03:58 +0000 (16:03 +0000)
generate-board

index 1d62df9e8d30c798dc452fd3a64c9483668c118d..9e2cc38f17e30e4863bd07eb6a714b3e7e7fd31c 100755 (executable)
@@ -609,7 +609,7 @@ sub sea_track(){
          " rlineto stroke\n");
       }
       o("  ",($token_sz * 0.6 + $cube_gap)," ",
-       ($cube_gap + $hs_lw),
+       ($dy * 0.5 - 0.5 * (water_cubes_sz(2))),
        " translate\n");
       my $bottom = int(($track->[$i+1] + 1) / 2);
       water_cubes($bottom);