SRL Archive - First Scripts

Yew Chopper


shaman

2008-07-29 04:01:32

This is a basic program. If anyone can include a reapeat/loop at the end, could they please post one. All feedback is good. Thanks


const
Yew=4091268;

var;
x,y: Integer;

procedure FindTree;
if(FindColour(x,y,Yew,0,0,500,500)) then
begin
MoveMouseSmoothEx(x,y +random(100),20,40,45,25,20);
Wait(200+random(200));
ClickMouse(x,y,true);
end;

procedure AntiRandoms;
begin
If(FindFight) then
RunAway('N',True,1,15000);
FindNormalRandoms;
FindLamp('Woodcutting');
end;

end.

INuKe

2008-08-05 04:12:22

Very Nice too bad for double post though keep it up

NiCbaZ

2008-08-05 04:56:57

try to use Scar Tags, also for now use Srls FindObjTPA its better than your finder….


for a loop do this its unsafe but if its want you want


program New;

const
Yew=4091268;

var;
x,y: Integer;

procedure FindTree;
begin
if(FindColour(x,y,Yew,0,0,500,500)) then
begin
MM(x,y +random(100),20,40,45,25,20);
Wait(200+random(200));
Mouse(x,y,true);
end;

procedure AntiRandoms;
begin
If(FindFight) then
RunAway('N',True,1,15000);
FindNormalRandoms;
FindLamp('Woodcutting');
end;



end.

wait il stop that theese are out dated functions sorrry,.

Ghostman

2008-08-13 09:59:56

Looks good so far

very simple but good

Moebius

2008-08-28 19:44:43

Where should one begin it?
Edgeville? or it works any place

bloodyhell321

2008-09-24 07:52:09

@Moebius You can be anywhere you want, just be near a yew tree :(h):

tylerc442

2008-10-04 18:57:09

Decent did 2k yews so far will put a proxy up

barbarianl3t

2008-10-05 22:59:12


Program YewChopper;
{i.nclude SRL/SRL.Scar}

const
Yew=4091268;

var
x,y,loadsdone: Integer;

const
loadstodo=10;//how many laods to do



procedure FindTree;
begin;
if(FindColor(x,y,Yew,0,0,500,500)) then
MMouse(x,y,3,3);
Wait(200+random(200));
Mouse(x,y,3,3,true);
end;

procedure AntiRandoms;
begin;
If(FindFight) then
RunAway('N',True,1,15000);
FindNormalRandoms;
FindLamp('Woodcutting');
end;

begin

repeat
FindTree;
AntiRandoms;
loadsdone:=loadsdone+1
until(loadsdone>loadstodo)

end.

That should fix most of the simple mistakes. I'm not sure about the include SRL part Bc i forget that. Don't use clickmouse and movemousesmooth because they are bannable. Good Luck Programming.

sirlaughsalot

2008-10-06 00:34:15

ugh the spam here is sickening, like it has been said before, dont use movemouse, use Mouse for clicking, and Mmouse for moving the mouse,if you have any questions add me, [email]lolzorzatmyself@hotmail.com[/email]

paddiekiller

2008-10-06 02:47:50

just find another woodchop thing dont worry about making one, maybe find an old code,and update it

joelster134

2008-10-06 08:46:48

From: tylerc442
Decent did 2k yews so far will put a proxy up



how exaclty did it? does it bank? does it drop? i am %110 you would of been banned at least 100 yews in if you used it. nice script btw, dont use movemousesmooth clickmouse etc though its detectable WILL ban :p good job for first script, Barb nice feedback :)

barbarianl3t

2008-10-06 17:35:15

Just in case you guys didn't notice the script origanally posted doesn't even run. 2k yews is impossible.
To get better you should read some more tutorials then download other scripts. Learn from the better scripts so you can make your own advanced scripts.

n00b? n00b?

2008-10-09 01:11:09

Hey does this script bank at the town your cutting yews in?
Or does it cut a full inventory and then you bank it yourself?

joelster134

2008-10-09 01:21:22

This Scripts does NOT work…it does not bank and it dosn't even say where to start…read the Procedures if there is any that will tell you what it features..

in2it

2008-10-12 05:50:33

good job but u need loop :f:

>>Vampire<<

2008-10-12 10:03:57

Nice work man!

jakeyboy29

2008-10-12 10:32:58

From: tylerc442
Decent did 2k yews so far will put a proxy up


lol your a god dam mong. it doesnt bank so u can only get 27. and there is no proggie u fu**ing mong.

in2it

2008-10-13 03:26:08

Nice but u need * a must* anti-ban and anti-random features :f:
PM me if you need help with those :f:
Glad to help :f: