I'm fairly new to this and after reading through a few tutorials, I spliced together the following script:

Program AttemptOne;

{$I SRL/SRL.Simba}
{$I P07Include.Simba}

//LOGIN INFO STUFF
Procedure P07_DeclarePlayer;
Begin
P07_PlayerName:='';
P07_PlayerPass:='';
End;


procedure ChopTree;
var x, y: integer;
begin
if FindObj(x, y, 'hop', 2836316, 35) then
begin
Mouse(x, y, 2, 2, false);
ChooseOption('hop');
end;
end;


Begin

P07_DeclarePlayer;
SetupP07Include;
ActivateClient;
Wait(2000);
If (Not P07_LoggedIn) Then
P07_LogInPlayer;
P07_MakeCameraAngleHigh;
P07_MakeCompassNorth;
ChopTree;

Writeln(P07_GetUpText);

If P07_BankScreen Then
WriteLn('Bank is Open');
If P07_InvFull Then
WriteLn('Inventory is Full');

End.


When I run it, it logs in successfully and then the mouse just moves around randomly. I know for a fact that I selected the correct color with the color picker but the script still seems to be having trouble finding the object.

Any ideas?

Any help will be greatly appreciated