--- a/hedgewars/uConsts.pas	Thu Aug 02 01:52:01 2018 +0200
+++ b/hedgewars/uConsts.pas	Thu Aug 02 03:16:08 2018 +0200
@@ -181,6 +181,8 @@
     cHHRadius = 9;
     cHHStepTicks = 29;
 
+    cMaxHogHealth : LongInt = High(LongInt) div (cMaxHHIndex+1);
+
     cHHZ = 1000;
     cCurrHHZ = Succ(cHHZ);