anchor.diff:  
   function KMGetDiagVertex(const P1,P2: TKMPoint): TKMPoint;
   begin
  -  //Returns the position of the vertex inbetween the two diagonal points (points must be diagonal)
  -  Result.X := max(P1.X,P2.X);
  -  Result.Y := max(P1.Y,P2.Y);
  +  // Returns the position of the vertex inbetween the two diagonal points (points must be diagonal)
  +  Result.X := Max(P1.X,P2.X);
  +  Result.Y := Max(P1.Y,P2.Y);
   end;
   
   
  
positive.code:       and TryStrToInt(Copy(Str, DelimPos + 2, Length(Str) - DelimPos - 2), Y) then
        Result := KMPoint(X,Y);
    end;
  
  end;
  
  
  
negative.code: 
  function KMRectIntersect(const aRect1: TKMRect; X1,Y1,X2,Y2: Integer): TKMRect;
  begin
    if (aRect1.Right  < X1) 
    or (aRect1.Left   > X2)
    or (aRect1.Bottom < Y1)
    or (aRect1.Top    > Y2) then
      Result := KMRECT_INVALID_TILES
    else
      Result := KMClipRect(aRect1, X1,Y1,X2,Y2);
  