hey i made this snipit of logingin and i couldn't get it to run
to says out of range in like 90 of core/login.scar
if anyone could help that would be great as i want to get a script that can login 
SCAR Code:
program New;
{.include SRL/SRL.scar}
const StartPlayer = 0;
NumOfPlayers = 1;
procedure DeclarePlayers;
begin
SRLId:= '';
SRLPassword:= '';
HowManyPlayers := 1;
NumberOfPlayers(NumOfPlayers);
CurrentPlayer := StartPlayer;
Players[0].Name := '';
Players[0].Pass := '';
Players[0].Nick := '';
Players[0].Booleans[0]:= true;
Players[0].Active := True;
end;
begin
SetupSRL;
wait(1000);
LoginPlayer;
Writeln('hi')
end.