Simba Code:
procedure ClimbOverLowWall();
var
LowWall: Tbox;
x, y, i: integer;
TPA: TPointArray;
ATPA: T2DPointArray;
begin
findColorsSpiralTolerance(x, y, TPA, 12163981, mainScreen.getBounds(), 6, colorSetting(8, 0.10, 0.86));
if length(TPA) < 1 then
exit;
ATPA := TPA.toATPA(50, 70);
ATPA.sortFromMidPoint(mainscreen.playerPoint);
smartImage.debugATPA(ATPA);
for i := 0 to high(ATPA) do
begin
mouse(middleTPA(ATPA[i]), MOUSE_MOVE);
if isMouseOverText(['limb-over'], 500) then
begin
fastClick(MOUSE_LEFT);
WriteLn('Climbing over Low Wall');
wait(gaussRangeInt(4800,5200)); //So It does this, but then it continues to do the next step
end
else
begin
writeLn('Searching again'); //I only want it to do this step If the first step fails.
LowWall :=intTobox(245, 238, 257, 276);
mouseBox(LowWall, MOUSE_MOVE);
wait(200);
if isMouseOverText(['limb-over Obstacle']) then
begin
fastClick(MOUSE_LEFT);
WriteLn('Climbing over Low Wall');
wait(gaussRangeInt(4800,5200));
end
else
begin
writeLn('Could not find'); //Same for here, only want it to do this step if it fails the first and then second step
terminateScript();
end;
end;
end;
end;