hedgewars/uVisualGearsHandlers.pas
changeset 9762 938d1c08d0d1
parent 9761 b497a6c679cb
child 9763 be63ead5085e
--- a/hedgewars/uVisualGearsHandlers.pas	Sun Dec 08 02:36:14 2013 +0100
+++ b/hedgewars/uVisualGearsHandlers.pas	Sun Dec 08 02:43:06 2013 +0100
@@ -590,6 +590,8 @@
     begin
     Gear^.X:= hwFloat2Float(Gear^.Hedgehog^.Gear^.X) + (Gear^.Tex^.w div 2  - Gear^.FrameTicks);
     Gear^.Y:= hwFloat2Float(Gear^.Hedgehog^.Gear^.Y) - (16 + Gear^.Tex^.h);
+    Gear^.X:= max(((-cScreenWidth + 16) / zoom) + Gear^.Tex^.w div 2, min(((cScreenWidth - 16) / zoom) - Gear^.Tex^.w div 2, Gear^.X + WorldDx));
+    Gear^.Y:= max(cScreenHeight div 2 - ((cScreenHeight - 16) / (zoom)), min(cScreenHeight div 2 - ((-cScreenHeight + Gear^.Tex^.h) / (zoom)) - 64, Gear^.Y + WorldDy));
     end;
 
 if Gear^.Timer = 0 then