Have logs in the first bank spot.
Start in Edgeville Bank at the north banker.
Post bugs please.
Simba Code:
program EdgeBonfire;
{$i srl/srl/misc/smart.simba}
{$i srl/srl.simba}
Var
x, y :Integer;
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0; // This is the player to start with
Players[0].Name := ''; // Username
Players[0].Pass := ''; // Password
Players[0].Nick := ''; // 3-4 lowercase letters from username;
Players[0].Active := True; // Set to true if you want to use Player 0
Players[0].BoxRewards := ['ostume'];
end;
function FindBanker(): Boolean;
begin
if(StrInArr('Bank', ChatBoxTextArray(clMessage)))
then
Wait(RandomRange(200, 700));
FindObjCustom(x, y, ['Banker'], [3152673], 3);
Mouse(x, y, 5, 5, false);
ChooseOption('Bank Banker');
end;
function AddLogs(): Boolean;
begin
Wait(RandomRange(2200, 2700));
FindObjCustom(x, y, ['Walk'], [2985208, 3117308], 3);
Mouse(x, y, 5, 5, false);
ChooseOption('Add');
end;
procedure EndBank;
begin
MouseBox(637, 76, 647, 91, 1);
Wait(1808 + Random(127));
begin
WriteLn('Banked!')
end;
end;
Procedure Light;
begin
InvMouse(RandomRange(1,1),3);
ClickMouse2(False);
WaitOption('Light', 1000);
Wait(2808 + Random(123));
end;
Function GetLogs : boolean;
begin
DepositAll;
Withdraw(0, 0, 28);
wait(777 + Random(77));
end;
begin
Smart_Server := 5;
Smart_Members := True;
Smart_Signed := True;
Smart_SuperDetail := False;
ClearDebug;
SetupSRL;
DeclarePlayers;
LoginPlayer;
MakeCompass('N');
SetAngle(SRL_ANGLE_HIGH);
wait(500);
repeat
FindBanker;
wait (2000);
GetLogs;
EndBank;
Light;
AddLogs;
FindNormalRandoms;
Wait(RandomRange(90000, 107000));
until not (LoggedIn);
end.