Best way to Inc(Kills)?

[laakerules]

How is the most accurate way to inc kills?

[masterBB]

Depends on your fighting method.

[laakerules]

This is what i have rite now!


Function FindGhoul(Var X,Y: Integer): Boolean;
var
CTS,I: Integer;
TPA: TPointArray;
begin
repeat
Result := False;
CTS := GetColorToleranceSpeed;

ColorToleranceSpeed(2);

SetColorSpeed2Modifiers(0.20, 1.60);

FindColorsSpiralTolerance(MSCX, MSCY, TPA,(11652298), MSX1, MSY1, MSX2, MSY2, 8);
ColorToleranceSpeed(CTS);

if (Length(TPA) < 1) then
Exit;

MMouse(TPA[0].X, TPA[0].Y, 5, 5);

if WaitUpText('ck Gho', 50) then
begin
GetMousePos(X, Y);
ClickMouse2(True);
Result := True;
If DidRedClick then
wait(500 + Random(1050));
If Infight Then
Begin
Inc(Kills);
End;
repeat
DoThePainting;
Writeln('Killing Ghoul, sorry for this spam!');
until Not(InFight)or (not OthersInFight) or (not LoggedIn);
Exit;
end;
Until(Result)
end;