SRL Archive - RS3 Outdated / Broken Scripts

Intoduction
My PwrMiner will mine ores and drop them.This is only good for leveling up as it will only mine ores up to silver. There are no known bugs so far so i urge you all to please test it and post your comments.

This Version Includes:
1. Anti Bannage
2. My very own AutoResponder
3. This version is BETA
4. Has An Axe finder and Gas Avoider.
5. All Anti Randoms.


For History's Sake:

{         ------------------------------------------------------------------
         |       /-------------\                  /---------               |
         |      /               \                /          \              |
         |     /                \               /            \             |
         |     |        |       |              |       |      |            |
         |     |        |       |              |       |      |            |
         |     |        |       |              |       |      |            |
         |     |________|       |              |______ |      |            |
         |              /       /                   /       /              |
         |             /       /                   /       /               |
         |            /       /                   /       /    SCRIPT      |
         |           /       /    UPER           /       /_____            |
         |          /       /                  |/      |/      |           |
         |         /       /                   |       |       |           |
         |        /       /                    |       |       |           |
         |       /       /                     |       |       |           |
         |      /       /________              \                /          |
         |     |       |        |               \              /           |
         |     |       |        |                \------------/            |
         |     |       |        |                                          |
         |     |       |        |   Version Info:                          |
         |      \               /    Version 0.0001 Test <- Just a Test Ver|
         |      \             /       Version 0.001<-- Current Version     |
         |        \           /   Updates!                                 |
         |         \---------/      Version 0.1<-- Should Be Banking Soon! |
         ------------------------------------------------------------------
}

Post your proggies :)

you passwords are in it? or are they fake? anyway I will look over the script and EDIT this post

i tried to change for you but i think there fake?

Hi, let me give you some feedback about your script.

Firstly, your player's their paswords are still in there.. I hope you could save them:(

Now let's go further:)

1.

procedure Check;
Begin
  If FindBitmap(BrokenPickAxe,x,y)then
   begin
    mouse(x,y,2,3,false)
    ChooseOption('Drop')
    Writeln('Gas Got us Terminating Script!')
    LogOut;
    NextPlayer(true);
  end;
end;

I've found a mistake in here:

If your pickaxe is broken, you tell the script to logout and login the next player, this is correct, but. the line after it isn't.
You tell the script that the current player is still active, which means that we can still use that player in further script run, which is wrong.

You'll have to use

NextPlayer(false);

here, to tell the script that we wont use the player in further script run anymore, because his pickaxe is broken:)


2.
You have a variable that you aren't using in the script, not properly, you don't give an action..
I'm talking about the variable "AxeLost", which is a boolean.
You just give them results (true/false) but it's useless in your script because you don't use those variables to continue an action;)

3.

procedure GetAxeHead;

Why do you click the axe? You want to wield it? Then you'll have to be sure
that you have opened the inventory tab, "GameTab(4);".
Do you just want to check? Then search for it in the "wield" tab and in the "inventory" tab, "GameTab(4)" and "GameTab(5);".

Because, let us say that gametab(5); is opened, it will unwield the axe?

Whatever, it's just a lil comment ;)

4. Now, something that you really have to change.
We are going to look to 2 procedures,

procedure WaitWhileMining;

and

procedure Mining;

Let's look to the first one.

    if GasFound(fx, fy) then

you have that par tin there, it will move the mouse to the fx, fy coordinates and then checks if there is a gas.
If you look only to that code, there's nothing wrong, but look..

procedure Mining;

You use the

FindObjOre

function, great, let's look to the parameter's.

[PHP]function FindObjOre(var cx, cy: Integer; Text: string; color, tolerance,
MinCount: Integer): Boolean;[/PHP]
What will it do?
It will look for a certain color, with tolerance with a certain text and don't forget the counting (MinCount).

This is important: It will find that obj, take the coords and store the coords in the cx, cy variables!

Let's look how you've used them:

  case what_to_mine of
    'Clay': begin
        repeat
          if FindObjOre(x, y, 'Mine', 6989253, 5, 2) then
            mmouse(x, y, 2, 2)
              if IsUpTextMulti('min', 'ne', 'rocks') then
              wait(100 + Random(300))
                mouse(x, y, 0, 2, true)
                WaitWhileMining;
          OresMined := OresMined + 1;
        until (invcount = 28)

You search for the rock and when it's found you store the coords in x,y
Now,

procedure WaitWhileMining;

, will check for gas at fx, fy, which will be the following coords: 0, 0
Alert! Alert! here is the BIG mistake that a lot of people make!
You'll have to search for the gas were you stored the variables were you found the rock, isn't it?
So you'll need to change

    if GasFound(fx, fy) then

to

    if GasFound(x, y) then

;)

Btw, you don't need that text chacking in your mining procedure, "FindObjOre" ,already does ;)

5.

procedure DropOres;

I'll edit that one ;) it just drops from inv slot 4 to 28 ;)

6.
I'll make this self-explonatary :)
Look to the timemark you've use in your script, after 40 secs you'll terminate script.. :)


Now, don't think that I was flaming you, I wasn't!, other than other people over here, I do loko to scripts and give my feedback how to improve/fix stuff. There are a lot scripts that are less as good as yource, but they don't know, because there are not always people that tell them what is wrong.
So don't think you're bad, you're on a good way:p

Keep it up,

-Tsn.

EDIT: I went to this thread when nobody posted something, I was the first. I wrote that much that I'm 3rd in posting:p

nah its fake :p. thanks Tsn that was a great help. :)

->{Nauman}<-

w8 a sec, :duh: you were very bored? very very bored?

but i must say your right gj both of you

From: naumanakhlaq
nah its fake :p. thanks Tsn that was a great help. :)

->{Nauman}<-

I hope you've enjoyed my feedback? :p

yea thats the most feedback some ones given me ill be sure to check it out. It's helped me alot :). I actually understood it. So yea thanks :bart:

->{Nauman}<-

From: naumanakhlaq
yea thats the most feedback some ones given me ill be sure to check it out. It's helped me alot :). I actually understood it. So yea thanks :bart:

->{Nauman}<-

Np, we all are here to help people out:p
Thanks btw:)

-Tsn.

Keep on scripting, you seem to like it! :)

I thought we were only supposed to post scripts in their sub forums…Am I wrong?

Nah it doesn't relly matter :p. Anyway thanks guyz and i dont see any proggies comming this way?

->{Nauman}<-

try as i might, i couldn't find any reason for it to detect the colors of the box around the game as gas, so you may want to look at that, otherwise, looks good, didnt get to test because of the error.

Nice work bro…

didn't work with me. are there no more working mining scripts?

Yea some more. This is alright I think i should really update it though…


->{Nauman}<-

Line 49: [Error] (13171:16): Duplicate identifier 'PickAxeHandle' in script C:\Documents and Settings\Tim\Local Settings\Temporary Internet Files\Content.IE5\EQBHA5SL\PwrMiner%200[1].1%20BETA%20no%20banking.scar

This is exactly what I need thank you downloading now ill give a proggie later there are no good other powerminers.

Line 49: [Error] (13103:16): Duplicate identifier 'PickAxeHandle' in script C:\Users\****\Desktop\PwrMiner 0.1 BETA no banking.scar

Any clues as to whats wrong?

From: Gazrat
Line 49: [Error] (13171:16): Duplicate identifier 'PickAxeHandle' in script C:\Documents and Settings\Tim\Local Settings\Temporary Internet Files\Content.IE5\EQBHA5SL\PwrMiner%200[1].1%20BETA%20no%20banking.scar

11-16-2007 07:48 AM
Close pl0x

Heavily outdated..

Nauman if you want it re-opened let me know.

Closed.