SRL Archive - RS3 Script Requests

yo guys i'd be glad if some1 help me with Autoclicker For SMART
which moves after enblading Smart for First spot in The Inv
Then IT Keep clicking
Thanks Alot

So you just want the script to login and then spam click the first inventory spot?
What exactly does this achieve?

Here, I wrote exactly what you asked for, but dear god it will get you banned.
If you provide more details about what this script actually needs to do it is possible that I could write something that's a little bit better.

program P;
{$DEFINE SMART}
{$i SRL/SRL.Simba}

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

  with Players[0] do
  begin
    Name         := '';          // Username
    Pass         := '';         // Password
    Pin          := '';        // PIN - Leave Blank If None
    Active       := True;     // Is Player To Be Used?
  end;
end;

function PRandoms: Boolean;
begin
  Result := FindNormalRandoms or FindNonInventoryRandoms;
end;

procedure SetupLogin;
begin
  ClearDebug;
  Status('SetupLogin');
  {$IFDEF SMART}
    SRL_SixHourFix := True;
    Smart_FixSpeed := True;
  {$ENDIF}

  SetupSRL;
  DeclarePlayers;

  ActivateClient;
  if not LoggedIn then
    LoginPlayer;

  SetAngle(SRL_ANGLE_HIGH);
  PRandoms;
end;

begin
  SetupLogin;
  repeat
    PRandoms;
    if not LoggedIn then
      TerminateScript;

    InvMouse(1, mouse_Left);
  until(False);
end.               

Thanks For Your Quick Respond yeh that All I needed Really Thanks
But Can U Add choose world To it? please
Thanks For Your Time

Change the 'SetupLogin' procedure to this:

procedure SetupLogin;
begin
  ClearDebug;
  Status('SetupLogin');
  {$IFDEF SMART}
    SRL_SixHourFix := True;
    Smart_FixSpeed := True;
  {$ENDIF}

  SetupSRL;
  DeclarePlayers;

  ActivateClient;
  if not LoggedIn then
  begin
    LoginPlayerToLob;
    if OpenWorldScreen then
    begin
      SelectWorld(8);
      LoginPlayer;
    end;
  end;

  SetAngle(SRL_ANGLE_HIGH);
  PRandoms;
end;

Then where I put in SelectWorld(8); you can change the 8 to whatever world you want to login to.

Thanks So Much bro
Aprrinticed!

From: P1ng
So you just want the script to login and then spam click the first inventory spot?
What exactly does this achieve?

Here, I wrote exactly what you asked for, but dear god it will get you banned.
If you provide more details about what this script actually needs to do it is possible that I could write something that's a little bit better.

program P;
{$DEFINE SMART}
{$i SRL/SRL.Simba}

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

  with Players[0] do
  begin
    Name         := '';          // Username
    Pass         := '';         // Password
    Pin          := '';        // PIN - Leave Blank If None
    Active       := True;     // Is Player To Be Used?
  end;
end;

function PRandoms: Boolean;
begin
  Result := FindNormalRandoms or FindNonInventoryRandoms;
end;

procedure SetupLogin;
begin
  ClearDebug;
  Status('SetupLogin');
  {$IFDEF SMART}
    SRL_SixHourFix := True;
    Smart_FixSpeed := True;
  {$ENDIF}

  SetupSRL;
  DeclarePlayers;

  ActivateClient;
  if not LoggedIn then
    LoginPlayer;

  SetAngle(SRL_ANGLE_HIGH);
  PRandoms;
end;

begin
  SetupLogin;
  repeat
    PRandoms;
    if not LoggedIn then
      TerminateScript;

    InvMouse(1, mouse_Left);
  until(False);
end.               

I made a new thread on this, can you check it out and see if you can use this scirpt and change it to my liking's if possible?

ban hammer inbound