--- a/hedgewars/uStats.pas	Fri Apr 25 13:12:52 2008 +0000
+++ b/hedgewars/uStats.pas	Fri Apr 25 13:51:01 2008 +0000
@@ -34,6 +34,7 @@
 
 procedure AmmoUsed(am: TAmmoType);
 procedure HedgehogDamaged(Gear: PGear);
+procedure Skipped;
 procedure TurnReaction;
 procedure SendStats;
 
@@ -48,6 +49,8 @@
     AmmoUsedCount : Longword = 0;
     AmmoDamagingUsed : boolean = false;
     FinishedTurnsTotal: LongInt = -1;
+    SkippedTurns: LongWord = 0;
+    isTurnSkipped: boolean = false;
 
 procedure HedgehogDamaged(Gear: PGear);
 begin
@@ -69,6 +72,12 @@
 inc(DamageTotal, Gear^.Damage)
 end;
 
+procedure Skipped;
+begin
+inc(SkippedTurns);
+isTurnSkipped:= true
+end;
+
 procedure TurnReaction;
 var Gear: PGear;
     i, t: LongInt;
@@ -103,6 +112,8 @@
 	PlaySound(sndMissed, false)
 else if AmmoUsedCount > 0 then
 	// nothing ?
+else if isTurnSkipped then
+	PlaySound(sndBoring, false)
 else
 	PlaySound(sndCoward, false);
 
@@ -117,6 +128,7 @@
 				if StepDamageRecv > MaxStepDamageRecv then MaxStepDamageRecv:= StepDamageRecv;
 				if StepDamageGiven > MaxStepDamageGiven then MaxStepDamageGiven:= StepDamageGiven;
 				if StepKills > MaxStepKills then MaxStepKills:= StepKills;
+				StepKills:= 0;
 				StepDamageRecv:= 0;
 				StepDamageGiven:= 0
 				end;
@@ -126,7 +138,8 @@
 DamageGiven:= 0;
 DamageClan:= 0;
 AmmoUsedCount:= 0;
-AmmoDamagingUsed:= false
+AmmoDamagingUsed:= false;
+isTurnSkipped:= false
 end;
 
 procedure AmmoUsed(am: TAmmoType);