SRL Archive - First Scripts

Auto Login


iseeyou1600

2008-07-08 03:53:30

This is my first script so if you see anything that I can change or approve on I would greatly appreciate your feedback. This script should change worlds to the one with the least people then log you in.

program AutoLogin;
{.include SRL/SRL.scar}

procedure switchworld;
begin
mouse(369, 239, 4, 4, True);
wait(1000+random(100));
mouse(425, 11, 4, 4, True);
wait(1000+random(100));
mouse(75, 41, 4, 4, True);
end;

procedure login;
begin
mouse(376, 169, 4, 4, True);
wait(1000+random(100));
end;

procedure userandpass;
begin
typesend('username')
wait(1000+random(100));
typesend('password')
end;

begin
SetupSRL;
switchworld;
login;
userandpass;
end.

0wn 4 skill

2008-07-08 11:17:03

program AutoLogin;
{.include SRL/SRL.scar}

Const
Username='';// Username here.. More user friendly at the start of script
Password='';// Password here

procedure switchworld;
begin
mouse(369, 239, 4, 4, True);
wait(1000+random(100));
mouse(425, 11, 4, 4, True);
wait(1000+random(100));
mouse(75, 41, 4, 4, True);
end;

procedure login;
begin
mouse(376, 169, 4, 4, True);
wait(1000+random(100));
end;

procedure userandpass;
begin
typesend(Username);
wait(1000+random(100));
typesend(Password);
end;

begin
SetupSRL;
ActivateClient;//Activates the client.
switchworld;
login;
userandpass;
end.

Fixed it up for you slightly. The Const part declared the Username and Password at the start so you dont have to go all the way down to find it.
ActivateClient added to main loop so runescape is activated.

You need to make sure it compiles in scare because u missed a couple of ";" and also improve standards.
Otherwise, good start!

I wish you all the luck in scripting!!!

Claymore

2008-07-08 12:00:06

use MMouse or MoveMouseSmooth. And to click mouse, use Mouse(x, y, 0, 0 true)
true = left click
false = right click.

Good job

iseeyou1600

2008-07-08 12:59:41

Thanks for the help guys, hoping to come out with a new script soon.

PvH

2008-07-08 13:56:02

From: deathscytex
use MMouse or MoveMouseSmooth. And to click mouse, use Mouse(x, y, 0, 0 true)
true = left click
false = right click.

Good job


No man, thats failure.
That is INSTANT BANN!
Use mmouse with randomness of like at least 3,3.
And do NOT, I repeat, NOT use MoveMouseSmooth as there is NO randomness in it;)

Here is also a fixed up with standards version of your script.
Standards are needed, they look better and it is way easier to fix errors;)
I didn't change anything else in your script(h)

program AutoLogin;
{.include SRL/SRL.scar}

procedure switchworld;
begin
mouse(369, 239, 4, 4, True);
wait(1000+random(100));
mouse(425, 11, 4, 4, True);
wait(1000+random(100));
mouse(75, 41, 4, 4, True);
end;

procedure login;
begin
mouse(376, 169, 4, 4, True);
wait(1000+random(100));
end;

procedure userandpass;
begin
typesend('username');
wait(1000+random(100));
typesend('password')
end;

begin
SetupSRL;
switchworld;
login;
userandpass;
end.



EDIT:
Btw, don't you need to have
ActivateClient;
?
That goes to the rs screen which you selected with the crosshair;')

PvH

0wn 4 skill

2008-07-08 16:24:06

So your saying it automatically goes to RS screen?

PvH

2008-07-09 06:55:33

From: 0wn 4 skill
So your saying it automatically goes to RS screen?


If you dragged the crosshair, and you call ActivateClient, yes, it will automatically go to the rs screen;)

PvH

Claymore

2008-07-09 12:04:58

From: pvh
No man, thats failure.
That is INSTANT BANN!
Use mmouse with randomness of like at least 3,3.
And do NOT, I repeat, NOT use MoveMouseSmooth as there is NO randomness in it;)

Here is also a fixed up with standards version of your script.
Standards are needed, they look better and it is way easier to fix errors;)
I didn't change anything else in your script(h)

program AutoLogin;
{.include SRL/SRL.scar}

procedure switchworld;
begin
mouse(369, 239, 4, 4, True);
wait(1000+random(100));
mouse(425, 11, 4, 4, True);
wait(1000+random(100));
mouse(75, 41, 4, 4, True);
end;

procedure login;
begin
mouse(376, 169, 4, 4, True);
wait(1000+random(100));
end;

procedure userandpass;
begin
typesend('username');
wait(1000+random(100));
typesend('password')
end;

begin
SetupSRL;
switchworld;
login;
userandpass;
end.



EDIT:
Btw, don't you need to have
ActivateClient;
?
That goes to the rs screen which you selected with the crosshair;')

PvH


Forgot to mention randomness =p Mouse(x, y, 1, 1, true) or MMouse(x, y, 2, 2);

Also i would reccomend a more better world picker…:spot:

Magiic

2008-07-09 16:40:57

yeah with out all the fixes and such it is a very good script for a first try but if you just have a poke at other peoples login scripts and maybe update your'swith similar features that they have then it will be very good, all in all well done

miny noob

2008-07-10 18:02:37

time for bitmaps!

DJPitch

2008-07-11 12:55:24

worked for me, nice