SRL Archive - OSR Beginner Scripting Tutorials

What is SRL's Random Tool?
[INDENT]It's a pretty neat tool. It notifies (optionally plays a sound) the user when SRL has detected a random event, and gives them the option to have SRL solve the random, or solve it manually.

SRL's Random Tool source code can be found here, or in SRL/SRL/core/antirandoms/randomtool.simba.
[/INDENT]


How to add SRL's Random Tool to a script:[INDENT]Very, very simple. Just call SetupRandomTool(timeOutWait, FKeyFinish: integer; soundPath: string); sometime after SetupSRL() and DeclarePlayers().

• timeOutWait: How long to wait (in milliseconds) before closing the Random Tool form and having SRL solve the random.
• FKeyFinish: The F key that is pressed when the user has finished manually solving the random.
• soundPath: The path to the sound file to be played when a random event is detected.

For example,

setupRandomTool(10000, 5, 'C:/Simba/randomSound.wav');

[/INDENT]


Additional options:[INDENT]Since not all users will want to take advantage of this feature, I recommend giving them the option. Using a simple constant or variable boolean statement will work nicely.

Example (just copy/paste into Simba if you want to test):

program test_RandomTool;
{$i srl\srl.simba}

procedure declarePlayers;
begin
  howManyPlayers := 1;
  numberOfPlayers(howManyPlayers);
  currentPlayer := 0;

  with players[0] do
  begin
    name := 'Coh3n';
    pass := 'myPassword1234';
    active := true;
  end;
end;

begin
  clearDebug();
  activateClient();

  setupSRL();
  declarePlayers();
  setupRandomTool(25000, 5, '');

  RT_Execute();
end.     

[/INDENT]


Conclusion:
[INDENT]If you have any questions, suggestions, or comments, please post here.

Cheers,
Coh3n
[/INDENT]

Ah good idea! Should prove to be a very useful tut. :)

This is very handy, thanks!

Ahah, what a 'Cute' tool =P love it!

love it! what randoms will it be able to solve?

It's not the tool that solves the randoms, it's SRL. The status of each solver can be found here.

i added to script, and it compiled and worked good, but i didnt see any popup like on the picture that ask me how i want to solve random. this is where it is:

begin
  Smart_Members := False;
  Smart_Server := 0;
  Smart_Signed := True;
  Smart_SuperDetail := False;
  SetupSRL;
  DeclarePlayers;
  LoginPlayer;
  setupRandomTool(25000, 5, '');   

:O Really useful, added it in the script im running atm and it works perfectly! I love it. Thank you very much Coh3n for this ^^

From: zamserv
i added to script, and it compiled and worked good, but i didnt see any popup like on the picture that ask me how i want to solve random. this is where it is:

begin
  Smart_Members := False;
  Smart_Server := 0;
  Smart_Signed := True;
  Smart_SuperDetail := False;
  SetupSRL;
  DeclarePlayers;
  LoginPlayer;
  setupRandomTool(25000, 5, '');   

You still have to call FindNormalRandoms, otherwise it doesn't know when to pop up.

i find it dificult ^^

Woah, awesome! I'll surely implement this in my future scripts. Thanks.

From: brit ftw
i find it dificult ^^

To do what exactly? FindNormalRandoms?

You simply write it in at the start of a function….

Great idea! I'll try and add this to my upcoming script :)

This is really nice..Using it right now in a script I just wrote, works beautifully and pops up to tell me, which is quite nice when running multiple scripts.. :D

Any plans to further the notification system? I'd really love to see this be able to send an email to a specified address.

From: fJX
This is really nice..Using it right now in a script I just wrote, works beautifully and pops up to tell me, which is quite nice when running multiple scripts.. :D

Any plans to further the notification system? I'd really love to see this be able to send an email to a specified address.

If Simba ever gets a SendEmail method, I'd be happy to add it to this tool, but until then, don't count on it. :p

Pretty nice, this what I was looking for! :)

From: fJX

Any plans to further the notification system? I'd really love to see this be able to send an email to a specified address.

Why on earth would you want that? :confused:

OT: Looks very nice, will definitely be using :)

From: abu_jwka
Why on earth would you want that? :confused:

OT: Looks very nice, will definitely be using :)

What do you mean? So you would know if you got a random if you weren't babysitting your script. That's why.

Does it use the random sound from Simba\Includes\MSI\MSI\RandomSound.wav ?

or should I copy that (& potentially rename) and place it into an appropriate file?

Edit: nevermind, just saw OP:

setupRandomTool(10000, 5, 'C:/Simba/randomSound.wav');

Edit 2: Do I need to worry about RT_Execute(); as shown in your OP mainloop?

Thanks for posting :)

Ok so basically this found a random and I decided to solve it myself.

Went back to the script to see what 'f' key I had entered to resume scripting - I put 5.

However, after pressing f5 multiple times, my script would not resume.

From: abu_jwka
Ok so basically this found a random and I decided to solve it myself.

Went back to the script to see what 'f' key I had entered to resume scripting - I put 5.

However, after pressing f5 multiple times, my script would not resume.

The exact same thing happened to me just now. Had to restart script.

From: litoris
The exact same thing happened to me just now. Had to restart script.

Happened again today. Any way to actually make the script resume?

yea got the same problem script didnt start and solve random with the exp book was spamming the cmd …


is there a simple to code that just plays a sound on random without the tool ?

From: lays
yea got the same problem script didnt start and solve random with the exp book was spamming the cmd …


is there a simple to code that just plays a sound on random without the tool ?

You can do that yourself:

if FindNormalRandoms then
  PlaySound('file path for sound');

From: lays
yea got the same problem script didnt start and solve random with the exp book was spamming the cmd …


is there a simple to code that just plays a sound on random without the tool ?

As abu said, you can do that already.

But it would really be nice if the script resumed when we hit the correct F key!

new Idea: would it be possible to expand this RandomTool to also send an email using the computers' SMTP/Telnet?

Does this work with OSR?