Separate incendiary ebs and flamelets

2025-06-09 11:41:11 +01:00
parent 5d8b493636
commit 5286485d62
7 changed files with 223 additions and 213 deletions
@@ -9,7 +9,8 @@ import Picture
 drawEnergyBall :: EnergyBall -> Picture
 drawEnergyBall eb = case _ebEff eb of
    FlameletBall x a -> drawFlamelet x a eb
-    ElectricalBall -> drawStaticBall eb
+    IncendiaryBall -> drawFlamelet 5 0 eb
+    ElectricalBall{} -> drawStaticBall eb
    ExplosiveBall -> mempty
    FlashBall -> mempty