SRL Archive - OSR Help

So, I've been using iMacros for FF for tasks, but it is severely limited in the free version. Then I remembered my ole' pals back at villavu!

Can someone give me code examples for a script that loads a bitmap, compares it against a site, and then Lclick's it? I want it to actually move the mouse, none of that ghostmouse stuff. Is there a section of the wiki to send URL's to a browser?

The functionality I need:
Identify images
Left click them
Navigate to URL's

I know that Simba/Scar can do all of this, but I don't remember how to call the functions. It's been almost 5 years since I wrote a script in simba.

Help?:redface:

program Example;
{$i SRL\SRL.scar}


procedure ClickBitmap;
var
  YourBMP, x, y: Integer;
begin
  YourBMP := BitmapFromString(3, 5, 'asdf8s9f789cvhauis74e9');
  if not(FindBitmap(YourBMP, x, y) then
    Ex := True;
  FreeBitmap(YourBMP);
  if Ex then
    Exit;
  Mouse(x, y, 0, 0, True);
end;


begin
  ClickBitmap;
end.

Where is the bitmap to string converter located now-a-days?

In Simba, it's under "Tools > Bitmap conversion".

By the way, what's an "FF task"?

From: Flight
In Simba, it's under "Tools > Bitmap conversion".

By the way, what's an "FF task"?

FireFox Task.
:P

Also, The example posted doesn't work. You forgot to add 'Ex' as a variable, and it fails at:

[Error] (41:15): Type mismatch at line 40
Compiling failed.

Which is:

 Ex := True;

Current script:

program Example;
{$i SRL\SRL.scar}


procedure ClickBitmap;
var
  YourBMP, x, y, Ex: Integer;
begin
  YourBMP := BitmapFromString(155, 39, 'meJztm4GxpCAMQC3FUizFUizFU' +
        'izFUi4suxiSEEPw6+4cmczcfFchyQMS0FumYWE6gY5Bu3yhRDSTBO' +
        '7Njuj4tMVdbBKxajriu+dhWYd1G7a96xcpEAEuQOcUa6I5Tp3jDyg' +
        'wAlIlponmvDxvale7Ai+Jaaf5w5qYkukJy/Ljtv03Oi3LNF8X8FdK' +
        'TZP0LY52YBmP+nR8fk4D0BD/6ZoG1/2YpI7pCQSPcYCqYvFmGIdpL' +
        'SA24EWfPJWuQ0XHf5KLeLh5aQvLdvSrZx/sFFa4vtr6ikAD0/GaGZ' +
        'EmaQTK46Z4XRKxPMbxL13ngyEJD2wJaBJ3fD7J6O2LFj3VBkswE9C' +
        'IwB7/YoNrBPoJgvlBXXgcRKCv3oXrlwAdvExJy26ggwFQDjRoY0W6' +
        '7pkB1mGwULMhdHhg87kmAh2nrBE30LjQ4dbSdUdM7FAsNtQCDUxdZ' +
        'ov2Gx/BjuBZEGecWLZxoNkAKLhgBIqv42btHiXlqUSpQkUbSAt6ES' +
        'sCjSn1KaDuR7CU1kYHUPJTbVYi42FQ02jJBsLUAbSlTGoEauyU+I7' +
        '/VLKGDyjOCLUpSUyLtUC3PJsoIVKAusskD9D5eMSYp8isSaKXkU6g' +
        'q/agMRqWaa7YgGe6so06A/pKqfOfAyXVqYUp9v20FmoEmgVTbZ8oX' +
        'iqzUVEIqWIDbkoZVBagY+XJgwPotgvlnB66UoWvDz8fUONyxxWPBN' +
        'x7aRkxAlVwGIFWlUk+oOLBgnLQVAJ6yZKbzh5hUGGaeuOKkfHB09p' +
        'Pv+FaoEGhTFrrgO57hZKFF4eC36zswQFEqQsM1N6gpWW9OxiZe15c' +
        'gbO6U1prUzmGVUBfZdKpU1iq3N+zt6uHiExJ/PFTMXqXAxUR6L6QZ' +
        '7M8KBl5O9AwQ+3D0gE0Kt+7cfdJ/PlO7UKg01Q9N4kX6fEkowTlTq' +
        'Ahh9qcage6SymVMMpS3muYkVq3BWjKoQ6OlhEieqQDJUVRI9CpkMj' +
        '+DihnShhx33EKLrlsBNpithgHUfho0YAi77jxVUDjRsDnSGNMoOuS' +
        'F9z3Le9atPk2oMrbQJ8NOBRKNj8/KSoPhhuAkt30qe+Z15LltwHFC' +
        'RSsgj+TJuHLiGIDTihbuV8N6OjMID6gsaQnpirrjOg7vl+sOm4DSn' +
        'aUxviUbCBnm2oYtWMEny9YLI1saGaRHQqvfE59J6c6TwFV4k+qr1M' +
        'b9FrCArSqBOJ0aoGKbwwh4GRDaox/lnbnZ4DqFWm2Gi9FG0TRp6cE' +
        'VN7wuoEaN+OYgig8IZbiTwx4BGh2IsQ6UnCf73S2KqCmc4OTBte3p' +
        'WP8xzw8+GHCEXypEWP9QDy6B6iyqBIzSF8K0JCMzmhmQL0lEPVljj' +
        'TfQAfbqhs1fEc0HzjG+PliwSr8xSNtZz1+4rtX8breoAOo3lT2Deo' +
        'mX086zxWnjvi73Haa23vsHVN+qJmkXdsVVvjGpIn18+FBBnRwbWa7' +
        '+nS7rqlPJUCrrFLO6vrNOss0M6aj651F15uV/P/Q0hFiEliWw1vy7' +
        'XnLu2IFIqGYnA9Q6pkwxdrli8X6RrVj/XpRqP0DHKzwZw==');
  if not(FindBitmap(YourBMP, x, y) )then
    Ex := True;
  FreeBitmap(YourBMP);
  if Ex then
    Exit;
  Mouse(x, y, 0, 0, True);
end;


begin
  ClickBitmap;
end.

I can't remember what to do here… XD
Sorry guys, it's been a long time :/

var
  YourBMP, x, y, Ex: Integer;

to

var
  YourBMP, x, y: Integer;
  Ex: Boolean;

Change this:

var
  YourBMP, x, y, Ex: Integer;

To

var
  YourBMP, x, y: Integer;
  Ex: boolean;

Hehe nevermind, Train beat me to it.

From: Train

var
  YourBMP, x, y, Ex: Integer;

to

var
  YourBMP, x, y: Integer;
  Ex: Boolean;

I really hate to bug you guys, but do I put the

Clickmouse(

before or after the

if not

.

All that that script does is find it, it doesn't click.
I still need to know how to navigate URL's?

Use GetPage(page) to get the data from the page. And it is all logic. If the bitmap is not found, do you want it to click the mouse?