SRL Archive - RS3 Outdated / Broken Scripts

SKy's PowerMiner


SKy Scripter

2007-09-01 20:25:16

Sky's PowerMiner

Bugs :
Gas Doesnt always solve..
Clicks diffrent type of rock's somtimes
Will start mining a diffrent rock while mining


I Havn't tested this script much… so i dont know how well it will work..

Here are some proggies.
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| Created By SKy Scripter |
| [email]Sky_Ripter@Hotmail.com[/email] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 03:54:48 AM |
|1 Hours, 8 Minutes and 57 Seconds |
|Current Player : ********** |
|Combat Level: 3 |
|Mined : 181/28000 |
|Loads : 6/1000 |
|Droped 1 uncuts. |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| [url]www.srl-forums.com[/url] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Talks : 1 |
| Old Men : 1 |
| Boxes Solved : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/


/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| Created By SKy Scripter |
| [email]Sky_Ripter@Hotmail.com[/email] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 01:02:48 PM |
|44 Minutes and 5 Seconds |
|Current Player : ********** |
|Combat Level: 3 |
|Mined : 280/28000 |
|Loads : 10/1000 |
|Gas Events : 1 |
|Droped 1 uncuts. |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| [url]www.srl-forums.com[/url] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Fights : 1 |
| Talks : 1 |
| Old Men : 1 |
| Boxes Solved : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Wanted

2007-09-01 20:27:09

Nice script man!

Harry

2007-09-01 20:29:50

Planning to beat Wizzup? :p Good job!

SKy Scripter

2007-09-02 06:56:14

New Proggy, btw i dont know if this compiles for you guys so tell me if it doesnt work.


/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| Created By SKy Scripter |
| [email]Sky_Ripter@Hotmail.com[/email] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 02:55:55 AM |
|4 Hours, 28 Minutes and 19 Seconds |
|Current Player : |
|Combat Level: 3 |
|Mined : 645/28000 |
|Loads : 23/1000 |
|Gas Events : 6 |
|Droped 3 uncuts. |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| [url]www.srl-forums.com[/url] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Fights : 1 |
| Talks : 13 |
| Old Men : 3 |
| Sandwiches : 1 |
| Certers Missed : 9 |
| Boxes Solved : 4 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/


the scar noob

2007-09-02 07:05:33

hey SKy, nice to see you again with a new script, going to check it ou, nice job ;)

the scar noob

2007-09-02 08:40:41

I have some things to ask you SKy Scripter.

1.
Players[0].Integers := [IronColor];
Shouldn't that be like
  Players[0].Integers[B][0][/B] := [IronColor];
?

2.
var
Mined, DropUncut, TheOreColor, Gas : Integer;//OreColor was duplicate identifier
Radius_run, Degree_run, Pick_Handle, Pick_Head : Integer;
As you see i replaced it everywere in the script.

3.
function AMidPoint(P : TPointArray) : TPoint;
var
I, N, L, Index : Integer;
begin
L := Length(P);
if (L = 0) then Exit;
for N := 0 to L / 2 do
I ask myself the question, what if the TpointArray/2 is an extended value?
Should there occur an error because you defined it as an integer?

function FindOreRock(var x, y : Integer; Color, MinPixels, Tol : Integer) : Boolean;
My head hurts:confused:
Looks cool but omg i can't look twice at it :)

EDIT: SORRY FOR THE DOUBLE POST!!

RudeBoiAlex

2007-09-02 10:43:54

sky tut tut tut u used on a lvl 3 …. hmmmm boreas seemed to said that to B2C earlyier lol :p

naw im gonna test soon :)

pwnaz0r

2007-09-02 12:48:58

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| Created By SKy Scripter |
| [email]Sky_Ripter@Hotmail.com[/email] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 01:29:26 AM |
|1 Hours, 5 Minutes and 50 Seconds |
|Current Player : |
|Combat Level: 44 |
|Mined : 364/8400 |
|Loads : 13/300 |
|Gas Events : 3 |
|Droped 1 uncuts. |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

SKy Scripter

2007-09-02 13:55:57

From: the scar noob
I have some things to ask you SKy Scripter.

1.
Players[0].Integers := [IronColor];
Shouldn't that be like
  Players[0].Integers[B][0][/B] := [IronColor];
?

2.
var
Mined, DropUncut, TheOreColor, Gas : Integer;//OreColor was duplicate identifier
Radius_run, Degree_run, Pick_Handle, Pick_Head : Integer;
As you see i replaced it everywere in the script.

3.
function AMidPoint(P : TPointArray) : TPoint;
var
I, N, L, Index : Integer;
begin
L := Length(P);
if (L = 0) then Exit;
for N := 0 to L / 2 do
I ask myself the question, what if the TpointArray/2 is an extended value?
Should there occur an error because you defined it as an integer?

function FindOreRock(var x, y : Integer; Color, MinPixels, Tol : Integer) : Boolean;
My head hurts:confused:
Looks cool but omg i can't look twice at it :)

EDIT: SORRY FOR THE DOUBLE POST!!


1: no you can set array by doing this…
Players[CurrentPlayer].Integers := [GoldColor, IronColor, TinColor];

2: oh yeah sorry, remember i have a diffrent SRL and SCAR ;) lol

3: no, it will not give a ERROR… when you divide integers; // i dont know why everyone thinks that.


From: rudeboialex

sky tut tut tut u used on a lvl 3 …. hmmmm boreas seemed to said that to B2C earlyier lol

naw im gonna test soon


lol, yeah.. but i dont count because i never bot lol XD
also why do beta testing on a main..



when the new SRL and SCAR come out ill Start working on my guild miner…

the scar noob

2007-09-02 14:00:10

From: SKy Scripter


3: no, it will not give a ERROR… when you divide integers; // i dont know why everyone thinks that.


you grab the array lenght from something and you divide it by 2 (/2), let's say the array lenght is 12345, we will have 6172.5, what's an extended, aint it?
And you have no extended var, so i thought why not making a variant?

Can you plz explain that, it's confusing, i think i'm right, plz explain so.

shaunthasheep

2007-09-02 17:56:32

The scar noob.

if you have i defined as a integer, with this case

i := 5;
i := i / 2;

i should be 2. Maybe 3.

when i is defined as extended.

i := 5;
i := i / 2;

i would equal 2.5

When you divide a integer by a integer your result is a integer.
When you divide a extended by as integer your result is extended.

richk1693

2007-09-02 18:43:22

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 04:11:05 PM |
|1 Hours, 5 Minutes and 10 Seconds |
|Current Player : abysslord6 |
|Combat Level: 53 |
|Mined : 476/28000 |
|Loads : 17/1000 |
|Droped 2 uncuts. |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Works great! Seems kinda fast for mouse speed though. Solves randoms perfect too.

belgin fish

2007-09-02 22:43:15

this script looks sweet! i cant wait to try it !!

WhiteShadow

2007-09-03 02:50:24

Well scripted man. Gj. :]

That's the first time I've seen RunAway|RunBackEx used like that.. interesting. Droprandomitems is creative, counting black pixels to decide what object's what… I like that.

The Claw

2007-09-03 04:16:40

Looks solid, nice work

SKy Scripter

2007-09-03 04:25:23

Thanks. Very Much :)

Santa_Clause

2007-09-03 04:29:30

Dang. I thought this was one of those crap scripts you always make :p

Jokes. Good job dude.

Aren't the standards a bit messed up though?

Also, since when did you make scripts without forms?!!

pixel

2007-09-03 04:35:05

works a treat!!! A+++++

Worked it throughout the night and mined 8k iron!

tyvm

Eacis

2007-09-03 18:43:17

Line 50: [Error] (12894:19): Duplicate identifier 'OreColor' in script C:\Program Files\SCAR 3.11\Scripts\Rs scripts\PowerMiner.scar

?? my bad? or just about the script

Camaro

2007-09-03 22:29:43

Eacis, change it to TheOreColor, and it will work.

SKy Scripter

2007-09-04 00:49:50

there i changed it. :)

gillian

2007-09-04 04:59:11

I will give this a run tonight .. looks lovely :)

Nebuli

2007-09-04 09:59:01

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| Created By SKy Scripter |
| [email]Sky_Ripter@Hotmail.com[/email] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 01:24:25 PM |
|5 Hours, 27 Minutes and 56 Seconds |
|Current Player : ZEZIMA!11 |
|Combat Level: 0 |
|Mined : 325/28000 |
|Loads : 11/1000 |
|Gas Events : 2 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/


It didn't talk to giles (or niles, idk) and it got teled to wizzy tower and just hanged there for many hours :P but nice script anyways!!

SKy Scripter

2007-09-04 12:12:36

From: Nebuli
It didn't talk to giles (or niles, idk) and it got teled to wizzy tower and just hanged there for many hours :P but nice script anyways!!


Yeah, Giles, niles and miles or whatever is broken. So i need an acount with that random so i can fix it.

Thanks for the report.

S U P E R

2007-09-04 12:37:13

nice scipt i tryed it and it did all 100 loads but i forgot to copy and paste thereport though

silentguy630

2007-09-08 22:57:58

[Runtime Error] : Type Mismatch in line 671 in script
I'm pretty sure i did something wrong :S

the scar noob

2007-09-26 16:29:50

I tried it out and It doesn't works that good though, is i tbecause it has to be updated due to the new SRL and new SCAR 3.12??

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| Created By SKy Scripter |
| [email]Sky_Ripter@Hotmail.com[/email] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 10:20:06 PM |
|1 Hours, 7 Minutes and 13 Seconds |
|Current Player : ***** |
|Combat Level: 36 |
|Mined : 124/560 |
|Loads : 4/20 |
|Gas Events : 20 |
|Droped 3 uncuts. |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Talks : 3 |
| Old Men : 2 |
| Certers Missed : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/


Account #1: broken pickaxe
Account #2: 15+ new boxes

-Tsn.

Rompsu

2007-09-30 18:45:59

This is the best power miner I have used. Works fantastic.

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| Created By SKy Scripter |
| [email]Sky_Ripter@Hotmail.com[/email] |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Time : 06:38:43 PM |
|27 Minutes and 58 Seconds |
|Current Player : |
|Combat Level: 69 |
|Mined : 250/28000 |
|Loads : 8/1000 |
|Droped 1 uncuts. |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Keep up the good work.

Dudenow12

2007-10-20 01:54:53

Works good for me except that it only logs out and switches players when it loses or breaks a pickaxe or when its in a difficult random. It would be good to include a feature where it would log out and log in to the next account, and then after that one is done have it log back into the next account or if its the last account, have it start over again. That way you are less likely to get randoms because your accounts would log out and then back in.

Zenzie

2007-11-02 13:06:22

I used the script but the "click on ore" sucks. So I edited it. You might wanna use this

Instead of

         if (IsUpText('Mine')) then
begin
GetMousePos(x, y);
TheOreColor := GetColor(x, y);
Result := True;
Exit;

Use

if (IsUpText('Mine')) then
begin
wait(800 + random(200));
GetMousePos(x, y);
Mouse(x, y, 0, 0, False);
TheOreColor := GetColor(x, y);
ChooseOption('ine');
Exit;

More antiban + works better.

Wizzup?

2007-11-02 13:40:30

I think that wait is a bit too big. :)
SKy should add a wait(100+Random(50)) though. ;)

SKy Scripter

2007-11-02 15:31:50

lmfao its just a finder… but whatever :rolleyes:

Wizzup?

2007-11-02 17:57:55

From: SKy Scripter
lmfao its just a finder… but whatever :rolleyes:


RS doesn't update it's uptext as fast as you think it does.. :)

SKy Scripter

2007-11-02 19:12:00

From: Wizzup?
RS doesn't update it's uptext as fast as you think it does.. :)


Lol..


if (not(DetectGas(P[t].x, P[t].y, 3)))then
begin
MMouse(P[T].x, P[T].y, 0, 0);
Wait(100 + Random(50));
if (IsUpText('Mine')) then
begin
GetMousePos(x, y);
TheOreColor := GetColor(x, y);
Result := True;
Exit;
end;
end;

Now Take on good look at that and tell me whats wrong wizzup?
then we will talk ;)

Edit : Oh yeah dont forget to look at the script…

XD

HayHay89

2007-11-04 20:01:04

good script keep up the good work