SRL Archive - RS3 Outdated / Broken Scripts

Do not download out of date

Hi guys I'm releasing my first script which is an iron ore miner than can be used everywhere. The script has Antiban, which has now been vastly improved since Version 1.1 (use to spam click on the mining guide :P sorry guys).
This has been my first script that I have made so if their are any issues please post below and I'll fix them up. Plus if you have any suggestions please post below as well.
So this script will work flawlessly please setup SMART like this:




Most updated is the furthest one down in the attachments and will also be the highest version number.

-Version 1.1 updated fail safes made script more reliable (Thanks to Shay)
-Version 1.2 there are more randomness such as there is a change to either right click or left click on the resource. (Thanks to Yohojo)
-Version 1.3 fixed the amount of antibans done, made finding the ore better and fixed dropping method.
Jumped to Version 2 a lot has been improved upon so it only seemed appropriate. If you've used this script in the past and haven't liked it for whatever reason this will definitely be worth you time now.
-Version 3 added auto responder increased ore finding.
-Version 4 Basically flawless now, there maybe a few bugs to squash but that should be all. Updated the Ore finding its now a lot more accurate than before.


If you have any problems with the script post below and I will fix it very quickly.

-Thanks for using my Iron Miner by Blake thanks to Romy (a mate who made the auto talker) and WT-Fakawi.

You left your username and password inside the script, or am I getting trolled?
Edit*
It's a good try at a first script!
A few things i'd like to point out though.

Procedure MineOre;
var x, y: integer;
begin;
  repeat
  FindNormalRandoms; //You aren't using randoms correctly :p, should be like this - 
  {if not FindNormalRandoms then
      if not LoggedIn then
         TerminateScript; 
  }
  if FindObj(x, y,'ine', 2832993, 10) then  //if it finds this...
  Mouse(x, y, 2, 2, false); //it'll do this but...
  ChooseOption('ine'); //it'll do this regardless of finding it!
    Wait(3500+random(1500)); //same thing with it!
    repeat
   Until not IsUpText('ron') or (InvFull);
    until(InvFull);
    {So, what we have here is technically called an infinite loop, it'll go on as long as it can.
      It's also a bad piece of code (No offence :p), since what it does is it's in a repeat/until loop two times over!}
    if (InvFull) then DropAll;
  end;    

Your antiban is also a bit sporradic :p

[B]rocedure AntiBan;
begin
  if(not(LoggedIn))then
  Exit;
  FindNormalRandoms;
  case Random(8) of
  0:
  begin
    HoverSkill('Mining', false);
    wait(2453+Random(432));
  end;
  1: PickUpMouse;
  2:
  begin
    MakeCompass('N');
    wait(100+random(133));
    MakeCompass('W');
    wait(50+random(133));
    MakeCompass('N');
    FindNormalRandoms;
  end;
 end;
end;  

While not badly coded, it's a bit repetitive and it'll do antibans more than it'll mind :p

From: Shay
You left your username and password inside the script, or am I getting trolled?

Thanks for reminding me, although its only my script testing account.

From: Shay
You left your username and password inside the script, or am I getting trolled?
Edit*
It's a good try at a first script!
A few things i'd like to point out though.

Procedure MineOre;
var x, y: integer;
begin;
  repeat
  FindNormalRandoms; //You aren't using randoms correctly :p, should be like this - 
  {if not FindNormalRandoms then
      if not LoggedIn then
         TerminateScript; 
  }
  if FindObj(x, y,'ine', 2832993, 10) then  //if it finds this...
  Mouse(x, y, 2, 2, false); //it'll do this but...
  ChooseOption('ine'); //it'll do this regardless of finding it!
    Wait(3500+random(1500)); //same thing with it!
    repeat
   Until not IsUpText('ron') or (InvFull);
    until(InvFull);
    {So, what we have here is technically called an infinite loop, it'll go on as long as it can.
      It's also a bad piece of code (No offence :p), since what it does is it's in a repeat/until loop two times over!}
    if (InvFull) then DropAll;
  end;    

Your antiban is also a bit sporradic :p

[B]rocedure AntiBan;
begin
  if(not(LoggedIn))then
  Exit;
  FindNormalRandoms;
  case Random(8) of
  0:
  begin
    HoverSkill('Mining', false);
    wait(2453+Random(432));
  end;
  1: PickUpMouse;
  2:
  begin
    MakeCompass('N');
    wait(100+random(133));
    MakeCompass('W');
    wait(50+random(133));
    MakeCompass('N');
    FindNormalRandoms;
  end;
 end;
end;  

While not badly coded, it's a bit repetitive and it'll do antibans more than it'll mind :p

I will fix up the mining procedure, thanks for the help mate :)

Since being updated to version 2, the script has now been working flawlessly for me for 2 hours at al-kharid mine (and is still going). Any bugs pm me the error message from debug box or post here.

Does this mining everywhere include mining in the dwarven mines and banking in the dungeoneering thing that is there?

From: Thanatos
Does this mining everywhere include mining in the dwarven mines and banking in the dungeoneering thing that is there?

Not at the moment, I will be expanding out into newer and better things. Still learning and as i learn better things the script will be getting improvements. For now though, its a flawless iron miner and I will be making the script faster.

LOL. Won't mine iron.. randomly mines clay btw.

needs faster ore detecting
:P

From: romy
needs faster ore detecting
:P

Improved in V3, report back if its better.

It won't mine nothing…

From: omfgomfg
It won't mine nothing…

Sorry about this, today I updated to version 4 and it shouldn't do this anymore. Make sure your settings are the same as the ones i posted.

when i try to run it says invalid numbers on line 130

From: ninjaking26
when i try to run it says invalid numbers on line 130

Mine does the same thing on anything that says "sendkeys"
>.<