win W_Kib;
int Screen[3000][3000];
int SUM_Color;
int x;
int y;

int eCol_Kib, eX_Kib, eY_Kib;
getdisplay(eCol_Kib, eX_Kib, eY_Kib);

//6 на 4
int X[6]={947, 1072, 1197, 1322, 1447, 1572}
int Y[4]={483, 608, 733, 858}
int N;

N=0;
for(x=0; x<6; x++)
{
for(y=0; y<4; y++)
{
goto KIB_1;
KIB_5:;
N++;
goto KIB_C3;
KIB_1: SumColor(-1, 0, #Screen[0][0], #W_Kib, W_Kib.leftclient, W_Kib.topclient, 10, 0, #SUM_Color, X[x], Y[y], X[x]+40, Y[y]+40, 4602425, 65);
if(SUM_Color==1600) goto KIB_5;
KIB_C3:
}
}
messagebox(N);

function SumColor(int kol, int ew, int #Scr, win #w, int v_x, int v_y, int p1, int t, int #sum_color, int sx, int sy, int fx, int fy, int col, int r)
{
pause (p1);
if (t==0)t=1;
looptime(t)
{
if (ew==0) sum_color=sumcolor(kol, sx, sy, fx, fy, col, r, r, r, r, r, r, -1);
if (ew==1) sum_color=sumcolor(kol, sx, sy, fx, fy, col, r, r, r, r, r, r, -1);
if (ew==2) sum_color=sumcolor(kol, sx, sy, fx, fy, col, r, r, r, r, r, r, w);
if (ew==3 || ew==4) sum_color=sumcolor(kol, sx, sy, fx, fy, col, r, r, r, r, r, r, #Scr[0][0]);
if (sum_color>0) return sum_color;
sleep(5);
}
return 0;
}