133 // DrawCaption( round(Gear.X) + WorldDx, |
133 // DrawCaption( round(Gear.X) + WorldDx, |
134 // round(Gear.Y) - Gear.Radius - 60 + WorldDy, |
134 // round(Gear.Y) - Gear.Radius - 60 + WorldDy, |
135 // Team.NameRect, Surface); |
135 // Team.NameRect, Surface); |
136 end else // Current hedgehog |
136 end else // Current hedgehog |
137 begin |
137 begin |
138 if (Gear.State and (gstMoving or gstAttacked or gstDrowning or gstFalling))=0 then |
138 if (Gear.State and (gstMoving or gstDrowning or gstFalling)) = 0 then |
139 if (Gear.State and gstHHThinking) <> 0 then |
139 if (Gear.State and gstHHThinking) <> 0 then |
140 DrawGear(sQuestion, Round(Gear.X) - 10 + WorldDx, Round(Gear.Y) - cHHRadius - 34 + WorldDy, Surface) |
140 DrawGear(sQuestion, Round(Gear.X) - 10 + WorldDx, Round(Gear.Y) - cHHRadius - 34 + WorldDy, Surface) |
141 else |
141 else |
142 if ShowCrosshair then |
142 if ShowCrosshair and ((Gear.State and gstAttacked) = 0) then |
143 DrawCaption(Round(Gear.X + Sign(Gear.dX) * Sin(Gear.Angle*pi/cMaxAngle)*60) + WorldDx, |
143 DrawCaption(Round(Gear.X + Sign(Gear.dX) * Sin(Gear.Angle*pi/cMaxAngle)*60) + WorldDx, |
144 Round(Gear.Y - Cos(Gear.Angle*pi/cMaxAngle)*60) + WorldDy - 4, |
144 Round(Gear.Y - Cos(Gear.Angle*pi/cMaxAngle)*60) + WorldDy - 4, |
145 Team.CrossHairRect, Surface) |
145 Team.CrossHairRect, Surface) |
146 end; |
146 end; |
147 team:= team.Next |
147 team:= team.Next |