SCAR Code:
Procedure DeclarePlayers;
Begin
HowManyPlayers := 2; // How many players? Keep this if you won't add any more players.
CurrentPlayer := 1; // The player you start from?
NumberOfPlayers(HowManyPlayers);
SRLID := ''; // SRL Stats ID (Not your forum name!)
SRLPassword := ''; // SRL Stats Password (Not your forum password!)
Players[0].Name := ''; // Username
Players[0].Pass := ''; // Password
Players[0].Nick := ''; // Few letters of your name, no capped ones.
Players[0].Loc := 'Bank'; // If you start at bank, keep, else 'Trees'
Players[0].Strings[0] := ''; // If you have a bank pin, fill in.
Players[0].Integers[0] := 6; // How many loads before switching players?
Players[0].Active := True; // Is player active? (You want it to be used?)
Players[1].Name := '';
Players[1].Pass := '';
Players[1].Nick := '';
Players[1].Loc := 'Bank';
Players[1].Strings[0] := '';
Players[1].Integers[0] := 6;
Players[1].Active := True;
{Players[2].Name := 'Username';
Players[2].Pass := 'Password';
Players[2].Nick := 'ser';
Players[2].Loc := 'Bank';
Players[2].Strings[0] := '';
Players[2].Integers[0] := 6;
Players[2].Active := True;
Players[3].Name := 'Username';
Players[3].Pass := 'Password';
Players[3].Nick := 'ser';
Players[3].Loc := 'Bank';
Players[3].Strings[0] := '';
Players[3].Integers[0] := 6;
Players[3].Active := True;}
End;