anchor.diff:  
   
   { TKMSpritePack }
  +//We need to access to palettes to properly Expand RX files
   constructor TKMSpritePack.Create(aPalettes: TKMPalettes; aRT: TRXType);
   begin
     inherited Create;
  
positive.code:   fPalettes := aPalettes;
    fRT := aRT;
  end;
  
  procedure TKMSpritePack.Allocate(aCount: Integer);
  begin
  
negative.code:   end;
  end;
  
  
  //Release RAM that is no longer needed
  procedure TKMSpritePack.ClearData;
  var I: Integer;
  begin
  