24lc04q.c

这是一个PIC单片机的实时操作系统

//#ifndef  _E2PROM_C_
//#define _E2PROM_C_
#include "config.H"
//uint8  err_count=50;
void EEBankSet(uchar buf);
void dlay(void);
void tx(unsigned char k)/*向iic里写数据*/; 
void start(void)/*启动iic*/;
void stop(void)/*停止iic*/;

//P3的程序在原来的基础上对写数据，等待数据写完的格式做了改变，不再采用延时，而采用多次读写判断的方式来加
//加快速度2007-4-17 20:19
//p4  把读数据的程序做了修正，可以读正常的数据，但是联控在线读有点问题2007-4-22 21:33

//----------------------24lc04
/*************************************************
start_address 需操作iic的首地址
count         需读写个数
**************************************************/
void dlay(void)
{
 //#asm
 nop;
 nop;
 nop;
 nop;
 //#endasm
}
/*************************************************/
void tx(unsigned char k)/*向iic里写数据*/
{
unsigned char temp=8;
err_flag=1;//无应答超时
 while(temp--)
 {
 	//SCL=0;
 // SDA=0;
  SCL_IO=0; //
  SDA_IO=0;
  dlay( );
  if((k&0b10000000))
  {
   SDA=1;
 // SDA_IO=1;
  }
  else
  {
   SDA=0;
  // SDA_IO=0;
  }
  SCL=1;
 dlay();
  SCL=0;

  k<<=1;
 }//End while
 

 SDA_IO=1;
 SDA=1;
 dlay();
 SCL=1;
 dlay();
 //SCL_IO=0;
 
 if(SDA==0)
 	err_flag=0;
 dlay();
 SCL=0;
// SCL_IO=0;
 
 
}
/*************************************************/
void start(void)/*启动iic*/
{
SCL_IO=0;
SDA_IO=0;
SDA=1;
dlay();
SCL=1;
dlay();
SDA=0;
dlay();
SCL=0;
//dlay();

 return;
}
/*************************************************/
void stop(void)/*停止iic*/
{

SCL_IO=0;
SDA_IO=0;
SDA=0; //
dlay();
SCL=1;
dlay();
SDA=1;
dlay();
//SCL=0;
//dlay();
 return;
}
/*************************************************/
unsigned char rx(void)/*从iic里读出数据*/
{
unsigned char temp=8,buf;
 SDA_IO=1;
 SCL_IO=0;
 SDA=1;
// dlay( );
 nop;
 while(temp--)
 {
  SCL=1;
  dlay();
 //  SCL=0;
 // SCL_IO=1;
  buf=(buf<<1)|SDA;
  // dlay();
  SCL=0;
//  dlay();
  nop;
  nop;
  nop;
 // SCL_IO=0;
 }
 return(buf);
}
/*************************************************/
void iic_write(uint16 Start_Buf )
{
	//unsigned char temp=0,
 // err_flag=1;
 uint16 Start_Address,Start_Bank,START_HAdrr;
 //EEBankSet(start_address );
 if (EEType==EE8)
 	{
	if(Start_Buf>255)
		{
		 Start_Address=Start_Buf%256;  //取余的数是表示数据是数据的低位地址
			Start_Bank=Start_Buf>>8;   //取出数据的高位地址和数据头相并
			Start_Bank=Start_Bank<<1;
			//数据要再与1010进行相与
			Start_Bank=Start_Bank|0xa0;
			nop;
	  }
	  else
	  	{
	   Start_Address=Start_Buf;
	   Start_Bank=0xa0;		
	   }
   
 }  
else  
	{
	  Start_Address=Start_Buf%256;  //取余的数是表示数据是数据的低位地址
	  START_HAdrr=Start_Buf>>8;
  	Start_Bank=0xa0;   //取出数据的高位地址和数据头相并	
		}  
   

start( );
// tx(0xa2);
tx(Start_Bank);
// while(1)
// {
 if(EEType==EE32)
 	{
tx(START_HAdrr); 		
 		}
tx(Start_Address); 		
 tx(WriteDate);
//    	temp++;
 // if (count<temp)
//       break;
 //   }  10100010
 stop( );
/* 
 while(err_count--)
  { 
 // err_shao=1;
  start();
  tx(0xa0);
  if (err_flag==0)
  	{
  	//	err_shao=0;
  		 break;
  	}    
  
 }  
 */
  }
 //257 
  //01  01 
  
/*************************************************/
uint8 iic_read(uint16 Start_Buf)
{
uint16 i;
uint16 Start_Address,Start_Bank,Start_HAddr;
 //EEBankSet(start_address );
 
 		err_flag=0;
 if (EEType==8)
	 {	
		 if(Start_Buf>255)
			 	{
					Start_Address=Start_Buf%256;  //取余的数是表示数据是数据的低位地址
					Start_Bank=Start_Buf>>8;   //取出数据的高位地址和数据头相并
					Start_Bank=Start_Bank<<1;
					//数据要再与1010进行相与
					nop;
					nop;
					Start_Bank=Start_Bank|0x01;
					Start_Bank=Start_Bank|0xa0;
					nop;
			  }
			//         0101   111 (1)     1 (1)            111011011
		 else 
			 	{
			    Start_Address=Start_Buf;
			    Start_Bank=0xa1;	
			 		
			 		}
				nop;
				nop;
				start( );
				tx(0xa0);
				//  tx(Start_Bank);
				nop;
				tx(Start_Address);
				//tx(start_address);
				start( );
				//tx(0xa3);
				tx(Start_Bank);
		} //end EESyte=08
 else
 	{
 		  Start_Bank=0xa1;
 		  Start_Address=Start_Buf%256;  //取余的数是表示数据是数据的低位地址
	 	 	Start_HAddr=Start_Buf>>8;   //取出数据的高位地址和数据头相并	
 	    	start( );
				tx(0xa0);
				//  tx(Start_Bank);
				nop;
				tx(Start_HAddr);//发关高位地址
				//tx(start_address);
				tx(Start_Address);
				start( );
				//tx(0xa3);
				tx(Start_Bank);
 		}
  i=rx();
   //  while(count--)
    // {
   //             read[count]=rx();
     //  delay();  这个要再验证一下
      dlay();
       dlay();
   return(i);
//}
}
void EEBankSet(uint8 buf)
{	 
//	uint16  temp,startad; 
	uint8   start;
	startad=buf%256;  //取余的数是表示数据是数据的低位地址
	temp=buf>>8;   //取出数据的高位地址和数据头相并
	temp=temp<<1;
	//数据要再与1010进行相与
	temp=temp|0xae;
	nop;
	
	}

uchar  BJ_EE_Card(uchar EEType,uchar *BJ_EE_Buf) 
{
//如果EEPROM的类型是08的话	
//uchar  Buf[3];//数据缓存
//22 12 32 23 23 11
//11 22 22 23 22 33 

uint16 i,j;//
 
	if(EEType==8)
		{
			for(i=0;i<MAX24LC08;i=i+16)
			{
				
				 for (j=i;j<(i+15);j=j+3)  		 				   
				   if(iic_read(j)==BJ_EE_Buf[0] && iic_read(j+1)==BJ_EE_Buf[1] && iic_read(j+2)==BJ_EE_Buf[2])
				   {
			  		  nop;
		  		    BJReAddr = j;
		  		    return BJ_OK;
			  	 } 	
			   
		   
			}
		  
			
			}

			
 else if(EEType==32)
	 	{
	 		
	  	nop;
	  	
	 		
	 		}
	 		 
	 return  BJ_Full;
	}


uchar  DELOneCard(uint16 AdddrBuf)
{
	 BJCardBuf[0]=0xff;
	 BJCardBuf[1]=0xff;
	 BJCardBuf[2]=0Xff;  
	 writeeeprom(3,AdddrBuf,BJCardBuf);   	
	
	}

uint8 writeeeprom(uint8 Len,uint16 StartAddr,uint8 *WriteBuf )
 {
 	 uint16 i; 
 	 uint8 k;
	if (Len<30||(Len!=0)) 
		 {		 
		  for(i=0;i<Len;i++)
		    {
		       WriteDate=*WriteBuf;    
               nop;
               nop;
		       iic_write(StartAddr);   	
                nop;

		       delay1ms(10);
		       
			 	 	if(err_flag==1)
			 	 		 {
			 	 		  SDA=1;
		           SCL=1;
		           return NOT_OK;
			 	 		 	break;
		          }
		       WriteBuf++;
		       StartAddr++;
		       
		    	}
		     return  OK ;   	    	  
		 	 }
	 else return NOT_OK;	  
 	  
 	/*  
 	  
 	uint16  c ;//联控制数据的计数
 	uint16  d=0;  
		  for ( c = 1; c < testlend; c++ )
				  {
				    WriteDate=0xff;
			 	 	iic_write(d);  // 址址与数量
			 	 	 nop;
			 	 	 nop;
				 	delay1ms(10);
			   	
			 	 	if(err_flag==1)
			 	 		 {
			 	 		  SDA=0;
               SCL=0;
			 	 		 	break;
              }
               
              
			 	 	
			 	 	d++;
            
         
				   }
  */   
 	//   
 	}	
void delay1ms(uchar count)
{
 // int  i,j;
 	uchar i,j;
	for(i=0;i<count;i++)
	  for(j=0;j<130;j++)
	   ;
	
	}