Implement bullet trajectories using attachable items

src/Dodge/Data/Item/Use.hs

@@ -35,7 +35,7 @@ data ItemUse
     = HeldUse
         { -- _heldUse :: Huse
           _heldDelay :: UseDelay
-        , _heldMods :: HeldMod
+--        , _heldMods :: HeldMod
         , _heldHammer :: HammerPosition
         , _heldAim :: AimParams
         , _heldAmmoTypes :: IM.IntMap AmmoType
@@ -78,6 +78,9 @@ data ItemUse
         , _tgID :: Maybe Int
         , _tgActive :: Bool
         }
+    | BulletTrajectoryUse
+        { _btuBulletTrajectory :: BulletTrajectoryType
+        }
     deriving (Eq, Show, Read) --Generic, Flat)
 
 data TriggerType