RenameFile

[Tokzic666]

Простенькая функция для переименовывания файла.

Код функции:

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;
}