diff options
author | Juan J. Martinez <jjm@usebox.net> | 2023-02-07 22:25:26 +0000 |
---|---|---|
committer | Juan J. Martinez <jjm@usebox.net> | 2023-02-07 22:25:26 +0000 |
commit | 0fa864f7ffaa1cdb461ea6ef50d63aebb5d20e79 (patch) | |
tree | c95106de84bfa78fbabcc60e92b89ca878ddf154 /src | |
parent | 9534c490c5c318e6c29ebf881ac5350545f479e5 (diff) | |
download | space-plat-hs-0fa864f7ffaa1cdb461ea6ef50d63aebb5d20e79.tar.gz space-plat-hs-0fa864f7ffaa1cdb461ea6ef50d63aebb5d20e79.zip |
No need to apply gravity, only pretend we fall through the platform
Diffstat (limited to 'src')
-rw-r--r-- | src/Game/Entities.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Game/Entities.hs b/src/Game/Entities.hs index 05149d0..e8267db 100644 --- a/src/Game/Entities.hs +++ b/src/Game/Entities.hs @@ -166,7 +166,7 @@ updateVertical jump down e | down && not (e.isBlocked (e.x + 2) (e.y + 24 + 8)) && not (e.isBlocked (e.x + 12) (e.y + 24 + 8)) = - applyGravity 8 e {gravity = gravityDown, frame = jumpFrame, y = e.y + 1} + e {gravity = gravityDown, frame = jumpFrame, y = e.y + 1} | otherwise = e applyGravity :: Int -> Entity -> Entity |