yes sure - see below. This script is here in its entirety and was for testing a piece to go into a larger script and the MMouse movement is doing the crazy super slow crawl thing in this stand alone script.
OK....just saw what might be the problem and looks like you were right the first with the first suggestion....had the SetupSRL in the wrong position....beginners error....my apologies! (not sure if I have the code tags right in this message either...?)
Code:
program CheckBank;
{.include SRL\SRL.Scar}
var
x,y:integer;
const
Color=1654839;
Procedure CheckBankOpen;
begin
MMouse(400,200,40,100);
FindColorTolerance(x, y, Color, 675, 90, 715, 130, 12)
if(x>670) then
begin
Writeln('Bank Open');
exit;
end else
begin
Writeln('Bank Not Open');
TerminateScript;
end;
end;
begin
SetupSRL; // Needs to go here on main loop!!!!!
CheckBankOpen;
Writeln('should only be here if bank was open');
end.