hedgewars/GSHandlers.inc
changeset 1579 2f581b1f289e
parent 1573 cf88e0ace609
child 1586 2c6f1d1f43c1
--- a/hedgewars/GSHandlers.inc	Sun Jan 04 12:44:54 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Sun Jan 04 14:24:44 2009 +0000
@@ -764,10 +764,12 @@
 	haveCollision:= true
 	end;
 
-if haveCollision and (Gear^.Message and (gm_Left or gm_Right) <> 0) then
+if haveCollision
+	and (Gear^.Message and (gm_Left or gm_Right) <> 0)
+	and (Gear^.Message and (gm_Up or gm_Down) <> 0) then
 	begin
-	HHGear^.dX:= SignAs(hwAbs(HHGear^.dX) + _0_15, HHGear^.dX);
-	HHGear^.dY:= SignAs(hwAbs(HHGear^.dY) + _0_15, HHGear^.dY)
+	HHGear^.dX:= SignAs(hwAbs(HHGear^.dX) + _0_2, HHGear^.dX);
+	HHGear^.dY:= SignAs(hwAbs(HHGear^.dY) + _0_2, HHGear^.dY)
 	end;
 
 len:= Distance(HHGear^.dX, HHGear^.dY);