Попробую с 0 написать необычного робота

int Image_0[62][22];loadimage (#Image_0[0][0], "C:\Image_0.bmp");
int rzz=10, pr=90;
int PosX_0, PosY_0;
if (findimage(1, #Image_0[0][0], 0, #PosX_0, #PosY_0, 0, 0, 1366, 706, rzz, rzz, rzz, rzz, rzz, rzz, pr, 1, -1)==1)
{
mouse(LEFT, PosX_0+10, PosY_0+10);
}
else messagebox ("Íå íàøëè.");

int color, xe, ye;//ðàçðåøåíèå ýêðàíà
getdisplay(color, xe, ye);//Óçíàòü ðàçðåøåíèå ýêðàíà


int stvol_X[1], stvol_Y[1];// êîîðäèíàòû ñòàðòîâîé òî÷êè â âîëåéáîëå
int k1_X[2], k1_Y[2];//êîîðäèíàòû íà÷àëà è êîíöà ðàìêè ãäå èñêàòü 1êîýô
int Ck1_x[10], Ck1_y[10];//êîîðäèíàòû íàéäåíûõ öèôð 1êîýô 3øò
int fl1[10];// ôëàã, 1 åñëè íàéäåíà öèôðà 1êîýô
int rast_k1_x;//ðàñòîÿíèå îò öèôðû äî íà÷àëà ðàìêè ïîèñêà 1êîýô

int n;
int CIF;
string kf1;// 1êîýô

int razmerX[10];//òóò ðàçìåðû ðèñóíêîâ öèôð
[i](Добавление)[/i]
//Çàãðóçêà ðèñóíêîâ
int im_stvol[107][11];loadimage (#im_stvol[0][0], "C:\Image_ishody po setam.bmp");//ðèñ ñòàðòîâîé òî÷êè â âîëåéáîëå

//ðèñ öèôð
int C_0[6][8];loadimage (#C_0[0][0], "C:\0_citi.bmp");
int C_1[5][8];loadimage (#C_1[0][0], "C:\1_citi.bmp");
int C_2[6][8];loadimage (#C_2[0][0], "C:\2_citi.bmp");
int C_3[6][8];loadimage (#C_3[0][0], "C:\3_citi.bmp");
int C_4[7][8];loadimage (#C_4[0][0], "C:\4_citi.bmp");
int C_5[6][8];loadimage (#C_5[0][0], "C:\5_citi.bmp");
int C_6[6][8];loadimage (#C_6[0][0], "C:\6_citi.bmp");
int C_7[6][8];loadimage (#C_7[0][0], "C:\7_citi.bmp");
int C_8[6][8];loadimage (#C_8[0][0], "C:\8_citi.bmp");
int C_9[6][8];loadimage (#C_9[0][0], "C:\9_citi.bmp");

razmerX[0]=imagewidth(#C_0[0][0]);
razmerX[1]=imagewidth(#C_1[0][0]);
razmerX[2]=imagewidth(#C_2[0][0]);
razmerX[3]=imagewidth(#C_3[0][0]);
razmerX[4]=imagewidth(#C_4[0][0]);
razmerX[5]=imagewidth(#C_5[0][0]);
razmerX[6]=imagewidth(#C_6[0][0]);
razmerX[7]=imagewidth(#C_7[0][0]);
razmerX[8]=imagewidth(#C_8[0][0]);
razmerX[9]=imagewidth(#C_9[0][0]);
[i](Добавление)[/i]
if (findimage(1, #im_stvol[0][0], 0, #stvol_X[0], #stvol_Y[0], 0, 0, xe, ye, -1)==1)//Íàøëè åñëè ðèñóíîê ñòàðòîâîé òî÷êè â âîëåéáîëå
{
//ðàñ÷åò ðàìêè ïîèñêà öèôð èñõîäÿ èç êîîðäèíàò ðèñóíêà òðóáêè
X[0]=stvol_X[0]; Y[0]=stvol_Y[0];
X[1]=X[0]+52; Y[1]=Y[0]+40;

kf1="";

int s=0;
skan:if (s<3)//èùåì 3 öèôðû
{
[i](Добавление)[/i]
//èùåì ïî 1 öèôðå â ðàìêå ïîèñêà. çàïèñûâàåì êîîðäèíàòû
fl[0]=findimage(1, #C_0[0][0], 255, #Ck1_x[0], #Ck1_y[0], X[0], Y[0], X[1], Y[1], -1);
fl[1]=findimage(1, #C_1[0][0], 255, #Ck1_x[1], #Ck1_y[1], X[0], Y[0], X[1], Y[1], -1);
fl[2]=findimage(1, #C_2[0][0], 255, #Ck1_x[2], #Ck1_y[2], X[0], Y[0], X[1], Y[1], -1);
fl[3]=findimage(1, #C_3[0][0], 255, #Ck1_x[3], #Ck1_y[3], X[0], Y[0], X[1], Y[1], -1);
fl[4]=findimage(1, #C_4[0][0], 255, #Ck1_x[4], #Ck1_y[4], X[0], Y[0], X[1], Y[1], -1);
fl[5]=findimage(1, #C_5[0][0], 255, #Ck1_x[5], #Ck1_y[5], X[0], Y[0], X[1], Y[1], -1);
fl[6]=findimage(1, #C_6[0][0], 255, #Ck1_x[6], #Ck1_y[6], X[0], Y[0], X[1], Y[1], -1);
fl[7]=findimage(1, #C_7[0][0], 255, #Ck1_x[7], #Ck1_y[7], X[0], Y[0], X[1], Y[1], -1);
fl[8]=findimage(1, #C_8[0][0], 255, #Ck1_x[8], #Ck1_y[8], X[0], Y[0], X[1], Y[1], -1);
fl[9]=findimage(1, #C_9[0][0], 255, #Ck1_x[9], #Ck1_y[9], X[0], Y[0], X[1], Y[1], -1);
[i](Добавление)[/i]
//òóò ïåðåáèðàåì íàéäåííûå öèôðû
rast_x=99999;
n=0;
lop: if(n<10)
{
if (fl1[n]==1)//åñëè òàêàÿ öèôðà âîîáùå íàéäåíà
{
if (Ck1_x[n]-X[0]<rast_ê1_x)//ïðîâåðÿåì ðàñòîÿíèå îò íà÷àëà ðàìêè äëÿ ïîèñêà äî öèôðû
{//åñëè îíî ìåíüøå óæå íàéäåííîãî çíà÷èò öèôðà ëåâåå. çïàèñûâàåì åå è íîâîå ðàñòîÿíèå
CIF=n;
rast_x=Cê1_x[n]-X[0];
}
[i](Добавление)[/i]
}
n++;
goto lop;
}
if (rast_k1_x==99999)goto t;//Åñëè ïåðåìåííàÿ íå èçìåíèëàñü. íåò öèôð
X[0]=X[0]+Ck1_x[CIF]+razmerX[CIF];//ðàñ÷åò íîâîãî X äëÿ ðàìêè ïîèñêà. ÷òî áû ñëåäóþùèé ïîèñê íà÷èíàòü óæå ïîñëå íàéäåíîé öèôðû

kf1=kf1+format(CIF);//ïðèïèøåì íàéäåíóþ öèôðó
s++;
goto skan;
}

}
t:;

messagebox(kf1)
[i](Добавление)[/i]
ожидал ошибки где угодно, но почему-то она выскочила перед началом перебора:

http://clip2net.com/s/6y3zXT

Владимир, подскажите, пож что ему надо?
[i](Добавление)[/i]
так ну присмотревшись я увидел что во всех флагах забыл 1 добавить:

//èùåì ïî 1 öèôðå â ðàìêå ïîèñêà. çàïèñûâàåì êîîðäèíàòû
fl1[0]=findimage(1, #C_0[0][0], 255, #Ck1_x[0], #Ck1_y[0], X[0], Y[0], X[1], Y[1], -1);
fl1[1]=findimage(1, #C_1[0][0], 255, #Ck1_x[1], #Ck1_y[1], X[0], Y[0], X[1], Y[1], -1);
fl1[2]=findimage(1, #C_2[0][0], 255, #Ck1_x[2], #Ck1_y[2], X[0], Y[0], X[1], Y[1], -1);
fl1[3]=findimage(1, #C_3[0][0], 255, #Ck1_x[3], #Ck1_y[3], X[0], Y[0], X[1], Y[1], -1);
fl1[4]=findimage(1, #C_4[0][0], 255, #Ck1_x[4], #Ck1_y[4], X[0], Y[0], X[1], Y[1], -1);
fl1[5]=findimage(1, #C_5[0][0], 255, #Ck1_x[5], #Ck1_y[5], X[0], Y[0], X[1], Y[1], -1);
fl1[6]=findimage(1, #C_6[0][0], 255, #Ck1_x[6], #Ck1_y[6], X[0], Y[0], X[1], Y[1], -1);
fl1[7]=findimage(1, #C_7[0][0], 255, #Ck1_x[7], #Ck1_y[7], X[0], Y[0], X[1], Y[1], -1);
fl1[8]=findimage(1, #C_8[0][0], 255, #Ck1_x[8], #Ck1_y[8], X[0], Y[0], X[1], Y[1], -1);
fl1[9]=findimage(1, #C_9[0][0], 255, #Ck1_x[9], #Ck1_y[9], X[0], Y[0], X[1], Y[1], -1);

X[0], Y[0], X[1], Y[1]

int color, xe, ye;//разрешение экрана
getdisplay(color, xe, ye);//Узнать разрешение экрана


int stvol_X[1], stvol_Y[1];// координаты стартовой точки в волейболе
int k1_X[2], k1_Y[2];//координаты начала и конца рамки где искать 1коэф
int Ck1_x[10], Ck1_y[10];//координаты найденых цифр 1коэф 3шт
int fl1[10];// флаг, 1 если найдена цифра 1коэф
int rast_k1_x;//растояние от цифры до начала рамки поиска 1коэф

int n;
int CIF;
string kf1;// 1коэф

int razmerX[10];//тут размеры рисунков цифр

//Загрузка рисунков
int im_stvol[107][11];loadimage (#im_stvol[0][0], "C:\Image_ishody po setam.bmp");//рис стартовой точки в волейболе

//рис цифр
int C_0[6][8];loadimage (#C_0[0][0], "C:\0_citi.bmp");
int C_1[5][8];loadimage (#C_1[0][0], "C:\1_citi.bmp");
int C_2[6][8];loadimage (#C_2[0][0], "C:\2_citi.bmp");
int C_3[6][8];loadimage (#C_3[0][0], "C:\3_citi.bmp");
int C_4[7][8];loadimage (#C_4[0][0], "C:\4_citi.bmp");
int C_5[6][8];loadimage (#C_5[0][0], "C:\5_citi.bmp");
int C_6[6][8];loadimage (#C_6[0][0], "C:\6_citi.bmp");
int C_7[6][8];loadimage (#C_7[0][0], "C:\7_citi.bmp");
int C_8[6][8];loadimage (#C_8[0][0], "C:\8_citi.bmp");
int C_9[6][8];loadimage (#C_9[0][0], "C:\9_citi.bmp");

razmerX[0]=imagewidth(#C_0[0][0]);
razmerX[1]=imagewidth(#C_1[0][0]);
razmerX[2]=imagewidth(#C_2[0][0]);
razmerX[3]=imagewidth(#C_3[0][0]);
razmerX[4]=imagewidth(#C_4[0][0]);
razmerX[5]=imagewidth(#C_5[0][0]);
razmerX[6]=imagewidth(#C_6[0][0]);
razmerX[7]=imagewidth(#C_7[0][0]);
razmerX[8]=imagewidth(#C_8[0][0]);
razmerX[9]=imagewidth(#C_9[0][0]);

if (findimage(1, #im_stvol[0][0], 0, #stvol_X[0], #stvol_Y[0], 0, 0, xe, ye, -1)==1)//Нашли если рисунок стартовой точки в волейболе
{

//расчет рамки поиска цифр исходя из координат рисунка трубки
X[0]=stvol_X[0]; Y[0]=stvol_Y[0];
X[1]=X[0]+52; Y[1]=Y[0]+40;

kf1="";

int s=0;
skan:if (s<3)//ищем 3 цифры
{

//ищем по 1 цифре в рамке поиска. записываем координаты
fl1[0]=findimage(1, #C_0[0][0], 255, #Ck1_x[0], #Ck1_y[0], X[0], Y[0], X[1], Y[1], -1);
fl1[1]=findimage(1, #C_1[0][0], 255, #Ck1_x[1], #Ck1_y[1], X[0], Y[0], X[1], Y[1], -1);
fl1[2]=findimage(1, #C_2[0][0], 255, #Ck1_x[2], #Ck1_y[2], X[0], Y[0], X[1], Y[1], -1);
fl1[3]=findimage(1, #C_3[0][0], 255, #Ck1_x[3], #Ck1_y[3], X[0], Y[0], X[1], Y[1], -1);
fl1[4]=findimage(1, #C_4[0][0], 255, #Ck1_x[4], #Ck1_y[4], X[0], Y[0], X[1], Y[1], -1);
fl1[5]=findimage(1, #C_5[0][0], 255, #Ck1_x[5], #Ck1_y[5], X[0], Y[0], X[1], Y[1], -1);
fl1[6]=findimage(1, #C_6[0][0], 255, #Ck1_x[6], #Ck1_y[6], X[0], Y[0], X[1], Y[1], -1);
fl1[7]=findimage(1, #C_7[0][0], 255, #Ck1_x[7], #Ck1_y[7], X[0], Y[0], X[1], Y[1], -1);
fl1[8]=findimage(1, #C_8[0][0], 255, #Ck1_x[8], #Ck1_y[8], X[0], Y[0], X[1], Y[1], -1);
fl1[9]=findimage(1, #C_9[0][0], 255, #Ck1_x[9], #Ck1_y[9], X[0], Y[0], X[1], Y[1], -1);

//тут перебираем найденные цифры
rast_x=99999;
n=0;
lop: if(n<10)
{
if (fl1[n]==1)//если такая цифра вообще найдена
{
if (Ck1_x[n]-X[0]<rast_k1_x)//проверяем растояние от начала рамки для поиска до цифры
{//если оно меньше уже найденного значит цифра левее. зпаисываем ее и новое растояние
CIF=n;
rast_x=Cк1_x[n]-X[0];
}
}
n++;
goto lop;
}
if (rast_k1_x==99999)goto t;//Если переменная не изменилась. нет цифр
X[0]=X[0]+Ck1_x[CIF]+razmerX[CIF];//расчет нового X для рамки поиска. что бы следующий поиск начинать уже после найденой цифры

kf1=kf1+format(CIF);//припишем найденую цифру
s++;
goto skan;
}

}
t:;

messagebox(kf1);