Move toward adding multiple equipable items that are not directly usable

2021-12-08 17:09:24 +00:00
parent 9f6e5af991
commit a9139db0a8
22 changed files with 260 additions and 137 deletions
@@ -40,6 +40,7 @@ defaultCreature = Creature
    , _crInvSel = 0
    , _crInvCapacity = 25
    , _crInvLock = False
+    , _crInvEquipped = mempty
    , _crLeftInvSel = Nothing
    , _crState  = defaultState
    , _crCorpse = setLayer 0 $ onLayer CorpseLayer $ color (greyN 0.5) $ circleSolid 10
@@ -145,7 +146,7 @@ defaultEquipment = Item
    , _itInvSize = 1
    , _itDimension = defItDimCol yellow
    , _itConsumption = NoConsumption
-    , _itUse = NoUse
+    , _itUse = EquipUse
    , _itScroll = \ _ _ -> id
    , _itAttachment = NoItAttachment
    , _itParams = NoParams