hedgewars/uAmmos.pas
changeset 2434 5faa05d99241
parent 2432 1a0bb82d55f0
child 2453 fdb76012b688
equal deleted inserted replaced
2433:332287d62c81 2434:5faa05d99241
    73 for a:= Low(TAmmoType) to High(TAmmoType) do
    73 for a:= Low(TAmmoType) to High(TAmmoType) do
    74     begin
    74     begin
    75     if a <> amNothing then
    75     if a <> amNothing then
    76         begin
    76         begin
    77         Ammoz[a].Probability:= probability[byte(s[ord(a) + ord(High(TAmmoType))]) - byte('0')];
    77         Ammoz[a].Probability:= probability[byte(s[ord(a) + ord(High(TAmmoType))]) - byte('0')];
       
    78 		if (TrainingFlags and tfIgnoreDelays) <> 0 then Ammoz[a].SkipTurns:= 0;
    78         cnt:= byte(s[ord(a)]) - byte('0');
    79         cnt:= byte(s[ord(a)]) - byte('0');
    79         // avoid things we already have infinite number
    80         // avoid things we already have infinite number
    80         if cnt = 9 then
    81         if cnt = 9 then
    81             begin
    82             begin
    82             cnt:= AMMO_INFINITE;
    83             cnt:= AMMO_INFINITE;