24c02.c

本程序演示 ：以非利普TEA5767 为核心的

/*
 好利来音响部设计
 未经同意不得散布于网络
 2005年2月15日
*/
#define uchar unsigned char
#define uint  unsigned int
#define ulong unsigned long
#include <reg52.h>
#include <absacc.h>
#include "intrins.h"
#define iicadd 0x10;
sbit da=P1^7;
sbit cl=P1^6;
sbit ff=P1^5;
void delaytime(uint time)
{ bit a=0;
  for(;time!=0;time--)
  {
  a=1;
  a=0;
  }
}

extern uchar remkey;
void sta_24c02()	 //启动总线传输
 {
   da=1;
   delaytime(2);
   cl=1;
   delaytime(2);
   da=0;
   delaytime(2);
   cl=0;
 }
void stop_24c02()	//结束总线传输
{
  da=0;
  delaytime(2);
  cl=1;
  delaytime(2);
  da=1;
  delaytime(2);
  da=0;
  delaytime(2);
  cl=0;
  delaytime(2);
}
void mack_24c02()//发送应答位
{
   da=0;
   delaytime(2);
   cl=1;
   delaytime(2);
   cl=0;
   delaytime(2);
   da=1;
   delaytime(2);
}
void nmack_24c02()//发送非应答位
{
  da=1;
  delaytime(2);
  cl=1;
  delaytime(2);
  cl=0;
  delaytime(2);
  da=0;
  delaytime(2);

}
bit cack_24c02() //发送状态检测
{
  bit a=0;
  da=1;
 delaytime(2);
  cl=1;
  delaytime(2);
  if(da==0)
   {
   delaytime(2);
   cl=0;
   delaytime(2);
   return(0);
   }
  else
   {
   delaytime(2);
   cl=0;
   return(1);
   }
}
void wr1_24c02(void)//写数据1
{
   da=1;
   delaytime(2);
   cl=1;
   delaytime(2);
   cl=0;
   delaytime(2);
   da=0;
   delaytime(2);
}
void wr0_24c02()//写数据0
{
  da=0;
  delaytime(2);
  cl=1;
  delaytime(2);
  cl=0;
  delaytime(2);
}
wrbyt_24c02(uchar byt)//写一个字节的数据到总线上
{
  uchar temp=0x00;
  uchar count;
  for(count=0;count<8;count++)
    {
      if((byt<<count)&0x80)
        wr1_24c02();
      else
        wr0_24c02();
     }
}
uchar rdbyt_24c02() //从总线上读取一个字节的数据
{
  uchar a=0,i=0;
  for(i=0;i<8;i++)
   {
     da=1;
     delaytime(2);
     cl=1;
     if(da==1)
      {
	   a=(a<<1)+1;
       cl=0;
      }
     else if(da==0)
     {
       a=a<<1;
       cl=0;
     }
   }
    return(a);
}
bit wrnbyt(uchar add,uchar start,uchar num,uchar *k) //向24C02（ADD）从字节（START）开始写（NUM）个字节
{
    uchar *p=k;
	uchar dk;
    for(dk=0;dk<num;dk++,p++)
	{
    sta_24c02();
    wrbyt_24c02(add);
    mack_24c02();
    wrbyt_24c02(start);
	start=start+1;
    mack_24c02();
    wrbyt_24c02(*p);
    mack_24c02();
    stop_24c02();
	delaytime(5000);
    }
	return(1);
 }
bit rdnbyt(uchar add,uchar start,uchar num,uchar a[])  //从24C02（ADD）字节（START）开始读取（NUM）个字节放到数据缓冲区A[]中
{
   uchar *p=a;
   uchar dk;
   sta_24c02();
   wrbyt_24c02(add);
   if(cack_24c02())
   return(1);
   wrbyt_24c02(start);
   if(cack_24c02())
   return(1);
   sta_24c02();
   wrbyt_24c02(add+1);
   if(cack_24c02())
   return(1);
   for(dk=0;dk<num;dk++,p++)
  {
    *p=rdbyt_24c02();
   if(dk==num-1)
   nmack_24c02();
   else
   mack_24c02();
  }
  stop_24c02();
  return(0);
}