SRL Archive - S.M.A.R.T. Questions and Answers.

i get this error trying to run it

Exception in Script: Unable to find file 'srl/srl/misc/smart.scar' used from ''

with this

program CitadelMiner;

{$i srl/srl/misc/smart.scar} // This is how we include SMART; it HAS to be included BEFORE SRL!

{$i srl/srl.scar}



//Edit line 39 to change how many rocks to mine. Defult 1200.



procedure DeclarePlayers;

begin

HowManyPlayers := 1; // This is set to the total amount of players (more on multiplayer later ;)), for now, just keep it set as 1

NumberOfPlayers(HowManyPlayers); // This is a procedure in SRL which sets up player arrays (also, more on that later), this will always be the same

CurrentPlayer := 0; // This is the player to start with; the first player will always be 0 (you'll find out when you learn all about arrays)



Players[0].Name := ''; // Username

Players[0].Pass := ''; // Password

Players[0].Nick := ''; // 3-4 lowercase letters from username; used for random event detection

Players[0].Active := True; // Set to true if you want to use Player 0

Players[0].Pin := ''; // Leave blank if the player doesn't have a bank pin

end;



function BuyChocolate: Boolean;

var

x, y : Integer;

begin

Wait (5000 + Random(411))

Mouse(367, 124, 10, 24, true);

Wait (5900 + Random(411))

Mouse(148, 121, 14, 24, true);

end;



Procedure RepeatMine;

var

NumberOfMines: Integer;

begin

repeat

Wait(1481 + Random(175))

BuyChocolate;

Inc(NumberOfMines);

Writeln('We have mined ' + IntToStr(NumberOfMines) + ' times');

until (NumberOfMines = 1200); //Change number here to change ho many rocks to mine!!!!!!!!!!!!!!!!!!!

end;



begin

// These 4 lines HAVE to be set BEFORE you call SetupSRL;

Smart_Server := 60;

Smart_Members := True;

Smart_Signed := True;

Smart_SuperDetail := False;



ClearDebug;

SetupSRL;

DeclarePlayers; // Calls the procedure, you can't forget this!

LoginPlayer; // You want your player to login, right?

Wait(4000);

Mouse(543,24,7,7,True);

Wait(600);

KeyDown(VK_Up)//will make you have your left arrow get "in use"

Wait(719+ Random(95));//change this accordingly to the amount of time you want it to be in use

KeyUp(VK_Up)

RepeatMine;

end.

This is out of date - use an updated script.

FYI, noticed how they end in .scar? We are not using Scar, we are using Simba - should be ending in .simba