Code:
{Have tele tab in second slot}
{Created by OwnedLikeNoob}
program EpRaiser;
{.Include SRL/SRL.scar}
{.include srl/srl/Skill/Fighting.scar}
Procedure Logoutz;
Begin
Mouse(754, 10,5,5,true);
Mouse(608, 419,5,5,true);
End;
Procedure Tele;
Begin
Mouse(661, 191,2,2,true);
Wait(100+Random(100));
Mouse(620, 231,2,2,true);
Wait(3000+Random(1000));
Logoutz;
Wait(2000+random(200));
TerminateScript;
End;
Procedure Fighting;
Begin
if (InFight) then
begin
Tele;
end;
End;
Procedure RandomSkill;
Begin
case (Random(25)) of
1: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(578, 220,5,5,true); //Attack
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
2: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(647, 227,5,5,true); //Hp
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
3: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(705, 225,5,5,true); //Mining
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
4: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(582, 255,5,5,true); //Strength
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
5: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(640, 254,5,5,true); //Agility
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
6: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(710, 254,5,5,true); //Smithing
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
7: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(584, 285,5,5,true); //Defense
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
8: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(638, 287,5,5,true); //Herblore
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
9: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(706, 279,5,5,true); //Fishing
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
10: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(585, 309,5,5,true); //Range
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
11: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(654, 311,5,5,true); //Thieving
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
12: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(710, 307,5,5,true); //Cooking
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
13: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(597, 335,5,5,true); //Prayer
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
14: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(636, 335,5,5,true); //Crafting
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
15: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(707, 334,5,5,true); //FireMaking
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
16: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(582, 370,5,5,true); //Magic
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
17: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(655, 370,5,5,true); //Fletching
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
18: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(698, 367,5,5,true); //Woodcutting
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
19: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(589, 393,5,5,true); //RuneCfating
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
20: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(647, 398,5,5,true); //Slayer
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
21: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(695, 392,5,5,true); //Farming
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
22: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(580, 421,5,5,true); //Construction
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
23: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(644, 418,5,5,true); //Hunting
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
24: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(706, 425,5,5,true); //Summoning
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
25: Begin
Mouse(568, 189,5,5,true);
wait(100+random(200));
Mouse(592, 449,5,5,true); //Dungoneering
wait(4000+random(2000));
Mouse(501, 22,5,5,true);
End;
End;
End;
Procedure AntiBann;
begin
case (Random(1000)) of
1: Begin
Mouse(251, 494,4,5,true);
Wait(500+random(200)); //Looks at Clan chat.
Mouse(33, 490,5,4,true);
End;
2: RandomRClick;
3: Begin
Mouse(538, 64,5,5,true); //Click XP button
End;
4: RandomSkill;
5: MMouse(0,0, 5, 5);
6: Begin
KeyDown(39);
KeyDown(40);
Wait(100+Random(200)); //Turns screen
KeyUp(39);
KeyUp(40);
End;
7: SleepAndMoveMouse(200 + Random(50));
8: ExamineInv;
9: HoverSkill('random', False);
10: PickUpMouse;
11: RandomMovement;
12: BoredHuman;
13: Begin
Mouse(572,485,5,5,true); //Clicks friends list
Wait(1000+random(1000));
End;
14: MakeCompass('S');
15: Begin
KeyDown(40);
Wait(200+random(100));
KeyUp(40);
end;
end;
End;
begin
SetupSRL;
Mouse(574, 16,1,1,true);
Repeat
Fighting;
AntiBann;
Until(False);
end.
I will probably be editing and releasing a second version of this. Tell me what I should keep and change, Thanks.