Partial refactor of bullet weapon effect chain

src/Dodge/Item/Held/Rod.hs

@@ -7,6 +7,7 @@ module Dodge.Item.Held.Rod (
     machineGun,
 ) where
 
+import Dodge.SoundLogic.ExternallyGeneratedSounds
 import Dodge.Data.Item
 import Dodge.Default
 --import Dodge.Item.Weapon.Bullet
@@ -24,6 +25,8 @@ bangRod =
                 , _recoil = 50
                 , _torqueAfter = 0.3
                 , _randomOffset = 0
+                , _sidePush = 0
+                , _bulGunSound = bangEchoS
                 }
         & itUse . heldDelay . rateMax .~ 12
         & itUse . heldMods .~ BangRodMod
@@ -35,7 +38,7 @@ bangRod =
         & itUse . heldAim . aimStance .~ OneHand
         & itUse . heldAim . aimZoom .~ defaultItZoom{_izFac = 1.5}
         -- & itUse . heldAim . aimHandlePos .~ 5
-        & itUse . heldAim . aimMuzzles .~ [Muzzle (V2 30 0) 0 0.1 0]
+        & itUse . heldAim . aimMuzzles .~ [Muzzle (V2 30 0) 0 0.1 0 DefaultFlareType]
 --        & itUse . heldConsumption . laAmmoType .~ hvBulletAmmo
 
 elephantGun :: Item