Make Nearby Items subheading disappear if none nearby/not filtering

This commit is contained in:
2025-12-24 22:14:13 +00:00
parent 27cb05b8f7
commit b9a6bd5f67
3 changed files with 4 additions and 11 deletions
-9
View File
@@ -37,7 +37,6 @@ crMvByNoStride p lw cr = crMvAbsoluteNoStride lw (rotateV (_crDir cr) p) cr
crMvAbsolute :: LWorld -> Point2 -> Creature -> Creature
crMvAbsolute lw p' cr =
-- advanceStepCounter (magV p)
cr
& crPos . _xy +~ p
& crMvDir .~ argV p
@@ -58,14 +57,6 @@ strengthFactor i
crMvForward :: Float -> LWorld -> Creature -> Creature
crMvForward speed = crMvBy (V2 speed 0)
advanceStepCounter :: Float -> Creature -> Creature
advanceStepCounter speed cr = cr & crStance . carriage %~ f
where
f car = case car of
Standing -> f (Walking 0 RightForward)
Walking i ff -> Walking (min (cr ^. crStance . strideLength) (i + speed)) ff
_ -> car
creatureTurnTo :: Point2 -> Creature -> Creature
creatureTurnTo p cr
| vToTarg == V2 0 0 = cr -- this should deal with the angleVV error