anchor.diff:      X := aLoc.X + HMA[aHT].Tiles[I].X;
       Y := aLoc.Y + HMA[aHT].Tiles[I].Y;
       Output := Output AND (tpBuild in gTerrain.Land[Y,X].Passability);
  -    if gTerrain.ObjectIsChopableTree(X, Y) then
  +    if gTerrain.ObjectIsChopableTree(KMPoint(X,Y), [caAge1,caAge2,caAge3,caAgeFull]) then
       begin
         aTrees[TreeCnt] := KMPoint(X,Y);
         TreeCnt := TreeCnt + 1;
  
positive.code:   end;
  
  const
    DISTANCE_BETWEEN_TOWERS = 6;
  var
    I, K, DefCount: Integer;
    P1,P2: TKMPoint;
  
negative.code:   KM_Game, KM_HouseCollection, KM_HouseSchool, KM_HandsCollection, KM_Hand, KM_Terrain, KM_Resource,
    KM_AIFields, KM_Units, KM_UnitTaskDelivery, KM_UnitActionWalkTo, KM_UnitTaskGoEat, KM_UnitsCollection,
    KM_NavMesh, KM_HouseMarket, KM_HouseWoodcutters, KM_Eye,
    KM_RenderAux, KM_ResMapElements;
  
  
  
  