SCAR Code:
program VarrockMiner;
{.include SRL/SRL.scar}
{.include SRL/SRL/Skill/Mining.scar}
const
Colour = 5951; // color of the rock
var
x, y, a:integer; // do not touch this
procedure mining;
begin
MouseSpeed := 15
repeat
if(FindColor(x, y, Colour, 1, 1, 515, 337)) then
begin
Writeln('Found the rock');
Mouse(x, y, 5, 5, True);
Wait(3000 + random(1000))
end;
until(InvFull)
end;
procedure Signature;
begin
ClearDebug;
writeln('Varrock woodcutter');
wait(3000 + random(750));
end;
procedure bank;
begin
writeln('Inventory is full, now we start the banking');
a:=a+1
end;
begin
SetupSRL;
SetupMining;
Signature;
a:=0
repeat
mining; //Lets mine!
bank; // We are full lets bank!
until(a>10); // Do 10 runs (banks)
end.
There, in your main loop you start the mining, once it is finished (full) then it will move onto the bank; procedure.
Ive added a very small runs calculation that you should make/use.