Stun turrets with electrical damage directly

2026-02-15 17:15:08 +00:00
parent a9e80809e8
commit 8ae58823f8
7 changed files with 42 additions and 39 deletions
@@ -27,16 +27,17 @@ putLasTurret rotSpeed =
            (reverse $ square 10)
            ( defaultMachine
 --                & mcColor .~ blue
-                & mcType .~ (lasTurret & _McTurret . tuTurnSpeed .~ rotSpeed)
+                & mcType .~ (lasTurret & mctTurret . tuTurnSpeed .~ rotSpeed)
                & mcHP .~ 50000
            )
            (Just laser)

 lasTurret :: MachineType
-lasTurret = McTurret $
+lasTurret = McTurret
    Turret
        { _tuWeapon = 0
        , _tuTurnSpeed = 0.1
        , _tuFireTime = 0
        , _tuDir = 0
-        }
+        } 
+    0