It's my first time, I need help making one or getting the codes what i need.
program falcon;
{$DEFINE SMART8}
{$I SRL/SRL.Simba}
{$I P07Include.Simba}
Procedure falcon;
var
X, Y: Integer;
begin
if FindColorSpiralTolerance(x, y,5005168, 51, 55, 356, 217, 20) Then
begin
MoveMouse(x, y);
end;
end;
begin
falcon;
//repeat
//falcon;
//until(false);
end.


Reply With Quote