Here ya go:
Simba Code:
program Autoer;
{$i srl/srl.scar}
Var
X,Y,T: integer;
function find_loghead:boolean;
begin
repeat
if findcolor(X,Y,3303273,0,0,800,620) then
Result := True;
until(Result);
end;
procedure Click_loghead;
begin
if find_loghead then
begin
MMouse(X,Y,0,0);
ClickMouse2(True);
end;
end;
begin
activateclient;
MarkTime(T);
repeat
if (TimeFromMark(T) >= 10000) then //10 seconds
TerminateScript; //Stops the script after 10 seconds, just incase something goes wrong
click_loghead;
until(false);
end.