SRL Archive - RS Scripts

Does anyone know where i can get a RSC script for auto fighting, i've been looking but can seem to find the right thing, ima planning to use on a private server, is thier any other RSC bots?

From: s1cky
Does anyone know where i can get a RSC script for auto fighting, i've been looking but can seem to find the right thing, ima planning to use on a private server, is thier any other RSC bots?

look on ebay..?

Haha i made 1 for long time ago for stork :S

You must use StorkClient not web browser and u must use scar 2.03 or lower.

This is for RSCD as Rscd is dead then take it. You must edit it to work with Stork,take off some procedures. this was my qu1ckH4x.

program New;

procedure Mouse(mousex, mousey: Integer; left: Boolean);
var
a, b, c: Integer;
begin
MoveMouseSmooth(mousex, mousey);
Wait(60 + Random(30));
GetMousePos(b, c);
HoldMouse(b + 1, c, left);
repeat
Wait(20 + Random(30));
a := a + 1;
until (a > 4);
GetMousePos(b, c);
ReleaseMouse(b, c, left);;
end;


function InFight:Boolean;
var
x,y:integer;
InFite:boolean;
begin
if(FindColor(x,y,16777215,61, 42,128, 57)) then InFite:=True else InFite:=False;
Result:=InFite;
end;

procedure Fiter;
var
x,y:integer;
begin
x:= 270;
y:= 150;
x:= x + Random(30)-15;
y:= y + Random(30)-15;
if (FindColorSpiral(x,y,10924523,x-150,y-150,x+150,y+150))
or (FindColorSpiral(x,y,9740011,x-150,y-150,x+150,y+150))
or (FindColorSpiral(x,y,9673963,x-150,y-150,x+150,y+150)) then
begin
MoveMouseSmoothEx(x,y,1,1,10,10,10);
if(IsTextAt(6,26,'Dark'))then
begin
Mouse(x,y,true);
Wait(1000+random(500));
end;
end;
end;

Procedure Sleep;
var s,z:integer;
begin
Status('Sleeping!');
MoveMouseSmoothEx(425,37,1,1,10,10,10);
if (IsTextInArea(404,81,473,98,s,z,'Fatigue: 85'))
or (IsTextInArea(404,81,473,98,s,z,'Fatigue: 86'))
or (IsTextInArea(404,81,473,98,s,z,'Fatigue: 87'))
or (IsTextInArea(404,81,473,98,s,z,'Fatigue: 88'))
or (IsTextInArea(404,81,473,98,s,z,'Fatigue: 100'))
then
begin
MoveMouseSmoothEx(500,40,5,5,10,10,10);
MoveMouseSmoothEx(490,80,5,5,10,10,10);
FindColor(s,z,3036283,267,62,311,88);
MoveMouseSmoothEx(s,z,1,1,10,10,10);
Mouse(s,z,True);
Wait(3000+random(1000));
end else
begin
MoveMouseSmoothEx(300,185,1,1,10,10,10);
Fiter;
end;
end;

{Procedure Runes;
var x,y:integer;
begin
x:= 270;
y:= 150;
x:= x + Random(30)-15;
y:= y + Random(30)-15;
if (FindColorSpiral(x,y,8616047,x-150,y-150,x+150,y+150))
or (FindColorSpiral(x,y,11774111,x-150,y-150,x+150,y+150)) then
begin
Wait(400)
MoveMouseSmoothEx(x,y,5,5,10,10,10);
Wait(10+random(300));
if(IsTextAt(6,26,'Cosmic'))
or (IsTextAt(6,26,'Body'))
or (IsTextAt(6,26,'Water'))
or (IsTextAt(6,26,'Earth'))
or (IsTextAt(6,26,'Fire'))
or (IsTextAt(6,26,'Mind'))
or (IsTextAt(6,26,'Nature'))
or (IsTextAt(6,26,'Chaos'))
or (IsTextAt(6,26,'Law'))
or (IsTextAt(6,26,'Death'))
or (IsTextAt(6,26,'Blood'))
or (IsTextAt(6,26,'Air'))
or (IsTextAt(6,26,'Cosmic'))then
begin
Mouse(x,y,True);
Wait(2500+random(300));
end else
Sleep;
Fiter;
end;
end;}


begin
repeat
Sleep;
Fiter;
Wait(20+random(10));
if (InFight) then
repeat
Wait(20+random(10));
until(not InFight)
{Runes;
Wait(10);
Runes;
Wait(10);
Runes;
Wait(10);
Runes;}
Until(false)
end.

you should get one when you become a junior member shouldn't you? if you dont ask a guy named danman1212 he can help you.

By RSC do you mean RS cheata? I thought it also meant runescape community forurms…

i think is runescape classic, thats prollly why he (she) had to use an LOW version of scar