changeset 1865 | ebc6dfca60d4 |
parent 1850 | a0332e79fdc9 |
child 1895 | 7ba647a88b2f |
--- a/hedgewars/uAmmos.pas Fri Mar 06 13:50:40 2009 +0000 +++ b/hedgewars/uAmmos.pas Sat Mar 07 17:42:54 2009 +0000 @@ -69,7 +69,11 @@ for a:= Low(TAmmoType) to High(TAmmoType) do begin cnt:= byte(s[ord(a) + 1]) - byte('0'); - if cnt = 9 then cnt:= AMMO_INFINITE; + if cnt = 9 then + begin + cnt:= AMMO_INFINITE; + Ammoz[a].Probability:= 0 + end; ammos[a]:= cnt end;