PDA

View Full Version : SoulSplit low level slayer autofighter



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.

Hapayboy
11-12-2012, 04:28 AM
wow, it looks alot longer here, lol if you still have problems with it post here, pm In game or pm on the forums.

forac
11-13-2012, 12:21 AM
Not bad, but Learn To Use Caps. And spacing...

lol it just makes the script easier to read when troubleshooting, editing or for other users to critique.

Rincewind
11-13-2012, 12:51 AM
This belongs here I believe
http://villavu.com/forum/forumdisplay.php?f=451

Footy
11-13-2012, 01:08 AM
Yes, the script should be in the other scripts section. I'll get a mod to move it. Also, could you post any code in [SIMBA] Tags? It makes it much easier to read and shortens the post. Also, read up on SRL Standards here. (http://villavu.com/forum/showthread.php?t=60288) Improving standards will make your code easier to read, and make more people willing to read through your code. I have no interest in reading code like the above. :p

Thanks,
Footy

Hapayboy
11-13-2012, 04:39 AM
Lol, okay I'll try to revise my standards quite a bit for later bots i will post

bmxgt187
02-08-2013, 10:38 PM
Lol, okay I'll try to revise my standards quite a bit for later bots i will post

doesnt work.. just sits there i didnt even change anything. i just copied everything and pasted it.. it just sits there and clicks a couple times like the inventory tab then the equipment tab then sits there moves camera angle once and does nothing else

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.