225 for i:= 0 to ParamCount do |
225 for i:= 0 to ParamCount do |
226 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
226 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
227 {$ENDIF} |
227 {$ENDIF} |
228 |
228 |
229 case ParamCount of |
229 case ParamCount of |
230 16: begin |
230 17: begin |
231 val(ParamStr(2), cScreenWidth); |
231 val(ParamStr(2), cScreenWidth); |
232 val(ParamStr(3), cScreenHeight); |
232 val(ParamStr(3), cScreenHeight); |
233 cInitWidth:= cScreenWidth; |
233 cInitWidth:= cScreenWidth; |
234 cInitHeight:= cScreenHeight; |
234 cInitHeight:= cScreenHeight; |
235 cBitsStr:= ParamStr(4); |
235 cBitsStr:= ParamStr(4); |
236 val(cBitsStr, cBits); |
236 val(cBitsStr, cBits); |
237 val(ParamStr(5), ipcPort); |
237 val(ParamStr(5), ipcPort); |
238 cFullScreen:= ParamStr(6) = '1'; |
238 cFullScreen:= ParamStr(6) = '1'; |
239 isSoundEnabled:= ParamStr(7) = '1'; |
239 isSoundEnabled:= ParamStr(7) = '1'; |
240 cLocaleFName:= ParamStr(8); |
240 isSoundHardware:= ParamStr(8) = '1'; |
241 val(ParamStr(9), cInitVolume); |
241 cLocaleFName:= ParamStr(9); |
242 val(ParamStr(10), cTimerInterval); |
242 val(ParamStr(10), cInitVolume); |
243 PathPrefix:= ParamStr(11); |
243 val(ParamStr(11), cTimerInterval); |
244 cShowFPS:= ParamStr(12) = '1'; |
244 PathPrefix:= ParamStr(12); |
245 cAltDamage:= ParamStr(13) = '1'; |
245 cShowFPS:= ParamStr(13) = '1'; |
246 UserNick:= DecodeBase64(ParamStr(14)); |
246 cAltDamage:= ParamStr(14) = '1'; |
247 isMusicEnabled:= ParamStr(15) = '1'; |
247 UserNick:= DecodeBase64(ParamStr(15)); |
248 cReducedQuality:= ParamStr(16) = '1'; |
248 isMusicEnabled:= ParamStr(16) = '1'; |
|
249 cReducedQuality:= ParamStr(17) = '1'; |
249 for p:= Succ(Low(TPathType)) to High(TPathType) do |
250 for p:= Succ(Low(TPathType)) to High(TPathType) do |
250 if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p] |
251 if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p] |
251 end; |
252 end; |
252 {$IFDEF IPHONEOS} |
253 {$IFDEF IPHONEOS} |
253 0: begin |
254 0: begin |