Whys is this making my mouse move super slow?
SCAR Code:
program JadKilla;
{.include SRL\SRL.Scar}
var
x,y: Integer;
procedure CheckBox;
begin
if(FindColor(x,y,16711680,104, 406, 104, 406)) then
begin
wait(100+random(400))
Gametab(6)
Mouse(640, 340, 10, 10, true);
Writeln('Range Protect Mofo!');
wait(1100+random(400));
end;
end;
procedure CheckBox1;
begin
if not(FindColor(x,y,16711680,104, 406, 104, 406)) then
begin
wait(100+random(400))
Gametab(6)
Mouse(680, 340, 10, 10, true);
wait(1100+random(400));
writeln('Mage Protect Mofo!');
end;
end;
begin
repeat
CheckBox;
CheckBox1;
until(false)
end.
Thanks in advance