;PIC16F877單片機內部EEPROM讀寫實例****************************************************************************************
; This is a program to test the function of reading&writting for EEPROM.
; YouCANOBServe the value of register(30H--?) buy changing "VALU" and "WRC_".

; Notice that:it must be { ADDR+WRC_<=0ffh } !
; ;****************************************************************************************
include "p16f877.inc"
ADDR EQU 20H ;寫入地址寄存器
VALU EQU 21H ;寫入值
REC_ EQU 22H ;讀計數
WRC_ EQU 24H ;寫計數

ORG 0000H ;
NOP ;放置一條ICD必須的空操作指令
GOTO main ;
;ORG 0008H ;

;org 0
;goto main
main nop
bcf STATUS,RP1
bcf STATUS,RP0 ;bank0
movlw 20h
movwf ADDR ;寫入EEPROM初始值
;********************************************************************************************

clrf 8
bcf STATUS,2
DS2 nop
call DELAY
incf 8,1
movf 8,0
bcf STATUS,2
XORLW 0bh
btfss STATUS,Z
goto DS1
clrf 8
bcf STATUS,2
DS1 movf 8,0
bcf STATUS,2
call TABLE1
;***********************************************************************************************
;movlw 4fh
movwf VALU ;初始寫入值
movlw 30h
movwf FSR ;間址，讀出值初始存放地址
movlw 0Bh
movwf WRC_ ;寫入次數
movwf REC_
;incf REC_ ;讀出次數
wri_ ;寫子程序
bsf STATUS,RP1
bsf STATUS,RP0 ;bank3
btfsc EECON1,WR
goto $-1
bcf STATUS,RP0
bcf STATUS,RP1 ;bank0
movf ADDR,W
bsf STATUS,RP1 ;bank2
movwf EEADR
bcf STATUS,RP1 ;bank0
movf VALU,W
bsf STATUS,RP1 ;bank2
movwf EEDATA
bsf STATUS,RP0 ;bank3
bcf EECON1,EEPGD ;to data memory
bsf EECON1,WREN
bcf INTCON,GIE
movlw 55h
movwf EECON2
movlw 0aah
movwf EECON2
bsf EECON1,WR
btfsc EECON1,WR
goto $-1
bsf INTCON,GIE
bcf EECON1,WREN
bcf STATUS,RP0
bcf STATUS,RP1 ;bank0
incf ADDR,1
;incf VALU,1
;decf VALU,1
decfsz WRC_ ;all write,to read_
;goto wri_
goto DS2

read_ ;讀子程序
call TABLE1
bcf STATUS,RP1
bcf STATUS,RP0 ;bank0
decf ADDR ;next value
movf ADDR,W
bsf STATUS,RP1 ;bank2
movwf EEADR
bsf STATUS,RP0 ;bank3
bcf EECON1,EEPGD
bsf EECON1,RD
bcf STATUS,RP0 ;bank2
movf EEDATA,W
bcf STATUS,RP1 ;bnak0
movwf INDF ;存讀出值
incf FSR
decfsz REC_
goto read_
goto main
;*******************************************************************************
TABLE1 ;取第二行的顯示碼TEL0755 27528531
ADDWF 2 ;地址偏移量加當前PC值
RETLW 30H ;0
RETLW 32H ;2
RETLW 30H ;0
RETLW 33H ;3
RETLW 33H ;3
RETLW 31H ;1
RETLW 36H ;6
RETLW 30H ;0
RETLW 30H ;0
RETLW 30H ;0
RETLW 33H ;3
;*******************************************************************************
DELAY
MOVLW 0FF
MOVWF 11
DTLAY1 DECFSZ 11
GOTO DTLAY1
RETLW 0
;*******************************************************************************
end

EEw&r.asm程序說明：

1、 本程序是對PIC16F877 單片機 的EEPROM數據區(qū)進行讀寫的演示程序；

2、 wri_為寫入數據子程序，該子程序從ADDR寄存器確定的地址開始對EEPROM數據區(qū)寫入（范例從10H開始），每進行一次寫操作將使ADDR值加一；
寫入數據的初始值由VALU寄存器給定（范例值為90H），每進行一次寫操作將使VALU值減一；寫入規(guī)定個數（由WRC_寄存器給定，范例值為0FH）的
數值后，結束寫入，轉至read_。

3、 read_為讀出數據子程序，該子程序從ADDR寄存器當前值確定的地址開始對EEPROM數據區(qū)讀出（當前值=ADDR+WRC_<=0FFH），每進行一次讀操
作將使ADDR值減一；讀出數據后程序將把該數據存入通用寄存器中，開始存放的地址由FSR的值指定（范例為30H），每進行一次讀操作將使FSR的值
加一；讀出規(guī)定個數（由寄存器REC_給定，范例值為0FH）的數值后，結束讀出，回main。