hedgewars/ArgParsers.inc
changeset 6982 8d41d22a291d
parent 6700 e04da46ee43c
child 7021 0c75512a8920
equal deleted inserted replaced
6981:045e8162c9cd 6982:8d41d22a291d
    48     cShowFPS:= ParamStr(12) = '1';
    48     cShowFPS:= ParamStr(12) = '1';
    49     cAltDamage:= ParamStr(13) = '1';
    49     cAltDamage:= ParamStr(13) = '1';
    50     UserNick:= DecodeBase64(ParamStr(14));
    50     UserNick:= DecodeBase64(ParamStr(14));
    51     val(ParamStr(15), cReducedQuality);
    51     val(ParamStr(15), cReducedQuality);
    52     val(ParamStr(16), tmp);
    52     val(ParamStr(16), tmp);
    53     cGrayScale:= false;
    53     GrayScale:= false;
    54     if (tmp > 9) and (tmp < 16) then 
    54     if (tmp > 9) and (tmp < 16) then 
    55         begin
    55         begin
    56         cGrayScale:= true;
    56         GrayScale:= true;
    57         cStereoMode:= TStereoMode(max(0, min(ord(high(TStereoMode)), tmp-9)))
    57         cStereoMode:= TStereoMode(max(0, min(ord(high(TStereoMode)), tmp-9)))
    58         end
    58         end
    59     else if tmp <= 9 then 
    59     else if tmp <= 9 then 
    60         cStereoMode:= TStereoMode(max(0, min(ord(high(TStereoMode)), tmp)))
    60         cStereoMode:= TStereoMode(max(0, min(ord(high(TStereoMode)), tmp)))
    61     else 
    61     else