Continue bullet refactor

2022-07-16 22:02:01 +01:00
parent 301946ff8f
commit c9f7f39f22
12 changed files with 31 additions and 51 deletions
@@ -44,7 +44,7 @@ applyDamageEffect dm de cr w = case de of
        & creatures . ix (_crID cr) . crDir +~ rot
    BounceBullet bt | crIsArmouredFrom p cr -> w & instantBullets .:~ bouncer
      where
-        bouncer = (aBulAt Nothing id (Just (_buColor bt)) pOut reflectVel (_buDrag bt)
+        bouncer = (aBulAt Nothing id pOut reflectVel (_buDrag bt)
                                          (_buHitEff bt) (_buWidth bt)
                  ) {_buTimer = _buTimer bt - 1}
        pOut = p +.+ 2 *.* newDir