Simba Code:
Procedure LoadingPleaseWait;
begin
Loading := BitmapFromString(20, 9, 'meJxjYCAZ/P//n3RN5OuFa8FkYLI' +
'hAKshmLL4DcTFQCZxGU6kXkrsJVIvrmDB42a4LACY1Zho');
repeat
wait(1);
until (FindBitmapToleranceIn(Loading, x, y, ScreenX1, ScreenY1, ScreenX2, ScreenY2, 0)); //loading screen detected
writeln('loading screen detected.');
begin
repeat
wait(1);
until not (FindBitmapToleranceIn(Loading, x, y, ScreenX1, ScreenY1, ScreenX2, ScreenY2, 0)); //loaded
KeyUp(38);
wait(50 + random(50));
end;
FreeBitmap(Loading);
end;
here is the procedure, it is for a rsps btw hence the loading bitmaps and stuff. and yes i want it to stop after 4 seconds even if it hasnt completed all the lines