Show the bot thinking, when he does it after attack
authorunc0rr
Tue, 20 Jun 2006 21:22:15 +0000
changeset 69 d8a526934b9f
parent 68 cbb93eb90304
child 70 82d93eeecebe
Show the bot thinking, when he does it after attack
hedgewars/uWorld.pas
--- a/hedgewars/uWorld.pas	Tue Jun 20 21:21:31 2006 +0000
+++ b/hedgewars/uWorld.pas	Tue Jun 20 21:22:15 2006 +0000
@@ -135,11 +135,11 @@
 //                                  Team.NameRect, Surface);
                      end else // Current hedgehog
                      begin
-                     if (Gear.State and (gstMoving or gstAttacked or gstDrowning or gstFalling))=0 then
+                     if (Gear.State and (gstMoving or gstDrowning or gstFalling)) = 0 then
                         if (Gear.State and gstHHThinking) <> 0 then
                            DrawGear(sQuestion, Round(Gear.X)  - 10 + WorldDx, Round(Gear.Y) - cHHRadius - 34 + WorldDy, Surface)
                         else
-                        if ShowCrosshair then
+                        if ShowCrosshair and ((Gear.State and gstAttacked) = 0) 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 - 4,
                                        Team.CrossHairRect, Surface)