anchor.diff:    begin
       StepCaption('Reading '+RXData[i].Title+' GFX ...');
       fLog.AppendLog('Reading '+RXData[i].Title+'.rx',LoadRX(ExeDir+'data\gfx\res\'+RXData[i].Title+'.rx',i));
  -    if i=4 then MakeCursors(4); //Make GUI items before they are flushed
  +    if i=4 then MakeCursors(4); //Make GUI items before they are flushed in MakeGFX
       MakeGFX(nil,i);
  +    LoadRX7(i); //Something fancy to Load RX7 data (custom bitmaps and overrides)
       StepRefresh();
     end;
  -
  -  LoadRX7; //Something fancy to Load RX7 data (custom bitmaps and overrides)
   
     StepCaption('Reading fonts ...');
     LoadFonts(false, aLocale);
  
positive.code: 
  { This function should parse all valid files in Sprites folder and load them
    additionaly to or replacing original sprites }
  procedure TResource.LoadRX7();
  var
    FileList:TStringList;
    SearchRec:TSearchRec;
  
negative.code:     function LoadUnitDAT(filename:string):boolean;
      function LoadFont(filename:string; aFont:TKMFont; WriteFontToBMP:boolean):boolean;
  
      procedure LoadRX7(aID:integer);
      function LoadRX(filename:string; ID:integer):boolean;
      procedure MakeGFX_AlphaTest(Sender: TObject; RXid:integer);
      procedure MakeGFX(Sender: TObject; RXid:integer);
  