Refactor crPos to be a V3

2025-10-10 13:47:31 +01:00
parent 98ece551c7
commit 49fb982877
58 changed files with 375 additions and 307 deletions
@@ -2,6 +2,7 @@

 module Dodge.Creature.State.WalkCycle (updateWalkCycle) where

+import Linear
 import Control.Lens
 import Dodge.Data.World
 import Dodge.SoundLogic
@@ -15,7 +16,7 @@ updateWalkCycle cid w
        w
            & soundMultiFrom
                [FootstepSound i | i <- [0 .. 10]]
-                (cr ^. crPos)
+                (cr ^. crPos . _xy)
                (chooseFootSound ff)
                Nothing
            & over (cWorld . lWorld . creatures . ix cid . crStance . carriage) resetStride