Не работает

if (fopen ("C:\files.txt", "a")!=0)
{
fwrite (rand(0, 9));
fclose();
}

external(INT, "rename_file", "rename", "msvcrt.dll");
string s[9999];
string random="";
string path = "C:\music"; // путь к папке

int count=dir(path, #s[0], "file"); // получить имена всех файлов в папке
for (int i=0; i<count; i++)
{
random="";
for (int j=0; j<5; j++)random=random+format(rand(0, 9)); // получить рандомное пятизначное число
rename_file (path+"\"+s[i], path+"\"+random+s[i]); // переименовать файл
}

external(INT, "rename_file", "rename", "msvcrt.dll");
string s[9999];
string new_name;
string path = "C:\music"; // путь к папке

int count=dir(path, #s[0], "file"); // получить имена всех файлов в папке
for (int i=0; i<count; i++)
{
// если имя файла начинается с 5-ти цифр, то удалить первые 5 символов
if(regexreplace(1, #new_name, s[i], "^\d{5}", ""))rename_file (path+"\"+s[i], path+"\"+new_name);
}