fix wallslide

This commit is contained in:
nek0 2018-03-06 16:37:30 +01:00
parent ccfc7aaac6
commit 92569c2345

View File

@ -205,7 +205,7 @@ drawTile ai ctx pr pc row col img =
dist = distance (V2 (fromIntegral row) (fromIntegral col))
(V2 (realToFrac pr - 1) (realToFrac pc)) / 4
fact =
if (pr <= fromIntegral row + maximum maxrs &&
if (pr <= fromIntegral row + minimum maxrs &&
pc >= fromIntegral col + minimum mincs) &&
isWall (fromJust img)
then min 1 dist