SRL Archive - First Scripts

PowerRock by Zennext


zennext

2007-11-19 21:17:42

Well heres my first script. Its just a simple Power Miner.

Should work for any rock at all. Has basic anti-randoms. Also has customizable drops. It should work all right. Can't see anything wrong with it. :D

Anyways, I hope you like it. Please leave any comments you have here. Also tell me about/help me fix any problems or messed up coding you see/have.

Last Update:
11/21/07 2:14 PM EST

zennext

2007-11-20 11:11:40

Anyone? Please try it out! :confused:

zennext

2007-11-20 11:14:05

Sorry about double post, computer/internet lagged.

sundeep125

2007-11-20 14:32:29

m8 please dont double post,be patient. and ur script,hmm ive tried it out but for some reason when i press play all it says is

Z
Ze
Zen
Zenn
Zenne
Zennex
Zennext
Zennext'
Zennext's
Zennext's
Zennext's P
Zennext's Po
Zennext's Pow
Zennext's Powe
Zennext's Power
Zennext's PowerR
Zennext's PowerRo
Zennext's PowerRoc
Zennext's PowerRock


______ Script by Zennnext _
|___ / www.srl-forums.com | |
/ / ___ _ __ _ __ _____ _| |_
/ / / _ \ '_ \| '_ \ / _ \ \/ / __|
/ /_| __/ | | | | | | __/> <| |_
/_____\___|_| |_|_| |_|\___/_/\_\\__|
Successfully executed

nuffin happs , check it out..
but other than that no errors

zennext

2007-11-20 16:06:21

Sorry about the double post. The computer I was on at school was lagging a lot. I have no idea why that happens. It seems like it should work fine?

EDIT: FOUND IT!!!

Forgot to do

SetupSRL;

Hehehe… Try it now!

blackblue

2007-11-20 22:47:23

still not working for me getting:
Successfully executed

zennext

2007-11-21 13:40:14

You sure your script looks like this:

program PowerRock;
{.include SRL\SRL.scar}
{//_____________Zennext's PowerRock_______________//}
const loads = 2; {// How many loads you want script to do //}
const cord1 = 5; {// The first inventory slot to drop (Only change //}
{// if you have more items in you inventory that //}
{// you dont want to drop) Slots are like this: //}
{// 1 2 3 4 //}
{// 5 6 7 8 //}
{// 9 10 11 12 etc. //}
const cord2 = 28; {// The second inventory slot to drop //}
const color = 5209259; {// The color of the rock you want to mine //}
const twait = 7; {// Wait time in seconds for mining a rock //}
{// This should change depending on your Mining //}
const rundir = 'N';{// Direction to run if random event fight //}

var
x,y,i: integer;

procedure Randoms; {// Anti-randoms! //}
begin
FindTalk;
FindNormalRandoms;
if (FindFight = true) then
begin
RunAwayDirection(rundir);
Wait(10000 + random(2000));
RunBack;
end;
end;

procedure RockMine; {// This mines ores until the inventory is full //}
begin
repeat
if(FindColorTolerance(x, y, color, 0, 0, 700, 500, 4))then
begin
Mouse(x, y, 0, 0, true);
Wait(twait * 1000 - 200);
end
Randoms;
Wait(200);
until(InvFull)
end;

procedure Signature; {// Writes my signature :D //}
begin
ClearDebug;
writeln('Z'); wait(100)
writeln('Ze'); wait(100)
writeln('Zen'); wait(100)
writeln('Zenn'); wait(100)
writeln('Zenne'); wait(100)
writeln('Zennex'); wait(100)
writeln('Zennext'); wait(100)
writeln('Zennext'''); wait(100)
writeln('Zennext''s'); wait(100)
writeln('Zennext''s '); wait(100)
writeln('Zennext''s P'); wait(100)
writeln('Zennext''s Po'); wait(100)
writeln('Zennext''s Pow'); wait(100)
writeln('Zennext''s Powe'); wait(100)
writeln('Zennext''s Power'); wait(100)
writeln('Zennext''s PowerR'); wait(100)
writeln('Zennext''s PowerRo'); wait(100)
writeln('Zennext''s PowerRoc'); wait(100)
writeln('Zennext''s PowerRock'); wait(1000)
writeln(''); wait(100)
writeln(''); wait(100)
writeln(' ______ Script by Zennnext _ ');
writeln(' |___ / [url]www.srl-forums.com[/url] | | ');
writeln(' / / ___ _ __ _ __ _____ _| |_ ');
writeln(' / / / _ \ ''_ \| ''_ \ / _ \ \/ / __|');
writeln(' / /_| __/ | | | | | | __/> <| |_ ');
writeln(' /_____\___|_| |_|_| |_|\___/_/\_\\__|');
wait(3000 + random(750));
end;

begin {// Main scripts //}
SetupSRL;
Signature;
repeat
RockMine;
i:= i + 1
DropToPosition(cord1, cord2)
until(i >= loads)
end.

And you have at least SCAR 3.12c or newer and you have latest SRL?

zennext

2007-11-23 17:25:06

The failsafe was causing the problem. Please try it again?

pk 4 life90

2007-11-23 22:48:20

i just tried it and it stood around for a few seconds and than logged me off?

zennext

2007-11-23 23:25:31

Ahhh… Forget it. I give up on this thread. Too many problems. I'm gonna go refine my script and then give it another shot. Thanks everyone.

derrick slay

2007-12-07 10:19:18

I know why , when you start the script, you can choose betwen 4 questions .
Take the "Third" 3

adzi

2007-12-08 19:58:18

is this working well?

ZaSz

2007-12-08 20:34:28

I would add login to it, and from just glancing at it i don't see a problem.

iownedjfk

2007-12-16 14:43:45

Anyone know how to fix [Runtime Error] : Out Of Range in line 53

Heavenzeyez1

2007-12-16 15:06:43

All these leechers..

skilld u

2007-12-17 18:25:45

add ActivateClient; after setupsrl in the main loop. it makes it go to the runescape client.

Briscoalt

2007-12-18 20:22:51

i keep getting errors like

line 247 scan mini map

what do i do? i've been doing what the instructions say scan client window press play..but doesn't work :/

Naike

2007-12-19 14:49:28

Add Proggie and Add something that make's this special