- #include "main.h"
- xdata uchar year,month,date,day,hour,min,sec,DTemp=0;
- xdata uchar al1_min,al1_hour,al1_day,al2_min,al2_hour,al2_day;
- bit ack;
- uchar BCD2HEX(uchar val) //BCD转换为Byte
- {
- uchar i;
- i= val&0x0f;
- val >>= 4;
- val &= 0x0f;
- val *= 10;
- i += val;
-
- return i;
- }
- uchar B_BCD(uchar val)//B码转换为BCD码
- {
- uchar i,j,k;
- i=val/10;
- j=val%10;
- k=j+(i<<4);
- return k;
- }
- void delayus(uchar i)
- {
- while(--i) ;
- }
- /************************START***************************/
- void Start()
- {
- SDA=1; //发送起始条件的数据信号
- delayus(1);
- SCL=1;
- delayus(5); //起始条件建立时间大于4.7us,延时
-
- SDA=0; //发送起始信号
- delayus(5); // 起始条件锁定时间大于4μs
-
- SCL=0; //钳住I2C总线,准备发送或接收数据
- delayus(2);
- }
- /********************************************************/
- /************************STOP****************************/
- void Stop()
- {
- SDA=0; //发送结束条件的数据信号
- delayus(1); //发送结束条件的时钟信号
- SCL=1; //结束条件建立时间大于4us
- delayus(5);
-
- SDA=1; //发送I2C总线结束信号
- delayus(4);
- }
- /********************************************************/
- /*******************************************************************
- 字节数据发送函数
- 函数原型: void SendByte(uchar Dat);
- 功能: 将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
- 此状态位进行操作.(不应答或非应答都使ack=0)
- ack=1 发送数据正常,
- ack=0 被控器无应答或损坏。
- ********************************************************************/
- void SendByte(uchar Dat)
- {
- uchar BitCnt;
-
- for(BitCnt=0;BitCnt<8;BitCnt++) //要传送的数据长度为8位
- {
- if((Dat<<BitCnt)&0x80)
- SDA=1; //判断发送位
- else
- SDA=0;
- delayus(1);
- SCL=1; //置时钟线为高,通知被控器开始接收数据位
- delayus(5); //保证时钟高电平周期大于4μs
- SCL=0;
- }
-
- delayus(2);
- SDA=1; //8位发送完后释放数据线,准备接收应答位
- delayus(2);
- SCL=1;
- delayus(3);
- if(SDA==1)
- ack=0;
- else
- ack=1; //判断是否接收到应答信号
- SCL=0;
- delayus(2);
- }
- /********************************************************/
- /*******************************************************************
- 字节数据接收函数
- 函数原型: uchar RcvByte();
- 功能: 用来接收从器件传来的数据,并判断总线错误(不发应答信号),
- 发完后请用应答函数应答从机。
- ********************************************************************/
- uchar RcvByte()
- {
- uchar retc;
- uchar BitCnt;
-
- retc=0;
- SDA=1; //置数据线为输入方式
- for(BitCnt=0;BitCnt<8;BitCnt++)
- {
- delayus(1);
- SCL=0; //置时钟线为低,准备接收数据位
-
- delayus(5); //时钟低电平周期大于4.7μs
-
- SCL=1; //置时钟线为高使数据线上数据有效
- delayus(3);
- retc=retc<<1;
- if(SDA==1)
- retc=retc+1; //读数据位,接收的数据位放入retc中
- delayus(2);
- }
- SCL=0;
- delayus(2);
- return(retc);
- }
- /********************************************************************
- 应答子函数
- 函数原型: void I2CACK(bit a);
- 功能: 主控器进行应答信号(可以是应答或非应答信号,由位参数a决定)
- ********************************************************************/
- void I2CACK(bit a)
- {
-
- if(a==0)
- SDA=0; //在此发出应答或非应答信号
- else
- SDA=1;
- delayus(3);
- SCL=1;
-
- delayus(5); //时钟低电平周期大于4μs
-
- SCL=0; //清时钟线,钳住I2C总线以便继续接收
- delayus(2);
- }
- /****************************************************/
- /***********将一个字节写入DS3231指定的地址***********/
- uchar I2CWrite(uchar addr,uchar bytedata)
- {
- Start();
- SendByte(ADDRTC);
- if (ack == 0)
- return 0;
-
- SendByte(addr);
- if (ack == 0)
- return 0;
-
- SendByte(bytedata);
- if (ack == 0)
- return 0;
-
- Stop();
- delayus(10);
- return 1;
- }
- /****************************************************/
- /************从DS3231当前地址读一个字节************/
- uchar I2CRead()
- {
- uchar read_data;
- Start();
- SendByte(ADDRTC+1);
- if(ack==0)
- {
- DisplayChar(11,1,'t');
- return(0);
- }
- read_data = RcvByte();
- I2CACK(1);
- Stop();
- return read_data;
- }
- /****************************************************/
- /************从DS3231指定地址读一个字节************/
- uchar I2CReadAdd(uchar addr)
- {
- Start();
- SendByte(ADDRTC);
- if(ack==0)
- {
- DisplayChar(12,1,'x');
- return(0);
- }
- SendByte(addr);
- if(ack==0)
- {
- DisplayChar(13,1,'y');
- return(0);
- }
- return(I2CRead());
- }
- /***************************************************/
- /*********************读取时间**********************/
- void Readtime()
- {
- uchar temp;
-
- temp=I2CReadAdd(DS3231_SEC);//秒
- sec=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_MIN);//分
- min=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_HOUR); //时
- //temp&=0x3F;
- hour=BCD2HEX(temp);
- day=I2CReadAdd(DS3231_DAY);//星期
- temp=I2CReadAdd(DS3231_DATE); //日
- date=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_MONTH); //月
- month=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_YEAR); //年
- year=BCD2HEX(temp);
- Dtemp=I2CReadAdd(DS3231_TEMP_H);//温度
- }
- /***************************************************/
- /*******************读取闹铃时间********************/
- void ReadAlarm()
- {
- uchar temp;
-
- temp=I2CReadAdd(DS3231_AL1MIN);//分
- al1_min=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_AL1HOUR); //时
- al1_hour=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_AL1DAY); //星期or日
- al1_day=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_AL2MIN);//分
- al2_min=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_AL2HOUR); //时
- al2_hour=BCD2HEX(temp);
- temp=I2CReadAdd(DS3231_AL2DAY); //星期or日
- al2_day=BCD2HEX(temp);
- }
- /***************************************************/
- /****************修改时间***************************/
- /*void SetTime(uchar yea,uchar mon,uchar da,uchar hou,uchar min,uchar sec)
- {
- uchar temp=0;
-
- temp=B_BCD(sec);
- I2CWrite(0x00,temp);//修改秒
- temp=B_BCD(min);
- I2CWrite(0x01,temp);//修改分
- temp=B_BCD(hou);
- I2CWrite(0x02,temp);//修改时
- temp=B_BCD(da);
- I2CWrite(0x04,temp);//修改日
- temp=B_BCD(mon);
- I2CWrite(0x05,temp);//修改月
- temp=B_BCD(yea);
- I2CWrite(0x06,temp);//修改年
- }*/
- bit runnian()//闰年判断
- {
- if((year%4==0&&year%100!=0)||(year%100==0&&year%400==0))
- {
- return 1;
- }
- else
- {
- return 0;
- }
- }
- void autoweek()
- {
- Readtime();
- if( month == 1 || month == 2 )
- {
- month += 12;
- if( year> 0 )
- year--;
- else
- year = 4;
- }
- day = (1+(( date + 2*month + 3*(month+1)/5 + year + year/4 ) %7));
- I2CWrite(DS3231_DAY,day);
- }
- void InitDS3231()
- {
- SCL=1;
- delayus(5);
- SDA=1;
- delayus(5);
- I2CWrite(DS3231_AL1DAY,0x81); //A1M4置位,时分秒匹配时闹钟响应
- I2CWrite(DS3231_AL2DAY,0x81); //A2M4置位,时分匹配时闹钟响应
- I2CWrite(DS3231_CONTROL,0x04); //中断允许,闹钟1和2关闭
- I2CWrite(DS3231_STATUS,0x00); //32KHZ输出禁止,闹钟标志位清零
- //SetTime(11,1,14,8,10,0);
- }
- /* -------- read temperature -------- */
- /*void read_temp()
- {
- int itemp;
- float ftemp;
- do
- {
- itemp=I2CReadAdd(0x0e);
- } while(itemp & 0x20); // wait until CNVT bit goes inactive
- Start();
- SendByte(ADDRTC);
- SendByte(0x11); //address of temperature MSB
- Start();
- SendByte(ADDRTC + 1); //send the device address for read
- itemp = ( (int) RcvByte() << 5 );
- I2CACK(0);
- itemp += ( RcvByte() >> 3);
- I2CACK(1);
- Stop();
- if(itemp & 0x1000) {itemp += 0xe000;} //if sign bit set, make 16 bit 2's comp
- ftemp = 0.03125 * (float) itemp; // convert to degrees C
- // ftemp = ftemp * 9 / 5 + 32; // skip this if you don't want degrees F
- Dtemp = (uchar) ftemp;
- }*/
复制代码 |