SRL Archive - RS Scripts

Here is the new and improved auto-talker by diamondhero5!

Scar script:

//Directions
//Set what u would like it to say(line 16)
//Set how long you would like it to wait until it says again(line 17)
//hit play
program AutoTalk;

procedure OpenRSWindow;//to open the rs window(it must be the one to left)
begin
MoveMouse(106,650);
Wait(534);
ClickMouse(169,751,true);
end;

procedure Talk;
begin
SendKeys('hello'+chr(13));// what you would like it to say for you
wait(5000+random(147));//how long until said again 1000= 1 second
end;

procedure ThankYou;
begin
writeln('——-Auto-Talker——-')
writeln('—–by Diamondhero5—–')
writeln('- I know u will like it -')
writeln('@@##$$ Thank you $$##@@')
writeln(' ENJOY ')
end;

begin
OpenRSWindow
Thankyou
repeat
Talk;
until(false)
end.

looks pretty nice…to open the rs window you can just use ActivateClient; And sendkeys is pretty detectable, it would be alot better if you made it send one letter at a time - to find out how to do this, look at an autotalker like secet's on mopar.

ps: Please use [noparse]

[/noparse] when posting scripts, or attach them

whats

[code], and whats activate client?
Can u give me a link to the page on mopars or whatever u were talking about?
ty

put [noparse]

 and 

[/noparse] around scar scripts so it will look like this

 script goes here

and

ActivateClient;

will switch to the client,put it in a script and try it.

dude i made it type it one by one, test it out if u dont get what i mean it rox!!!

//Directions
//Set what u would like it to say(line 16)
//Set how long you would like it to wait until it says again(line 17)
//hit play
program AutoTalk;

procedure OpenRSWindow;//this is to open the rs window(it must be the one to left)
begin
MoveMouse(106,650);
Wait(534);
ClickMouse(169,751,true);
end;

procedure Talk;
begin
SendKeys('H');// what you would like it to say letter by letter use spaces
wait(284)
SendKeys('e')
wait(284)
SendKeys('l')
wait(284)
SendKeys('l')
wait(284)
SendKeys('o')
wait(284)
SendKeys(',')
wait(284)
SendKeys('h')
wait(284)
SendKeys('o')
wait(284)
SendKeys('w')
wait(284)
SendKeys(' ')
wait(284)
SendKeys('r')
wait(284)
SendKeys(' ')
wait(284)
SendKeys('u')
wait(284)
SendKeys('?'+chr(13))
wait(5000+random(147));//how long until typed again 1000= 1 second
end;

procedure ThankYou;
begin
writeln('-------Auto-Talker-------')
writeln('-----by Diamondhero5-----')
writeln('- I know u will like it -')
writeln('@@##$$  Thank you  $$##@@')
writeln('         ENJOY           ')
end;

begin
OpenRSWindow
Thankyou
repeat
Talk;
until(false)
end.

Okay, It's a start, just It's kinda hard to enter stuff with it like that. Here, try this:

[php]procedure SendText(text: string);
var i: Integer;
begin
for i := 1 to Length(Text) do
begin
SendKeys(Text);
Wait(50+random(50));
end;
SendKeys(Chr(13));
end; [/php]

also, instead of OpenRSWindow; you should use ActivateClient;
Type it in, drag the crosshairs to the rs window, and run it
then do sendtext('…');

i dont get what that does can u explain it step by step,
how do u put in what u want it to say

you take that and put it in your script, so your script will look like this:

[php]//Directions
//Set what u would like it to say(line 16)
//Set how long you would like it to wait until it says again(line 17)
//hit play
program AutoTalk;

procedure SendText(text: string);
var i: Integer;
begin
for i := 1 to Length(Text) do
begin
SendKeys(Text);
Wait(50+random(50));
end;
SendKeys(Chr(13));
end;

procedure Talk;
begin
SendText('Hi Wazz Up Man?');
wait(5000+random(147));//how long until typed again 1000= 1 second
end;

procedure ThankYou;
begin
writeln('——-Auto-Talker——-')
writeln('—–by Diamondhero5—–')
writeln('- I know u will like it -')
writeln('@@##$$ Thank you $$##@@')
writeln(' ENJOY ')
end;

begin
ActivateClient
Thankyou
repeat
Talk;
until(false)
end.[/php]

Wow ty works way better

psst my auto-typer pwns this lol

use typesend and it automatically types at a random human pace. Its really nice. My autotyper has the ability to do up to 4 messages and only types the first X, where X is # of messages which is set at the beginning of the script.