anchor.diff:    inherited Create(aWarrior);
     fTaskName := utn_AttackHouse;
     fHouse := aHouse.GetHousePointer;
  -  fDestroyingHouse := False;
   end;
   
   
  
positive.code:     SaveStream.Write(fHouse.UID)
    else
      SaveStream.Write(Integer(0));
    SaveStream.Write(fDestroyingHouse);
  end;
  
  
  
negative.code:   TTaskAttackHouse = class(TUnitTask)
    private
      fHouse: TKMHouse;
    public
      constructor Create(aWarrior: TKMUnitWarrior; aHouse: TKMHouse);
      constructor Load(LoadStream: TKMemoryStream); override;
      procedure SyncLoad; override;
      destructor Destroy; override;
      function WalkShouldAbandon: Boolean; override;
      function Execute: TTaskResult; override;
      procedure Save(SaveStream: TKMemoryStream); override;
  