Ahora el FpgEditor 2013 tiene un botón que crea un subFolder llamado "REBUILD ASSET" con una copia de las imagenes en formato PNG pero con los nombres de archivo formateados jeje.. esto ya se empieza a poner interesante.. pocos programas "ninguno que yo sepa" hacen esto
La función me ha quedado así:
[Codebox=gemix file=Untitled.gemix]function Disk_Explorer_SUB_rebuild_folder();
private
int contador = 0;
string buffer_file_;
string extension;
int counter_;
int len_;
string bufferOUT;
int numCharsToFormat = 10;
string char_;
string newFolderName = "REBUILD ASSET";
begin
// crear el nuevo folder para guardar las imagenes ya con el nombre de archivo formateado..
mkdir( newFolderName );
get_dirinfo("*.*", _normal);
FOR (contador=0;contador<dirinfo.files;contador++) // recorrer la lista de archivos..
get_fileinfo(dirinfo.name[contador]); // recoejer la información del file actual..
extension = lower(fileinfo.ext); // guardo la extensión en una variable para no ejecutar lower muchas veces..
bufferOUT = "";
buffer_file_ = "";
if(extension==".map" or extension==".bmp" or extension==".jpg" or extension==".png" or extension==".tga" or extension==".pcx" )
buffer_file_ = fileinfo.name; // guardo el nombre del archivo sin extensión..
len_ = strlen( buffer_file_ );
counter_ = 0;
while( len_ => counter_ ) // mientras queden chars..
char_ = buffer_file_[len_ - counter_];
if( ISDIGIT( char_ ) ); // compruevo si es un digito numérico..
bufferOUT += char_; // si lo es lo añado a un buffer..
end
counter_ ++; // paso al siguiente char..
end
while( strlen(bufferOUT) < numCharsToFormat )
bufferOUT += "0";
end
// obtener el nombre definitivo de salida..
bufferOUT = STRREV(bufferOUT) + fileinfo.ext; // recompongo la cadena al revés y le añado la extensión.
// guardar en disco la nueva imagen con el nombre formateado para evitar los fallos en la adición de mapas
image_save( 0, image_load(fileinfo.name + fileinfo.ext), (newFolderName + "/" + bufferOUT), img_format_png );
end
end
return(0);
end[/Codebox]
![[RETO]: 20lineas - [JUEGO]: eLaberinto [RETO]: 20lineas - [JUEGO]: eLaberinto](../space/silver_medal.png)
![[CONCURSO]: EL JUEGO DEL VERANO 2011 - [JUEGO]: PlayaBall [CONCURSO]: EL JUEGO DEL VERANO 2011 - [JUEGO]: PlayaBall](../space/bronze_medal.png)