Sax
2012-11-19 13:46:00
I need to find this NPC

How do I do it efficiently without mousing around all the screen?
How do I do it efficiently without mousing around all the screen?
2012-11-19 13:46:00
2012-11-19 13:49:12
2012-11-19 13:51:59
From: Shay
Use a TPA.
procedure FindJudge;
var
tmpCTS,x ,y, I, H, bx, by: Integer;
JudgeTPA: TPointArray;
JudgeATPA: T2DPointArray;
begin
tmpCTS := GetToleranceSpeed;
SetColorToleranceSpeed(2);
SetToleranceSpeed2Modifiers(0.12, 0.89);
FindColorsSpiralTolerance(MSCX, MSCY, JudgeTPA, 2178370, MSX1, MSY1, MSX2, MSY2, 13);
SetColorToleranceSpeed(tmpCTS);
SetToleranceSpeed2Modifiers(0.02, 0.02);
JudgeATPA := TPAtoATPAEx(JudgeTPA, 30, 60);
if Length(JudgeATPA) = 0 then
begin
TerminateScript;
end;
H := High(JudgeATPA);
for I := 0 to H do
begin
if High(JudgeATPA[I]) > 40 then
begin
MiddleTPAEx(JudgeATPA[I], bx, by);
MMouse(bx, by, 3, 3);
GetMousePos(x, y);
if IsUpText('mpetitio') then
begin
ClickMouse2(false);
WaitOption('ompete', 100);
Wait(RandomRange(300, 500));
PressKey(31);
Break;
end;
end;
end;
end;
2012-11-19 14:41:57
2012-11-19 15:14:11
From: cause
Use TPA, right click, if you don't have the correct option in the submenu, do a check to make sure you are in position? ObjDTM?
2012-11-19 15:21:54
2012-11-19 15:56:32
2012-11-19 16:27:03