hedgewars/HHHandlers.inc
changeset 3112 f1bbe35ddb83
parent 3100 5fe9c4ac4c99
child 3123 b0a02930a1dc
equal deleted inserted replaced
3111:38e0f05afbdb 3112:f1bbe35ddb83
   334                         end;
   334                         end;
   335 
   335 
   336                     end;
   336                     end;
   337      posCaseHealth: begin
   337      posCaseHealth: begin
   338                     inc(HH^.Health, Gear^.Health);
   338                     inc(HH^.Health, Gear^.Health);
   339 										PHedgehog(HH^.Hedgehog)^.Poisoned := false;
   339                     PHedgehog(HH^.Hedgehog)^.Effects[hePoisoned] := false;
   340                     str(Gear^.Health, s);
   340                     str(Gear^.Health, s);
   341                     s:= '+' + s;
   341                     s:= '+' + s;
   342                     AddCaption(s, PHedgehog(HH^.Hedgehog)^.Team^.Clan^.Color, capgrpAmmoinfo);
   342                     AddCaption(s, PHedgehog(HH^.Hedgehog)^.Team^.Clan^.Color, capgrpAmmoinfo);
   343                     RenderHealth(PHedgehog(HH^.Hedgehog)^);
   343                     RenderHealth(PHedgehog(HH^.Hedgehog)^);
   344                     RecountTeamHealth(PHedgehog(HH^.Hedgehog)^.Team);
   344                     RecountTeamHealth(PHedgehog(HH^.Hedgehog)^.Team);