X-Git-Url: https://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fg_player.pas;h=90588ba10e31d4be1d60592fad315687274c8aff;hp=fe38642843d48311e9169bb13b93973c9fcfa0b5;hb=39b5a33c63812024e33054658dad9bc72aebe4ac;hpb=73adc74fdf77fba9f9b683fb8484ccc22ab75339 diff --git a/src/game/g_player.pas b/src/game/g_player.pas index fe38642..90588ba 100644 --- a/src/game/g_player.pas +++ b/src/game/g_player.pas @@ -5974,22 +5974,18 @@ begin SavedState.MaxAmmo[i] := FMaxAmmo[i]; SavedState.Rulez := FRulez - [R_KEY_RED, R_KEY_GREEN, R_KEY_BLUE]; - if FSavedStateNum < 0 then - begin - for i := Low(SavedStates) to High(SavedStates) do - if not SavedStates[i].Used then - begin - FSavedStateNum := i; - break; - end; - if FSavedStateNum < 0 then + for i := Low(SavedStates) to High(SavedStates) do + if not SavedStates[i].Used then begin - SetLength(SavedStates, Length(SavedStates) + 1); - FSavedStateNum := High(SavedStates); + FSavedStateNum := i; + break; end; + if FSavedStateNum < 0 then + begin + SetLength(SavedStates, Length(SavedStates) + 1); + FSavedStateNum := High(SavedStates); end; - SavedState.Used := True; SavedStates[i] := SavedState; end;