Hapayboy
11-12-2012, 04:27 AM
So this is my first POSTED script and I would like to get some feedback on it, I have plenty of other scripts, tell me if you like this one pm me in game. Possibly while I'm not botting (hehe) to change it for your specific needs, or another kind of bot for another part of the game.
This if the very first version, and I would like to see how you guys like it.
I would recommend using it on a extreme account and use melee BUT nothing is mandatory with this script - the fact if ur lvl 50 or lower you'll be finding yourself out of a lot of experience because it'll take awhile to go all the way through the restart process.
How you would change the script to fit YOUR monster killing needs would be to remove the "//" from the set of commands then you would add it so say you wanted to fight skeletons, since they're level 23, then you would change
(Only one part of the script)
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);
To
//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);
Notice how I added "//"s to the Oomlie bird group and took them away from the skeleton group? this will need to be done and then you would go to the area where skeletons are.
If it is anything else besides Oomlie birds then you would need to remove the moving part of it as well.... nvm I'll put up a second file with it already set up with //'s (don't want to be too hard on yah :) )
but you would still need to change the animal to click on like it was in the beginning.
give me some feedback
If you can't download, just copy and paste from here.
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.
This if the very first version, and I would like to see how you guys like it.
I would recommend using it on a extreme account and use melee BUT nothing is mandatory with this script - the fact if ur lvl 50 or lower you'll be finding yourself out of a lot of experience because it'll take awhile to go all the way through the restart process.
How you would change the script to fit YOUR monster killing needs would be to remove the "//" from the set of commands then you would add it so say you wanted to fight skeletons, since they're level 23, then you would change
(Only one part of the script)
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);
To
//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);
Notice how I added "//"s to the Oomlie bird group and took them away from the skeleton group? this will need to be done and then you would go to the area where skeletons are.
If it is anything else besides Oomlie birds then you would need to remove the moving part of it as well.... nvm I'll put up a second file with it already set up with //'s (don't want to be too hard on yah :) )
but you would still need to change the animal to click on like it was in the beginning.
give me some feedback
If you can't download, just copy and paste from here.
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.