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;