hedgewars/VGSHandlers.inc
changeset 3600 b16a9c8461ec
parent 3597 978c30ef50fc
child 3611 ed00aa2b339e
--- a/hedgewars/VGSHandlers.inc	Wed Jun 30 23:15:14 2010 -0400
+++ b/hedgewars/VGSHandlers.inc	Wed Jun 30 23:21:46 2010 -0400
@@ -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;