Stop door z fighting when opened

2021-11-27 00:28:59 +00:00
parent e231b851d9
commit 774808663a
4 changed files with 58 additions and 18 deletions
@@ -112,7 +112,7 @@ placeSlideDoor isPathable col cond a b speed gw = (drid, gw & gWorld .~ (addWall
        }
    pairs = rectanglePairs 9 a b
    shiftedPairs = map (bimap shiftLeft shiftLeft) pairs
-    shiftLeft  = (+.+ (a -.- b))
+    shiftLeft  = (+.+ (a -.- b +.+ (normalizeV (b -.- a))) )
    wlids = take 4 [IM.newKey $ _walls w ..]
 -- old code that may help with pathing
 --import Dodge.LevelGen.Pathing