📄 i2c时钟芯片程序.txt
字号:
·PCF8583时钟芯片程序（转) -|落魂 发表于 2007-3-29 16:57:00
I2C时钟芯片程序
/*****************************************
File: iic.h
Description:适于24MHz 晶振
Author: kassey@126.com
Date: July,7th,2005
*****************************************/
＃i nclude <reg52.h> /*头文件的包含*/
＃i nclude <intrins.h>
#define _Nop() _nop_() /*定义空指令*/
/* 常,变量定义区 */
/*端口位定义*/
sbit SDA=P1^0; /*模拟I2C数据传送位*/
sbit SCL=P1^1; /*模拟I2C时钟控制位*/
/*状态标志*/
bit ack; /*应答标志位*/
/*******************************************************************
起动总线函数
函数原型: void Start_I2c();
功能: 启动I2C总线,即发送I2C起始条件.
********************************************************************/
void Start_I2c()
{
SDA=1; /*发送起始条件的数据信号*/
_Nop();
_Nop();
SCL=1;
_Nop(); /*起始条件建立时间大于4.7us,延时*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*起始条件建立时间大于4.7us,延时*/
_Nop();
_Nop();
_Nop();
_Nop();
SDA=0; /*发送起始信号*/
_Nop(); /* 起始条件锁定时间大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*起始条件建立时间大于4.7us,延时*/
_Nop();
_Nop();
_Nop();
_Nop();
SCL=0; /*钳住I2C总线，准备发送或接收数据 */
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
结束总线函数
函数原型: void Stop_I2c();
功能: 结束I2C总线,即发送I2C结束条件.
********************************************************************/
void Stop_I2c()
{
SDA=0; /*发送结束条件的数据信号*/
_Nop(); /*发送结束条件的时钟信号*/
_Nop(); /*发送结束条件的时钟信号*/
SCL=1; /*结束条件建立时间大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
SDA=1; /*发送I2C总线结束信号*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
字节数据传送函数
函数原型: void SendByte(uchar c);
功能: 将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
此状态位进行操作.(不应答或非应答都使ack=0 假)
发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void SendByte(uchar c)
{
uchar BitCnt;
for(BitCnt=0;BitCnt<8;BitCnt++) /*要传送的数据长度为8位*/
{
if((c<<BitCnt)&0x80)SDA=1; /*判断发送位*/
else SDA=0;
_Nop();
_Nop();
SCL=1; /*置时钟线为高，通知被控器开始接收数据位*/
_Nop();
_Nop(); /*保证时钟高电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*保证时钟高电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
SCL=0;
}
_Nop();
_Nop();
_Nop();
_Nop();
SDA=1; /*8位发送完后释放数据线，准备接收应答位*/
_Nop();
_Nop();
_Nop();
_Nop();
SCL=1;
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
if(SDA==1)ack=0;
else ack=1; /*判断是否接收到应答信号*/
SCL=0;
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
字节数据传送函数
函数原型: uchar RcvByte();
功能: 用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
发完后请用应答函数。
********************************************************************/
uchar RcvByte()
{
uchar retc;
uchar BitCnt;
retc=0;
SDA=1; /*置数据线为输入方式*/
for(BitCnt=0;BitCnt<8;BitCnt++)
{
_Nop();
_Nop();
SCL=0; /*置时钟线为低，准备接收数据位*/
_Nop();
_Nop(); /*时钟低电平周期大于4.7μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*时钟低电平周期大于4.7μs*/
_Nop();
_Nop();
_Nop();
SCL=1; /*置时钟线为高使数据线上数据有效*/
_Nop();
_Nop();
_Nop();
_Nop();
retc=retc<<1;
if(SDA==1)retc=retc+1; /*读数据位,接收的数据位放入retc中 */
_Nop();
_Nop();
_Nop();
_Nop();
}
SCL=0;
_Nop();
_Nop();
_Nop();
_Nop();
return(retc);
}
/********************************************************************
应答子函数
原型: void Ack_I2c(bit a);
功能:主控器进行应答信号,(可以是应答或非应答信号)
********************************************************************/
void Ack_I2c(bit a)
{
if(a==0)SDA=0; /*在此发出应答或非应答信号 */
else SDA=1;
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
SCL=1;
_Nop();
_Nop(); /*时钟低电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop(); /*时钟低电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
SCL=0; /*清时钟线，钳住I2C总线以便继续接收*/
_Nop();
_Nop();
_Nop();
_Nop();
}
/*******************************************************************
向有子地址器件发送字节数据函数
函数原型: bit ISendByte(uchar sla,ucahr c);
功能: 从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla.
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
bit ISendByte(uchar sla,uchar suba,uchar c)
{
Start_I2c(); /*启动总线*/
SendByte(sla); /*发送器件地址*/
if(ack==0)return(0);
SendByte(suba); /*发送器件地址*/
if(ack==0)return(0);
SendByte(c); /*发送数据*/
if(ack==0)return(0);
Stop_I2c(); /*结束总线*/
return(1);
}
/*******************************************************************
向有子地址器件读字节数据函数
函数原型: bit IRcvByte(uchar sla,ucahr *c);
功能: 从启动总线到发送地址，读数据，结束总线的全过程,从器件地
址sla，返回值在c.
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
uchar IRcvByte(uchar sla,uchar suba)
{
uchar c;
Start_I2c(); /*启动总线*/
SendByte(sla); /*发送器件地址*/
if(ack==0)return(0);
SendByte(suba); /*发送子器件地址*/
if(ack==0)return(0);
Start_I2c();
SendByte(sla+1); /*发读器件地址*/
if(ack==0)return(0);
c=RcvByte(); /*读取数据*/
Ack_I2c(1); /*发送非就答位*/
Stop_I2c(); /*结束总线*/
return c;
}
/* 完毕 */
＃i nclude<iic.h>
＃i nclude<lcd.h>
#define PCF8583 0xa0
#define PCF8583_Ctr 0x00
#define Sen 0x02
#define Min 0x03
#define Hour 0x04
sbit SA=P1^2;sbit SB=P1^3;sbit SC=P1^4;
/*
111 null
110 cs1,TLC5620
101 cs2
100 ad0820
011 da7528
010 ram
001 rom
000 8155
*/
#define GAL(sa,sb,sc) {SA=sa;SB=sb;SC=sc;}
void main()
{
uchar sen;
uchar min;
uchar hour;
GAL(0,0,0);
COM=0x02;
LCDInittest();
ISendByte(PCF8583,PCF8583_Ctr,0x00);
/*************************************************************************
NOTE: 向分0x03,向秒0x02写入0 ,向hour写入0x00;
*************************************************************************/
ISendByte(PCF8583,Sen,0x00);
ISendByte(PCF8583,Min,0x19);
ISendByte(PCF8583,Hour,0x10);
PutStr(0,0," 北京时间: ");
PutStr(1,1,"时");
PutStr(1,3,"分");
PutStr(1,5,"秒");
PutStr(3,0,"西安火车站欢迎您");
while(1)
{
sen=IRcvByte(PCF8583,Sen);
min=IRcvByte(PCF8583,Min);
hour=IRcvByte(PCF8583,Hour);
SendCMD(0x90);
SendData(((hour>>4)&0x0f)+0x30);
SendData((hour&0x0f)+0x30);
SendCMD(0x92);
SendData(((min>>4)&0x0f)+0x30);
SendData((min&0x0f)+0x30);
SendCMD(0x94);
SendData(((sen>>4)&0x0f)+0x30);
SendData((sen&0x0f)+0x30);
}
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -