diff -r 2c98ec41697a -r 9a6030d96273 hedgewars/uConsts.pas
--- a/hedgewars/uConsts.pas	Mon Dec 03 17:49:02 2012 +0100
+++ b/hedgewars/uConsts.pas	Mon Dec 03 17:51:57 2012 +0100
@@ -275,6 +275,8 @@
     NoPointX = Low(LongInt);
     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
 
+    kSystemSoundID_Vibrate = $00000FFF;
+
 implementation
 
 end.