hedgewars/uRender.pas
changeset 12195 4d818abdc00f
parent 12194 31184d9b9bfc
child 12286 6bf23d89dc43
--- a/hedgewars/uRender.pas	Sat Apr 08 17:17:28 2017 +0200
+++ b/hedgewars/uRender.pas	Sat Apr 08 17:21:22 2017 +0200
@@ -1873,7 +1873,7 @@
 else
 	frame:= 0;
 
-TextureBuffer[3].X:= shift + ((LongInt(RealTicks shr (16 - waterSpeed)) * Dir + dX) mod spriteWidth) / (spriteWidth - 1);
+TextureBuffer[3].X:= shift + ((LongInt((RealTicks * waterSpeed) shr 6) * Dir + dX) mod spriteWidth) / (spriteWidth - 1);
 TextureBuffer[3].Y:= frame * realHeight;
 TextureBuffer[5].X:= TextureBuffer[3].X + nWaves;
 TextureBuffer[5].Y:= frame * realHeight;