hedgewars/hwengine.dpr
changeset 1812 3d4692e825e7
parent 1807 795f97007833
child 1825 c929f9111141
equal deleted inserted replaced
1811:1b9e33623b7e 1812:3d4692e825e7
   185 for i:= 0 to ParamCount do
   185 for i:= 0 to ParamCount do
   186     AddFileLog(inttostr(i) + ': ' + ParamStr(i));
   186     AddFileLog(inttostr(i) + ': ' + ParamStr(i));
   187 {$ENDIF}
   187 {$ENDIF}
   188 
   188 
   189 case ParamCount of
   189 case ParamCount of
   190 15: begin
   190 16: begin
   191      val(ParamStr(2), cScreenWidth);
   191      val(ParamStr(2), cScreenWidth);
   192      val(ParamStr(3), cScreenHeight);
   192      val(ParamStr(3), cScreenHeight);
   193      cInitWidth:= cScreenWidth;
   193      cInitWidth:= cScreenWidth;
   194      cInitHeight:= cScreenHeight;
   194      cInitHeight:= cScreenHeight;
   195      cBitsStr:= ParamStr(4);
   195      cBitsStr:= ParamStr(4);
   203      PathPrefix:= ParamStr(11);
   203      PathPrefix:= ParamStr(11);
   204      cShowFPS:= ParamStr(12) = '1';
   204      cShowFPS:= ParamStr(12) = '1';
   205      cAltDamage:= ParamStr(13) = '1';
   205      cAltDamage:= ParamStr(13) = '1';
   206      UserNick:= DecodeBase64(ParamStr(14));
   206      UserNick:= DecodeBase64(ParamStr(14));
   207      isMusicEnabled:= ParamStr(15) = '1';
   207      isMusicEnabled:= ParamStr(15) = '1';
       
   208      cReducedQuality:= ParamStr(16) = '1';
   208      for p:= Succ(Low(TPathType)) to High(TPathType) do
   209      for p:= Succ(Low(TPathType)) to High(TPathType) do
   209          if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]
   210          if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]
   210      end;
   211      end;
   211   3: begin
   212   3: begin
   212      val(ParamStr(2), ipcPort);
   213      val(ParamStr(2), ipcPort);