Sem título

Inicio

Configuración:

-A/D -Eeprom

-Usart -Timer

Conversión A/D

go=1

go=0

Muevo ADRESH a byte1

Swap byte1

byte1 + oxF

Call convASCII

Muevo ADRESH a byte2

byte2 + oxF

Call convASCII

Movf ADRESH,w

Call pushh

cont2=cont

p=i

Call delay

Muevo ADRESH a temp

cont < buffer_size

cont++

i > buffer_size

p=0

p=buffer_size

p --

Muevo p a EEADR

EEADR= buffer.datos+EEADR

Call LEER

Muevo EEDATA a temp

return

Context save

RCREG=A

Muevo byte1 a TXREG

Muevo byte2 a TXREG

cont2=buffer_size

RCREG=H

cont2=0

Call pop

tempp=byte3

Swap byte3

byte3 + oxF

Call convASCII

tempp=byte4

byte4 + 0xF

Call convASCII

TXIF=1

Muevo byte3 a TXREG

TXIF=1

Muevo byte4 a TXREG

TXIF=1

Muevo 0xA a TXREG

cont2 --

TXIF=1

TXIF=1

TXIF=1

Muevo 0xA a TXREG

Restaurar contexto

Retfie