i made a box where script shoukd find colortolerance but it never does. have tried with multible colours in that box and it still cant find it.
my code
program moneybot;
var
x, y, color, tolerance, x1, y1, x2, y2: integer;
procedure steal();
begin
color := 14211293;
tolerance := 0;
x1 := 657;
y1 := 422;
x2 := 688;
y2 := 471;
if (findcolortolerance(x, y, color, x1, y1, x2, y2, tolerance)) then
begin
movemouse (x, y);
clickmouse(x, y, 0);
end
end
procedure emptybag();
begin
end
procedure logout();
begin
end
begin
steal();
end.