hedgewars/HHHandlers.inc
changeset 5439 25d3784dc0f6
parent 5372 7283bc768228
child 5507 1040c0946ef8
equal deleted inserted replaced
5436:3134fafcfe12 5439:25d3784dc0f6
    75             inc(i);
    75             inc(i);
    76             CurAmmoType:= amNothing;
    76             CurAmmoType:= amNothing;
    77             ammoidx:= -1;
    77             ammoidx:= -1;
    78             //TryDo(i < 2, 'Engine bug: no ammo in current slot', true)
    78             //TryDo(i < 2, 'Engine bug: no ammo in current slot', true)
    79             end;
    79             end;
    80         until ((Ammo^[slot, ammoidx].Count > 0) and (Team^.Clan^.TurnNumber > Ammoz[Ammo^[slot, ammoidx].AmmoType].SkipTurns)) or (i = 1)
    80         until (i = 1) or ((Ammo^[slot, ammoidx].Count > 0) and (Team^.Clan^.TurnNumber > Ammoz[Ammo^[slot, ammoidx].AmmoType].SkipTurns))
    81         end 
    81         end 
    82     else
    82     else
    83         begin
    83         begin
    84         i:= 0;
    84         i:= 0;
    85         // check whether there is ammo in slot
    85         // check whether there is ammo in slot