SCAR Code:
Procedure ChopIt;
Begin
if (not (LoggedIn)) then LoginPlayer
repeat
if(findcolortolerance(x,y,treecolor1,117,204,887,709,10)) or
(findcolortolerance(x,y,treecolor2,117,204,887,709,10)) or
(findcolortolerance(x,y,treecolor3,117,204,887,709,10)) or
(findcolortolerance(x,y,treecolor4,117,204,887,709,10)) or
(findcolortolerance(x,y,treecolor5,117,204,887,709,10)) or
(findcolortolerance(x,y,treecolor6,117,204,887,709,10)) then
begin
MMouse(x,y,3,3);
if (IsUpText('ree')) then
begin
Mouse(x,y,2,2,true);
Wait(15000);
MMouse(x,y,3,3);
if not(IsUpText('ree')) then
Writeln('The tree has been chopped succesfully!')
begin
case Random(11) of
1: typesend('this is boring');
2: typesend('i cant take any more!!!');
3: typesend('');
4: typesend('');
5: typesend('zzzz...zzzz...');
6: typesend('This is so not fun');
7: typesend('when does it end!');
8: typesend('This is 3 hours straight!!!');
9: typesend('');
10: typesend('');
end;
if InvFull then Exit;
If FindnpcChattext('ontinue') then
Writeln('You have achieved a woodcutting level!');
if(DidRandomHappen = true) then
begin
DidRandomHappen := False;
Mouse(x, y, 2, 2, true);
end;
SleepAndMoveMouse(9671 + random(1709));
FindRandoms;
AntiBanMe;
RunFromRandoms;
AntiBannage;
AntiDeath;
UberEnt;
if InvFull then Exit;
If FindnpcChattext('ontinue') then
Writeln('You have achieved a woodcutting level!');
until(Invfull) {<--------------Line 356}
Writeln('You have succesfully chopped a inventory of logs!');
end;
end;
end;