SRL Archive - Help

So the other day, SMART was running just fine. Now, I get one of three problems, depending on which script I try to run it with.

http://support.microsoft.com/kb/125749
^That problem happens randomly, about 1 time every 10 times I run either of the scripts.

program new;
{$i SRL/SRL/MISC/SMART.simba}
{$i SRL/SRL.simba}



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

  with Players[0] do
  begin
    Name := '';
    Pass := '';

    Active := True;
  end;
end;

procedure Setup;
begin
  SMART_Server := WORLD;
  SMART_Members:= MEMBERS;

  SetupSRL;
  DeclarePlayers;
  LoginPlayer;
  SetAngle(SRL_ANGLE_HIGH);
  ClearDebug;

  WriteLn('Line.');
end;

begin
  Setup;
end.

This one will not write 'Line.' to the debug box. (As in, it won't write anything other than the standard SMART lines).

Problem here Fix'd.

There, SMART restarts every time I restart the script…

What operating system do you have and is it 32 or 64 bit in regards to the SMART issues. I will edit this as I get feedback.

I'm on a Windows 7 Enterprise, on a 32 bit operating system.

procedure SetupLogin; // Credits to Sin
begin
  ClearDebug;
  Smart_Server := 39;
  Smart_Members := False;
  Smart_Signed := False;
  Smart_SuperDetail := False; 
  NumberofCasts := 0;
  SetupSRL;
end;

will fix the restarting

Okay, thank you - This fixed the Restarting problems :)

Time to see if I'm still having the other problems though.