Allow modifiable speed changes

2021-03-26 14:20:13 +00:00
parent fb1d7571e7
commit fb17502781
4 changed files with 8 additions and 2 deletions
@@ -88,6 +88,8 @@ data World = World
    , _seenLocations        :: IM.IntMap (World -> Point2,String)
    , _selLocation          :: Int
    , _keyConfig            :: KeyConfigSDL
+    , _varMovementSpeedModifier :: Float
+    , _varMovementStrafeSpeedModifier :: Float
    } 

 data Corpse = Corpse