anchor.diff:      procedure LoadLocaleFonts(const aLocale: AnsiString; aLoadFullFonts: Boolean);
   
       property DataState: TResourceLoadState read fDataState;
  +    property Palettes: TKMResPalettes read GetPalettes;
       property Cursors: TKMResCursors read fCursors;
       property MapElements: TKMResMapElements read fMapElements;
       property Fonts: TKMResFonts read fFonts;
       property Sounds: TKMResSounds read fSounds;
       property Sprites: TKMResSprites read fSprites;
       property Tileset: TKMResTileset read fTileset;
  +    property Houses: TKMResHouses read GetHouses;
       property Units: TKMResUnits read fUnits;
  +    property Wares: TKMResWares read GetWares;
       property Interpolation: TKMResInterpolation read fInterpolation;
   
       procedure UpdateStateIdle;
  
positive.code:     fExportWorker := TKMWorkerThread.Create('ExportWorker');
  
    Result := fExportWorker;
  end;
  
  
  
negative.code:     procedure StepCaption(const aCaption: UnicodeString);
  
      function GetOrCreateExportWorker: TKMWorkerThread;
      function GetHouses: TKMResHouses;
      function GetWares: TKMResWares;
      function GetPalettes: TKMResPalettes;
    public
      OnLoadingStep: TEvent;
      OnLoadingText: TUnicodeStringEvent;
  