This commit is contained in:
2022-05-24 23:06:07 +01:00
parent 1492c12d8a
commit b10e141a86
6 changed files with 8 additions and 53 deletions
+1 -1
View File
@@ -174,7 +174,7 @@ createShieldWall cr invid w = case _itEffectID $ _itEffect it of
rad = _crRad cr + 2
a = crpos +.+ rad *.* crdirv -.- 10 *.* therot crdirv
b = crpos +.+ rad *.* crdirv +.+ 10 *.* therot crdirv
therot | crIsAiming' cr = vNormal
therot | crIsAiming cr = vNormal
| otherwise = rotateV (twoFlatHRot cr) . vNormal
removeShieldWall :: Creature -> Int -> World -> World
removeShieldWall cr invid w = case _itEffectID $ _itEffect it of