Remove left click/hotkey item data types

src/Dodge/Data/Item/Use.hs

@@ -40,14 +40,15 @@ data ItemUse
 --        , _heldAmmoTypes :: IM.IntMap AmmoType
         , _heldParams :: HeldParams
         , _heldTriggerType :: TriggerType
+        , _useCondition :: UseCondition
         }
-    | UseHotkey
-        { _leftUse :: Luse
-        , _leftDelay :: UseDelay
-        , _leftHammer :: HammerPosition
-        , _uequipEffect :: EquipEffect
-        , _leftConsumption :: LeftConsumption
-        }
+--    | UseHotkey
+--        { _leftUse :: Luse
+--        , _leftDelay :: UseDelay
+--        , _leftHammer :: HammerPosition
+--        , _uequipEffect :: EquipEffect
+--        , _leftConsumption :: LeftConsumption
+--        }
     | UseConsume { _cUse :: Cuse }
     | UseEquip { _uequipEffect :: EquipEffect }
     | UseAttach {_uaParams :: AttachParams}
@@ -56,6 +57,11 @@ data ItemUse
     | UseBulletMod { _ubMod :: BulletMod }
     deriving (Eq, Show, Read)
 
+data UseCondition
+    = MustBeHeld
+    | UseableAnytime
+    deriving (Eq, Show, Read)
+
 data TriggerType = AutoTrigger | HammerTrigger
     deriving (Eq, Show, Read)
 
@@ -142,6 +148,11 @@ data MuzzleEffect
         }
     | MuzzleShatter
     | MuzzleDetector
+    | MuzzleBlink
+    | MuzzleUnsafeBlink
+    | MuzzleRewind
+    | MuzzleStopper
+    | MuzzleScroller
     deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data AmmoPerShot 
@@ -192,6 +203,8 @@ makeLenses ''AttachParams
 makeLenses ''AmmoParams
 makeLenses ''MuzzleEffect
 makeLenses ''AmmoPerShot
+makeLenses ''UseCondition
+deriveJSON defaultOptions ''UseCondition
 deriveJSON defaultOptions ''MuzzleEffect
 deriveJSON defaultOptions ''FlareType
 deriveJSON defaultOptions ''TriggerType