Simba Code:
procedure DrinkPots;
var
X, Y: Integer;
begin
if FindColorTolerance(X, Y, 14342875, 566, 215, 726, 454, 4) then
begin
if FindColorTolerance(X, Y, 14342875, 563, 212, 602, 460, 4) then
begin
mmouse(x, y,1,1);
Wait(250 + Random(150));
ClickMouse(x, y, mouse_Left);
Wait((StrToInt(DrinkWait)+1) + Random(50));
end;
if FindColorTolerance(X, Y, 14342875, 607, 212, 644, 460, 4) then
begin
mmouse(x, y,1,1);
Wait(250 + Random(150));
ClickMouse(x, y, mouse_Left);
Wait((StrToInt(DrinkWait)+1) + Random(50));
end;
if FindColorTolerance(X, Y, 14342875, 652, 212, 685, 460, 4) then
begin
mmouse(x, y,1,1);
Wait(250 + Random(150));
ClickMouse(x, y, mouse_Left);
Wait((StrToInt(DrinkWait)+1) + Random(50));
end;
if FindColorTolerance(X, Y, 14342875, 691, 212, 730, 460, 4) then
begin
mmouse(x, y,1,1);
Wait(250 + Random(150));
ClickMouse(x, y, mouse_Left);
Wait((StrToInt(DrinkWait)+1) + Random(50));
end;
repeat
DrinkPots;
until
(FindColorTolerance(X, Y, 14342875, 566, 212, 726, 454, 4)=false)
FindTheBank;
end;
end;