From: okokokok
So you call the thread wildy botting, but you just want to AFK? It would probably be easier and more effective to just write a simple great demon killer in the forinthry dungeon.
Yup, and add this basic function I made for one of my script.
Function PlayerOnMinimap: Integer;
var TPA : TPointArray;
Begin
FindColorsTolerance(TPA, 16777215, MMX1, MMY1, MMX2, MMY2, 15);
RAaSTPAEx(TPA, 2, 3);
Result := Length(TPA);
End;
It looks if there is player on minimap. Now, you just need to use the result and do a action like I show on this procedure.
Procedure CheckPlayer;
begin
PlayerOnMinimap;
wait(500 + random(500));
if (PlayerOnMinimap > 1) then
begin
case random(20) of
0: X := 15;
1: X := 18;
2: X := 21;
3: X := 23;
4: X := 25;
5: X := 27;
6: X := 31;
7: X := 36;
8: X := 40;
9: X := 42;
10: X := 44;
11: X := 52;
12: X := 54;
13: X := 56;
14: X := 59;
15: X := 64;
16: X := 68;
17: X := 70;
18: X := 76;
19: X := 74;
end;
Changeworld(X);
PlayerOnMinimap;
end;
Procedure AttackDemon;
begin
...
...
...
While inCombat do
CheckIfPlayer;
end;