hedgewars/uConsts.pas
changeset 13602 f7cbf7d8298d
parent 13598 083733ec7941
child 13609 73b096e1d895
--- 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);