Split item consumables from item use

This commit is contained in:
2024-12-18 19:35:39 +00:00
parent db8e26b99d
commit 5600b29714
8 changed files with 63 additions and 59 deletions
+4 -9
View File
@@ -53,16 +53,11 @@ data ItemUse
| UseCraft
| UseAttach {_uaParams :: AttachParams}
| UseAmmoMag
{ _amagLoadStatus :: ReloadStatus
, _amagParams :: AmmoParams
, _amagType :: AmmoType
}
| UseScope { _uScope :: Scope }
-- | UseTargeting
-- { _tgPos :: Maybe Point2
-- , _tgID :: Maybe Int
-- , _tgActive :: Bool
-- { _amagLoadStatus :: ReloadStatus
-- , _amagParams :: AmmoParams
-- , _amagType :: AmmoType
-- }
| UseScope { _uScope :: Scope }
| UseBulletMod { _ubMod :: BulletMod }
deriving (Eq, Show, Read)