Continue to tweak death effects

2022-06-04 15:52:38 +01:00
parent 63af928a1a
commit 582881ca66
13 changed files with 126 additions and 27 deletions
@@ -8,6 +8,8 @@ module Dodge.Item.Weapon.BulletGun.Rod
    ) where
 import Dodge.Data
 import Dodge.Item.Weapon.BulletGun.Clip
+import Dodge.Particle.HitEffect
+import Dodge.Particle.Damage
 --import Dodge.ChainEffect
 --import Dodge.TweakBullet
 import Dodge.Default.Weapon
@@ -81,6 +83,7 @@ bangRod = defaultGun
    & itUse . useAim . aimRange .~ 1
    & itUse . useAim . aimStance .~ OneHand
    & itUse . useAim . aimZoom .~ defaultItZoom {_itZoomFac = 1.5}
+    & itConsumption . aoType . amBulEff .~ expireAndDamage heavyBulDams
 baseRodShape :: Shape
 baseRodShape = colorSH orange $ upperPrismPoly 3 $ rectXH 20 2
 baseAMRShape :: Shape