sprintf(cadena,"%5Lu" resultado_CAD);
replace_char(' ','0',(char*) cadena);
/** \brief Reemplaza carácter en string null-terminated.
* \param c Carácter a sustituir.
* \param p Carácter nuevo a insertar.
* \param[out] pF Puntero a string null-terminated.
* \return void
*/
void replace_char(char c, char p, char* pF){
int8 i;
char x;
x=pF[0];
for(i=0;i<5,x!='\0';i++){
x=pf[i];
if(x==c){
pF[i]=p;
}
}
}