Partially implement a framebuffer object for bluring shadows

2021-03-16 20:27:05 +01:00
parent 76a4731785
commit 3707954913
10 changed files with 108 additions and 15 deletions
@@ -524,10 +524,8 @@ reflectCircCreature rad p1 p2 cr =
        Just p3 -> Just ( p1
                        , errorNormalizeV 37 (ssaTriPoint p2 (_crPos cr) p1 (_crRad cr) -.- _crPos cr) 
                            +.+ (_crPos cr -.- _crOldPos cr)
-                        --, errorNormalizeV 38 $ 
-                        --  ssaTriPoint p1 (_crPos cr) p2 (_crRad cr)
-                        --     -.- _crOldPos cr
-                        , _crID cr)
+                        , _crID cr
+                        )

 reflectCircCreatures :: Float -> Point2 -> Point2 -> IM.IntMap Creature -> Maybe (Point2,Point2,Int)
 reflectCircCreatures rad p1 p2 cs = listToMaybe $ sortBy f $ IM.elems $ IM.mapMaybe