SRL Archive - OSR Help

This is for a rsps and when u cut the logs u get pkp points and u can burn them all without moving but i cant get it to burn any logs could someone help me add it in

program PkHonor;
{$i srl/srl.simba}

const
LOGS = 100;

Procedure ClickTree;
var
X,Y:Integer;
begin
repeat
if FindColorTolerance(X, Y, 14678264, 1, 5, 760, 502, 1) or
FindColorTolerance(X, Y, 12187896, 1, 5, 760, 502, 1) or
FindColorTolerance(X, Y, 11661552, 1, 5, 760, 502, 1) then
begin
mmouse(x, y,1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
wait(10000+random(5000));
KeyDown(39);
wait(RandomRange(50,100));
KeyUp(39);
end else
begin
KeyDown(39);
wait(RandomRange(100,200));
KeyUp(39);
wait(RandomRange(500,1000));
PressKey(118);
wait(500);
mmouse(648, 400, 1, 1);
wait(100)
ClickMouse(X, Y, mouse_Left);
wait(500);
mmouse(263, 447, 1, 1);
wait(100);
ClickMouse(X, Y, mouse_Left);
wait(10000);
end;
until (LOGS > 100);
end;

Begin
SetupSRL;
MouseSpeed := 30;
ClickTree;
end.

there is an invfull function you can use something like repeat begin clicking stuff end untill invfull or so many attempts. don't use an endless loop tho add some kind of timeout or attempt so if it messes up and never gets a full inv it will stop the loop.

Try bigger tolerances (last 1) and use MSX and MSY coordinates for mainscreen of RS. Also add random waits to all waitings.

if FindColorTolerance(X, Y, 14678264, MSX1, MSY1, MSX2, MSY2, 1)

Whay are you pressing those keys?