hedgewars/GSHandlers.inc
changeset 1771 141f029a2e0a
parent 1760 55a1edd97911
child 1776 dd5648e250e4
--- a/hedgewars/GSHandlers.inc	Mon Jan 26 21:33:18 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Mon Jan 26 21:43:00 2009 +0000
@@ -1312,11 +1312,16 @@
 AllInactive:= false;
 
 if Gear^.X.QWordValue = 0 then
-	Gear^.Tag:=  1
+	begin
+	Gear^.Tag:=  1;
+	Gear^.X:= -_1024;
+	end
 else
+	begin
 	Gear^.Tag:= -1;
+	Gear^.X:= int2hwFloat(LAND_WIDTH + 1024);
+	end;
 
-Gear^.X:= _1024 - _2048 * Gear^.Tag;
 Gear^.Y:= -_300;
 Gear^.dX:= int2hwFloat(TargetPoint.X - 5 * Gear^.Tag * 15);