
Originally Posted by
Ranny
It is for me.. I have tried but can't today.
I will try script something easier but could someone just help me with this? :/
Here you go!
Code:
program AutoTyper;
{$Define Smart}
{$i srl/srl.simba}
procedure DeclarePlayers;
Begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := 'username'; //Name here
Players[0].Pass := 'password'; //Pass here
Players[0].Nick := '';
Players[0].Member := True;
Players[0].Active := True;
Players[0].Pin := '';
End;
Begin
SetupSRL
Declareplayers
LoginPlayertoLob();
SelectWorld(2);
LoginPlayer;
Activateclient
Repeat
Wait(1000+Random(500));
DoEmote(RandomRange(14,16));
TypeSendEx('text here',True);
DoEmote(RandomRange(14,16));
until(false)
if not (LoggedIn) then
LoginPlayer;
end.
begin
end.