E
ops lol
Sure, it's essentially this;
Simba Code:
program LearningViaMarkUps1;
{$DEFINE SMART}
{$DEFINE SRL5}
{$i srl/srl.simba}
var
CheckBankSlot: Integer;
procedure BankChest;
begin
OpenBankChest(SRL_BANK_SW);
if (BankScreen) then
begin
Exit;
end else
BankChest;
end;
procedure LeItemProcess;
begin
BankChest;
if (BankScreen) then
begin
CheckBankSlot := GetBankIndexItemAmount(BankPointToBankIndex(Point(9, 0)));
if CheckBankSlot <= 50 then
begin
Writeln('Just about out of items, Turning Off.');
Logout;
TerminateScript;
end;
end else
if not (BankScreen) then
begin
Logout;
TerminateScript;
end;
LeItemProcess;
end;
begin
SetupSRL;
ActivateClient;
LogInPlayer;
repeat
BankChest;
LeItemProcess;
until(CheckBankSlot <= 50);
if (CheckBankSlot <= 50) then
Writeln('Ciao, torna presto! / Bye, come again!');
LogOut;
TerminateScript;
CloseWindow;
end.
But the mark-up's I placed are on a script not done by myself, so I don't know if posting my marked up full script of theirs would be legit; so I just posted this snippet.