hedgewars/hwengine.pas
changeset 8310 a98c349bc06b
parent 8308 cdf83bdf7b27
child 8325 ecd51650d5d8
equal deleted inserted replaced
8309:edcfb5e43245 8310:a98c349bc06b
   336     UserNick:= gameArgs[5];
   336     UserNick:= gameArgs[5];
   337     SetSound(gameArgs[6] = '1');
   337     SetSound(gameArgs[6] = '1');
   338     SetMusic(gameArgs[7] = '1');
   338     SetMusic(gameArgs[7] = '1');
   339     cAltDamage:= gameArgs[8] = '1';
   339     cAltDamage:= gameArgs[8] = '1';
   340     PathPrefix:= gameArgs[9];
   340     PathPrefix:= gameArgs[9];
       
   341 {$IFDEF IPHONEOS}
   341     UserPathPrefix:= '../Documents';
   342     UserPathPrefix:= '../Documents';
       
   343 {$ENDIF}
   342     recordFileName:= gameArgs[10];
   344     recordFileName:= gameArgs[10];
   343 {$ENDIF}
   345 {$ENDIF}
   344     initEverything(true);
   346     initEverything(true);
   345 
       
   346     WriteLnToConsole('Hedgewars ' + cVersionString + ' engine (network protocol: ' + inttostr(cNetProtoVersion) + ')');
   347     WriteLnToConsole('Hedgewars ' + cVersionString + ' engine (network protocol: ' + inttostr(cNetProtoVersion) + ')');
   347     AddFileLog('Prefix: "' + PathPrefix +'"');
   348     AddFileLog('Prefix: "' + PathPrefix +'"');
   348     AddFileLog('UserPrefix: "' + UserPathPrefix +'"');
   349     AddFileLog('UserPrefix: "' + UserPathPrefix +'"');
   349     
   350     
   350     for i:= 0 to ParamCount do
   351     for i:= 0 to ParamCount do