program fish;
var
x,y: Integer;
begin
If FindColor(x, y,16777215,435,220,435,220) Then
Begin
KeyDown(GetKeyCode('s'));
wait(10 + random(100));
KeyUp(GetKeyCode('s'));
end else
Begin
KeyDown(GetKeyCode('d'));
wait(10 + random(100));
KeyUp(GetKeyCode('d'));
end;
end.
i want it to repeat i haved tryde cant fix it


Reply With Quote










