Partially implement a framebuffer object for bluring shadows

src/Dodge/Item/Weapon.hs

@@ -353,10 +353,13 @@ maybeSetTarget f cid w = case join $ w ^? creatures . ix cid . crInv . ix itRef
         itRef = _crInvSel cr
 
 shootBezier :: Point2 -> Int -> World -> World
-shootBezier targetp cid w = (shootWithSound 0 . withMuzFlare . withRecoil 40 . torqueBefore 0.05
-                                . withRandomDir 0.5)
-                                bezBul cid w
+shootBezier targetp cid w = (shootWithSound 0 
+                            . withMuzFlare 
+                            . withRecoil 40 
+                            . torqueBefore 0.05 
+                            ) bezBul cid w
     where
+-- note that torqueBefore will not affect the startp here
         bezBul = mkBezierBul startp controlp targetp
         controlp = mouseWorldPos w
         cr = _creatures w IM.! cid
@@ -370,7 +373,7 @@ mkBezierBul startp controlp targetp cid w = over particles' (bbul :) w
                                 (threeEff' bulHitCr' bulHitWall' bulHitFF') 5
         (randPos,randPos') = flip evalState (_randGen w) 
                                     $ do a <- randInCirc 10
-                                         b <- randInCirc 10
+                                         b <- randInCirc 20
                                          return (a,b)
 
 removeItAttachment :: Int -> Int -> World -> World

src/Dodge/Item/Weapon/TriggerType.hs

@@ -60,8 +60,6 @@ withSidePush maxSide eff cid w = eff cid . over (creatures . ix cid) push $ w
                              (+.+ rotateV (_crDir cr) (0,(pushAmount) / _crMass cr))
                              cr
           (pushAmount, _) = randomR (-maxSide,maxSide) $ _randGen w
-          
-          
 
 shootWithSound :: Int -> (Int -> World -> World) -> Int -> World -> World
 shootWithSound soundid f cid w