Hey everyone,
As you (might) know,
I am working on a Tutorial Island Runner.
Now I want to walk from the master chef to the quest guide,
Using autocolor for roadcolor finding and radialwalk for clicking.
I did this also for underground, and that worked.
But this keeps on failing.
Can someone please tell me what I am doing wrong?
I'll rep++ you if you can fix my problem
Here is a picture of where I want to walk.
I need to walk to the red arrow direction

Here is my function:
SCAR Code:
program test;
{.include SRL/SRL.scar}
function FindBrownRoadColor: Integer;
var
GC, a, l, TestColor, Red, Green, Blue: integer;
var
P:array of Tpoint;
begin
GC := 4681598;
Flag;
FindColorsSpiralTolerance(MMCX, MMCY, P, GC, MMX1, MMY1, MMX2, MMY2, 140);
l:=GetArrayLength(P);
for a:= 0 to l-1 do
begin
if rs_OnMinimap(P[a].x,P[a].y) then
begin
TestColor := GetColor(P[a].x,P[a].y);
if SimilarColors(TestColor,GC,140) then
begin
ColorToRGB(TestColor, Red, Green, Blue);
if InRange(Red - Green, 5, 33) then if Red <= 120 then
if InRange(Green - Blue, 17, 58) then
if InRange(Red - Blue, 30, 75) then if Blue <= 45 then
if GetColor(P[a].x + 5, P[a].y + 5) = TestColor then
if GetColor(P[a].x + 3, P[a].y + 3) = TestColor then
if GetColor(P[a].x, P[a].y + 5) = TestColor then
if GetColor(P[a].x + 5, P[a].y) = TestColor then
if GetColor(P[a].x, P[a].y + 3) = TestColor then
if GetColor(P[a].x + 3, P[a].y) = TestColor then
if GetColor(P[a].x + 5, P[a].y + 3) = TestColor then
if GetColor(P[a].x + 3, P[a].y + 5) = TestColor then
begin
Result := TestColor;
WriteLn('BrownRoadColor = ' + IntToStr(TestColor));
Exit;
end;
end;
end;
end;
WriteLn('Could not find BrownRoadColor!');
Result := 0;
end;
begin
SetupSRL;
ActivateClient;
FindBrownRoadColor;
end.
Thanks a lot, PvH