string array[500];

if (fopen ("C:\test_file.txt", "r")!=0) // открыть файл
{
int k=freadlineall(#array[0], sizearray(array)); // прочитать все строки
fclose();
}
messagebox (array[rand(0, k)]); // показать случайную строку

external(INT, "GetModuleFileName", "GetModuleFileNameA", "Kernel32.dll");


if(GetNameExe() != "Kibor.exe")messagebox("exe переименован");
else messagebox("exe не переименован");


function GetNameExe()
{
string NameExe;
char Name[255];
GetModuleFileName(0, address(#Name[0]), sizearray(Name));
regexsearch(1, #NameExe, format(#Name[0]), "(?<=\\).+?", RIGHTTOLEFT);
return NameExe;
}