Move weapon repetitions into trigger type

src/Dodge/Data/Item/Use.hs

@@ -75,15 +75,9 @@ data AttachParams
 
 data HeldParams
     = DefaultHeldParams
-    | GasSprayParams
-        { _weaponInvLock :: Int
-        , _weaponRepeat :: [Int]
-        }
+    | GasSprayParams { _weaponInvLock :: Int }
     | BeamShooterParams
-    | BulletShooterParams
-        { _weaponInvLock :: Int
-        , _weaponRepeat :: [Int]
-        }
+    | BulletShooterParams { _weaponInvLock :: Int }
     deriving (Eq, Show, Read) --Generic, Flat)
 
 data AmmoParams

src/Dodge/Data/WorldEffect.hs

@@ -18,6 +18,7 @@ import Geometry.Data
 import Sound.Data
 
 data ItCrWdWd = ItCrWdItemHeldEffect
+    | ItCrWdItemHeldEffectNoHammer
     --deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data WdWd