al ves te sirva
escritura pic 16f877
;BITS DE MEMORIA EEPROM
SPEN EQU 7
EEPGD EQU 7
EEIE EQU 4
WREN EQU 2
RD EQU 0
GIE EQU 7
WR EQU 1
EEIF EQU 4
saludos
ESCRIBIR
BCF STATUS,6 ;BANCO 0
BCF STATUS,5
MOVF ADDR_L,W
BSF STATUS,6 ;BANCO 2 SE METE EEADR LA DIRECCION
MOVWF EEADR ;A LA QUE SE BA A ACCEDER.
BCF STATUS,6 ;BANCO CERO
MOVF MINUTO,W ;SE METE EN EEDATA EL DATO A
BSF STATUS,6
MOVWF EEDATA ;ESCRIBIR
BSF STATUS,5 ;BANCO 3
BCF EECON1,EEPGD ;ACCESO A LA MEMORIA DE PROGRAMA
BSF EECON1,WREN ;HABILITO ESCRITURA DE EEPROM.
MOVLW 55H
MOVWF EECON2
MOVLW 0AAH
MOVWF EECON2
BSF EECON1,WR ;SE LE DA ORDEN A LA ESCRITURA.
MOVLW B'11000000' ;HABILITO INTERRUPCIONES.
MOVWF INTCON
BCF STATUS,6 ;BANCO 0
BCF STATUS,5
RET BTFSS PIR2,EEIF ;¿ESCRITURA LISTA? SI, SALTE.
GOTO RET ;NO GOTO RET
BCF PIR2,EEIF ;BORRAR BIT DE PREGUNTA.
BSF STATUS,5
BSF STATUS,6
BCF EECON1,WREN
BCF STATUS,6 ;BANCO 0
BCF STATUS,5
RETURN
saludos