int r=10;
int color[3], kol[3];
int x[20], y[20];
int colors, xw, yw;
color[0]=15990775; color[1]=8847032; color[2]=4192909;
kol[0]=1; kol[1]=1; kol[2]=1;
sleep(500);
getdisplay(colors, xw, yw);
int k=findheapcolor(20, #color[0], #kol[0], 3, 3, #x[0], #y[0], 30, 30, 50, 50, 0, 0, xw, yw, r, r, r, r, r, r, -1);

textbkcolor (8454143,255);
for (int n=0; n<k; n++)
{
textout(n, x[n], y[n] , format(n), 0);
mousemove(x[n], y[n]);
sleep(1000);
}
messagebox (format(k)+" объектов нашли");