hedgewars/uGearsUtils.pas
changeset 15301 b12f63054c94
parent 15248 263b9850c16d
child 15647 1b044b47773b
equal deleted inserted replaced
15300:7ab5cf405686 15301:b12f63054c94
   282         begin
   282         begin
   283         Gear^.LastDamage := AttackerHog;
   283         Gear^.LastDamage := AttackerHog;
   284 
   284 
   285         Gear^.Hedgehog^.Team^.Clan^.Flawless:= false;
   285         Gear^.Hedgehog^.Team^.Clan^.Flawless:= false;
   286 
   286 
   287         if (Gear^.State and gstHHDeath) <> 0 then
   287         if (Gear^.State and gstHHDeath) = 0 then
   288             // If hog took damage while dying, explode hog instantly (see doStepHedgehogDead)
       
   289             Gear^.Timer:= 1
       
   290         else
       
   291             begin
   288             begin
   292             HHHurt(Gear^.Hedgehog, Source, Damage);
   289             HHHurt(Gear^.Hedgehog, Source, Damage);
   293             AddDamageTag(hwRound(Gear^.X), hwRound(Gear^.Y), Damage, Gear^.Hedgehog^.Team^.Clan^.Color);
   290             AddDamageTag(hwRound(Gear^.X), hwRound(Gear^.Y), Damage, Gear^.Hedgehog^.Team^.Clan^.Color);
   294             end;
   291             end;
   295 
   292