293     s: shortstring;

   293     s: shortstring;

   294     i: LongInt;

   294     i: LongInt;

   295 begin

   295 begin

   296 {$IFDEF HWLIBRARY}

   296 {$IFDEF HWLIBRARY}

   297     cBits:= 32;

   297     cBits:= 32;

   299     cTimerInterval:= 8;

   298     cTimerInterval:= 8;

   300     cShowFPS:= {$IFDEF DEBUGFILE}true{$ELSE}false{$ENDIF};

   299     cShowFPS:= {$IFDEF DEBUGFILE}true{$ELSE}false{$ENDIF};

   301     val(gameArgs[0], ipcPort);

   300     val(gameArgs[0], ipcPort);

   302     val(gameArgs[1], cScreenWidth);

   301     val(gameArgs[1], cScreenWidth);

   303     val(gameArgs[2], cScreenHeight);

   302     val(gameArgs[2], cScreenHeight);

   304     val(gameArgs[3], cReducedQuality);

   303     val(gameArgs[3], cReducedQuality);

   305     cLocaleFName:= gameArgs[4];

   304     cLocaleFName:= gameArgs[4];

   306     

   307     

   307     if (Length(cLocaleFName) > 6) then

   308     if (Length(cLocaleFName) > 6) then

   308         cLocale := Copy(cLocaleFName,1,5)

   309         cLocale := Copy(cLocaleFName,1,5)

   309     else

   310     else

   310         cLocale := Copy(cLocaleFName,1,2);

   311         cLocale := Copy(cLocaleFName,1,2);