Ok, i've narrowed it down so I know that the problem is in the FindAndChop procedure. It compiles, but it doesn't find a tree like it is supposed to look for. I thought that findobj was supposed to make circles with the mouse until it found what it was looking for, but this just makes the mouse go to the top left corner. I've spent a lot of time trying to fiddle with things to get it to work, but I don't know how. Help please.
SCAR Code:
program New;
{.include SRL/SRL.scar}
{.include SRL\SRL\skill\Woodcutting.scar}
var
c,c2,r,t:integer;
procedure FindAndChop;
begin
FindObj(x,y,'Tree',3303512,10)
mouse(x,y,1,1,false);
if (FindText(x,y,'Chop',UpChars,0,0,514,336))then
begin
ClickText('Chop',0,0,516,335)
end;
end;
begin
setupSRL;
LoadChars('');
activateclient;
wait(2000+random(1000));
FindAndChop;
end.