# HG changeset patch
# User Wuzzy <almikes@aol.com>
# Date 1463073773 -7200
# Node ID 02f6d786627d330484d8eb1ebf84a2372d424cdf
# Parent  f7c295971143d6848e31da70744c92761e737fbf
Fix rubber duck speed when hitting sea edge initially

diff -r f7c295971143 -r 02f6d786627d hedgewars/uGearsHandlersMess.pas
--- a/hedgewars/uGearsHandlersMess.pas	Thu May 12 18:16:09 2016 +0200
+++ b/hedgewars/uGearsHandlersMess.pas	Thu May 12 19:22:53 2016 +0200
@@ -6393,7 +6393,11 @@
     if Gear^.Pos = 1 then
         Gear^.dX:= cWindSpeed * 500
     else if Gear^.Pos = 2 then
-        Gear^.dX:= -cWindSpeed * 500;
+        Gear^.dX:= -cWindSpeed * 500
+    else if Gear^.Pos = 3 then
+        Gear^.dY:= cWindSpeed * 500
+    else if Gear^.Pos = 4 then
+        Gear^.dY:= -cWindSpeed * 500;
     
     // Rotate duck and change direction when reaching Sea world edge (Pos 3 or 4)
     if WorldEdge = weSea then
@@ -6407,7 +6411,7 @@
                 Gear^.Angle:= 90 
             else
                 Gear^.Angle:= 270;
-            Gear^.dY:= Gear^.dX;
+            Gear^.dY:= cWindSpeed * 500;
             Gear^.dX:= _0;
             end
         // Right edge
@@ -6419,7 +6423,7 @@
                 Gear^.Angle:= 270
             else
                 Gear^.Angle:= 90;
-            Gear^.dY:= -Gear^.dX;
+            Gear^.dY:= -cWindspeed * 500;
             Gear^.dX:= _0;
             end;
         end;