.module E2PROM.C
	.area text(rom, con, rel)
	.dbfile D:\學習\AVRpro\Mega16程序\TestLCD\E2PROM.C
	.dbfunc e E2PROM_Write _E2PROM_Write fV
;              i -> R10
;            Cnt -> y+1
;           Data -> R18,R19
;       IAddress -> R16,R17
	.even
_E2PROM_Write::
	st -y,R10
	.dbline -1
	.dbline 17
; //******************************************************************************
;  //MCU:ATMEL AVR MEGA16L ,晶振頻率：8MHz，頻率越高，播放Mp3越流暢
;  //用到硬件器件: MEGA16L內部的512B EEPROM
;  //EEPROM用來保存基本的參數，如:
;  //音量(0)、重低音(1)、當前歌曲(2,3)、遙控模式(4)
;  //RECS80遙控按鍵(5-8,9-12,13-16,17-20).
;  //RC5遙控按鍵(21-24,25-28,29-32,33-36).
;  //制作人:平頂山工學院計算機系,郭猛
; //******************************************************************************
; # include "iom16v.h"
; # include "macros.h"
; 
; //在E2PROM寫入指定長度的數據
; //IAddress:起始地址，*Data:要寫入的數據首地址，Cnt:要寫入的數據個數
; //函數無返回值
; void E2PROM_Write(unsigned int IAddress,unsigned char *Data,unsigned char Cnt)
; {
	.dbline 19
;    unsigned char i;
;    CLI();	//程序進入臨界區
	cli
	.dbline 20
;    for(i=0;i<Cnt;i++)
	clr R10
	xjmp L5
L6:
	.dbline 23
;    {
;    	   //等待前一次寫操作完畢
;    	   while(EECR & BIT(EEWE)) ;
L7:
	.dbline 23
	sbic 0x1c,1
	rjmp L6
X0:
	.dbline 24
;    	   EEAR = IAddress + i;
	mov R2,R10
	clr R3
	movw R4,R16
	add R4,R2
	adc R5,R3
	out 0x1f,R5
	out 0x1e,R4
	.dbline 25
;    	   EEDR = Data[i];
	mov R30,R2
	clr R31
	add R30,R18
	adc R31,R19
	ldd R2,z+0
	out 0x1d,R2
	.dbline 26
; 	   EECR|= BIT(EEMWE);
	sbi 0x1c,2
	.dbline 27
; 	   ;;;;	  //等待4個周期
	.dbline 27
	.dbline 27
	.dbline 27
	.dbline 28
; 	   EECR|= BIT(EEWE);
	sbi 0x1c,1
	.dbline 29
;    } 
L3:
	.dbline 20
	inc R10
L5:
	.dbline 20
	ldd R0,y+1
	cp R10,R0
	brlo L7
X1:
	.dbline 30
;    SEI();	//程序退出臨界區
	sei
	.dbline -2
L1:
	.dbline 0 ; func end
	ld R10,y+
	ret
	.dbsym r i 10 c
	.dbsym l Cnt 1 c
	.dbsym r Data 18 pc
	.dbsym r IAddress 16 i
	.dbend
	.dbfunc e E2PROM_Read_OneChar _E2PROM_Read_OneChar fc
;       IAddress -> R16,R17
	.even
_E2PROM_Read_OneChar::
	.dbline -1
	.dbline 37
; }
; 
; //在E2PROM寫入指定長度的數據
; //IAddress:起始地址，*Data:要寫入的數據首地址，Cnt:要寫入的數據個數
; //函數返回一個字節
; unsigned char E2PROM_Read_OneChar(unsigned int IAddress)
; {
	.dbline 38
;    CLI();	  //程序進入臨界區
	cli
L10:
	.dbline 40
;    //等待前一次操作完畢
;    while(EECR & BIT(EEWE)) ;
L11:
	.dbline 40
	sbic 0x1c,1
	rjmp L10
X2:
	.dbline 41
;    EEAR = IAddress;
	out 0x1f,R17
	out 0x1e,R16
	.dbline 42
;    EECR|= BIT(EERE);
	sbi 0x1c,0
	.dbline 43
;    ;	  //等待1個周期
	.dbline 44
;    SEI(); 	 //程序退出臨界區
	sei
	.dbline 45
;    return EEDR;
	in R16,0x1d
	.dbline -2
L9:
	.dbline 0 ; func end
	ret
	.dbsym r IAddress 16 i
	.dbend
; }