while(1)
{
parpadeo_led(1);
Enviar_dato_serie(traducetemp2(munidades));
Enviar_dato_serie(traducetemp(mdecenas));
value = read_adc();
tv=5.0*value /256.0;
Entero2BCD(tv);
Enviar_dato_serie(traduce7seg(hunidades));
Enviar_dato_serie(traduce7seg(hdecenas));
}