diff -r 87a5d2502904 -r 98192121dc69 hedgewars/VGSHandlers.inc --- a/hedgewars/VGSHandlers.inc Wed Sep 07 20:35:24 2011 -0400 +++ b/hedgewars/VGSHandlers.inc Wed Sep 07 20:53:45 2011 -0400 @@ -604,6 +604,7 @@ ShakeCamera(maxMovement); end; *) + if Gear^.Timer > 250 then DeleteVisualGear(Gear); end; @@ -612,6 +613,9 @@ gX,gY: LongInt; vg: PVisualGear; begin +ScreenFade:= sfFromWhite; +ScreenFadeValue:= 250; +ScreenFadeSpeed:= 5; gX:= round(Gear^.X); gY:= round(Gear^.Y); AddVisualGear(gX, gY, vgtSmokeRing);