//////////////////////////////////////////////////////////////////////////////////////////////////////
// DS3231时钟显示，在4位时钟数码管上显示小时和分钟
// 作者：李守军
// 时间：2015.06
// 版本：1.0
// 地址分配：时钟为4位共阴时钟数码管，74HC573驱动，接P0口（须接上接电阻）
// P20：74HC573片选，P21：小时十位位选；P22：小时个位位选；P23：时钟小数点位选；P24：分钟十位位选；P25：分钟个位位选。
// P10：SCL；P11：SDA；P12：key1;P13:key2; P14:key3。
// 功能说明：
// key1：用来切换4位，切换到哪位，哪位就闪烁，此时可以用key2对闪烁位进行修改，修改好按key3键进行确认，完成时间的修改。
// 特点：
// DS3232SN计时准确，key2依赖于key1,key3依赖于key2，前者变化是后者变化的基础。即若不处于修改状态，是没有办法修改的，
// 若key2没有执行修改，key3是不能进行确认的。这样可以保证误操作。
//////////////////////////////////////////////////////////////////////////////////////////////////////
#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int
#define DataPort P0
#define WeiPort P2
sbit LATCH=P2^0;
sbit SDA=P1^1; //模拟I2C数据传送位SDA
sbit SCL=P1^0; //模拟I2C时钟控制位SCL
sbit key1=P1^2;
sbit key2=P1^3;
sbit key3=P1^4;
bit ack; //应答标志位
#define DS3231_WriteAddress 0xD0 //器件写地址
#define DS3231_ReadAddress 0xD1 //器件读地址
#define DS3231_SECOND 0x00 //秒
#define DS3231_MINUTE 0x01 //分
#define DS3231_HOUR 0x02 //∈�
#define DS3231_WEEK 0x03 //星期
#define DS3231_DAY 0x04 //日
#define DS3231_MONTH 0x05 //月
#define DS3231_YEAR 0x06 //年
#define DS3231_CONTROL 0x0e //控制寄存器
#define DS3231_STATUS 0x0f //状态寄存器
#define DS3231_TEMPERATUREH 0x11 //温度高字节（8位）
#define DS3231_TEMPERATUREL 0x12 //温度低字节（高2位）
/////
uchar code DuanMa[] = {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x00};//共阴数码管0…9，消隐
uchar WeiMa[4];
uchar Time[4]={1,2,3,4}; //数码管上要显示内容
uchar data dis_buf[8]; //显示缓冲区
uchar HiHour,LoHour,HiMinute,LoMinute,Hour,Minute;
uchar key1cnt,key2cnt;
/////
void delay10ms(void)
{
unsigned char i,j,k;
for(i=5;i>0;i--)
for(j=4;j>0;j--)
for(k=248;k>0;k--);
}
void TimeDisplay(uchar Dhour,uchar Dmin,uchar Dsec);
uchar BCD2HEX(uchar val) //BCD?转换为Byte
{
return ((val>>4)*10)+(val&0x0f);
}
uchar HEX2BCD(uchar val) //B码转换为BCD码
{
return (((val%100)/10)<<4)|(val%10);
}
void delayus(uchar i)
{
while(--i) ;
}
void Start_I2C()
{
SDA=1; //发送起始条件的数据信号
delayus(1);
SCL=1;
delayus(5); //起始条件建立时间大于4.7us,延时
SDA=0; //发送起始信号
delayus(5); //起始条件锁定信号大于4us
SCL=0; //钳信IIC总线,准备发送或接收数据
delayus(2);
}
void Stop_I2C()
{
SDA=0; //发送结束条件的数据信号
delayus(1); //发送结束条件的时钟信号
SCL=1; //结束条件建立时间大于4us
delayus(5);
SDA=1; //发送I2C总线结束信号
delayus(4);
}
void SendByte(uchar c)
{
uchar BitCnt;
for(BitCnt=0;BitCnt<8;BitCnt++) //要传送的数据长度为8位
{
if((c<<BitCnt)&0x80)
SDA=1; //判断发送位
else
SDA=0;
delayus(1);
SCL=1; //置时钟线为高,通知被控器开始接收数据位
delayus(5); //保证时钟高电平大于4us
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 retc;
uchar BitCnt;
retc=0;
SDA=1; //置数据线为输入方式
for(BitCnt=0;BitCnt<8;BitCnt++)
{
delayus(1);
SCL=0; //置时钟线为低,准备接收数据位
delayus(5); //时钟低电平大于4.7us
SCL=1; //置时钟线为高使数据线上数据有效
delayus(3);
retc=retc<<1;
if(SDA==1)
retc=retc+1; //读数据位,接收的数据放入retc中
delayus(2);
}
SCL=0;
delayus(2);
return(retc);
}
void Ack_I2C(bit a)
{
if(a==0)
SDA=0; //在此发出应答或非应答信号
else
SDA=1;
delayus(3);
SCL=1;
delayus(5); //时钟低电平周期大于4us
SCL=0; //清时钟线，钳住I2C总线以便继续接收
delayus(2);
}
uchar write_byte(uchar addr, uchar write_data)
{
Start_I2C();
SendByte(DS3231_WriteAddress);
if (ack == 0)
{
Time[0]=9;
return 0;
}
SendByte(addr);
if (ack == 0)
return 0;
SendByte(write_data);
if (ack == 0)
return 0;
Stop_I2C();
delayus(10);
return 1;
}
uchar read_current()
{
uchar read_data;
Start_I2C();
SendByte(DS3231_ReadAddress);
if(ack==0)
return(0);
read_data = RcvByte();
Ack_I2C(1);
Stop_I2C();
return read_data;
}
uchar read_random(uchar random_addr)
{
Start_I2C();
SendByte(DS3231_WriteAddress);
if(ack==0)
return(0);
SendByte(random_addr);
if(ack==0)
return(0);
return(read_current());
}
void ModifyTime(uchar yea,uchar mon,uchar da,uchar hou,uchar min,uchar sec)
{
uchar temp=0;
temp=HEX2BCD(yea);
write_byte(DS3231_YEAR,temp); //修改年
temp=HEX2BCD(mon);
write_byte(DS3231_MONTH,temp); //修改月
temp=HEX2BCD(da);
write_byte(DS3231_DAY,temp); //修改日
temp=HEX2BCD(hou);
write_byte(DS3231_HOUR,temp); //修改时
temp=HEX2BCD(min);
write_byte(DS3231_MINUTE,temp); //修改分
temp=HEX2BCD(sec);
write_byte(DS3231_SECOND,temp); //修改秒
}
void TimeDisplay(uchar Dhour,uchar Dmin,uchar Dsec)
{
dis_buf[7]=DuanMa[Dhour / 10]; // 时十位
dis_buf[6]=DuanMa[Dhour % 10]; // 时个位
dis_buf[4]=DuanMa[Dmin / 10]; // 分十位
dis_buf[3]=DuanMa[Dmin % 10]; // 分个位
dis_buf[1]=DuanMa[Dsec / 10]; // 秒十位
dis_buf[0]=DuanMa[Dsec % 10]; // 秒个位
dis_buf[2]=0xbf; // 显示"-"
dis_buf[5]=0xbf;
Time[3]=Dhour / 10; //by lEE 此处显示小时十位
Time[2]=Dhour % 10; //by LEE 此处显示小时个位
Time[1]=Dmin / 10; //by LEE 此处显示分钟十位
Time[0]=Dmin % 10; //by Lee 此处显示分钟个位
}
void DateDisplay(uchar Dyear,uchar Dmonth,uchar Dday)
{
dis_buf[7]=DuanMa[Dyear / 10]; // 年十位
dis_buf[6]=DuanMa[Dyear % 10]; // 年个位
dis_buf[4]=DuanMa[Dmonth / 10]; // 月十位
dis_buf[3]=DuanMa[Dmonth % 10]; // 月个位
dis_buf[1]=DuanMa[Dday / 10]; // 日十位
dis_buf[0]=DuanMa[Dday % 10]; // 日个位
dis_buf[2]=0xbf; // 显示"-"
dis_buf[5]=0xbf;
}
void get_show_time(void)
{
uchar Htemp1,Htemp2,Mtemp1,Mtemp2,Stemp1,Stemp2;
Htemp1=read_random(DS3231_HOUR); //时，24小时制
Htemp1&=0x3f;
Htemp2=BCD2HEX(Htemp1);
Mtemp1=read_random(DS3231_MINUTE); //分
Mtemp2=BCD2HEX(Mtemp1);
Stemp1=read_random(DS3231_SECOND); //秒
Stemp2=BCD2HEX(Stemp1);
TimeDisplay(Htemp2,Mtemp2,Stemp2);
}
void get_show_date(void)
{
