Simba Code:
Function Harvest(var x, y: Integer): Boolean; //
Var
CTS, I: Integer;
TPA: TPointArray;
ATPA: Array of TPointArray;
Begin
If(Not(LoggedIn))Then Exit;
CTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
SetColorSpeed2Modifiers(0.48, 1.97);
FindColorsSpiralTolerance(MSCX, MSCY, TPA, 2676409, MSX1, MSY1, MSX2, MSY2, 15);
ATPA := TPAToATPAEx(TPA, 15, 15);
For I := 0 To High(ATPA) Do
Begin
MiddleTPAEx(ATPA[i], x, y);
MMouse(x, y, 2, 2);
If(IsUpTextMultiCustom(['arve','swee'])) Then
Begin
Writeln('Found harvest');
GetMousePos(x, y);
Result := True;
Break;
End;
End;
End;
That searches and find the sweetcorn every time, but I am also wanting to search for anything planted in the herb patch, but I don't want to make a new function...I think I will have to though....agree?