hedgewars/uGearsUtils.pas
changeset 8199 886ed135665b
parent 8161 0b8beacff8a5
child 8330 aaefa587e277
child 8560 134a098235fa
equal deleted inserted replaced
8197:6d9371d6d045 8199:886ed135665b
   241             CurrentHedgehog^.Gear^.LastDamage := CurrentHedgehog;
   241             CurrentHedgehog^.Gear^.LastDamage := CurrentHedgehog;
   242             spawnHealthTagForHH(CurrentHedgehog^.Gear, tmpDmg);
   242             spawnHealthTagForHH(CurrentHedgehog^.Gear, tmpDmg);
   243             end;
   243             end;
   244         uStats.HedgehogDamaged(Gear, AttackerHog, Damage, false);    
   244         uStats.HedgehogDamaged(Gear, AttackerHog, Damage, false);    
   245         end;
   245         end;
   246     end;
   246     end else
   247     //else if Gear^.Kind <> gtStructure then // not gtHedgehog nor gtStructure
   247     //else if Gear^.Kind <> gtStructure then // not gtHedgehog nor gtStructure
   248         Gear^.Hedgehog:= AttackerHog;
   248         Gear^.Hedgehog:= AttackerHog;
   249     inc(Gear^.Damage, Damage);
   249     inc(Gear^.Damage, Damage);
   250     
   250     
   251     ScriptCall('onGearDamage', Gear^.UID, Damage);
   251     ScriptCall('onGearDamage', Gear^.UID, Damage);