anchor.diff:      function FindForestAndWoodcutter(): Boolean;
       function PlanDefenceTowers(): Boolean;
   
  -//    function GetBlockingTrees(aHT: THouseType; aLoc: TKMPoint; var aTrees: TKMPointArray): Boolean;
  -//    function GetBlockingFields(aHT: THouseType; aLoc: TKMPoint; var aFields: TKMPointArray): Boolean;
     public
       constructor Create(aPlayer: TKMHandIndex);
       destructor Destroy(); override;
  
positive.code:   COLOR_GREEN_Wine = $3355FFFF;
    COLOR_BLUE = $60FF0000;
  var
    I,K, Cnt: Integer;
    Division: Single;
    HT: THouseType;
    Loc: TKMPoint;
  
negative.code:   function FindClosestHouseEntrance(aOnlyPlaced: Boolean; var aNewLoc, aExistLoc: TKMPoint): Boolean;
    const
      INIT_DIST = 1000000;
      MAX_WATCHTOWER_DIST = 10;
    var
      I: Integer;
      Dist, BestDist: Single;
  