can i just put a snippet in here about how easy auto-coloring is?
for example this auto-colors white walls of buildings, etc:
Simba Code:
function WallColor: Integer;
var
whteClrs: TIntegerArray;
clrs: TPointArray;
i, h, cnt: integer;
whtCount: TPoint;
begin
result := -1;
if not(FindColorsTolerance(clrs, 15595512, MMX1, MMY1, MMX2, MMY2, 30)) then EXIT;
FilterPointsPie(clrs, 0, 360, 10, 70, MMCX, MMCY);
whteClrs := GetColors(clrs);
ClearSameIntegers(whteClrs);
h := high(whteClrs);
for i:= 0 to h do
begin
cnt := CountColor(whteClrs[i], MMX1, MMY1, MMX2, MMY2);
if cnt > whtCount.x then
begin
whtCount.x := cnt;
whtCount.y := whteClrs[i];
end;
end;
result := whtCount.y;
end;