Fix aim sweep

2025-05-31 22:11:26 +01:00
parent 8b07fffa7c
commit c56e3e96ee
3 changed files with 15 additions and 7 deletions
@@ -278,7 +278,8 @@ drawAimSweep cr w = fold $ do
            | otherwise = cdir
    return $
        uncurryV translate (worldPosToScreen campos p) $
-            arcFull (a - rot) 10 white (a' - rot) 1 white (5 + dist mwp p * campos ^. camZoom) white
+            arcFull (a - rot) 10 white (a + diffAngles cdir a - rot) 1 white (5 + dist mwp p * campos ^. camZoom) white
+            --arcFull (a - rot) 10 white (a' - rot) 1 white (5 + dist mwp p * campos ^. camZoom) white
  where
    cdir = _crDir cr
    rot = campos ^. camRot