hedgewars/VGSHandlers.inc
changeset 3597 978c30ef50fc
parent 3593 ae50f63e4fa9
child 3611 ed00aa2b339e
--- a/hedgewars/VGSHandlers.inc	Wed Jun 30 14:52:48 2010 +0200
+++ b/hedgewars/VGSHandlers.inc	Wed Jun 30 22:20:52 2010 +0200
@@ -80,7 +80,7 @@
 // up-and-down-bounce magic
 s := (GameTicks + Gear^.Timer) mod 4096;
 t := 8 * AngleSin(s mod 2048).QWordValue / 4294967296;
-if (s < 2048) then t *= -1;
+if (s < 2048) then t := -t;
 
 Gear^.Y := LAND_HEIGHT-1184 + Gear^.Timer mod 8 + t;