Add muzzle flare

2021-10-31 13:04:18 +00:00
parent 502be6f64f
commit a6867b1fad
9 changed files with 80 additions and 34 deletions
@@ -703,8 +703,8 @@ boosterGun = defaultGun

 aTeslaArc :: Creature -> World -> World
 aTeslaArc cr w 
-    = teslaGunFlashAt (pos +.+ 5 *.* unitVectorAtAngle dir)
-    $ set randGen g w
+    = -- teslaGunFlashAt (pos +.+ 5 *.* unitVectorAtAngle dir)
+    set randGen g w
    & particles %~ (makeTeslaArcAt col pos dir :)
  where 
    pos = _crPos cr +.+ (_crRad cr +1) *.* unitVectorAtAngle dir