Reify shockwaves

2022-07-24 00:20:28 +01:00
parent 97174535d8
commit 5b9e9968f3
17 changed files with 197 additions and 166 deletions
@@ -51,7 +51,7 @@ teslaBeamCombine (p,(a,b,bm),(x,y,_)) w

 lasRayAt :: Color -> Int -> Float -> Point2 -> Float -> LaserStart
 lasRayAt col dam phasev pos dir = LaserStart
-    { _lpDamage = dam
+    { _lpType = DamageLaser dam
    , _lpPhaseV = phasev
    , _lpPos = pos
    , _lpDir = dir