hedgewars/uWorld.pas
changeset 39 b78e7185ed13
parent 23 16322d14f068
child 47 8daf1ee0b9a3
--- a/hedgewars/uWorld.pas	Thu Jan 05 22:55:45 2006 +0000
+++ b/hedgewars/uWorld.pas	Sat Jan 07 15:21:44 2006 +0000
@@ -142,7 +142,7 @@
                         else
                         if ShowCrosshair then
                            DrawCaption(Round(Gear.X + Sign(Gear.dX) * Sin(Gear.Angle*pi/cMaxAngle)*60) + WorldDx,
-                                       Round(Gear.Y - Cos(Gear.Angle*pi/cMaxAngle)*60) + WorldDy - 5,
+                                       Round(Gear.Y - Cos(Gear.Angle*pi/cMaxAngle)*60) + WorldDy - 4,
                                        Team.CrossHairRect, Surface)
                      end;
       team:= team.Next