Code:
program scriptTemplate;
   var
   count : Integer
{$DEFINE SMART}
{$I SRL-6/SRL.simba}
{$I SPS/lib/SPS-RS3.Simba}

//Player Handler/Settings
procedure declarePlayers();
  begin
  setLength(players, 1);
   with players[0] do
   begin
        loginName := '';
        password := '';
        isActive := true;
        isMember := false;
        world := 8;
   end
  currentPlayer := 0;
end;


    procedure pickPotatoe();
    var
  b        : TBox;
  cts,i,h,w: Integer;
  tpa,tpa2 : TPointArray;
  atpa     : T2DPointArray;
begin
  findColorsTolerance(tpa, 2715207,  mainscreen.getbounds(), 3, colorSetting(2, 0.37, 0.55));
  SplitTPAWrap(tpa, 5, atpa);
  SortATPASize(atpa, true);
                    //minimap.setAngle(180);
  if (Length(tpa) < 1) then
  begin
    Exit;
  end
  else
  begin

  smartImage.debugATPA(atpa);
       for i := 0 to high(atpa) do
      begin
  smartImage.clear();
  findColorsTolerance(tpa, 2715207,  mainscreen.getbounds(), 3, colorSetting(2, 0.37, 0.55));
   SplitTPAWrap(tpa, 5, atpa);
  SortATPASize(atpa, true);
  smartImage.debugATPA(atpa);
        mouse(middleTPA(atpa[i]), MOUSE_MOVE);
        if isMouseOverText(['Pick Potato'], 500) then

          begin
            fastClick(MOUSE_LEFT);
            print('Potato Picked');

if( tabBackpack.isFull  )then
  begin
               print('full');

          //  wait(RandomRange(1500,3000));
      //teleportToTowlheadLand();
      //      wait(RandomRange(1500,3000));
      //walkToBank();
      //      wait(RandomRange(1500,3000));
      //depositPotatoes();
  end
  else
  begin

               print('not');
            pickPotatoe();
  end;



        end;
      end


  end







    end




begin
      smartEnableDrawing := true;
  clearDebug();
  setupSRL();
  declarePlayers();
  if not isLoggedIn() then
  begin
    players[currentPlayer].login();
    exitTreasure();
  end;
  count = 0;
  pickPotatoe();
end.
It just always returns false or something else. Run this in the potatoe field south of varrock.