SRL Archive - RS3 Utility Scripts

script

program yarin;
{$Define Smart}
{$i srl/srl.simba}

procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;

Players[0].Name := 'YOU NAME HERE MADE BY YARIN'; //
Players[0].Pass := 'YOUR PASSWORD HERE MADE BY YARIN'; //
Players[0].Nick := '';
Players[0].Member := False;
Players[0].Active := True;
Players[0].Pin := '';
end;




Begin
SetupSRL
Declareplayers
LoginPlayertoLob();
SelectWorld(2);
LoginPlayer;
Activateclient


Repeat
Wait(500+Random(250));
TypeSendEx('YOUR TEXT HERE MADE BY YARIN',True);
DoEmote(RandomRange(13,13));

until(false)
if not (LoggedIn) then
LoginPlayer;
end.
begin
end.

DONATE



Thanks and use my scripts!

Lol a donate button….. really

whats the prob?
im will make more scripts:)

Not sure whether to laugh or cry…
We hate autotalkers.
And what reason do we have to donate to you for? So you can leech more?

no
im said if you want to donate so donate
im anyway made more scripts:D

I was a little harsh. I appologize.
But we don't appreciate autotalkers here.

kk thanks:)
im made now skills scripts:)

Okay, good luck buddy,
I look forward to seeing what you can do!

hmm now im do a dance for money..
script for [poors:)]
after for skills:)

program madebyyarinAdvertiser;
{$Define Smart}
{$i srl/srl.simba}

Const
message0=('cyan:type here you text!made by yarin !!');
message1=('white:type here you text!made by yarin ');
message2=('cyan:type here you text!made by yarin ');
message3=('Daily type here you text!made by yarin ');
message4=('white:type here you text!made by yarin !!');
message5=('white:type here you text!made by yarin ');
message6=('white:type here you text!made by yarin ');
message7=('white:Dtype here you text!made by yarin ');
message8=('white:type here you text!made by yarin ');
message9=('white:type here you text!made by yarin ');

procedure DeclarePlayers;
Begin
  HowManyPlayers := 1;                     //SETUP!!!!!
  NumberOfPlayers(HowManyPlayers);         //FILL IN EVERYTHING MARKED WITH FRACTIONS
  CurrentPlayer := 0;

  Players[0].Name := 'made by yarin your username here';
  Players[0].Pass := 'your passwordhere made by yarin';
  Players[0].Nick := ' your nick here made by yarin'; 
  Players[0].Active := True;
  Players[0].Pin := '';   your bank pin here [if you got] made by yarin
  Players[0].BoxRewards := ['Xp', 'mote', 'ostume', 'oins', 'aphire', 'ssence'];
End;




Begin
SetupSRL
  Declareplayers
  LoginPlayertoLob();
    SelectWorld(2);// Put your own world into this
    LoginPlayer;
  Activateclient

wait(randomrange(5000, 7000 ));
Repeat
Wait(3000+Random(200));    //increase number to slow down. decrease to speed up
case random(11) of
0: begin TypeSend (message0); end;
1: begin typesend (message1); end;
2: begin typesend (message2); end;
3: begin typesend (message3); end;
4: begin typesend (message4); end;
5: begin typesend (message5); end;
6: begin typesend (message6); end;
7: begin typesend (message7); end;
8: begin typesend (message8); end;
9: begin typesend (message9); end;
10: begin wait(randomrange(20,30)); end;


end;
findnormalrandoms;

Until(False);
end.

made by me!
donate please:O
is my tow script

program yarinAutoTypermadebyyarin;
{$DEFINE SMART} {$i srl/srl.simba} {$i sps/sps.simba}

procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;

Players[0].Name := ''; //
Players[0].Pass := ''; //
Players[0].Nick := '';
Players[0].Member := False;
Players[0].Active := True;
Players[0].Pin := '';
end;

begin
ClearDebug;
SetupSRL;
DeclarePlayers;
LoginPlayer;
repeat
wait(5000+random(3000));
TypeSendEx('Green: text here! made by yarin',true)
TypeSendEx('Green:text here! made by yarin',true)
TypeSendEx('text here! made by yarin',true)
TypeSendEx('text here! made by yarin',true)
TypeSendEx('text here! made by yarin',true)
until(false)
if not (LoggedIn) then
LoginPlayer;
end.

this my lest autotalker
this multi script
made by me!
donate please:O



Thanks and use my scripts!

You should use simba tags.

//some code
procedure tryThat;
begin
  something; // looks more readable. and nicer.
end;

And does that say Villua? What could that mean ;)

Login Information in the OP Please change immediately.

All these scripts are just rip offs of current scripts with little pieces in. I posted on your Vial Filler, you need to stop just chopping other peoples up and calling them your "Own".

why?
im dont take scripts from pppl
this script!
is my scrript im made this!
with dance
im add more codes and change alot!
so dont tell me please

program AutoTyperSmart;
{$DEFINE SMART}
{$i srl/srl.simba}
{$I SRL/SRL/Misc/Online.simba}


procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;

Players[0].Name := 'your username here made by yarin'; //
Players[0].Pass := 'your password here made by yarin'; //
Players[0].Nick := 'you nick [rsn] here made by yarin';
Players[0].Member := True;
Players[0].Active := True;
Players[0].Pin := 'your pin here if you got made by yarin';
end;

begin
  ClearDebug;
  SetupSRL;
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  with Players[0] do
  begin
    Name        := '';
    Pass        := '';
    Pin         := '';
    Active      := True;
  end;
  LoginPlayerToLob;
  OpenWorldScreen;
  SelectWorld(1);
  LoginPlayer;
  Wait(1000 + Random(3000));
  ClickNorth(0);

repeat
wait(2000+random(1000));
TypeSendEx('message here',true)
//TypeSendEx(' [1 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [2 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [3 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [4 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [5 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [6 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [7 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [8 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [9 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [10 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [11 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [12 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [13 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [14 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [15 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [16 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [17 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [18 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [19 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [20 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [21 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [22 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [23 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [24 colour pick] : [text here your advstring! made by yarin!@!]',true)
//TypeSendEx(' [25 colour pick] : [text here your advstring! made by yarin!@!]',true)

until(false)
if not (LoggedIn) then
LoginPlayer;
end.

only i made this script and no one!
i give more text for you guys
25!
gz guys and good bye!
donate please for more scripts
im need for new iphne [iphone5]

From: yarin
why?
im dont take scripts from pppl
this script!
is my scrript im made this!
with dance
im add more codes and change alot!
so dont tell me please

Sorry, had to lol a bit here… :)

please stop making multiply threads for the same script.

Umm, why would an auto typer need to know your pin?

From: Austin
Umm, why would an auto typer need to know your pin?

I was thinking the same thing :P

Because he just copy and pasted from another script.

This has been posted by myself and many other users on his threads along with flight. Can a mod please just delete them or state the rules very clearly, he doesn't seem to have English as his first language.

Just a tip for you. You already made a procedure for DeclarePlayers, so you don't have to make another in the setup.

LIKE THIS

begin
  ClearDebug;
  SetupSRL;
 HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  with Players[0] do
  begin
    Name        := '';
    Pass        := '';
    Pin         := '';
    Active      := True;
  end;
  LoginPlayerToLob;
  OpenWorldScreen;
  SelectWorld(1);
  LoginPlayer;
  Wait(1000 + Random(3000));
  ClickNorth(0);

TO

begin
  ClearDebug;
  SetupSRL;
  DeclarePlayers;
  LoginPlayerToLob;
  OpenWorldScreen;
  SelectWorld(1);
  LoginPlayer;
  Wait(1000 + Random(3000));
  ClickNorth(0);

L0l

From: yarin
Wow srlking…
Is not your script!
You never post it!
Just stop!
And bmwxi you stfu!

Wouldn't there be a better way to handle this than to tell someone to "stfu"? I imagine there would be.

From: yarin
Wow srlking…
Is not your script!
You never post it!
Just stop!
And bmwxi you stfu!

Ok, now's your chance then. Tell me why you want users to declare their pin in "your" auto typer script.

From: BMWxi
Ok, now's your chance then. Tell me why you want users to declare their pin in "your" auto typer script.

This, and donations for a simple typer

Infracted for spam.

Merged all of your auto-typer threads seeing as they are all virtually the same script.

From: Hobbit
Infracted for spam.

Merged all of your auto-typer threads seeing as they are all virtually the same script.

<3 <3 <3 <3 <3 <3 x1000.

Guiz plz donate to me. I make autotype script, so u giv me $$ for iphone 5

From: Lord
Guiz plz donate to me. I make autotype script, so u giv me $$ for iphone 5

Kinda harsh, but made me laugh

kk
im stopping with that
no one tell me thanks about my job in all scripts
im stop and move to rsbot
here all can to suck me bye bye:)

From: yarin
kk
im stopping with that
no one tell me thanks about my job in all scripts
im stop and move to rsbot
here all can to suck me bye bye:)

Recommended that you read the rules before posting on the forums. It covers everything you need to know.
Here: http://villavu.com/forum/showthread.php?t=6964

To whoever derepped me, I wasn't asking for donations…..
I was making fun of yarin's previous posts…

Edit: You know, im goign to bet that it was yarin himself