anchor.diff:  
       function ObjectIsChopableTree(Loc:TKMPoint; Stage:byte):boolean;
       function CanWalkDiagonaly(A,B:TKMPoint):boolean;
  -    //function FindNewNode(A,B:TKMPoint; aPass:TPassability):TKMPoint;
   
       procedure UpdateBorders(Loc:TKMPoint; CheckSurrounding:boolean=true);
       procedure FlattenTerrain(Loc:TKMPoint); overload;
  
positive.code:       HeightAdd:byte; //Fraction part of height, for smooth height editing
  
  
        //DEDUCTED 
        Light:single; //KaM stores node lighting in 0..32 range (-16..16), but I want to use -1..1 range
        Passability:TPassabilitySet; //Meant to be set of allowed actions on the tile
  
  
negative.code:     Result := not MapElem[Land[A.Y+1,A.X].Obj+1].DiagonalBlocked;//   B
  end;
  
  
  {Place markup on tile, any new markup replaces old one, thats okay}
  procedure TTerrain.SetMarkup(Loc:TKMPoint; aMarkup:TMarkup);
  