Remove heldParams record

src/Dodge/Item/Held/BatteryGuns.hs

@@ -19,7 +19,7 @@ sparkGun =
 teslaGun :: Item
 teslaGun =
     defaultHeldItem
-        & itUse . heldParams .~ BeamShooterParams-- (Just (elecCrackleS, 2))
+--        & itUse . heldParams .~ BeamShooterParams-- (Just (elecCrackleS, 2))
         & itParams .~ teslaParams
         & itUse . heldDelay .~ NoDelay
         & itUse . heldMuzzles . ix 0 . mzPos .~ V2 10 0
@@ -41,7 +41,7 @@ teslaParams =
 laser :: Item
 laser =
     defaultHeldItem
-        & itUse . heldParams .~ BeamShooterParams-- Nothing
+--        & itUse . heldParams .~ BeamShooterParams-- Nothing
         & itAmmoSlots .~ singleAmmo ElectricalAmmo
         & itUse . heldDelay .~ NoDelay
         & itUse . heldMuzzles . ix 0 . mzPos .~ V2 6 0
@@ -60,7 +60,7 @@ laser =
 tractorGun :: Item
 tractorGun =
     defaultHeldItem
-        & itUse . heldParams .~ BeamShooterParams
+--        & itUse . heldParams .~ BeamShooterParams
         & itAmmoSlots .~ singleAmmo ElectricalAmmo
         & itUse . heldMuzzles . ix 0 . mzPos .~ V2 30 0
         & itUse . heldMuzzles . ix 0 . mzInaccuracy .~ 0

src/Dodge/Item/Held/Cane.hs

@@ -37,7 +37,6 @@ volleyGun i =
             <*> pure (UseExactly 1)
             <*> ZipList [0..i-1] 
             )
-        & itUse . heldParams . weaponInvLock .~ i + 1
 --        & itUse . heldParams . recoil .~ 30
         & itType .~ HELD (VOLLEYGUN i)
         & itAmmoSlots .~ IM.fromList (zip [0..i-1] $ repeat BulletAmmo)
@@ -74,7 +73,6 @@ burstRifle =
         & itType .~ HELD BURSTRIFLE
         & itUse . heldMuzzles . ix 0 . mzInaccuracy .~ 0.05
         & itUse . heldDelay . rateMax .~ 6
-        & itUse . heldParams . weaponInvLock .~ 7
         & itUse . heldMuzzles %~ doreplicate
   where
     doreplicate (x:_) = [x,x & mzFrame .~ 3,x & mzFrame .~ 6]

src/Dodge/Item/Held/SprayGuns.hs

@@ -25,7 +25,7 @@ flameSpitter =
     flameThrower
         & itType .~ HELD FLAMESPITTER
         & itUse . heldDelay .~ FixedRate{_rateMax = 3, _rateTimeLastUsed = 0}
-        & itUse . heldParams . weaponInvLock .~ 10
+--        & itUse . heldParams . weaponInvLock .~ 10
 --        & itUse . heldParams . weaponRepeat .~ [1..9]
         & itUse . heldMuzzles . ix 0 . mzEffect . nzPressure .~ UniRandFloat 3 4
 
@@ -79,7 +79,7 @@ flameThrower =
             ]
         & itAmmoSlots .~ singleAmmo GasAmmo
         & itType .~ HELD FLAMETHROWER
-        & itUse . heldParams .~ GasSprayParams
-            { _weaponInvLock = 0
---            , _weaponRepeat = mempty
-            }
+--        & itUse . heldParams .~ GasSprayParams
+--            { _weaponInvLock = 0
+----            , _weaponRepeat = mempty
+--            }

src/Dodge/Item/Held/Utility.hs

@@ -41,7 +41,7 @@ detector dt =
         & itUse . heldDelay . rateMax .~ 20
 --        & itUse . heldAim . aimZoom .~ defaultItZoom{_izFac = 1}
         & itAmmoSlots .~ singleAmmo ElectricalAmmo
-        & itUse . heldParams .~ DefaultHeldParams
+--        & itUse . heldParams .~ DefaultHeldParams
         & itType .~ DETECTOR dt
         & itUse . heldMuzzles . ix 0 . mzEffect .~ MuzzleDetector
         & itUse . heldMuzzles . ix 0 . mzAmmoPerShot .~ UseExactly 100
@@ -53,7 +53,7 @@ blinker =
         & itUse . heldDelay . rateMax .~ 20
 --        & itUse . heldAim . aimZoom .~ defaultItZoom{_izFac = 1}
         & itAmmoSlots .~ singleAmmo ElectricalAmmo
-        & itUse . heldParams .~ DefaultHeldParams
+--        & itUse . heldParams .~ DefaultHeldParams
         & itUse . heldMuzzles . ix 0 . mzEffect .~ MuzzleBlink
         & itUse . heldMuzzles . ix 0 . mzAmmoPerShot .~ UseExactly 10000000
         & itType .~ HELD BLINKER