equal
deleted
inserted
replaced
212 {$IFDEF HWLIBRARY} |
212 {$IFDEF HWLIBRARY} |
213 cBits:= 32; |
213 cBits:= 32; |
214 cFullScreen:= false; |
214 cFullScreen:= false; |
215 cTimerInterval:= 8; |
215 cTimerInterval:= 8; |
216 PathPrefix:= 'Data'; |
216 PathPrefix:= 'Data'; |
217 UserPathPrefix:= 'Data'; |
217 UserPathPrefix:= '.'; |
218 cShowFPS:= {$IFDEF DEBUGFILE}true{$ELSE}false{$ENDIF}; |
218 cShowFPS:= {$IFDEF DEBUGFILE}true{$ELSE}false{$ENDIF}; |
219 val(gameArgs[0], ipcPort); |
219 val(gameArgs[0], ipcPort); |
220 val(gameArgs[1], cScreenWidth); |
220 val(gameArgs[1], cScreenWidth); |
221 val(gameArgs[2], cScreenHeight); |
221 val(gameArgs[2], cScreenHeight); |
222 val(gameArgs[3], cReducedQuality); |
222 val(gameArgs[3], cReducedQuality); |
238 AddFileLog('UserPrefix: "' + UserPathPrefix +'"'); |
238 AddFileLog('UserPrefix: "' + UserPathPrefix +'"'); |
239 for i:= 0 to ParamCount do |
239 for i:= 0 to ParamCount do |
240 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
240 AddFileLog(inttostr(i) + ': ' + ParamStr(i)); |
241 |
241 |
242 for p:= Succ(Low(TPathType)) to High(TPathType) do |
242 for p:= Succ(Low(TPathType)) to High(TPathType) do |
243 if p <> ptMapCurrent then UserPathz[p]:= UserPathPrefix + '/' + Pathz[p]; |
243 if p <> ptMapCurrent then UserPathz[p]:= UserPathPrefix + '/Data/' + Pathz[p]; |
244 |
244 |
245 for p:= Succ(Low(TPathType)) to High(TPathType) do |
245 for p:= Succ(Low(TPathType)) to High(TPathType) do |
246 if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]; |
246 if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]; |
247 |
247 |
248 WriteToConsole('Init SDL... '); |
248 WriteToConsole('Init SDL... '); |