diff --git a/Tools/StatePlot.hs b/Tools/StatePlot.hs
--- a/Tools/StatePlot.hs
+++ b/Tools/StatePlot.hs
@@ -121,7 +121,7 @@
         }
       let track2y i = case barHeight conf of {
           BarHeightFixed bh -> fromIntegral (i+1) * yStep - bh/2
-        ; BarHeightFill     -> fromIntegral i     * yStep - yStep/2
+        ; BarHeightFill     -> fromIntegral (i+1) * yStep - yStep/2
         }
       let drawTick (t, ms) = do {
           setLineStyle $ solidLine 1 (opaque black)
diff --git a/splot.cabal b/splot.cabal
--- a/splot.cabal
+++ b/splot.cabal
@@ -1,5 +1,5 @@
 Name: splot
-Version: 0.1.18
+Version: 0.1.19
 License: BSD3
 License-file: LICENSE
 Copyright: Eugene Kirpichov, 2010