hedgewars/uScript.pas
changeset 6019 8843ea756cfc
parent 5964 44d2dc3b438f
child 6023 a28be05b20bc
child 6046 d681b8127523
--- a/hedgewars/uScript.pas	Sat Sep 24 22:27:52 2011 +0200
+++ b/hedgewars/uScript.pas	Sat Sep 24 22:35:31 2011 +0200
@@ -1788,7 +1788,8 @@
 
 procedure ScriptSetAmmo(ammo : TAmmoType; count, propability, delay, reinforcement: Byte);
 begin
-if (ord(ammo) < 1) or (count > 9) or (count < 0) or (propability < 0) or (propability > 8) or (delay < 0) or (delay > 9) or (reinforcement < 0) or (reinforcement > 8) then
+//if (ord(ammo) < 1) or (count > 9) or (count < 0) or (propability < 0) or (propability > 8) or (delay < 0) or (delay > 9) or (reinforcement < 0) or (reinforcement > 8) then
+if (ord(ammo) < 1) or (count > 9) or (propability > 8) or (delay > 9) or (reinforcement > 8) then
     exit;
 ScriptAmmoLoadout[ord(ammo)]:= inttostr(count)[1];
 ScriptAmmoProbability[ord(ammo)]:= inttostr(propability)[1];