SRL Archive - RS3 Help

Find Object function


Syntax

2014-01-14 05:06:18

I use to use the Find Object function in ACA because it was simple and it worked here is what I used:
[SIMBA=
Var
TPAA: T2DPointArray;
TPA: TPointArray;
CTS, I: Integer;
Begin
CTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
FindColorsSpiralTolerance(MSCX, MSCY, TPA, 9222068, MSX1, MSY1, MSX2, MSY2, 11);
ColorToleranceSpeed(CTS);
TPAA := TPAToATPAEx(TPA, 525, 346);
SortATPASize(TPAA, True);
For I := 0 To High(TPAA) Do
If GetArraylength(TPAA) > 5 Then
Begin
repeat
MiddleTPAEx(TPAA, X, Y);
MMouse(X, Y, 3, 3);
if (isMouseOverText(['tack', 'an'])) then
Begin
Result := True;
GetMousePos(X, Y);
mouse(x,y,3,3,false);
wait(100 + random(200));
chooseOption('pock');
wait(5000 + random(1000));
Break;
End;
until (Result :=False);
Break;
end;
end;
]

As you can see, I have started to adapt it for SRL-6 with some minor adjustments then I realized it wasn't supported anymore the CTS.

Does anyone have some suggestions for what I should use instead? The target isn't still it's a moving NPC (Rogues Den banker)

vwxz

2014-01-14 05:32:27

You might be interested in looking at what @Ashaman88 does for his cooker here.

EDIT: I can't seem to get the mention tag to work. My mistake.

Syntax

2014-01-14 05:39:57

From: vwxz
You might be interested in looking at what @Ashaman88 does for his cooker here.


Not sure I understand his function, going to PM him about it now.
Thanks :)

Ashaman88

2014-01-14 09:48:10

From: Syntax
Not sure I understand his function, going to PM him about it now.
Thanks :)


I'll comment it up for you and send it back

Syntax

2014-01-14 21:37:30

From: Ashaman88
I'll comment it up for you and send it back


Thank you, I sent you a PM regarding it too :P