This script is simple. You all know that.
It took me less than an hour after going through the includes and reading some of the awesome guides you guys have on this forums. Hard to come by quality work like that.
Anyways, enjoy the simplicity =).
Run it on low settings like most other scripts found here. Nevermind, it won't let me post links. But you all know where it is.
Everything on low, mostly while standing right next to the Tea stall in Varrock. But you can be anywhere near it, so long as it's visibly on your screen, the bot will do the rest. It does not bank (it's easy to implement if someone really wants it). I've had it goin' since last night and it looks pretty solid. Hope you guys enjoy :).
Code:program TTTTT;
{$DEFINE SMART}
{$I SRL-6/SRL.simba}
procedure declarePlayers();
begin
setLength(players, 1);
with players[0] do
begin
loginName := 'yo'; // username
password := 'mama'; //password
isActive := true;
world := -1;// set 0 for random -1 for play button 138 for world 138
isMember := true;
end
currentPlayer := 0;
end;
(* Adjusts camera angles to peaks *)
procedure cameraAngle();
begin
mainScreen.setAngle(MS_ANGLE_HIGH);
minimap.setAngle(0);
end;
(*Antiban used in JC's Crimson script*)
procedure antiBan(randomNumber: Integer);
var
i: Integer;
begin
if not isLoggedIn() then
exit;
i := random(randomNumber);
if i < 55 then
begin
case i of
0..9: mouseMovingObject();
10..20: sleepAndMoveMouse(500);
21..30: sleepAndMoveMouse(gaussRangeInt(100, 900));
31..39: begin
mouseOffClient(random(4));
wait(gaussRangeInt(1000, 5000));
end;
40..41: begin
mouseOffClient(random(4));
wait(gaussRangeInt(5000, 8000));
end;
42..55: pickUpMouse();
end;
end;
end;
(* Picking up the Cup o' Tea *)
procedure findTea();
var
x, y, i: integer;
FinderTimer: TTimeMarker;
begin
writeln('Finding more things to steal');
if not isLoggedIn() then
exit;
finderTimer.start();
mainscreen.findObject(x, y, 13421241, 6, colorSetting(2, 7.49, 1.54), mainscreen.playerPoint, 7, 25, 50, ['teal', 'from'], MOUSE_LEFT);
writeln('Found tea-- waiting on antiban. . .');
antiBan(i);
wait(gaussRangeInt(7980,8600));
end;
begin
clearDebug();
smartEnableDrawing :=true;
setupSRL();
declarePlayers();
cameraAngle();
repeat
repeat
findTea();
until tabBackPack.isFull();
tabBackPack.dropitems(DROP_PATTERN_REGULAR);
if not isLoggedIn() then
begin
players[currentPlayer].login();
exitSquealOfFortune();
mainScreen.setAngle(MS_ANGLE_HIGH);
minimap.setAngle(MM_DIRECTION_NORTH);
end;
until players.getActive() < 1;
end.

