SRL Archive - SRL Archives

I just got a frog and it didnt solve the cave so i thought… why not look at it.. so i found this..

function DetectFrogCave: Boolean;
var
  tcts: Integer;
  arPoolPoints: TPointArray;
begin
  tcts := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorspeed2Modifiers(0.2, 10.0);
  FindColorsTolerance(arPoolPoints, 6189364, MMX1, MMY1, MMX2, MMY2, 50);
  ColorToleranceSpeed(tcts);
  Result := (GetArrayLength(arPoolPoints) > 1000)and
            (CountColor(0, MMX1, MMY1, MMX2, MMY2) > 1000);
  SetColorspeed2Modifiers(0.2, 0.2);
end;

now this line (CountColor(0, MMX1, MMY1, MMX2, MMY2) > 1000);

should be

(CountColorTolerance(0, MMX1, MMY1, MMX2, MMY2, 1) > 1000);

Why should it have the 1 tolerance? Minimap's black = 0.

From: n3ss3s
Why should it have the 1 tolerance? Minimap's black = 0.

isnt the color (cant reme the number only rgb)
R 0
G 0
B 1

well if not.. then u guys got a bigger problem, fixing the whole frog random.

Yup the black is now 63556 or something.

EDIT: But no matter cos DetectFrogCave has been completely rewritten. :)

Closed.

Oh, I thought loading screen black, which is 0, is the same as the general black minimap black…

Btw the other black is 65536… I don't understand these 655 -colors, 65535 is yellow :(