//=========================
//Project: EEPROM write/read command program
//Author: Leo.Tseng
//Date: 2011/11/10
//MCU: W78E054D
//CRYSTAL: 25Mhz
//Description: Use uart for input/output, set boudrate=9600,
// Input Hexadecimal data to write to EEPROM
// and read out for verify
// EEPROM 24C64 address write is 0xA0, address read is 0xA1
// Write mode: page write, Read mode: Sequential read.
//=========================
#include <reg52.h>
#include <stdio.h>
//副程式宣告
void I2C_START(void);
void I2C_STOP(void);
void I2C_CLOCK(int t);
void I2C_write(unsigned char I2C_DATA,int i);
void delay(unsigned int d);
int S_I2C_ACK(void);
int M_I2C_ACK(void);
int M_I2C_NACK(void);
void TIMER1_initinal(int boudrate);
unsigned char I2C_read(int i);
sbit SDA = P2^0; //SDA
sbit SCL = P2^1; //SCL
//sbit SDA = P0^0; //SDA
//sbit SCL = P0^1; //SCL
//======================================
//主程式開始
void main(void)
{ //====================Begin of Main
unsigned int data_buf[8]={0};
unsigned char uart_data[8];
unsigned char I2C_DATA=0xff;
unsigned char F_ADDRESS,S_ADDRESS;
unsigned int i;
int device_ACK;
int B_index,E_index,index;
int Byte_counter;
unsigned int temp_buf;
TIMER1_initinal(9600); // 使用UART,baudrate=9600
printf("\n輸入6個16進制字元,前兩字元為資料,後4字元為寫入起始頁位址: ");
RI=0;
TI=0;
i=0;
while(1)
{
if(RI == 1)
{ // 接收到uart字元
RI = 0; // 清除接收接收旗號,準備接收下一個字元
uart_data[i] = SBUF; // 讀取輸入字元
SBUF = uart_data[i]; // 接收到的字元送回uart
i++;
}
else TI = 0; // 準備傳送下個接收字元
if ((i==6)) break;
}
for(i=0;i<6;i++) // 輸入字元限定判斷與轉換成16進位數值
{ //
if((uart_data[i]>='0')&&(uart_data[i]<='9')) // 限定0~9
{ //
data_buf[i]=uart_data[i]-0x30; //
} //
else if((uart_data[i]>='A')&&(uart_data[i]<='F')) // 限定A~F
{ //
data_buf[i]=uart_data[i]-0x37; //
} //
else if((uart_data[i]>='a')&&(uart_data[i]<='f')) // 限定a~f
{ //
data_buf[i]=(uart_data[i]-0x57); //
} //
}
//I2C_DATA=((data_buf[0]<<4)+(data_buf[1]&0x0f)); // 轉換輸入值
printf("\n按任何鍵開始寫入EEPROM\n");
_getkey();
I2C_DATA=((data_buf[0]<<4)+(data_buf[1]& 0x0f)); // 轉換要寫入資料值
F_ADDRESS=((data_buf[2]<<4)+(data_buf[3]& 0x0f)); // 轉換要寫入的高8位元位址
S_ADDRESS=((data_buf[4]<<4)+(data_buf[5]& 0x0f)); // 轉換要寫入的低8位元位址
//B_index=(int)F_ADDRESS*256+(int)S_ADDRESS; // 計算要開始寫入的位址
//printf("\nindex in d =%d\n",B_index);
//printf("\nindex in x =%x\n",B_index);
//printf("\nindex in u =%u\n",B_index);
//=========== EEPROM Page Write =========================
I2C_START(); // 開始I2C command
delay(5);
I2C_write(0xa0,8); // 寫入device address write
device_ACK=S_I2C_ACK(); // 取得device 狀態
if(device_ACK)
{
device_ACK=0; // 清除ACK旗號
//printf("Slave device is ACK!!\n\n");
I2C_write(F_ADDRESS,8); // 寫入第一字組位址
device_ACK=S_I2C_ACK();
device_ACK=0; // 清除ACK旗號
I2C_write(S_ADDRESS,8); // 寫入第二字組位址
device_ACK=S_I2C_ACK();
Byte_counter=0;
while(device_ACK)
{
device_ACK=0; // 清除ACK旗號
I2C_write(I2C_DATA,8); // page write data, 寫入資料
device_ACK=(device_ACK=S_I2C_ACK()&&((Byte_counter<31)? 1 : 0));
//printf("Byte_counter=%d\n\n",Byte_counter); //for debug
Byte_counter++;
//_getkey(); //for debug
}
I2C_STOP(); // Page write完成,每頁32Byte
if(Byte_counter==32) printf("\nPage write finished!!\n");
else printf("\nPage write not finished!!\n");
}
else
{
printf("Slave device is no ACK!!\n\n") ; // 否, device no ACK
}
//=========== End of EEPROM Page Write =========================
//=========== EEPROM Sequential Read =========================
printf("\n輸入8個16進制字元為讀出起始位址和終止位址: ");
i=0;
RI=0;
TI=0;
while(1)
{
if(RI == 1)
{ // 接收到uart字元
RI = 0; // 清除接收接收旗號,準備接收下一個字元
uart_data[i] = SBUF; // 讀取輸入字元
SBUF = uart_data[i]; // 接收到的字元送回uart
i++;
}
else TI = 0; // 準備傳送下個接收字元
if ((i==8)) break;
}
for(i=0;i<8;i++) // 輸入字元限定判斷與轉換成16進位數值
{ //
if((uart_data[i]>='0')&&(uart_data[i]<='9')) // 限定0~9
{ //
data_buf[i]=uart_data[i]-0x30; //
} //
else if((uart_data[i]>='A')&&(uart_data[i]<='F')) // 限定A~F
{ //
data_buf[i]=uart_data[i]-0x37; //
} //
else if((uart_data[i]>='a')&&(uart_data[i]<='f')) // 限定a~f
{ //
data_buf[i]=(uart_data[i]-0x57); //
} //
}
printf("\n按任何鍵開始讀出EEPROM\n");
_getkey();
//== 新增程式起始 ==
F_ADDRESS=((data_buf[4]<<4)+(data_buf[5]&0x0f)); // 轉換要讀出結束位址的高8位元
S_ADDRESS=((data_buf[6]<<4)+(data_buf[7]&0x0f)); // 轉換要讀出結束位址的低8位元
E_index=(int)F_ADDRESS*256+(int)S_ADDRESS; // 計算要開始讀出的結束位址
//printf("\nE_index in d =%d\n",E_index);
//printf("\nE_index in x =%x\n",E_index);
//printf("\nE_index in u =%u\n",E_index);
//== 新增程式結束 ==
F_ADDRESS=((data_buf[0]<<4)+(data_buf[1]&0x0f)); // 轉換要讀出起始位址的高8位元
S_ADDRESS=((data_buf[2]<<4)+(data_buf[3]&0x0f)); // 轉換要讀出起始位址的低8位元
B_index=(int)F_ADDRESS*256+(int)S_ADDRESS; // 計算要開始讀出的起始位址
//printf("\nB_index in d =%d\n",B_index);
//printf("\nB_index in x =%x\n",B_index);
//printf("\nB_index in u =%u\n",B_index);
//== 新增程式起始 ==
index=E_index-B_index+1; // 計算要開始讀出的總位址數
// printf("\nindex count in d =%d\n",index);
// printf("\nindex count in x =%x\n",index);
// printf("\nindex count in u =%u\n",index);
//== 新增程式結束 ==
I2C_START(); // 開始I2C command
delay(5);
I2C_write(0xa0,8); // 寫入device address write, DUMMY write
device_ACK=S_I2C_ACK(); // 取得device 狀態
if(device_ACK) // device address write ACK
{
device_ACK=0; // 清除ACK旗號
I2C_write(F_ADDRESS,8); // First word address, DUMMY write
device_ACK=S_I2C_ACK(); // First word address ACK?
device_ACK=0; // 清除ACK旗號
I2C_write(S_ADDRESS,8); // second word address, DUMMY write
device_ACK=S_I2C_ACK(); // second word address ACK?
if(device_ACK)
{
I2C_START(); // 開始I2C command
delay(5);
I2C_write(0xa1,8); // 寫入device address read,
device_ACK=S_I2C_ACK(); // 取得device 狀態
}
if(device_ACK)
{
for(index=B_index;index<=E_index;index++)
{
if(index==E_index)
{
device_ACK=0;
I2C_DATA=I2C_read(8); // 讀取資料
device_ACK=M_I2C_NACK();
I2C_STOP();
//printf("\nData Read Finish!!\n\n");
}
else
{
device_ACK=0;
I2C_DATA=I2C_read(8); // 讀取資料
device_ACK=M_I2C_ACK();
//printf("R_device_ACK=%d\n\n",device_ACK); // for debug
}
//=================Read Data 轉換===============================
if(((I2C_DATA/16)>=10)&&((I2C_DATA/16)<=15)) //資料高半位元組是大於9?
{
temp_buf=I2C_DATA/16+0x37; //轉換成A~F
uart_data[0]=(char)temp_buf;
//printf("\n11_Device Read address is %c\n",uart_data[0]);
}
else
{
temp_buf=I2C_DATA/16+0x30; //資料高半位元組小於等於9,轉換成0~9
uart_data[0]=(char)temp_buf;
//printf("\n12_Device Read address is %c\n",uart_data[0]);
}
if(((I2C_DATA%16)>=10)&&((I2C_DATA%16)<=15)) //資料低半位元組是大於9?
{
temp_buf=I2C_DATA%16+0x37; //轉換成A~F
uart_data[1]=(char)temp_buf;
//printf("\n21_Device Read address is %c\n",uart_data[1]);
}
else
{
temp_buf=I2C_DATA%16+0x30; //資料低半位元組小於等於9,轉換成0~9
uart_data[1]=(char)temp_buf;
//printf("\n22_Device Read address is %c\n",uart_data[1]);
}
if(device_ACK) printf("\n位址0X%X 讀出值: 0x%c%c ",index,uart_data[0],uart_data[1]);
else
{
printf("\n位址0X%X 讀出值: 0x%c%c ",index,uart_data[0],uart_data[1]);
printf("\nData Read Finish!!\n\n");
}
_getkey();
}
}
}
//============ End of EEPROM Random Read =========
} //end of main
//=======================================
//延時副程式
void delay(unsigned int d)
{
while (--d);
}
//I2C 開始副程式
// ______
//SDA \______
// _________
//SCL \_______
// -| |-- START
void I2C_START(void)
{
if (SDA!=1) SDA=1;
if (SCL!=1) SCL=1;
delay(1);
SDA = 0;
delay(5);
SCL = 0;
}
//I2C 停止副程式
// _______
//SDA _________/
// __________
//SCL ______/
// -| |-- STOP
void I2C_STOP(void)
{
if (SDA!=0) SDA=0;
if (SCL!=0) SCL=0;
delay(1);
SCL = 1;
delay(4);
SDA = 1;
delay(10);
}
//I2C clock 產生副程式
void I2C_CLOCK(int t)
{
delay(t);
SCL = 1; //設定SCL為高位準
delay(t);
SCL = 0; //設定SCL為高位準
}
//I2C write 副程式
void I2C_write(unsigned char I2C_DATA,int i)
{
//bit data_bit;
while(i--)
{
SDA=(I2C_DATA & 0x80)? 1 : 0; //取出最高位元,並送至SDA
delay(1); //等待SDA穩定
SCL = 1;
delay(5);
//I2C_CLOCK(5);
I2C_DATA<<=1; //下個資料位元
SCL = 0;
//delay(1);
}
}
//I2C Read副程式
unsigned char I2C_read(int i)
{
unsigned char SDA_BUF=0x00;
while(i--)
{
SCL = 1; //確認SCL=1
//delay(1); //等待SDA穩定
SDA_BUF = (SDA_BUF << 1)|SDA; //讀取SDA暫存
delay(4);
SCL = 0;
delay(2);
}
//printf("\nR_SDA_BUF=%c\n",SDA_BUF);
return(SDA_BUF);
}
//Slave ACK副程式
// ___________ NO ACK
//SDA _____/ \_________ ACK
// ____
//SCL ______/ \________
// -| b9 |---- ACK bit
int S_I2C_ACK(void)
{
SDA=1;
delay(2);
SCL=1;
if(SDA==0) // 判斷ack bit是否拉low
{
delay(6);
SCL = 0;
return 1; // 是
}
else
{
delay(6);
SCL = 0;
return 0; // 否
}
}
//Master ACK副程式
int M_I2C_ACK(void)
{
//delay(1);
SDA=0; // Master拉low ack bit
delay(1);
SCL=1;
delay(4);
//SDA=0;
SCL=0;
SDA=1;
return 1; // 是
}
//Master NACK副程式
int M_I2C_NACK(void)
{
//delay(1);
SDA=1; // Master拉high ack bit
delay(1);
SCL=1;
delay(4);
//SDA=0;
SCL=0;
return 0; // 否
}
//UART副程式
void TIMER1_initinal(int boudrate)
{
PCON = 0x00; // PCON: if SMOD=1(b7), Baud Rate is Doubled
SCON = 0x52; // SCON: mode 1, 8-bit UART, enable rcvr
TMOD = 0x20; // TMOD: timer 1, mode 2, 8-bit reload
//TH1 = 256-(11059200/384/boudrate); // TH1: reload value for baud @ 11.0592MHz, TH=0xFD
TH1 = 256-(25000000/372/boudrate); // TH1: reload value for baud @ 25MHz, TH=0xF9
TR1 = 1; // TR1: timer 1 run
//TI = 1; // TI: set TI to send first char of UART
}
****************************************************************
Test Result :
****************************************************************
輸入6個16進制字元,前兩字元為資料,後4字元為寫入起始頁位址: 330000
按任何鍵開始寫入EEPROM
Page write finished!!
輸入8個16進制字元為讀出起始位址和終止位址: 0000001f
按任何鍵開始讀出EEPROM
位址0X0 讀出值: 0x33
位址0X1 讀出值: 0x33
位址0X2 讀出值: 0x33
位址0X3 讀出值: 0x33
位址0X4 讀出值: 0x33
位址0X5 讀出值: 0x33
位址0X6 讀出值: 0x33
位址0X7 讀出值: 0x33
位址0X8 讀出值: 0x33
位址0X9 讀出值: 0x33
位址0XA 讀出值: 0x33
位址0XB 讀出值: 0x33
位址0XC 讀出值: 0x33
位址0XD 讀出值: 0x33
位址0XE 讀出值: 0x33
位址0XF 讀出值: 0x33
位址0X10 讀出值: 0x33
位址0X11 讀出值: 0x33
位址0X12 讀出值: 0x33
位址0X13 讀出值: 0x33
位址0X14 讀出值: 0x33
位址0X15 讀出值: 0x33
位址0X16 讀出值: 0x33
位址0X17 讀出值: 0x33
位址0X18 讀出值: 0x33
位址0X19 讀出值: 0x33
位址0X1A 讀出值: 0x33
位址0X1B 讀出值: 0x33
位址0X1C 讀出值: 0x33
位址0X1D 讀出值: 0x33
位址0X1E 讀出值: 0x33
位址0X1F 讀出值: 0x33
Data Read Finish!!
輸入6個16進制字元,前兩字元為資料,後4字元為寫入起始頁位址: 88ffe0
按任何鍵開始寫入EEPROM
Page write finished!!
輸入8個16進制字元為讀出起始位址和終止位址: ffe0ffff
按任何鍵開始讀出EEPROM
位址0XFFE0 讀出值: 0x88
位址0XFFE1 讀出值: 0x88
位址0XFFE2 讀出值: 0x88
位址0XFFE3 讀出值: 0x88
位址0XFFE4 讀出值: 0x88
位址0XFFE5 讀出值: 0x88
位址0XFFE6 讀出值: 0x88
位址0XFFE7 讀出值: 0x88
位址0XFFE8 讀出值: 0x88
位址0XFFE9 讀出值: 0x88
位址0XFFEA 讀出值: 0x88
位址0XFFEB 讀出值: 0x88
位址0XFFEC 讀出值: 0x88
位址0XFFED 讀出值: 0x88
位址0XFFEE 讀出值: 0x88
位址0XFFEF 讀出值: 0x88
位址0XFFF0 讀出值: 0x88
位址0XFFF1 讀出值: 0x88
位址0XFFF2 讀出值: 0x88
位址0XFFF3 讀出值: 0x88
位址0XFFF4 讀出值: 0x88
位址0XFFF5 讀出值: 0x88
位址0XFFF6 讀出值: 0x88
位址0XFFF7 讀出值: 0x88
位址0XFFF8 讀出值: 0x88
位址0XFFF9 讀出值: 0x88
位址0XFFFA 讀出值: 0x88
位址0XFFFB 讀出值: 0x88
位址0XFFFC 讀出值: 0x88
位址0XFFFD 讀出值: 0x88
位址0XFFFE 讀出值: 0x88
位址0XFFFF 讀出值: 0x88
Data Read Finish!!
輸入6個16進制字元,前兩字元為資料,後4字元為寫入起始頁位址:
