Improve window drawing

2025-10-28 09:58:44 +00:00
parent d6c4d3d609
commit 10503da955
9 changed files with 58 additions and 42 deletions
@@ -13,7 +13,6 @@ 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 (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