program New;
{.include SRL/SRL.Scar}
var
X, Y, a :integer;
procedure clearvar;
begin
setupsrl
Wait (5000)
MakeCompass('N');
a:=0;
end;
procedure walkbank;
begin;
If FindSymbol(X, Y, 'bank') Then
begin
SetRun(True)
MMouse(x, y, 5, 5);
wait(100+random(50));
Mouse(x, y, 1, 1, true);
wait(3000+random(1000))
wait(2000+random(500))
end;
begin
clearvar;
walkbank
end.
i get error:
Failed when compiling
[Error] (16531:4): Identifier expected
anyone know why?


Reply With Quote




