Results 1 to 4 of 4

Thread: Need some help with my Goldminer

  1. #1
    Join Date
    Jun 2007
    Location
    Belgium
    Posts
    333
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Need some help with my Goldminer

    I've been trying to get the gascheck right for about about 2 weeks now, so i guess it's time to admit defeat and ask for some help.

    Everything else works perfectly, i've mined about 20k gold ore untill now, just that stupid gascheck.

    Code:
    Procedure UpdateRockCord;
    begin
      repeat
        FindObjCustom(nrx, nry, ['ock ', 'ine '], [CurrentColor], 0);
        Wait(200 + Random(50));
      Until IsUpTextMulti('ine', 'ock', 'ine ');
      If IsUpTextMulti('ine', 'ock', 'ine ') then
      begin
        MMouse(nrx, nry, 1, 1);
        Wait(100 + Random(50));
      end;
    end;
    
    Procedure GoldMining;
    Var
      hits, Rockx, Rocky, px, py: Integer;
    begin
      If Not LoggedIn then exit;
      hits := 0;
      repeat
        repeat
          FindObjCustom(Rockx, Rocky, ['ock ', 'ine '], [5028302, 3905192], 5);
          Wait(200 + Random(50));
        Until IsUpTextMulti('ine', 'ock', 'ine ');
        If IsUpTextMulti('ine', 'ock', 'ine ') then
        begin
          Mouse(Rockx, Rocky, 1, 1, True);
          CurrentColor := GetColor(Rockx, Rocky);
          hits := hits + 1;
          Flag;
          Wait(200 + Random(50));
          UpdateRockCord;
          if (GasFound(nrx, nry)) then
          begin
            Mouse(646, 82, 1, 1, True);
            Wait(10000 + Random(2000));
          end;
          FindRandoms;
          Wait(200 + Random(50));
          if (FindGas(nrx, nry)) then
          begin
            Mouse(650, 82, 1, 1, True);
            Wait(10000 + Random(2000));
          end;
          if (FindBitmapSpiralTolerance(PickHandle, px, py, 550, 200, 745, 465, 30)) then
            FindPick;
          Wait(100 + Random(50));
          WaitUntilMined;
        end;
      until InvFull or (hits > 99);
    end;
    I think the reason is, cause after the initial click on the rock, you walk to it and mess up the rock coords, so the gascheck coord are way off. Then i made the UpdateRockCord, but every load there will be 4-5 rocks that it updates the coords to the wrong rock.
    How can i make it more accurate?
    Do i have to click in the middle of the rock to make a gascheck work?

    txs in advance for your time.

  2. #2
    Join Date
    Mar 2007
    Location
    Netherlands->Amersfoort.
    Posts
    1,615
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    i know what you're talking about i had the same ones
    http://www.srl-forums.com/forum/showthread.php?t=15975

    on your other question. not it doesn't need to be in the exact middle. just somewhere on the rock.

  3. #3
    Join Date
    Jun 2007
    Location
    Belgium
    Posts
    333
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Doh, first helppost i make and i forget about the search.

    Anyways, thank you Rikjess

  4. #4
    Join Date
    Mar 2007
    Location
    Netherlands->Amersfoort.
    Posts
    1,615
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

Thread Information

Users Browsing this Thread

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

Posting Permissions

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