hedgewars/uWorld.pas
changeset 13 7a5db822fd3f
parent 6 9c1f00e7b43e
child 23 16322d14f068
--- a/hedgewars/uWorld.pas	Tue Sep 06 19:09:39 2005 +0000
+++ b/hedgewars/uWorld.pas	Wed Sep 07 18:51:53 2005 +0000
@@ -139,6 +139,7 @@
                         if (Gear.State and gstHHThinking) <> 0 then
                            DrawGear(sQuestion, Round(Gear.X)  - 10 + WorldDx, Round(Gear.Y) - cHHHalfHeight - 34 + WorldDy, Surface)
                         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,
                                        Team.CrossHairRect, Surface)