Results 1 to 5 of 5

Thread: Problem With Top Left Text Reader (Like 'Option2' Procedure)

  1. #1
    Join Date
    Mar 2007
    Location
    Nr. Leeds, Uk
    Posts
    16
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Problem With Top Left Text Reader (Like 'Option2' Procedure)

    Hi,
    I'm Having Trouble Using The 'Option2' Procedure, Infact I'm Not Really Sure If This Is The Procedure I Should Be Using,

    SCAR Code:
    Procedure FindSeeds;
    var
      rx, ry: Integer;
    begin
      row := 1;
      rx := 35 + (col * 47);
      ry := 27 + (row * 38);
          begin
          MMouse(rx, ry, 4, 4);
          wait(500+random(500))
          begin
            if (Option2('Withdraw 1 Potato')) then
              begin
                Mouse(rx, ry, 4 ,4, false)
                ChooseOption(rx, ry, 'Withdraw All');
                CloseBank;
              end
           else
               if(col <= 7) then
                begin
                col:= col + 1;
                FindSeeds;
                end
            else
               col:= 1;
               FindSeeds;
          end;
        end;
    end;

    That Is Part Of My Auto Farmer I'm Making (Yes A Farmer Lol) But This Part Is Meant To Search The Bank, Row One, Then Column One To Eight Until It Finds The Potatoe Seeds (In This Case) But All It Does Is Go Over The First Row Of The Bank, So I'm Persuming That The 'Option2' Part Isn't Working, Any Help Is Greatful.
    Thanks All

  2. #2
    Join Date
    Apr 2007
    Posts
    3,152
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    do u mean like....text at the top left when u move ur mouse over an object?..use IsUpText('ithdraw 1 potato')
    SCAR Tutorials: The Form Tutorial | Types, Arrays, and Classes
    Programming Projects: NotePad | Tetris | Chess


  3. #3
    Join Date
    Mar 2007
    Location
    Nr. Leeds, Uk
    Posts
    16
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I tried using 'IsUpText('ithdraw 1 potato')' but it still hasn't worked, it just scans over the seeds, it wont right click.

  4. #4
    Join Date
    Mar 2007
    Posts
    138
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    write

    Code:
    if(IsUpText('ithdraw 1 potato')) then
    mouse(x,y,3,3,false);
    if (Option2('Withdraw 1 Potato')) then
                Mouse(rx, ry, 4 ,4, false);
                ChooseOption(rx, ry, 'Withdraw All');
                CloseBank;
              end
           else
    that will make the mouse go over it then right click
    I dunno if works but should look like that

  5. #5
    Join Date
    Jan 2007
    Posts
    513
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Use this:

    SCAR Code:
    procedure Withdraw(Col, Row, Amount: Integer);
    By: Odie5533/Stupid3ooo
    Description:
         Withdraws Amount at Column/Row.
    Srl simply rocks.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Top left text, finder
    By HarryJames in forum OSR Help
    Replies: 2
    Last Post: 11-08-2008, 01:48 AM
  2. Replies: 2
    Last Post: 09-23-2008, 11:04 PM
  3. text in the top left
    By takeout in forum OSR Help
    Replies: 3
    Last Post: 09-30-2007, 06:31 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •