SRL Archive - First Scripts

Submersal's PowerWhacker (1st Script)


Submersal

2007-10-18 04:12:22

Sub's PowerWhacker

Advantage's
Doesn't just cut one (1) tree - looks for trees with the same colour in them.
Has basic anti-randoms
Easy to mod for cutting other trees
Has beginner anti-ban
Failsafe's included

Disadvantage's
No advanced anti-randoms (eg. ent-detection)
My first script - I wouldn't go using it with awesome accounts (as no one does)
:P

Instructions
Have axe wielded (may encounter problems) or in second spot in inventory
Have first inventory slot FREE
Other instructions in script.

Other
If anyone wants to help me add a progress report to it, feel free to PM me or something.
Thanks for the other guys that helped, (A big thanks to JAD for his tutorial, Mat for his tutorial and GoF for helping with my script)

—Submersal =]

yanix

2007-10-18 06:01:16

Nice im gona try this when im home from this hellhole (school)… but i dont get the Have first inventory slot FREE thing…

GoF

2007-10-18 06:09:58

From: yanix
Nice im gona try this when im home from this hellhole (school)… but i dont get the Have first inventory slot FREE thing…


I think he means it has to be empty ;)

Seems alright. Have you got msn btw? Incase you need help with the progress report or ent detection etc.

Hey321

2007-10-18 08:01:45

Great for a first dude, keep it up, soon you might get better then me xD.

Submersal

2007-10-18 17:48:05

Thanks for the comment Hey321 and good luck with it whoever uses it.

Another problem I found, you have to have runescape in its own window, you can't have it tabbed.

By FREE, I mean empty.

GoF, I'll pm you my email now.

Zeta

2007-10-20 12:32:38

hmm looks pretty good for your first script, to make it more user friendly you can add a constant for the run direction, like..

const
TreeColor = 2044466; //colour pick the tree that you want to powerwhack(HAS to be willow)
RunDir = 'N'; // The dir to run

and then do

RunAwayDirection(RunDir); //what direction do you want your character to run? (N,E,S,W)

or something like that, and instead of using counters until inv full you can just do

    until(InvFull);

Submersal

2007-10-20 19:42:57

I might try that Zeta, but I have one question about scripts…

For anti-randoms, do I have to plpace EscapeRandoms; where all of the other things are? (like SetupSRL;, Cut;, etc.)

Thanks for the comment by the way =]

omg...

2007-10-20 19:44:33

gonna try it once i got time :S


From: yanix
Nice im gona try this when im home from this hellhole (school)


u and me both xD

Submersal

2007-10-20 19:49:12

From: omg...
gonna try it once i got time :S


From: yanix
Nice im gona try this when im home from this hellhole (school)


u and me both xD


That's what the other guy said but he didn't end up replying or anything.

XD

gerauchert

2007-10-20 20:00:33

From: Submersal
I might try that Zeta, but I have one question about scripts…

For anti-randoms, do I have to plpace EscapeRandoms; where all of the other things are? (like SetupSRL;, Cut;, etc.)

Thanks for the comment by the way =]


Yes, as of right now your randoms wont do anything…

you need to have it check for randoms in the procedures that you are using in the script…

so have it check for randoms for example when you are waiting for the tree to be gone. Like this:


procedure Cut;
var WaitTime: Integer;
begin
repeat
if(FindObj(x,y,'ree',TreeColor,15))then
begin
Mouse(x,y,5,5,True);
Writeln('Walking to Tree');
Flag;
Writeln('Cutting Tree');
MarkTime(WaitTime);
while (TimeFromMark(WaitTime) < 5000) do
begin
EscapeRandoms;
end;
end;
until(InvFull)
end;

You should also think about adding multiplayer to your next version

Other than that it looks pretty damn good for your first script. You got alot of potential so keep up the good work man ;)

Submersal

2007-10-20 20:58:45

Thanks very much for that - I was wondering why my randoms weren't working.

Then I thought - Computers only do things as you tell them to - but I wasn't sure where to put it in.

Thanks for the comment aswell.