hedgewars/uConsts.pas
changeset 13459 794dcf69a5aa
parent 13277 5984e8c6cbeb
child 13468 f1d349a52bc7
--- a/hedgewars/uConsts.pas	Sun Jul 08 00:16:33 2018 +0200
+++ b/hedgewars/uConsts.pas	Sun Jul 08 01:30:13 2018 +0200
@@ -315,6 +315,8 @@
     AMMO_INFINITE = 100;
     AMMO_FINITE_MAX = 99;
 
+    probabilityLevels: array [0..8] of LongWord = (0,20,30,60,100,200,400,600,800);
+
     // explosion flags
     //EXPLAllDamageInRadius = $00000001;  Completely unused for ages
     EXPLAutoSound         = $00000002;