hedgewars/GSHandlers.inc
changeset 4035 3ed9573bcf5e
parent 4026 afae5a3b8424
child 4036 69e535a0e43a
equal deleted inserted replaced
4033:e03b6be88b49 4035:3ed9573bcf5e
  4147                 resgear^.Health := graves[i]^.Health;
  4147                 resgear^.Health := graves[i]^.Health;
  4148                 PHedgehog(graves[i]^.Hedgehog)^.Gear := resgear;
  4148                 PHedgehog(graves[i]^.Hedgehog)^.Gear := resgear;
  4149                 DeleteGear(graves[i]);
  4149                 DeleteGear(graves[i]);
  4150                 RenderHealth(PHedgehog(resgear^.Hedgehog)^);
  4150                 RenderHealth(PHedgehog(resgear^.Hedgehog)^);
  4151                 RecountTeamHealth(Phedgehog(resgear^.Hedgehog)^.Team);
  4151                 RecountTeamHealth(Phedgehog(resgear^.Hedgehog)^.Team);
  4152                 FreeTexture(PHedgehog(resgear^.Hedgehog)^.HatTex);
  4152                 if PHedgehog(resgear^.Hedgehog)^.Hat = 'NoHat' then
  4153                 PHedgehog(resgear^.Hedgehog)^.HatTex := Surface2Tex(
  4153                     begin
  4154                     LoadImage(Pathz[ptHats] + '/Reserved/Zombie', ifNone),
  4154                     FreeTexture(PHedgehog(resgear^.Hedgehog)^.HatTex);
  4155                     True);
  4155                     PHedgehog(resgear^.Hedgehog)^.HatTex := Surface2Tex(
       
  4156                         LoadImage(Pathz[ptHats] + '/Reserved/Zombie', ifNone),
       
  4157                         True)
       
  4158                     end
  4156             end;
  4159             end;
  4157 
  4160 
  4158         hh^.Gear^.dY := _0;
  4161         hh^.Gear^.dY := _0;
  4159         StopSound(Gear^.SoundChannel);
  4162         StopSound(Gear^.SoundChannel);
  4160         Gear^.Timer := 250;
  4163         Gear^.Timer := 250;