BCF STATUS, RP0 ; Bank 0 MOVLW CONFIG_ADDR ; MOVWF EEADR ; Address to read BSF STATUS, RP0 ; Bank 1 BSF EECON1, RD ; EE Read BCF STATUS, RP0 ; Bank 0 MOVF EEDATA, W ; W = EEDATA
BSF STATUS, RP0 ; Bank 1 BCF INTCON, GIE ; Disable INTs. BSF EECON1, WREN ; Enable Writes ; the following steps must be performed in the order shown without interuption MOVLW 55h ; MOVWF EECON2 ; Write 55h MOVLW AAh ; MOVWF EECON2 ; Write AAh BSF EECON1,WR ; Set WR bit ; write begins BCF EECON1, WREN ; Disable writes BSF INTCON, GIE ; Enable INTs.
BCF STATUS,RP0 ; Bank 0 : ; Any code : ; can go here MOVF EEDATA,W ; Must be in Bank 0 BSF STATUS,RP0 ; Bank 1 READ BSF EECON1, RD ; YES, Read the value written BCF STATUS, RP0 ; Bank 0 ; ; Is the value written ; (in W reg) and ; read (in EEDATA) ; the same? ; SUBWF EEDATA, W ; BTFSS STATUS, Z ; Is difference 0? GOTO WRITE_ERR ; NO, Write error