SRL Archive - NOTA

Best Script Ever !


XabdullahX

2009-06-14 21:27:26

Yup, it did it well :)

Got me from 50 to 64 prayer (buries bones)
AND 93 to 99 str :D

The script is here:


program New;
{.Include SRL/SRL.Scar}
var x,y, spec: Integer;

Procedure DoSpec;
Begin
Mouse(542,183,3,3,True);
Wait(500);
Mouse(622,447,4,50,True);
Wait(1000);
Mouse(642,180,2,2,True);
spec := 0;
End;

Procedure LogMeInzPlz;
Begin
Repeat
Mouse(304,322,2,2,True);
Wait(300);
Until not(GetColor(580,55)=11592183);
End;

Procedure CheckLoggedOut;
Begin
If (GetColor(580,55)=11592183) then
LogMeInzPlz;
End;



Procedure TakeBonesAndBury;
Begin
If (FindObjCustom(x,y,['ake'],[13619157],10)) then
Mouse(x,y,1,1,True);
Wait(3500);
MMouse(584,227,1,1);
If (IsUpText('ury')) then
begin
GetMousePos(x,y);
Mouse(x,y,1,1,True);
end else
Wait(300);
End;

begin
SetupSRL;
Repeat
CheckLoggedOut;
If (Spec = 5) then
DoSpec;
FindObjCustom(x,y,['rat'],[7225921, 6382468],10);
Mouse(x,y,2,2,True);
CheckLoggedOut;
Wait(5000);
TakeBonesAndBury;
CheckLoggedOut;
Inc(Spec);
Until (false);
end.

Shuttleu

2009-06-14 21:29:48

tell us what it does
i cant be bothered to read it -_-'

~shut

NCDS

2009-06-14 21:32:28

You include SRL, so why not use it?

Procedure LogMeInzPlz;
Begin
Repeat
Mouse(304,322,2,2,True);
Wait(300);
Until not(GetColor(580,55)=11592183);
End;

Procedure CheckLoggedOut;
Begin
If (GetColor(580,55)=11592183) then
LogMeInzPlz;
End;
should just be:

if not LoggedIn then
LogInPlayer;
Although you would also need to add declare player's.

Don't be surprised if you get banned using this either…

@ Shuttleu, It's like 100 line's lol

Floor66

2009-06-14 22:40:47

It's.. A Rat killer + bone burier? xD

Shuttleu

2009-06-14 22:43:18

From: NCDS
You include SRL, so why not use it?

Procedure LogMeInzPlz;
Begin
Repeat
Mouse(304,322,2,2,True);
Wait(300);
Until not(GetColor(580,55)=11592183);
End;

Procedure CheckLoggedOut;
Begin
If (GetColor(580,55)=11592183) then
LogMeInzPlz;
End;
should just be:

if not LoggedIn then
LogInPlayer;
Although you would also need to add declare player's.

Don't be surprised if you get banned using this either…

@ Shuttleu, It's like 100 line's lol


he does use srl
he uses Mouse
and i dont care
i b lazy

~shut

NCDS

2009-06-14 23:06:13

From: Shuttleu
he does use srl
he uses Mouse
and i dont care
i b lazy

~shut


I meant more for the loggedin part

XabdullahX

2009-06-14 23:38:07

Ahhahahahhahahhahahaha ;)

(Not spam)

(Note: Dont you Wonder why its en general dump :rolleyes:)

Shuttleu

2009-06-14 23:40:08

well anyway
congrats on 99 str

~shut

marpis

2009-06-15 00:19:23

it will also get you banned in the long run

ShowerThoughts

2009-06-15 00:27:52

He is just making phun ;).

XabdullahX

2009-06-15 01:12:27

Okay i admit it :(
It was on a private server :(

isacneo1

2009-06-15 01:41:10

wow private server…..

XabdullahX

2009-06-15 01:44:06

hahahaahahahahahahahaha

It took longer to make the script than getting 99 :norris: