anchor.diff:  begin
     inherited;
     LoadStream.Read(fHouse, 4);
  -  LoadStream.Read(fDestroyingHouse);
   end;
   
   
  
positive.code:   TTaskAttackHouse = class(TUnitTask)
    private
      fHouse: TKMHouse;
      fDestroyingHouse: Boolean; //House destruction in progress
    public
      constructor Create(aWarrior: TKMUnitWarrior; aHouse: TKMHouse);
      constructor Load(LoadStream: TKMemoryStream); override;
      procedure SyncLoad; override;
      destructor Destroy; override;
      property DestroyingHouse: Boolean read fDestroyingHouse;
      function WalkShouldAbandon: Boolean; override;
      function Execute: TTaskResult; override;
      procedure Save(SaveStream: TKMemoryStream); override;
  
negative.code:   inherited Create(aWarrior);
    fTaskName := utn_AttackHouse;
    fHouse := aHouse.GetHousePointer;
  end;
  
  
  