--- a/hedgewars/uRender.pas	Thu Nov 29 23:13:06 2012 -0500
+++ b/hedgewars/uRender.pas	Thu Nov 29 23:23:19 2012 -0500
@@ -55,6 +55,12 @@
 implementation
 uses uVariables;
 
+{$IFDEF USE_TOUCH_INTERFACE}
+const
+    FADE_ANIM_TIME = 500;
+    MOVE_ANIM_TIME = 500;
+{$ENDIF}
+
 var LastTint: LongWord = 0;
 
 procedure DrawSpriteFromRect(Sprite: TSprite; r: TSDL_Rect; X, Y, Height, Position: LongInt);