--- a/hedgewars/uTeams.pas	Sat Apr 17 13:04:36 2010 +0000
+++ b/hedgewars/uTeams.pas	Sat Apr 17 23:03:52 2010 +0000
@@ -261,7 +261,7 @@
 
 ResetKbd;
 
-cWindSpeed:= rndSign(GetRandom * cMaxWindSpeed);
+cWindSpeed:= rndSign(GetRandom * 2 * cMaxWindSpeed);
 g:= AddGear(0, 0, gtATSmoothWindCh, 0, _0, _0, 1);
 g^.Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed);
 {$IFDEF DEBUGFILE}AddFileLog('Wind = '+FloatToStr(cWindSpeed));{$ENDIF}