Простенькая функция для переименовывания файла.
Код функции:
Код функции:
Код:
stock RenameFile(filename[], newname[])
{
if(!fexist(filename)) return false;
new File:ohnd,File:nhnd;
ohnd=fopen(filename,io_read);
nhnd=fopen(newname,io_write);
new buf2[1];
new i;
for (i=flength(ohnd);i>0;i--) {
fputchar(nhnd, fgetchar(ohnd, buf2[0],false),false);
}
fclose(ohnd);
fclose(nhnd);
fremove(filename);
return 1;
}