hedgewars/GSHandlers.inc
changeset 4387 3698361802ed
parent 4372 3836973380b9
child 4396 3cfd2e15464a
equal deleted inserted replaced
4386:855049a88c59 4387:3698361802ed
  4264     if (TurnTimeLeft > 0) then
  4264     if (TurnTimeLeft > 0) then
  4265         dec(TurnTimeLeft);
  4265         dec(TurnTimeLeft);
  4266 
  4266 
  4267     AllInactive := false;
  4267     AllInactive := false;
  4268     hh := Gear^.Hedgehog;
  4268     hh := Gear^.Hedgehog;
  4269     DrawCentered(hwRound(hh^.Gear^.X) + WorldDx, hwRound(hh^.Gear^.Y) + WorldDy -
  4269 
       
  4270     // no, you can't do that here
       
  4271     {DrawCentered(hwRound(hh^.Gear^.X) + WorldDx, hwRound(hh^.Gear^.Y) + WorldDy -
  4270             cHHRadius - 14 - hh^.HealthTagTex^.h, hh^.HealthTagTex);
  4272             cHHRadius - 14 - hh^.HealthTagTex^.h, hh^.HealthTagTex);
       
  4273     }
  4271     (*DrawCircle(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Radius, 1.5, 0, 0, $FF,
  4274     (*DrawCircle(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Radius, 1.5, 0, 0, $FF,
  4272             $FF);*)
  4275             $FF);*)
  4273 
  4276 
  4274     if ((Gear^.Message and gmUp) <> 0) then 
  4277     if ((Gear^.Message and gmUp) <> 0) then 
  4275         begin
  4278         begin