hedgewars/uGearsHandlersMess.pas
changeset 14616 4638aa2ea8f2
parent 14574 6e5cda26f676
child 14632 5132548cdb77
equal deleted inserted replaced
14615:c3c0f94a5333 14616:4638aa2ea8f2
  5992                 resgear^.Hedgehog^.Effects[heResurrected]:= 1;
  5992                 resgear^.Hedgehog^.Effects[heResurrected]:= 1;
  5993                 if resgear^.Hedgehog^.King then
  5993                 if resgear^.Hedgehog^.King then
  5994                     resgear^.Hedgehog^.Team^.hasKing:= true;
  5994                     resgear^.Hedgehog^.Team^.hasKing:= true;
  5995                 { Reviving a hog implies its clan is now alive, too. }
  5995                 { Reviving a hog implies its clan is now alive, too. }
  5996                 resgear^.Hedgehog^.Team^.Clan^.DeathLogged:= false;
  5996                 resgear^.Hedgehog^.Team^.Clan^.DeathLogged:= false;
       
  5997                 if (not resgear^.Hedgehog^.Team^.Passive) then
       
  5998                     resgear^.Hedgehog^.Team^.Clan^.Passive:= false;
  5997                 s:= ansistring(resgear^.Hedgehog^.Name);
  5999                 s:= ansistring(resgear^.Hedgehog^.Name);
  5998                 AddCaption(FormatA(GetEventString(eidResurrected), s), capcolDefault, capgrpMessage);
  6000                 AddCaption(FormatA(GetEventString(eidResurrected), s), capcolDefault, capgrpMessage);
  5999                 // only make hat-less hedgehogs look like zombies, preserve existing hats
  6001                 // only make hat-less hedgehogs look like zombies, preserve existing hats
  6000 
  6002 
  6001                 if resgear^.Hedgehog^.Hat = 'NoHat' then
  6003                 if resgear^.Hedgehog^.Hat = 'NoHat' then