Partially working mounts on lerp doors

2025-10-22 11:03:46 +01:00
parent f8073381ee
commit af245fb5bf
10 changed files with 78 additions and 150 deletions
@@ -13,7 +13,8 @@ doWdBl wb w = case wb of
    WdTrig i -> fromMaybe False $ w ^? cWorld . lWorld . triggers . ix i
    WdBlDoorMoving i -> fromMaybe False $ do
        dr <- w ^? cWorld . lWorld . doors . ix i
-        return (DoorHalfway == _drStatus dr)
+        --return (DoorHalfway == _drStatus dr)
+        return (0 /= _drLerp dr && 1 /= _drLerp dr)
    WdBlCrFilterNearPoint r p t -> any (crNearPoint r p) (IM.filter (doCrBl t) (w ^. cWorld . lWorld . creatures))
    WdBlBtOn btid -> w ^?! cWorld . lWorld . buttons . ix btid . btEvent . btOn -- unsafe
    WdBlNegate x -> not $ doWdBl x w