--- a/hedgewars/uTeams.pas Wed Mar 02 11:48:02 2011 -0500
+++ b/hedgewars/uTeams.pas Wed Mar 02 15:19:55 2011 -0500
@@ -80,6 +80,10 @@
with Hedgehogs[i] do
if (Gear <> nil) then
Gear^.State:= gstWinner;
+ if Flawless then
+ PlaySound(sndFlawless, Teams[0]^.voicepack)
+ else
+ PlaySound(sndVictory, Teams[0]^.voicepack);
AddCaption(s, cWhiteColor, capgrpGameState);
SendStat(siGameResult, s);
@@ -278,6 +282,7 @@
begin
ClanIndex:= Pred(ClansCount);
Color:= TeamColor;
+ Flawless:= true
end
end else
begin