Чтение из файла и запись в игре

string path = "C:\12345.txt"; // путь к файлу

string s[9999];
int i, count_line;

if(fopen(path, "r")) // открыть файл для чтения
{
for(i=0; freadline(s[i]) && i<sizearray(s)-1; i++){} fclose(); // прочитать файл в массив
count_line = i;
messagebox("Всего строк в файле: "+format(count_line));

// тут нужные действия
for(i=0; i<count_line; i=i+5)
{
messagebox(s[i]);
messagebox(s[i+1]);
messagebox(s[i+2]);
messagebox(s[i+3]);
messagebox(s[i+4]);
messagebox("Следующий предмет");
}
}
else messagebox("Файл не найден");

string path = "E:\5.txt"; // путь к файлу

string s[9999];
int i, count_line;

if(fopen(path, "r")) // открыть файл для чтения
{
for(i=0; freadline(s[i]) && i<sizearray(s)-1; i++){} fclose(); // прочитать файл в массив
count_line = i;

mouse_(0, 13, 503, 255, 100);
mouse_(0, 4, 503, 255, 100);
mouse_(0, 7, 503, 255, 100);

for(i=0; i<count_line; i=i+999)
{
key(s[i]);
}
}
else messagebox("Файл не найден");

string path = "E:\5.txt"; // путь к файлу

string s[9999];
int i, count_line;

if(fopen(path, "r")) // открыть файл для чтения
{
for(i=0; freadline(s[i]) && i<sizearray(s)-1; i++){} fclose(); // прочитать файл в массив
count_line = i;
messagebox("Всего строк в файле: "+format(count_line));


// тут нужные действия
for(i=0; i<count_line; i=i+5)
{
mouse(LEFT, 230, 200);
key(s[i]);
mouse(LEFT, 230, 220);
key(s[i+1]);
mouse(LEFT, 230, 240);
key(s[i+2]);
mouse(LEFT, 230, 260);
key(s[i+3]);
mouse(LEFT, 230, 280);
key(s[i+4]);

messagebox("Следующий предмет");
}
}
else messagebox("Файл не найден");

int i=0;

loop()
{
messagebox("Переменная i = "+format(i));
i=i+5;
}