24c64test.c

24C64存储器子程序,实现串行存储,减少单片机使用资源

#include <reg51.h>
#include <intrins.h> 
#define uchar unsigned char
#define uint unsigned int
#define AddWr 0xa0 					//器件地址选择及写标志
#define AddRd 0xa1 					//器件地址选择及读标志
/*****************************************************************************************************/
//注意：24C64和24C02的不同在于24C64要送两次地址，分别是高位地址和低位地址，24C02只要送一个，但是还有一个不同，
//可能在于在写数据的时候其写周期限制不同，不同厂家相同型号的存储器可能其写周期限制也不同，所以这个也可能要
//调整一下延时。
/***************************************************************************************************/
#define  LINE1     0
#define  LINE2     1
#define  LINE1_HEAD    0x80
#define  LINE2_HEAD    0xC0
#define  LCD_DELAY_TIME   40
#define  DATA_MODE    0x38
#define  OPEN_SCREEN    0x0C
#define  DISPLAY_ADDRESS   0x80
#define  CLEARSCREEN    LCD_en_command(0x01)
//common part 
#define  HIGH   1
#define  LOW    0
#define  TRUE    1
#define  FALSE    0
#define  ZERO    0 
#define  MSB    0x80
#define  LSB    0x01

/*******************************************************************/

#define  LCDIO     P3
sbit LCD1602_RS=P1^0;  
sbit LCD1602_RW=P1^1;  
sbit LCD1602_EN=P1^2;

/*****************************************************************************************************/
/****************************************************************************************************/
/*有关全局变量*/
sbit Sda= P1^3; 						//串行数据
sbit Scl= P1^4; 						//串行时钟
//sbit WP= P0^2; 						//硬件写保护
unsigned char code tab[]={'0','1','2','3','4','5','6','7','8','9'};

void mDelay(uchar j)
{ 
uint i;
for(;j>0;j--)
{
for(i=0;i<125;i--)
{;}
}
}

/*起始条件*/
void Start(void)
{
Sda=1;
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Sda=0;
_nop_();_nop_();_nop_();_nop_();
}

/*停止条件*/
void Stop(void)
{
Sda=0;
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Sda=1;
_nop_();_nop_();_nop_();_nop_();
}

/*应答位*/
void Ack(void)
{
Sda=0;
_nop_();_nop_();_nop_();_nop_();
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Scl=0;
}

/*反向应答位*/
void NoAck(void)
{
Sda=1;
_nop_();_nop_();_nop_();_nop_();
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Scl=0;
}

/*发送数据子程序，Data为要求发送的数据*/
void Send(uchar Data)
{
uchar BitCounter=8; 				//位数控制
uchar temp; 						//中间变量控制
do
{
temp=Data;
Scl=0;
_nop_();_nop_();_nop_();_nop_();
if((temp&0x80)==0x80)			//如果最高位是1
Sda=1;
else
Sda=0;

Scl=1;

temp=Data<<1; 					//RLC
Data=temp;
BitCounter--;
}while(BitCounter);
Scl=0;
}

/*读一个字节的数据,并返回该字节值*/
uchar Read(void) 
{
uchar temp=0;
uchar temp1=0;
uchar BitCounter=8;
Sda=1;
do{
Scl=0;
_nop_();_nop_();_nop_();_nop_();
Scl=1;
_nop_();_nop_();_nop_();_nop_();
if(Sda) 						//如果Sda=1
temp=temp|0x01; 				//temp的最低位置1
else
temp=temp&0xfe; 				//否则temp的最低位清0
if(BitCounter-1)
{
temp1=temp<<1;
temp=temp1;
}
BitCounter--;
}while(BitCounter);
return(temp);
}

void WrToROM(uchar Data[],uchar AddressG,uchar AddressD,uchar Num)
{
uchar i;
uchar *PData;
PData=Data;
for(i=0;i<Num;i++)
{
Start(); 					//发送启动信号
Send(0xa0); 				//发送SLA+W
Ack();
Send(AddressG); 			//发送高位地址
Ack();
Send(AddressD+i);			//发送低位地址
Ack();
Send(*(PData+i));
Ack();
Stop();
mDelay(80);
}
}

void RdFromROM(uchar Data[],uchar AddressG,uchar AddressD,uchar Num)
{
uchar i;
uchar *PData;
PData=Data;
for(i=0;i<Num;i++)
{
Start();
Send(0xa0);
Ack();
Send(AddressG);			 	//发送高位地址
Ack();
Send(AddressD+i);			//发送低位地址
Ack();
Start();
Send(0xa1);
Ack();
*(PData+i)=Read();
Scl=0;
NoAck();
Stop();
}
}
/******************************************************************************************/
/******************************************************************************************/
void LCD_delay(void)   
{
 unsigned char i;
 for(i=LCD_DELAY_TIME;i>ZERO;i--)//be sure lcd reset
   ;
}
/********************************************************************/  
void LCD_en_command(unsigned char command)
{
 LCDIO=command;
 LCD1602_RS=LOW;   
 LCD1602_RW=LOW;
 LCD1602_EN=LOW;
 LCD_delay();
 LCD1602_EN=HIGH;
}
/********************************************************************/
void LCD_en_dat(unsigned char dat)
{
 LCDIO=dat;
 LCD1602_RS=HIGH;
 LCD1602_RW=LOW;
 LCD1602_EN=LOW;
 LCD_delay();
 LCD1602_EN=HIGH;
}
/********************************************************************/
void LCD_set_xy( unsigned char x, unsigned char y )
{
 unsigned char address;
 if (y == LINE1) 
  address = LINE1_HEAD + x;
 else 
     address = LINE2_HEAD + x;
 LCD_en_command(address); 
}
/********************************************************************/
void LCD_write_char( unsigned x,unsigned char y,unsigned char dat)
{
 LCD_set_xy( x, y ); 
 LCD_en_dat(dat);
}
/********************************************************************/
void LCD_write_string(unsigned char X,unsigned char Y,unsigned char *s)
{
    LCD_set_xy( X, Y ); //set address 
    while (*s)  // write character
    {
     LCDIO=*s;
        LCD_en_dat(*s);   
 s ++;
    }
}
/********************************************************************/
void LCD_init(void)
{ 
 CLEARSCREEN;//clear screen 
 LCD_en_command(DATA_MODE);//set 8 bit data transmission mode 
 LCD_en_command(OPEN_SCREEN);//open display (enable lcd display)
 LCD_en_command(DISPLAY_ADDRESS);//set lcd first display address 
 CLEARSCREEN;//clear screen
}
/********************************************************************/
/*********************** OTHER PART *********************************/
void delay_nms(unsigned int n)      
{
    unsigned int i=0,j=0;
    for (i=n;i>0;i--)
     for (j=0;j<1140;j++);  
}
/**********************************************************************/
/**********************************************************************/
void main()
{	uint i;
uchar *joe1,Number[4]={1,2,9,4},joe[4];
joe1=joe;
//WP=0;
WrToROM(Number,0,0,4); 				//将初始化后的数值写入EEPROM
mDelay(20);
Number[0]=0;
Number[1]=0;
Number[2]=0;
Number[3]=0; 					//将数组中的值清掉，以验证读出的数是否正确
RdFromROM(Number,0,0,4);


for(i=0;i<4;i++)						  //LCD显示；
{joe[i]=tab[Number[i]]  ;}
LCD_init(); 
CLEARSCREEN;                                         
delay_nms(2); 
LCD_write_string(0,LINE1,joe1);
delay_nms(200);
}