hmm I wrote something fast to check if it works but it doesnt do anything when i run it….. did i write something wrong?
program OgyAFK;
{$DEFINE SMART}
{$I SRL/SRL.Simba}
procedure DeclarePlayers;
begin
HowManyPlayers := 1; // Number of Players to use
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0; // Player to start with, first one is 0
Players[0].Name := ''; // Username
Players[0].Pass := ''; // Password
Players[0].Active := True; // just leave it as is.
Players[0].Pin := ''; // Bank Pin. Leave it if you don't have one.
Players[0].Integers[1] := 10000; // Number of loads
Players[0].Integers[2] := 375; // Xp For 1 Pouch Made <----------------------------------------
end;
var
SoundPath:string;
Procedure Alert;
begin
SoundPath:=ScriptPath+'Bang.wav';
PlaySound(SoundPath);
end;
begin
SRL_SixHourFix := True;
Smart_FixSpeed := True;
SetupSRL;
DeclarePlayers;
LogInPlayer;
repeat
alert;
wait(3000);
until (false)
end.
i should be hearing the .wav when i press play?