;ESTAS SON UNAS RUTINAS PARA LEER Y GRABAR EN LA EEPROM
ReadEE
bcf STATUS, RP0 ;Bank0
movf DIRECCIONEE, w
bsf STATUS, RP0 ;Bank1
movwf EEADR
bsf EECON1, RD ;start read
movf EEDAT, W
bcf STATUS, RP0 ;Bank0
return
WriteEE
bcf STATUS, RP0 ;me aseguro de estar en el banco 0 para trabajar con la variable DIRECCIONEE
movf DIRECCIONEE, W ;guardo en W la dirección en la cual quiero escribir
bsf STATUS, RP0 ;paso al banco 1
movwf EEADR ;muevo al registro EEADR la direccion en la cual quiero escribir
bcf STATUS, RP0 ;vuelvo al banco 0, para trabajar con la variable DATOSEE
movf DATOSEE, W ;muevo a W los datos que quiero escribir
bsf STATUS, RP0 ;vuelvo al banco 1
movwf EEDAT ;muevo al registro EEDAT el dato a escribir
bcf INTCON, GIE ;deshabilito las interrupciones
bsf EECON1, WREN ;habilito la escritura
movlw 0x55
movwf EECON2
movlw 0xAA
movwf EECON2
bsf EECON1, WR ;comienzo la escritura
btfsc EECON1, WR ;testeo para saber si termino la escritura
goto $-1 ;si no termino vuelvo a la linea anterior
bsf STATUS, RP0 ;paso al banco 1
bcf EECON1, WREN ;deshabilito la escritura
bcf STATUS, RP0
bsf INTCON, GIE ;habilito las interrupciones