anchor.diff:    //Go to eat
     TKMTaskGoEat = class(TKMUnitTask)
     private
  +    fFeedCnt: Byte;
       fInn: TKMHouseInn; //Inn in which we are going to eat
       fPlace: ShortInt; //Units place in Inn
     public
  
positive.code:         SetActionLockedStay(29*4, uaEat);
          Feed(UNIT_MAX_CONDITION * SAUSAGE_RESTORE);
          fInn.UpdateEater(fPlace, wtSausages);
        end else
          SetActionLockedStay(0, uaWalk);
     6: if (Condition < UNIT_MAX_CONDITION * UNIT_STUFFED_CONDITION_LVL)
          and (fInn.CheckResIn(wtWine) > 0) then
        begin
          fInn.ResTakeFromIn(wtWine);
  
negative.code:   fType := uttGoEat;
    fInn      := TKMHouseInn(aInn.GetHousePointer);
    fPlace    := -1;
    fFeedCnt  := 0;
  end;
  
  
  