hedgewars/uGearsHandlersMess.pas
changeset 11530 a52fb6485403
parent 11529 58b4e357bcbf
child 11531 d1cf1ff6cabb
--- a/hedgewars/uGearsHandlersMess.pas	Sat Jan 23 17:29:44 2016 -0500
+++ b/hedgewars/uGearsHandlersMess.pas	Sun Jan 24 00:00:25 2016 +0100
@@ -3227,7 +3227,7 @@
             end;
 //////////////////////////////////////////////////////////////////////
         Gear^.doStep := @doStepCakeExpl;
-        if partyEpicness > 6 then
+        if (partyEpicness > 6) and (abs(90 - abs(trunc(Gear^.DirAngle))) < 20) then
             begin
             for i := 0 to (2 * partyEpicness) do
                 begin