SRL Archive - Other Scripts

my first script!!!


neo_welmeow

2006-11-21 15:03:02

hey this is my first script, and its one of those basic ones, it still needs some work. i put this to gether in like 30 min, it took me a while i know, but im just a noob!!!, anyone now how i could set it up so that messege2 would only go once?


program something;

var
I: integer ;
L: integer ;
done: boolean;

const
message1='10010110101010101011101000110101010101110101101010101010111100';
message2=' Welcome to the Matrix ';

procedure binary;
begin
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
wait(50)
sendkeys(message1);
end;
procedure matrix;
begin
wait(100)
sendkeys(message2)
end;
begin
ClearDebug ;
repeat
binary;
I:=L+50;
L:=I+5*I;
if I>100 then matrix;
if I>150 then binary;
if I>1000 then done:=true else done:=false
until(done)
end.
there is probably a better way to make this script but it was my first!!!

Hey321

2006-11-21 16:05:53

Good job but a few pointers:

Instead of using SendKeys(its detectable) use TypeSend by including and setting up SRL (go into more detail later). Also instead of using Wait(50) use

Sleep(50+random(50))

That is an SRL function designed for antiban also the +random(50) is there because that adds a random number between 1 and 50.

Now you may be wondering why there are two )) at the end. Thats because there are two (( in there.

Now onto the TypeSend function.

you would put

{.include SRL/SRL.scar}


Under the program name. Then you put

SetupSRL;
In your main loop, what this does is lets SCAR know to set up SRL to make it usable. AFTER that you use

TypeSend
wherever you would use

SendKeys

Hope that helped!

~~~Hey321~~~

neo_welmeow

2006-11-21 20:26:42

what? i understand but yet at the same time im confused. like y should i worry about auto ban when this isnt 4 R.S.? but i see y u pointed that out, TY for that! im just confused