
Originally Posted by
Bizketben
Thanks for the fast response!
So I did this:
Code:
procedure ChopTree;
var x, y, t: integer;
begin
MarkTime(t)
repeat
if FindObj(x, y, 'own', 7382981, 10) then
begin
Mouse(x, y, 2, 2, true);
ChooseOption('hop');
wait(randomrange (7000, 9000));
end;
repeat
Until not IsUpText('eak') or (InvFull) or (TimeFromMark(t) > 20000);
Until(InvFull);
end;
Testing now, I will let you know if it doesn't work!
Thanks for your help

Actually I see this is for teaks. I helped another member make a Teak chopper for OSR once. It's hard to tell when your character is chopping because your character doesn't move (or something like that, I've never cut teaks before
). If the inventory count doesn't increase within 10 seconds, it clicks the tree again.
Simba Code:
procedure Chop;
begin
i := InvCount + 1;
if FindObj(x, y, 'own', 7382981, 35) then
begin
Case random(1) of
0: Mouse(x, y, 5, 5, true);
1: begin
Mouse(x, y, 5, 5, false);
ChooseOption('Chop');
end;
end;
end;
end;
begin // This is like your main loop
repeat
If Not WaitInvCount(I, 10000, ExactCT) then
Begin
WriteLn('No logs for 10s, clicking tree again');
Chop;
End;
until(InvFull);
end.