fix wallslide
This commit is contained in:
parent
ccfc7aaac6
commit
92569c2345
1 changed files with 1 additions and 1 deletions
|
@ -205,7 +205,7 @@ drawTile ai ctx pr pc row col img =
|
||||||
dist = distance (V2 (fromIntegral row) (fromIntegral col))
|
dist = distance (V2 (fromIntegral row) (fromIntegral col))
|
||||||
(V2 (realToFrac pr - 1) (realToFrac pc)) / 4
|
(V2 (realToFrac pr - 1) (realToFrac pc)) / 4
|
||||||
fact =
|
fact =
|
||||||
if (pr <= fromIntegral row + maximum maxrs &&
|
if (pr <= fromIntegral row + minimum maxrs &&
|
||||||
pc >= fromIntegral col + minimum mincs) &&
|
pc >= fromIntegral col + minimum mincs) &&
|
||||||
isWall (fromJust img)
|
isWall (fromJust img)
|
||||||
then min 1 dist
|
then min 1 dist
|
||||||
|
|
Loading…
Reference in a new issue