anchor.diff:  
   function TKMHouseDatClass.GetReleasedBy: THouseType;
   begin
  -  Result := HouseDatX[fHouseType].ReleasedBy;
  +  Result := HouseDatX[fHouseType].UnlockedByHouse;
   end;
   
   
  
positive.code:     fCRC: Cardinal;
      fItems: array [HOUSE_MIN..HOUSE_MAX] of TKMHouseDatClass;
      //Swine&Horses, 5 beasts in each house, 3 ages for each beast
      fBeastAnim: array[1..2,1..5,1..3] of TKMAnimLoop;
      fMarketBeastAnim: array[1..3] of TKMAnimLoop;
      function LoadHouseDat(aPath: string): Cardinal;
      function GetHouseDat(aType: THouseType): TKMHouseDatClass;
      function GetBeastAnim(aType: THouseType; aBeast, aAge:integer): TKMAnimLoop;
  
negative.code: 
  function TKMHouseDatClass.GetSnowPic: SmallInt;
  begin
    Result := HouseDatX[fHouseType].SnowSpriteId;
  end;
  
  
  function TKMHouseDatClass.GetTabletIcon: Word;
  begin
    Result := HouseDatX[fHouseType].TabletSpriteId;
  end;
  
  
  