anchor.diff:  //* If aPlayer index is -1 it will return true if any player has field plan at the specified location.
   //* If Corn (Field) Plan found then aPlayer will contain its player id
   //* Result: Is field plan found
  -function TKMScriptStates.IsFieldPlanAt(var aPlayer: Integer; X, Y: Word): Boolean;
  +function TKMScriptStates.IsFieldPlanAt(var aPlayer: Integer; X, Y: Integer): Boolean;
   
     function FindPlan(aHandId, aX, aY: Word): Boolean; inline;
     begin
  
positive.code:       end
      end
      else
        LogIntParamWarn('States.IsPlanAt', [aPlayer, Byte(aFieldType), X, Y]);
    except
      gScriptEvents.ExceptionOutsideScript := True; //Don't blame script for this exception
      raise;
  
negative.code:       else
        if handFilter then
        begin
          aHouseType := htAny;
          Result := FindPlan(aPlayer, X, Y, aHouseType);
        end else
        begin
          if not houseTypeFilter then
            aHouseType := htAny;
  
          for I := 0 to gHands.Count - 1 do
            if gHands[I].Enabled then
  