--- a/hedgewars/uVisualGears.pas	Tue Jun 29 23:30:49 2010 -0400
+++ b/hedgewars/uVisualGears.pas	Wed Jun 30 12:55:33 2010 +0200
@@ -131,7 +131,7 @@
         exit
         end;
 
-if cReducedQuality and
+if ((cReducedQuality and rqFancyBoom) <> 0) and
    not (Kind in
    [vgtTeamHealthSorter,
     vgtSmallDamageTag,
@@ -141,8 +141,8 @@
     vgtSmokeTrace,
     vgtEvilTrace]) then
     begin
-    AddVisualGear:= nil;
-    exit
+      AddVisualGear:= nil;
+      exit
     end;
 
 New(gear);
@@ -345,7 +345,7 @@
 var Gear, t: PVisualGear;
     dmg: LongInt;
 begin
-if (vobCount = 0) or (vobCount > 200) or cReducedQuality then exit;
+if (vobCount = 0) or (vobCount > 200) or ((cReducedQuality and rqkillFlakes) <> 0) then exit;
 t:= VisualGearsList;
 while t <> nil do
       begin
@@ -391,7 +391,7 @@
             vgtSmokeTrace: if Gear^.State < 8 then DrawSprite(sprSmokeTrace, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.State);
             vgtEvilTrace: if Gear^.State < 8 then DrawSprite(sprEvilTrace, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.State);
         end;
-            if not cReducedQuality then
+            if (cReducedQuality and rqFancyBoom) = 0 then
                 case Gear^.Kind of
                     vgtSmoke: DrawSprite(sprSmoke, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
                     vgtSmokeWhite: DrawSprite(sprSmokeWhite, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
@@ -414,7 +414,7 @@
                              DrawRotatedTextureF(SpritesData[sprBigExplosion].Texture, 0.85 * (-power(2, -10 * Int(Gear^.Timer)/250) + 1) + 0.4, 0, 0, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, 0, 1, 385, 385, Gear^.Angle);
                              end;
             end;
-        if not cReducedQuality then
+        if (cReducedQuality and rqFancyBoom) = 0 then
             case Gear^.Kind of
                 vgtExplPart: DrawSprite(sprExplPart, round(Gear^.X) + WorldDx - 16, round(Gear^.Y) + WorldDy - 16, 7 - Gear^.Frame);
                 vgtExplPart2: DrawSprite(sprExplPart2, round(Gear^.X) + WorldDx - 16, round(Gear^.Y) + WorldDy - 16, 7 - Gear^.Frame);