diff --git a/src/game/g_game.pas b/src/game/g_game.pas
index e79845b5c88d12ebf3323269822cc25dacf81065..7fe421c36bd35ee87f43af33f9a981b1b00ad369 100644 (file)
--- a/src/game/g_game.pas
+++ b/src/game/g_game.pas
while i <= ParamCount do
begin
s := ParamStr(i);
- if (s[1] = '-') and (Length(s) > 1) then
+ if (Length(s) > 1) and (s[1] = '-') then
begin
- if (s[2] = '-') and (Length(s) > 2) then
+ if (Length(s) > 2) and (s[2] = '-') then
begin // Îäèíî÷íûé ïàðàìåòð
SetLength(pars, Length(pars) + 1);
with pars[High(pars)] do