function LogoutSleepLogin(SleepTimeInMin, RandSleepTimeInMin : integer): boolean;
SCAR Code:
function LogoutSleepLogin(SleepTimeInMin, RandSleepTimeInMin : integer): boolean;
begin
if (not(LoggedIn)) or (SleepTimeInMin <= 0) then
begin
Writeln('Error Occurred, Either You''re Already Logged Out Or');
Writeln('You Set TimeToSleepInMinutes To Zero Or Below.');
TerminateScript;
end;
if (RandSleepTimeInMin <= 0) then
begin
Writeln('WARNING RandSleepTimeInMin Shouldn''t Be Zero Or Less!');
RandSleepTimeInMin := 1;
Writeln('I Changed RandSleepTimeInMin To 1 For You.');
end;
Result := False;
if (Logout) then
begin
Writeln('Logged Out');
Writeln('Waiting ' + (IntToStr(SleepTimeInMin)) + 'Minutes Plus Random ' + (IntToStr(RandSleepTimeInMin)) + 'Minutes');
wait(60000 * SleepTimeInMin + random(RandSleepTimeInMin * 60000));
LogInPlayer;
Result := True;
end else
begin
Writeln('Error Occured While Logging Out, Script Terminated');
TerminateScript;
end;
end;
Tell me what you think, and BTW i made this All by Myself, for 1 of my scripts, although id love it it wer added to SRL rev 10 =p jk