Creature shadow test

2021-08-28 20:42:20 +01:00
parent f977742f06
commit 55f1d89a5e
6 changed files with 26 additions and 8 deletions
@@ -51,9 +51,6 @@ createBarrelSpark pos dir maycid time colid w
      where sp = head (_btTrail' bt)
            ep = sp +.+ _btVel' bt

-
-                
-
 damCrsOnLine :: Int -> Point2 -> Point2 -> World -> World
 damCrsOnLine dam p1 p2 = over creatures (IM.map damIfOnLine)
    where damIfOnLine cr | circOnSeg p1 p2 (_crPos cr) (_crRad cr)