changeset 7001 | 89488f5b99ca |
parent 6992 | b8f3d8991e92 |
child 7010 | 10a0a31804f3 |
--- a/hedgewars/uTeams.pas Wed May 02 19:36:23 2012 +0200 +++ b/hedgewars/uTeams.pas Wed May 02 22:12:58 2012 +0400 @@ -250,7 +250,7 @@ if (GameFlags and gfDisableWind) = 0 then begin - cWindSpeed:= rndSign(GetRandom * 2 * cMaxWindSpeed); + cWindSpeed:= rndSign(GetRandomf * 2 * cMaxWindSpeed); w:= hwFloat2Float(cWindSpeed); vg:= AddVisualGear(0, 0, vgtSmoothWindBar); if vg <> nil then vg^.dAngle:= w;