Simba Code:
procedure foo();
var
t,x,y: integer;
aFound:extended;
begin
marktime(t);
repeat
if FindDTMRotated(FromBank1, x, y, MMX1, MMY1, MMX2, MMY2, -Pi/2, Pi/2, Pi/30, aFound) or
FindDTMRotated(FromBankB1, x, y, MMX1, MMY1, MMX2, MMY2, -Pi/2, Pi/2, Pi/30, aFound) then
begin
Mouse(X, Y, 0, 0, true);
break;
end;
until (timefrommark(t) > 10000);
repeat
if FindDTMRotated(FromBank2, x, y, MMX1, MMY1, MMX2, MMY2, -Pi/2, Pi/2, Pi/30, aFound) or
FindDTMRotated(FromBankB2, x, y, MMX1, MMY1, MMX2, MMY2, -Pi/2, Pi/2, Pi/30, aFound) then
begin
Mouse(X, Y, 0, 0, true);
break;
end;
until (timefrommark(t) > 10000);
end;