D
Denial
Guest
current version: beta
please post bugs, suggestions etc
please post bugs, suggestions etc
Code:
//automatical\\
//////harlz\\\\\\
////auto abuser\\\\
/////////1.0\\\\\\\\\
//___________________\\
//how to use: setup right below, that explains most of it :)\\
program autoabuser;
const
startupwait = 5000;//how long to wait before script starts so you can get ready
monstercolor1 = 0;//color of the monster you wish to kill.
monstercolor2 = 0;//secondary color (just get more or less the same color)
monstercolor3 = 0;//if you still need an explanation your going nowhere fast
combatinterval = 25000;//milliseconds between each kill
monsterstokill = 100;// how many monsters to kill
{.include SRL/SRL.scar}
procedure autoabuser;
var
i, x, y: integer;
begin
wait(startupwait+random(1000))
repeat
i:= i + 1
writeln('searching');
if (FindColor(x, y, monstercolor1, 0, 0, 517, 337))
or (FindColor(x, y, monstercolor2, 0, 0, 517, 337))
or (FindColor(x, y, monstercolor3, 0, 0, 517, 337))then
mmouse(x,y, 1, 1)
mouse(x,y,1,1,true)
writeln('abuse in progress... casualty number: ' + IntToStr(i))
wait(combatinterval+random(1000));
until i = monsterstokill;
end;
begin
setupsrl
autoabuser
end.


