SRL Archive - SRL Archives

PercentBlackMM = Outdated


Harry

2008-05-15 17:47:17

Current one is Revision 16 is not working - colour in it is 0, the former colour for black on RS. Now it is 65536, so here is a quick fix I did in like 5 seconds for it so it works again ^^.

{*******************************************************************************
function PercentBlackMM: Integer;
by: Nielsie95 And Wizzup?, fixed by Hy71194
Description: Checks for missing GameTabs.
*******************************************************************************}

function PercentBlackMM: Integer;
var
cts: Integer;
p: TPointArray;
begin
cts := GetColorToleranceSpeed;
ColorToleranceSpeed(1);
FindColorsTolerance(p, 65536, MMX1, MMY1, MMX2, MMY2, 1);
Result := Round((Length(p) / 15741.0) * 100.0);
ColorToleranceSpeed(cts);
end;

Wizzup?

2008-05-15 18:07:02

program New;
begin
if similarcolors(0, 65536, 1) then writeln('hy does not test');
end.

SKy Scripter

2008-05-15 19:15:32

Lmfao if we put your name in SRL, we will scare everybody away.
why do that? :p



You know im playing with you right ? :)

Harry

2008-05-15 20:19:47

Meh… pwned by Wizzup? :(

Score:
Wizzup? : 1000^1000^1000 :p
Hy : 2 (I nudged 2 leechers to death on MSN once…)

Wizzup?

2008-05-16 05:11:05

Let's just lock this thread then. ;)