- #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;
- }*/
復制代碼 |