
Originally Posted by
BMWxi
It's usually easier just to start from scratch, but if it's from just before EOC or something some recently outdated ones might work.
What does do when you run this:
Simba Code:
program ChopTree;
{$i srl/srl.simba}
begin
MouseSpeed := 15;
SetupSRL;
MMouse(0, 0, 0, 0);
end.
That moves the mouse over to the top left corner of the client.

Originally Posted by
Sjoekeloe
Call mousespeed after SetupSRL;
Use BMWxi's tester script, see if it moves the corner of the client (if not then there are coordinates off-set)
and
Simba Code:
Program ChopTree;
{$i srl/srl.simba}
Procedure ClickTree;
var
X,Y:Integer;
begin
if FindColorTolerance(X, Y, 2702913, 374, 171, 457, 237, 5) then
begin
Writeln('Found Color') // always use debug lines after if then statements to see whether it HAS been found.
mmouse(x, y,1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
end;
end.
This is the code i just tried:
Code:
Program ChopTree;
{$i srl/srl.simba}
Procedure ClickTree;
var
X,Y:Integer;
begin
if FindColorTolerance(X, Y, 2702913, 374, 171, 457, 237, 5) then
begin
Writeln('Found Color') // always use debug lines after if then statements to see whether it HAS been found.
mmouse(x, y,1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
end;
end;
Begin
SetupSRL;
MouseSpeed := 15;
ClickTree;
end.
It still doesn't do anything. This is all i get:
Code:
Compiled successfully in 702 ms.
SRL Compiled in 15 msec
Successfully executed.

Originally Posted by
RJJ95
Or he can go hardcore and make working up text and edit sps,
But yea just start from scratch since the srl functions won't work unless the server is 100% like rs
I was following you're guide, just to get a basic idea of what to do. I just can't get it to do anything. And i don't think i know enough to make my own upText and edit the SPS 
Thanks for the help everyone!