Clarify number of distortions, play with distorting bullets

2025-11-19 21:49:20 +00:00
parent 610936a5fa
commit 10dbb238c8
7 changed files with 93 additions and 72 deletions
@@ -7,5 +7,5 @@ import Control.Lens

 updateDistortion :: Distortion -> Maybe Distortion
 updateDistortion rd
-    | rd ^. rdTime > 0 = Just $ rd & rdTime .~ 1
+    | rd ^. rdTime > 0 = Just $ rd & rdTime -~ 1
    | otherwise = Nothing