hmm strange, now it logs himself out when he found the maple:/ any help?
Code:
program MapleSnijder;
{.include SRL/SRL.scar}
var
Maple: Integer;
function GetMapleFromBank: Boolean;
var
x, y: Integer;
begin
Maple := BitmapFromString(5, 4, 'beNqz5o205g235Aky4wkw5fY24' +
'oaQngZcLrpcTtqc7npcQDZQxM8YJAVEQJWhFjxALZEAUIYLFg==');
if FindBitmapToleranceIn(Maple, x, y, MSX1, MSY1, MSX2, MSY2, 5) then
begin
Writeln('Found Maple in bank!');
MMouse(x, y, 2, 2);
Wait(80 + Random(100));
Mouse(x, y, 0, 0, False);
Wait(500 + Random(100));
ChooseOption('Withdraw-30');
CloseWindow;
Wait(200 + Random(100));
if FindBitmapToleranceIn(Maple, x, y, MIX1, MIY1, MIX2, MIY2, 5) then
Writeln('Found Maple in inventory, moving on!')
else
Writeln('Could not find maple in inventory, logging out.');
Logout;
end;
Result := True;
FreeBitmap(Maple);
end;
procedure MainLoop;
begin
SetupSRL;
ActivateClient;
ClearDebug;
if GetMapleFromBank then
Writeln('We have clicked the Maple logs!')
else
Writeln('We have not clicked the Maple logs.');
end;
begin
MainLoop;
end.