string path_in="C:\1111.txt"; // путь к файлу в кодировке ANSI
string path_out="C:\2222.txt"; // куда сохранить в кодировке Unicode

// сохранить батник, разовая операция, потом можно оставить только start
if(fopen("C:\ANSIinUnicode.bat", "w")!=0)
{
fwrite("chcp 1251"); fwrite(ENDL);
fwrite("cmd /u/c type "+path_in+" >C:\temp.txt"); fwrite(ENDL);
fwrite("chcp 65001"); fwrite(ENDL);
fwrite("type C:\temp.txt >"+path_out);
fclose();
sleep(1000);
start("C:\ANSIinUnicode.bat"); // запустить батник
}

string text_KIB;
int sum_symbol_KIB;
int n_readtext_KIB;
int color_text_KIB_5[1];
color_text_KIB_5[0]=0;
double correct_symbol_KIB[45];
loadsymbolbase("C:\Users\Windows_7\Downloads\basetext.sib");

sum_symbol_KIB=readtext(RU | MARK, #text_KIB, 8, 1, -1, 50, -1, #color_text_KIB_5[0], -1, 0, 50, 1065, 208, 1313, 222, -1);
for (n_readtext_KIB=0; n_readtext_KIB<sum_symbol_KIB; n_readtext_KIB++)correct_symbol_KIB[n_readtext_KIB]=symbolcorrect(n_readtext_KIB);


if (fopen ("D:\програмирование-2\1zenoposter\RubSerf\Capcha_Rubserf\тест.txt", "w")!=0)
{
fwrite(text_KIB);
fclose();//закрываем файл
}

string path_in="D:\програмирование-2\1zenoposter\RubSerf\Capcha_Rubserf\тест.txt"; // путь к файлу в кодировке ANSI
string path_out="D:\програмирование-2\1zenoposter\RubSerf\Capcha_Rubserf\test_2.txt"; // куда сохранить в кодировке Unicode


start("C:\ANSIinUnicode.bat"); // запустить батник
}

string text_KIB="english text, русский текст"; // текст

string path_in="D:\ansi.txt"; // путь к файлу в кодировке ANSI
string path_out="D:\unicode.txt"; // куда сохранить в кодировке Unicode

if (fopen (path_in, "w")!=0)
{
fwrite(text_KIB);
fclose(); sleep(200);
}

// сохранить батник, разовая операция, потом можно оставить только start
if(fopen("D:\ANSIinUnicode.bat", "w")!=0)
{
fwrite("chcp 1251 >nul"); fwrite(ENDL);
fwrite("cmd /u/c type "+path_in+" >"+path_out); fwrite(ENDL);
fclose();
sleep(1000);
start("D:\ANSIinUnicode.bat"); // запустить батник
}

string text_KIB
int color_text_KIB_5[1];
color_text_KIB_5[0]=0;
loadsymbolbase("C:\Users\Windows_7\Downloads\basetext.sib");
win w_KIB;
int ex_KIB, ey_KIB, sum_KIB, x_KIB, y_KIB;

start_();

readtext(RU | MARK, #text_KIB, 8, 1, -1, 50, -1, #color_text_KIB_5[0], -1, 0, 50, 1059, 208, 1316, 223, w_KIB);




function start_()
{
pause(1000);
int x, y;
getmouse(x, y);
w_KIB=getwindow(0, x, y);
ex_KIB=w_KIB.widthclient; ey_KIB=w_KIB.heightclient;
}


if (fopen ("D:\програмирование-2\1zenoposter\RubSerf\Capcha_Rubserf\тест.txt", "w")!=0)
{
fwrite(text_KIB);
fclose();//закрываем файл
}


string text_KIB="english text, русский текст"; // текст

string path_in="D:\програмирование-2\1zenoposter\RubSerf\Capcha_Rubserf\тест.txt"; // путь к файлу в кодировке ANSI
string path_out="D:\програмирование-2\1zenoposter\RubSerf\Capcha_Rubserf\test_2.txt"; // куда сохранить в кодировке Unicode

if (fopen (path_in, "w")!=0)
{
fwrite(text_KIB);
fclose(); sleep(200);
}

// сохранить батник, разовая операция, потом можно оставить только start
if(fopen("D:\ANSIinUnicode.bat", "w")!=0)
{
fwrite("chcp 1251 >nul"); fwrite(ENDL);
fwrite("cmd /u/c type "+path_in+" >"+path_out); fwrite(ENDL);
fclose();
sleep(1000);
start("D:\ANSIinUnicode.bat"); // запустить батник
}

external(INT, "CopyFile", "CopyFileA", "kernel32.dll");

string text_KIB="english text, русский текст"; // текст

string path_in="D:\ansi.txt"; // путь к файлу в кодировке ANSI
string path_out="D:\unicode.txt";
string path_out2="D:\програмирование-2\1zenoposter\RubSerf\Capcha_Rubserf\test_2.txt"; // куда сохранить в кодировке Unicode


if (fopen (path_in, "w")!=0)
{
fwrite(text_KIB);
fclose(); sleep(200);
}

// сохранить батник, разовая операция, потом можно оставить только start
if(fopen("D:\ANSIinUnicode.bat", "w")!=0)
{
fwrite("chcp 1251 >nul"); fwrite(ENDL);
fwrite("cmd /u/c type "+path_in+" >"+path_out); fwrite(ENDL);
fclose();
sleep(1000);
start("D:\ANSIinUnicode.bat"); // запустить батник
}

sleep(2000);
CopyFile(path_out, path_out2, 0); // скопировать файл

string A=ansitoutf8("Текст в ANSI");
messagebox (A);
string S=utf8toansi (A);
messagebox (S);