anchor.diff:  end;
   
   
  -function TKMHouseDatClass.GetDoesOrders: boolean;
  -begin
  -  Result := HouseDatX[fHouseType].DoesOrders <> 0;
  -end;
  -
  -
  -function TKMHouseDatClass.GetGUIIcon: word;
  +function TKMHouseDatClass.GetDoesOrders: Boolean;
  +begin
  +  Result := HouseDatX[fHouseType].NeedsPlayerOrder;
  +end;
  +
  +
  +function TKMHouseDatClass.GetGUIIcon: Word;
   begin
     Result := HouseDatX[fHouseType].BuildIcon;
   end;
  
positive.code: 
  function TKMHouseDatClass.GetReleasedBy: THouseType;
  begin
    Result := HouseDatX[fHouseType].ReleasedBy;
  end;
  
  
  
negative.code: 
  function TKMHouseDatClass.GetSnowPic: SmallInt;
  begin
    Result := HouseDatX[fHouseType].SnowSpriteId;
  end;
  
  
  function TKMHouseDatClass.GetTabletIcon: Word;
  begin
    Result := HouseDatX[fHouseType].TabletSpriteId;
  end;
  
  
  