anchor.diff:            end;
       end
       else
  -      LogIntParamWarn('States.IsWinefieldPlanAt', [X, Y]);
  +      LogIntParamWarn('States.IsWinefieldPlanAt', [aPlayer, X, Y]);
     except
       gScriptEvents.ExceptionOutsideScript := True; //Don't blame script for this exception
       raise;
  
positive.code:     Result := gHands[aHandId].Constructions.HousePlanList.HasPlan(KMPoint(aX, aY), HT);
      if Result then
      begin
        if aHouseType = htNone then
          aHouseType := HT
        else
          Result := aHouseType = HT;
  
negative.code: //* If aPlayer index is -1 it will return true if any player has road plan at the specified location.
  //* If Road plan found then aPlayer will contain its player id
  //* Result: Is road plan found
  function TKMScriptStates.IsRoadPlanAt(var aPlayer: Integer; X, Y: Integer): Boolean;
  
    function FindPlan(aHandId, aX, aY: Word): Boolean; inline;
    begin
  