Allow for partial reloading

2021-12-01 17:40:09 +00:00
parent d75ea2b252
commit 016a1faf80
21 changed files with 181 additions and 143 deletions
@@ -122,7 +122,7 @@ reloadOverrideR
    :: Creature 
    -> Reader World Creature
 reloadOverrideR cr
-    | cr ^? crInv . ix (_crInvSel cr) . itConsumption . wpLoadedAmmo == Just 0 
+    | cr ^? crInv . ix (_crInvSel cr) . itConsumption . ammoLoaded == Just 0 
            && cr ^. crStance . posture == Aiming
        = return $ cr & crActionPlan . crStrategy .~ StrategyActions Reload reloadActions
    | otherwise = return cr