justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Tweak hover crit height

Browse Source
This commit is contained in:
justin
2026-04-03 00:10:59 +01:00
parent 06c7e89dee
commit 8037c69d16
8 changed files with 72 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Creature/State/WalkCycle.hs
+5 -1
View File
@@ -22,8 +22,12 @@ updateCarriage cid w
Nothing
& over (cWorld . lWorld . creatures . ix cid . crStance . carriage) resetStride
| Just cr <- w ^? cWorld . lWorld . creatures . ix cid
, Flying _ x oop <- cr ^. crStance . carriage =
, z <- cr ^. crPos . _z
, Flying dz x oop <- cr ^. crStance . carriage =
w & cWorld . lWorld . creatures . ix cid . crPos . _xy +~ x *^ f (cr ^. crOldPos . _xy - oop)
& cWorld . lWorld . creatures . ix cid . crPos . _z +~ dz
& cWorld . lWorld . creatures . ix cid . crStance . carriage . zSpeed
%~ if z < 17 then min 0.05 . (+0.001) else max (-0.05) . (subtract 0.001)
| otherwise = w
where
-- limits max speed gained through inertia