hedgewars/uStats.pas
changeset 10105 8c5fa1d15bd5
parent 10015 4feced261c68
child 10108 c68cf030eded
equal deleted inserted replaced
10104:cb0b750bd8a3 10105:8c5fa1d15bd5
   110 
   110 
   111     else if CurrentHedgehog^.stats.StepDamageRecv > 0 then
   111     else if CurrentHedgehog^.stats.StepDamageRecv > 0 then
   112         begin
   112         begin
   113         AddVoice(sndStupid, PreviousTeam^.voicepack);
   113         AddVoice(sndStupid, PreviousTeam^.voicepack);
   114         if CurrentHedgehog^.stats.DamageGiven = CurrentHedgehog^.stats.StepDamageRecv then
   114         if CurrentHedgehog^.stats.DamageGiven = CurrentHedgehog^.stats.StepDamageRecv then
   115             AddCaption(Format(GetEventString(eidHurtSelf), CurrentHedgehog^.Name), cWhiteColor, capgrpMessage);
   115             AddCaption(FormatPChar(GetEventString(eidHurtSelf), Str2PChar(CurrentHedgehog^.Name)), cWhiteColor, capgrpMessage);
   116         end
   116         end
   117 
   117 
   118     else if DamageClan <> 0 then
   118     else if DamageClan <> 0 then
   119         if DamageTurn > DamageClan then
   119         if DamageTurn > DamageClan then
   120             if random(2) = 0 then
   120             if random(2) = 0 then
   138     else if (AmmoUsedCount > 0) and (not isTurnSkipped) then
   138     else if (AmmoUsedCount > 0) and (not isTurnSkipped) then
   139         begin end// nothing ?
   139         begin end// nothing ?
   140     else if isTurnSkipped then
   140     else if isTurnSkipped then
   141         begin
   141         begin
   142         AddVoice(sndBoring, PreviousTeam^.voicepack);
   142         AddVoice(sndBoring, PreviousTeam^.voicepack);
   143         AddCaption(Format(GetEventString(eidTurnSkipped), CurrentHedgehog^.Name), cWhiteColor, capgrpMessage);
   143         AddCaption(FormatPChar(GetEventString(eidTurnSkipped), Str2PChar(CurrentHedgehog^.Name)), cWhiteColor, capgrpMessage);
   144         end
   144         end
   145     else if not PlacingHogs then
   145     else if not PlacingHogs then
   146         AddVoice(sndCoward, PreviousTeam^.voicepack);
   146         AddVoice(sndCoward, PreviousTeam^.voicepack);
   147     end;
   147     end;
   148 
   148