Simba Code:
program LowlvlSlayerDungeon;
{$i srl/srl.simba}
////////////////////////////////////////////////////////////////////////////////////
//Do not touch under here. Soon to come is food/ //
//switching to an item with a spec, or using a spec with a weapon already equipe //
// Loot monster specific //
// more antiban support (not really needed becuase of rsps, but whatever ) // //
//////////////////////////////////////////////////////////////////////////////////// //
// guide on how to use it is right here //
// | //
// v //
////////////////////////////////////////////////////////////////////////////////////
//To start, you remove the "//"'s from the creature you would like to kill, these will be found in the fight section, and I will have a comment on to help you find them.
//after that you would need to put a "//" infront of the creature you would like to stop killing, this is by defualt Ommlie_bird.
//if it is anything besides Oomlie_bird then you would need to cancel out the walking procedure, becuase it will not move the the animal (THIS WILL BE ADDED LATER!!!)
//bring super attacks and super strengths with you (not needed but they help increase exp per hour)
//give me feedback! and in the game names are as follow. hapayboy haapayboy hapaaboy Purepvpdude (my main)
// Will do custom scripts for you! just pm me donatations accepted *serious face*
var a,b,w,x,y,z,kills,repeats:integer;
const
Oomlie_bird = 3423836;
Cave_bug = 10800850;
Cave_crawler = 13094606;
Cave_slime = 7375999;
Werewolf = 7441549;
Guard_dog = 1912132;
Dwarf = 8431572;
Ghost = 11248805;
Monkey_zombie = 5929298;
Moss_giant = 3431004;
Zombie = 4543575;
Wolf = 12042689;
Scorpion = 3290177;
Skeleton = 8490124;
Giant_Spider = 3234922;
Attack_potion = 12137263;
Strength_potion = 12040381;
Login = 6015708;
procedure DrinkPots;
begin
MoveMouse(641,182);
Wait(300);
ClickMouse(641,182,1);
Wait(300)
if FindColor(X,Y,Attack_potion,544,202,736,466) then // Strenght pot
begin
Wait(200);
MoveMouse(X,Y);
Wait(500);
ClickMouse(X,Y,1);
Wait(200);
end;
if FindColor(X,Y,Strength_potion,544,202,736,466) then // Attack pot
begin
Wait(300);
MoveMouse(X,Y);
Wait(500);
ClickMouse(X,Y,1);
Wait(300)
end;
end;
procedure fight;
begin
if findcolor (y,z,Oomlie_bird,0,0,519,338) then
movemouse (y,z);
wait (25);
if findcolor (y,z,Oomlie_bird,0,0,519,338) then
clickmouse (y,z,1);
//if findcolor (y,z,Cave_bug,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Cave_bug,0,0,519,338) then
//clickmouse (y,z,1);
// if findcolor (y,z,Cave_crawler,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Cave_crawler,0,0,519,338) then
//clickmouse (y,z,1);
//if findcolor (y,z,Cave_slime,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Cave_slime,0,0,519,338) then
//clickmouse (y,z,1);
//if findcolor (y,z,Guard_dog,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Guard_dog,0,0,519,338) then
//clickmouse (y,z,1);
//if findcolor (y,z,Dwarf,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Dwarf,0,0,519,338) then
//clickmouse (y,z,1);
//if findcolor (y,z,Ghost,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Ghost,0,0,519,338) then
//clickmouse (y,z,1);
//if findcolor (y,z,Zombie,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Zombie,0,0,519,338) then
//clickmouse (y,z,1);
// if findcolor (y,z,Wolf,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Wolf,0,0,519,338) then
//clickmouse (y,z,1);
// if findcolor (y,z,Scorpion,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Scorpion,0,0,519,338) then
//clickmouse (y,z,1);
// if findcolor (y,z,Skeleton,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Skeleton,0,0,519,338) then
//clickmouse (y,z,1);
// if findcolor (y,z,Giant_Spider,0,0,519,338) then
//movemouse (y,z);
//wait (25);
//if findcolor (y,z,Giant_Spider,0,0,519,338) then
//clickmouse (y,z,1);
end;
procedure ifinfight;
begin
kills := 0;
repeat
Writeln('tick = ' + IntToStr(Kills));
kills := kills + 1;
if findcolor (w,x,45868,205, 123,322, 188)then
wait (5);
wait (2000)
if not findcolor (w,x,45868,205, 123,322, 188)then
fight;
until ( kills > 100)
end;
procedure restart;
begin
movemouse (644,483)
wait (100)
clickmouse (644,483,1)
wait (500)
movemouse (638,376)
wait (100)
clickmouse (638,376,1)
wait (5000)
if findcolor (a,b,Login,235,171,514,402) then
movemouse (a,b);
wait (100)
clickmouse (a,b,1)
wait (20000)
keydown (40)
wait (1000)
keyup (40)
wait (100)
keydown (34)
wait (6000)
keyup (34)
wait (100)
keydown (38)
wait (6000)
keyup (38)
wait (3000)
movemouse (743,185)
wait (100)
clickmouse (743,185,1)
wait (2000)
movemouse (644,286)
wait (100)
clickmouse (644,286,1)
wait (5000)
movemouse (264,448)
wait (100)
clickmouse (264,448,1)
wait (3000)
movemouse (263,383)
wait (100)
clickmouse (263,383,1)
wait (6000)
movemouse (263,391)
wait (100)
clickmouse (263,391,1)
wait (3000)
movemouse (566,71)
wait (3000)
clickmouse (566,71,1)
wait (5000)
end;
begin
repeats :=0;
restart;
repeat
repeat
Writeln('repeats = ' + IntToStr(repeats));
repeats := repeats + 1;
ifinfight;
drinkpots;
until (repeats > 10)
restart;
until (iskeydown (114))
end.