The Prince of Randomness?
2006-06-20 23:08:55
DummyFighter
Here is my amazing dummyfighter, Srl Free Scripts version, with less antiban then the members version, it should work flawless
Here is my amazing dummyfighter, Srl Free Scripts version, with less antiban then the members version, it should work flawless
Use it for getting your chracters up a couple of levels, instead of autoing straight away.
program dummykiller;
{.include srl/srl.scar}
const DummyColour = 7442087;
procedure DeclarePlayers;
begin
HowManyPlayers :=3;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer:=0;
Players[0].Name :='';
Players[0].Pass :='';
Players[0].Nick :='';
Players[0].Active:=True;
Players[1].Name :='';
Players[1].Pass :='';
Players[1].Nick :='';
Players[1].Active:=True;
Players[2].Name :='';
Players[2].Pass :='';
Players[2].Nick :='';
Players[2].Active:=True;
end;
procedure FindDummy;
var x,y:integer;
begin
if FindObj(x,y,'tta',DummyColour,10) then
Mouse(x,y,10,5,true);
Wait(1500+Random(500));
end;
begin
SetUpSrl;
DeclarePlayers;
repeat
FindDummy;
FindNormalRandoms;
if not loggedin then RandomNextPlayer(false);
if GetSkillLevel('attack')=8 then LogOut;
until(false);
end.