This is embarrassing haha here it is.
program new;
{$DEFINE SMART}
{$I SRL-6/SRL.simba}
{$I SPS/lib/SPS-RS3.Simba}
procedure declarePlayers();
begin
setLength(players, 1);
with players[0] do
begin
loginName := '
isActive := true;
isMember := true;
end
currentPlayer := 0;
end;
procedure mineRocks();
begin
// code here
end;
procedure findDepositBox();
var
x, y: integer;
begin
if not isLoggedIn() then
exit;
begin
if mainscreen.findObject(x, y, 6321021 , 13, [' Bank deposit box'], MOUSE_RIGHT) then
begin
chooseOption.select(['Deposit']);
end;
if depositBox.isOpen() then
begin
bankTimer.start() // It highlights this and says compiling failed
repeat
if (depositBox.count > 0) then
begin
depositBox.quickDeposit(QUICK_DEPOSIT_INVENTORY);
end
until(depositBox.isEmpty()) or (not isLoggedIn()) or (bankTimer.getTime() >10000);
end;
depositBox.close();
end;
procedure depositCoal(); // also says compiling failed for this
begin
//code here
end;
main loop
begin
clearDebug(); Clear the debug box
smartEnableDrawing := true;
setupSRL();
declarePlayers();
if not isLoggedIn() then
begin
players[currentPlayer].login();
exitSquealOfFortune();
minimap.setAngle(MM_DIRECTION_NORTH);
mainScreen.setAngle(MS_ANGLE_HIGH);
end;
mineRocks();
findDepositBox();
depositCoal();
end.
(obviously not even close to being done. Just about 30 minutes of work)