hedgewars/uGearsHandlersMess.pas
changeset 14398 87562a68c41f
parent 14358 1f87c7c2b151
child 14514 5ac181cb2396
equal deleted inserted replaced
14397:f9a3cfdec1df 14398:87562a68c41f
  6021                 graves.ar^[i]^.Message:= graves.ar^[i]^.Message or gmDestroy;
  6021                 graves.ar^[i]^.Message:= graves.ar^[i]^.Message or gmDestroy;
  6022                 graves.ar^[i]^.Active:= true;
  6022                 graves.ar^[i]^.Active:= true;
  6023                 RenderHealth(resgear^.Hedgehog^);
  6023                 RenderHealth(resgear^.Hedgehog^);
  6024                 RecountTeamHealth(resgear^.Hedgehog^.Team);
  6024                 RecountTeamHealth(resgear^.Hedgehog^.Team);
  6025                 resgear^.Hedgehog^.Effects[heResurrected]:= 1;
  6025                 resgear^.Hedgehog^.Effects[heResurrected]:= 1;
       
  6026                 if resgear^.Hedgehog^.King then
       
  6027                     resgear^.Hedgehog^.Team^.hasKing:= true;
  6026                 { Reviving a hog implies its clan is now alive, too. }
  6028                 { Reviving a hog implies its clan is now alive, too. }
  6027                 resgear^.Hedgehog^.Team^.Clan^.DeathLogged:= false;
  6029                 resgear^.Hedgehog^.Team^.Clan^.DeathLogged:= false;
  6028                 s:= ansistring(resgear^.Hedgehog^.Name);
  6030                 s:= ansistring(resgear^.Hedgehog^.Name);
  6029                 AddCaption(FormatA(GetEventString(eidResurrected), s), capcolDefault, capgrpMessage);
  6031                 AddCaption(FormatA(GetEventString(eidResurrected), s), capcolDefault, capgrpMessage);
  6030                 // only make hat-less hedgehogs look like zombies, preserve existing hats
  6032                 // only make hat-less hedgehogs look like zombies, preserve existing hats