Simba Code:
program SaveTheGoldfish;
procedure StartGame;
begin
MoveMouse(238, 356);
ClickMouse(238, 356, 1);
Wait(200);
MoveMouse(381, 326);
ClickMouse(381, 326, 1);
Wait(200);
MoveMouse(345, 155);
ClickMouse(345, 155, 1);
end;
procedure SaveGoldfish;
var
x, y:Integer;
begin
if FindColorSpiralTolerance(x, y, 1471228 , 22, 29, 261, 231, 20) or
FindColorSpiralTolerance(x, y, 869620 , 22, 29, 261, 231, 20) or
FindColorSpiralTolerance(x, y, 1204732 , 22, 29, 261, 231, 20) or
FindColorSpiralTolerance(x, y, 549886 , 22, 29, 261, 231, 20) then
Begin
MoveMouse(x, y);
HoldMouse(x, y, 1);
MoveMouse(371, 50);
ReleaseMouse(371, 50, 1);
end;
end;
begin
StartGame;
repeat
SaveGoldfish;
until(false);
end.