Romio
04-03-2017, 04:06 PM
So, my mouse doesnt move to x and y and idk whats wrong
my code:
program moneybot;
var
x, y, color, tolerance, x1, y1, x2, y2: integer;
procedure steal();
begin
color := 10526892;
tolerance := 15;
x1 := 662;
y1 := 433;
x2 := 683;
y2 := 442;
if (findcolortolerance(x, y, color, x1, y1, x2, y2, tolerance)) then
begin
movemouse (x, y);
clickmouse (x, y, mouse_left);
end
end
procedure emptybag();
begin
end
procedure logout();
begin
end
my code:
program moneybot;
var
x, y, color, tolerance, x1, y1, x2, y2: integer;
procedure steal();
begin
color := 10526892;
tolerance := 15;
x1 := 662;
y1 := 433;
x2 := 683;
y2 := 442;
if (findcolortolerance(x, y, color, x1, y1, x2, y2, tolerance)) then
begin
movemouse (x, y);
clickmouse (x, y, mouse_left);
end
end
procedure emptybag();
begin
end
procedure logout();
begin
end