SRL Archive - First Scripts

Auto Talker (0.00001)


Wade007

2007-11-23 15:32:15

Ok, here is my auto talker, i hope you guys like it. Although it is not even at beta…:D
Lemme know any suggestions, problems, comments. ETC.:fiery:
//Effects////////////////////Please post more
//Cyan:
//Glow1:
//Glow2:
//Glow3:
program autotalker;
Procedure Talk;
var
talk2:String
Talk: String
Say: string;
Effect: String;
Begin
//Edit stuff to say here//////////////
Talk2:='Jordan Productions'/////////
Talk:='Jordan Productions'//////////
say:='Jordan Productions'///////////
Effect:=''///Remember to put colon in////Leave blank for no effect
//DO NOT EDIT BELOW!//////////////////
Repeat
sendkeys (effect+say)
wait(1000+random(300))
sendkeys (Effect+talk)
wait(1000+random(120))
Until(False)
end;
begin
talk
end.

Raskolnikov

2007-11-23 15:45:10

Okay, here are my thoughts:

Please please please don't use sendkeys:

Let me show you what I propose your script would look like:

 program autotalker;
{.include SRL/SRL.scar}
Procedure Talk;
var
talk2:String
Talk: String
Say: string;
Effect: String;
Begin
//Edit stuff to say here//////////////
Talk2:='Jordan Productions'/////////
Talk:='Jordan Productions'//////////
say:='Jordan Productions'///////////
Effect:=''///Remember to put colon in////Leave blank for no effect
//DO NOT EDIT BELOW!//////////////////
Repeat
TypeSend (effect+say)
wait(1000+random(300))
TypeSend (Effect+talk)
wait(1000+random(120))
Until(IsFKeyDown(FKeynumber:integer)); //Please don't use endless loops.
end;
begin
talk;
end.

TypeSend is much less detectable then SendKeys. I changed Until(False) to Until(IsFKeyDown(FKeyNumber: integer));.

Hope this helps.

Wade007

2007-11-23 16:47:43

Oh, that's nice, do you mind if i use it? ill give credits!

legendimi66

2007-11-24 23:09:40

Yes. Excatly what cut em2 it said. Notice that he also added "{.include SRL/SRL.scar}" which includes SRL if you didn't already know. Send keys will just type the text instanly which is pretty much asked BAN ME! Type send makes the time inbetween the letters slightly different and therefor more humanlike.
Nice try though!

tidla ownage

2007-11-24 23:25:56

looks ok, keep trying

freedox

2007-12-02 08:33:13

Not bad for a first time script…:)Even if it got a lot of bugs:)
But you have tried and now you can make better scripts;)
GJ m8:)

distress

2007-12-03 13:26:27

Supernice with effects, maybe i should try adding that to my autotalker! I like the simplicity, with only havnig to change the variables and nothing else, i used Const's there, do you know any reason why variables are better or is it just what you prefer?