SRL Archive - RS3 Outdated / Broken Scripts

hello people. i wanna ask, someone can write here procedure,

multiplayer, {ateast 2 playes for example},
then do in "mainloop"
login player,
type procedure; (or any other moving mouse procedure)
check if player is not loged in then login second player

thank you.

Erm… ok.. wrong forum + very odd question… but ok..

Program New;
{.include SRL/SRL.scar}

Procedure DeclarePlayers;
Begin
  CurrentPlayer  := 0; // Starting player
  HowManyPlayers := 2; // How many players in total?
  NumberOfPlayers(HowManyPlayers);

  Players[0].Name        := '';              // Username
  Players[0].Pass        := '';              // Password
  Players[0].Nick        := '';              // Nickname, 3 - 4 letters of username
  Players[0].Active      := True;            // Use this player?

  Players[1].Name        := '';              // Username
  Players[1].Pass        := '';              // Password
  Players[1].Nick        := '';              // Nickname, 3 - 4 letters of username
  Players[1].Active      := True;            // Use this player?

{
  Players[0].Name        := '';              // Username
  Players[0].Pass        := '';              // Password
  Players[0].Nick        := '';              // Nickname, 3 - 4 letters of username
  Players[0].Active      := True;            // Use this player?
}
End;

Begin
  SetupSRL;
  DeclarePlayers;
  If Not LoggedIn Then
  Begin
    LoginPlayer;
    Procedure;
  End Else NextPlayer(False); //Goes to the next active player, and leaves the current player in-active.
End.

From: Floor66
Erm… ok.. wrong forum + very odd question… but ok..

Program New;
{.include SRL/SRL.scar}

Procedure DeclarePlayers;
Begin
  CurrentPlayer  := 0; // Starting player
  HowManyPlayers := 2; // How many players in total?
  NumberOfPlayers(HowManyPlayers);

  Players[0].Name        := '';              // Username
  Players[0].Pass        := '';              // Password
  Players[0].Nick        := '';              // Nickname, 3 - 4 letters of username
  Players[0].Active      := True;            // Use this player?

  Players[1].Name        := '';              // Username
  Players[1].Pass        := '';              // Password
  Players[1].Nick        := '';              // Nickname, 3 - 4 letters of username
  Players[1].Active      := True;            // Use this player?

{
  Players[0].Name        := '';              // Username
  Players[0].Pass        := '';              // Password
  Players[0].Nick        := '';              // Nickname, 3 - 4 letters of username
  Players[0].Active      := True;            // Use this player?
}
End;

Begin
  SetupSRL;
  DeclarePlayers;
  If Not LoggedIn Then
  Begin
    LoginPlayer;
    Procedure;
  End Else NextPlayer(False); //Goes to the next active player, and leaves the current player in-active.
End.

thank you