Распознание цифр

mouse(LEFT, 721, 646); // клик левой кнопкой в координаты
sleep(2000); // ждём 2 секунды

string Text; // в строку запишется результат распознания
loadsymbolbase ("C:\Program Files\Kibor\basetext.sib"); // путь к базе символов
if(readtext (NUM | MARK, #Text, 8, 1, -1, -1, -1, -1, -1, 0, -1, 733, 831, 780, 848, -1) > 0) // если распознан хотя бы один символ
{
messagebox (Text); // что распозналось

if(formatsn(Text)>0 && formatsn(Text)<=50.000) // если распознаный текст является числом больше 0 и меньше 50.000
{
messagebox("111"); // если условие истина
}
else
{
messagebox("000"); // если ложь
}
}

string TEXT="1 15.000 ea"; // допустим это распознаный текст
char CTEXT[1000];
strcpy(#CTEXT[0], TEXT);

messagebox(format(#CTEXT[0]));
deletetext(#CTEXT[0], " " | "." | "," | "a" | "e"); // удаляем из строки все пробелы, точки, запятые, буквы 'e' и 'a'
messagebox(format(#CTEXT[0]));