SCAR Code:
function WalkPath(step : Integer) : Boolean;//Steps 1, 2, 3 are walking To the GE. Steps 4, 5, 6 are walking back.
var
x, y, count, PathColor : Integer;
Info : array of TIntegerArray;
begin
if not LoggedIn then Exit;
FindNormalRandoms;
Writeln('Performing step ' + IntToStr(step) + ' of path walking');
Info := [ TIntegerArray([180, 270, 65, 1, -1, 0]),
TIntegerArray([265, 280, 65, 1, 0, 10]), TIntegerArray([]),
TIntegerArray([90, 85, 65, -1, 0, 10]),
TIntegerArray([85, 70, 65, -1, 0, 10]),
TIntegerArray([50, 0, 68, -1, 0, 10])];
if Step <> 3 then
begin
repeat
PathColor := FindPathColor('dirt');
if RadialRoadWalk(PathColor, Info[Step][0], Info[Step][1], Info[Step][2], Info[Step][3], Info[Step][4]) then
begin
Result := FFlag(Info[Step][5]);
Writeln('Step ' + IntToStr(Step) + ' completed successfully.');
exit;
end;
Writeln('Attempt ' + IntToStr(Count) + ' was unsuccessful. Trying again...');
inc(count);
until(Count > 4);
end else
begin
PathColor := FindPathColor('stone');
if GetColor(575, 80) <> PathColor then
Mouse(570, 80, 2, 2, True)
else
Mouse(575, 80, 2, 2, True);
Wait(1000+RanInt(200));
result := FFlag(20);
end;
end;
Should work. Not sure though..