SRL Archive - RS3 Outdated / Broken Scripts

I hate how most mining scripts either you or the scripter have to make a guess for how long to wait before you mine the next rock, and I was thinking of a way to get around it, I think I found a way that would work pretty good. Could you do:

all your mining code up here, then once it says to click and mine rock have it do

  //at beginning of procedure have I := 0 then a repeat for mining after it so I doesn't keep getting set to 0
  mouse(x, y, 1, 1, True) //or whatever you want for it to click on rock
  I := I + 1 //after it click a rock I would = which ore number your about to mine
  repeat
    wait(100)
  Until (InvCount = I)  //unless your not wielding a pick, then you'd want I := 1 at the beginning before the repeat

Something like that, you think that would work? any suggestions on making it better? I don't know, but wouldn't that work like perfectly? and eleminate setting a specific wait time to mine the next rock like wait(2000 + random(500)) or something like that.


So yea, I'd like to know what everyone thinks, good idea, bad idea?

And I realized most/all scripts in this section are ones to use to mine, if this is in the wrong spot, can a mod please move it to the appropiate area?

There are other ways this could be done but from the quick read I just did that looks like a very tidy way to do it (I haven't been around long so there may be better ways). Looks as though it would work, nice contribution!

Been there… Done that…

{*******************************************************************************
Procedure WaitWhileMine;
By: Orange
Description: Waits until you have mined the rock or until the time is up before
             continuing.
*******************************************************************************}
Procedure WaitWhileMine;
var
  IsMining, CountInv: Integer;
begin
  GameTab(4);
  CountInv := InvCount;
  R_FFlag(0);
  wait(249 +random(516));
  if FindBlackChatMessage('swing') then
  begin
    repeat
      wait(91 +random(58));
      Inc(IsMining);
    until FindBlackChatMessage('manage') or (IsMining > 30) or (InvCount := CountInv + 1);
    wait(216 +random(38));
  end;
end;

Improved it a bit, ;)

That's a good way to do it. The one time it might not work perfectly is if you mine a gem, since that will increase your invcount, but you haven't finished mining the ore yet. So you could count the number of ores in the inventory instead, using a generic ore bmp.

The way I do it is to have a wait loop, with numerous conditions to break out of it.

1) Detect "manage" text in the first line of the chat window.
2) Count all the ores in inventory and wait until that number increases by 1.
3) Wait xx seconds.
4) Can't detect ore color anywhere on the mainscreen.
5) Full inventory.

That's really overkill for a simple procedure, and you certainly don't need that many conditions, but that's what I do.

From: orange
Been there… Done that…

{*******************************************************************************
Procedure WaitWhileMine;
By: Orange
Description: Waits until you have mined the rock or until the time is up before
             continuing.
*******************************************************************************}
Procedure WaitWhileMine;
var
  IsMining, CountInv: Integer;
begin
  GameTab(4);
  CountInv := InvCount;
  R_FFlag(0);
  wait(249 +random(516));
  if FindBlackChatMessage('swing') then
  begin
    repeat
      wait(91 +random(58));
      Inc(IsMining);
    until FindBlackChatMessage('manage') or (IsMining > 30) or (InvCount := CountInv + 1);
    wait(216 +random(38));
  end;
end;

Improved it a bit, ;)

that's a good idea, i like the "until FindBlackChatMessage('manage')".

From: tarajunky
That's a good way to do it. The one time it might not work perfectly is if you mine a gem, since that will increase your invcount, but you haven't finished mining the ore yet. So you could count the number of ores in the inventory instead, using a generic ore bmp.

The way I do it is to have a wait loop, with numerous conditions to break out of it.

1) Detect "manage" text in the first line of the chat window.
2) Count all the ores in inventory and wait until that number increases by 1.
3) Wait xx seconds.
4) Can't detect ore color anywhere on the mainscreen.
5) Full inventory.

That's really overkill for a simple procedure, and you certainly don't need that many conditions, but that's what I do.

and yea that's true I forgot about getting gems, but it would work if I did it like you said, to use a ore inv. count and not just a general inv. count