hedgewars/ArgParsers.inc
changeset 8985 fe8d1a476f0b
parent 8924 13ac59499066
child 9080 9b42757d7e71
equal deleted inserted replaced
8984:3c342826f299 8985:fe8d1a476f0b
   187     while (cmdIndex <= High(reallyAll)) and (cmd <> reallyAll[cmdIndex]) do inc(cmdIndex);
   187     while (cmdIndex <= High(reallyAll)) and (cmd <> reallyAll[cmdIndex]) do inc(cmdIndex);
   188     case cmdIndex of
   188     case cmdIndex of
   189         {--prefix}               0 : PathPrefix        := getStringParameter (arg, paramIndex, parseParameter);
   189         {--prefix}               0 : PathPrefix        := getStringParameter (arg, paramIndex, parseParameter);
   190         {--user-prefix}          1 : UserPathPrefix    := getStringParameter (arg, paramIndex, parseParameter);
   190         {--user-prefix}          1 : UserPathPrefix    := getStringParameter (arg, paramIndex, parseParameter);
   191         {--locale}               2 : cLocaleFName      := getStringParameter (arg, paramIndex, parseParameter);
   191         {--locale}               2 : cLocaleFName      := getStringParameter (arg, paramIndex, parseParameter);
   192         {--fullscreen-width}     3 : cFullscreenWidth  := getLongIntParameter(arg, paramIndex, parseParameter);
   192         {--fullscreen-width}     3 : cFullscreenWidth  := max(getLongIntParameter(arg, paramIndex, parseParameter), cMinScreenWidth);
   193         {--fullscreen-height}    4 : cFullscreenHeight := getLongIntParameter(arg, paramIndex, parseParameter);
   193         {--fullscreen-height}    4 : cFullscreenHeight := max(getLongIntParameter(arg, paramIndex, parseParameter), cMinScreenHeight);
   194         {--width}                5 : cWindowedWidth    := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenWidth);
   194         {--width}                5 : cWindowedWidth    := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenWidth);
   195         {--height}               6 : cWindowedHeight   := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenHeight);
   195         {--height}               6 : cWindowedHeight   := max(2 * (getLongIntParameter(arg, paramIndex, parseParameter) div 2), cMinScreenHeight);
   196         {--frame-interval}       7 : cTimerInterval    := getLongIntParameter(arg, paramIndex, parseParameter);
   196         {--frame-interval}       7 : cTimerInterval    := getLongIntParameter(arg, paramIndex, parseParameter);
   197         {--volume}               8 : SetVolume          ( getLongIntParameter(arg, paramIndex, parseParameter) );
   197         {--volume}               8 : SetVolume          ( max(getLongIntParameter(arg, paramIndex, parseParameter), 0) );
   198         {--nomusic}              9 : SetMusic           ( false );
   198         {--nomusic}              9 : SetMusic           ( false );
   199         {--nosound}             10 : SetSound           ( false );
   199         {--nosound}             10 : SetSound           ( false );
   200         {--fullscreen}          11 : cFullScreen       := true;
   200         {--fullscreen}          11 : cFullScreen       := true;
   201         {--showfps}             12 : cShowFPS          := true;
   201         {--showfps}             12 : cShowFPS          := true;
   202         {--altdmg}              13 : cAltDamage        := true;
   202         {--altdmg}              13 : cAltDamage        := true;