SRL Archive - SRL Bugs

Well, jagex has changed their Rocks again. So now, checking the difference of the colours on the rock won't work any more.

okie doke
i will update

~shut

EDIT: nope it still works fine
no need for an update

No, some worlds rocks are different (For me)
There is only two layers, instead of 3 in each rock.
I'll take pics when I get home ;)

ok well i will do another one and you can see if it works better

~shut

EDIT:try this

function FindRockColor: Integer;
var
  GC, a, l, TestColor: integer;
var
  P:array of Tpoint;
begin
  GC := 5591394;
  Flag;
  FindColorsSpiralTolerance(MMCX,MMCY, P, GC, MMX1,MMY1,MMX2,MMY2, 80);
  l:=GetArrayLength(P);
  for a:= 0 to l-1 do
  begin
    TestColor := GetColor(P[a].x,P[a].y);
    if (TestColor-GetColor(P[a].x-1,P[a].y)=1250837)then
    begin
      Result := TestColor;
      WriteLn('Rock Color = ' + IntToStr(TestColor));
      Exit;
    end;
  end;
  WriteLn('Could not find Rock Color!');
  Result := 0;
end;

I changed the 1250837 to 2039582 and it work much faster.