Add machine direction to turret direction

This commit is contained in:
2026-03-12 17:58:54 +00:00
parent 24af6a731b
commit be72daf6d5
6 changed files with 35 additions and 18 deletions
+2 -1
View File
@@ -1159,7 +1159,8 @@ mcShootLaser _ mc =
shootLaser (MachinePrimarySound (_mcID mc)) (DamageLaser 11) 1 pos dir yellow
where
pos = _mcPos mc +.+ 20 *.* unitVectorAtAngle dir
dir = mc ^?! mcType . mctTurret . tuDir
dir = (mc ^?! mcType . mctTurret . tuDir)
+ mc ^. mcDir
mcShootAuto :: Item -> Machine -> World -> World
mcShootAuto itm mc w