專注電子技術(shù)學(xué)習(xí)與研究
當(dāng)前位置：單片機(jī)教程網(wǎng) >> MCU設(shè)計(jì)實(shí)例 >> 瀏覽文章

基于DS1302的簡(jiǎn)易數(shù)碼管電子鐘

作者:佚名   來源:本站原創(chuàng)   點(diǎn)擊數(shù):…  更新時(shí)間：2012年01月02日   【字體：大 中 小】 
#include<reg51.h>
#include<intrins.h>
#include"DS1302.h"
#include"KEY.h"
#include"IIC.H"
#define uchar unsigned char
#define uint unsigned int
#define LEDIO P0
#define LEDCHIP P2
sbit BEEP=P3^7;
/*************************數(shù)碼管定義**************************************/
  //段碼        0   1    2    3    4    5     6    7   8    9   A    B  -  P   d
uchar code led[15]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x40,0x73,0x5E};
  //位選信號(hào)                                   全滅
uchar code selchip[7]={0x01,0x02,0x04,0x08,0x10,0x20,0x10};
        //數(shù)據(jù)格式：   秒   分   時(shí)   日   月 星期   年
uchar  time_temp[7]={0x00,0x50,0x10,0x12,0x30,0x01,0x11};  //存放初始化時(shí)間及設(shè)置ds1302的數(shù)據(jù)
uchar  DataTime[7];           //讀取DS1302的數(shù)據(jù)
/**********************************************************/    
uchar  display[4][6]={0x06,0x5b,0x6d,0x6f,0x6d,0x6f};    //數(shù)碼管顯示
uchar  i=0,key1,key2=20,pos=0,p,k;      //按鍵和掃描變量
uchar  mod=0;          //模式：設(shè)置時(shí)間進(jìn)入按鈕
bit  bflash=0,clockdown=0;   //設(shè)置和鬧鈴標(biāo)志
uchar   hour,minute,second,year,month,date;  //有關(guān)時(shí)間的變量寄存
uchar  ss=1;//鬧鈴響的次數(shù)可以自己修改
uchar  clock1[3]={0x06,0,0x01},clock2[3]={14,0,0x01};   //鬧鐘時(shí)間與開關(guān),默認(rèn)開關(guān)開
uint num=5000;     //設(shè)置自動(dòng)返回主界面時(shí)間
/////////////////////////////////
void TimeInit()      //定時(shí)掃描初始化
{
 EA = 0;
 TMOD |= 0x10;
 TH1 = 0xfd;
 TL1 = 0xe6;
 EA=1;
// ET0=1;
 ET1=1;
 TR1=1;
}
///////////////////////////////////////////////////////
/*
void t0int() interrupt 1         //T0中斷程序，控制發(fā)音的音調(diào)
{
    TR0 = 0;                     //先關(guān)閉T0
    BEEP = ~BEEP;          //輸出方波, 發(fā)音
    TH0 = t0h;               //下次的中斷時(shí)間, 這個(gè)時(shí)間, 控制音調(diào)高低
    TL0 = t0l;
    TR0 = 1;                     //啟動(dòng)T0
 LEDIO=display[mod][i];
 LEDCHIP=selchip[i];
 if(i>=5)
  i=0;
 else
  i++;
}
*/
/////////////////////////////////////////
void TimeInt() interrupt 3   //定時(shí)掃描中斷
{
 if(i==pos)
 {
   if(bflash==1) //閃爍標(biāo)志;設(shè)置時(shí)間日期和鬧鈴
  {
   if(k++<40)
   {
    if(i==4)
    i=0;
    else
    i=i+2;
   }  
   else
   {
    if(p++>40)
    {
     p=0;
     k=0;
    }
   }
  }
 }
 LEDIO=display[mod][i];
 LEDCHIP=selchip[i];
 if(num==0)      //自動(dòng)還回時(shí)間界面
 {
  mod=0;
  bflash=0;
 }
 else
  num--; 
 if(i>=5)
  i=0;
 else
  i++;
 TH1=0xfa;
 TL1=0xd8;
}
////////////////////////////////////////////////////////
void TimeToBin()       //把時(shí)間變成2進(jìn)制
{
 second=DataTime[0]/16*10+DataTime[0]%16;
 minute=DataTime[1]/16*10+DataTime[1]%16;
 hour=DataTime[2]/16*10+DataTime[2]%16;
 date=DataTime[3]/16*10+DataTime[3]%16;
 month=DataTime[4]/16*10+DataTime[4]%16;
 year=DataTime[6]/16*10+DataTime[6]%16;
}
////////////////////////////////////////////////////////
void TimeToBCD()      //把時(shí)間變?yōu)锽CD碼
{
 time_temp[0]=second/10*16+second%10;
 time_temp[1]=minute/10*16+minute%10;
 time_temp[2]=hour/10*16+hour%10;
 time_temp[3]=date/10*16+date%10;
 time_temp[4]=month/10*16+month%10;
 time_temp[6]=year/10*16+year%10;
}
////////////////////////////////////////////////
    
void  TimerDis()
{ /************************時(shí)間掃描設(shè)置************************/
 display[0][0]=led[hour/10];
 display[0][1]=led[hour%10]|0x80;
 display[0][2]=led[minute/10];
 display[0][3]=led[minute%10]|0x80;
 display[0][4]=led[second/10];
 display[0][5]=led[second%10];
 /************************日期掃描設(shè)置************************/
 display[1][0]=led[year/10];
 display[1][1]=led[year%10]|0x80;
 display[1][2]=led[month/10];
 display[1][3]=led[month%10]|0x80;
 display[1][4]=led[date/10];
 display[1][5]=led[date%10];
 /**********************鬧鈴1掃描設(shè)置****************************/
 display[2][0]=led[10];       //第一個(gè)鬧鐘
 display[2][1]=led[14-clock1[2]];  //P鬧鐘開d鬧鐘關(guān)
 display[2][2]=led[clock1[0]/10];
 display[2][3]=led[clock1[0]%10]|0x80;
 display[2][4]=led[clock1[1]/10];
 display[2][5]=led[clock1[1]%10];
 /***********************鬧鈴2掃描設(shè)置**************************/
 display[3][0]=led[11];      //第一個(gè)鬧鐘
 display[3][1]=led[14-clock2[2]];     //P鬧鐘開d鬧鐘關(guān)
 display[3][2]=led[clock2[0]/10];
 display[3][3]=led[clock2[0]%10]|0x80;
 display[3][4]=led[clock2[1]/10];
 display[3][5]=led[clock2[1]%10];
 /********************************************************/
 //second=DataTime[0]/16*10+DataTime[0]%16;
}
///////////////////////////////////////////////////////
void KeySet()
{
 key1=KeyTab[KeyRvs()];   //讀取鍵盤值
 if(key2!=key1)      //防止連續(xù)跳動(dòng)，釋放按鍵
 {
  if(key1=='*')
  {
   pos=0;        //返回首位方便設(shè)置
   if(!bflash)       //先進(jìn)設(shè)置時(shí)間的界面
   mod=0;
   else
   mod=(mod+1)%4;     //功能選擇
   bflash=1;     //進(jìn)入時(shí)鐘設(shè)置標(biāo)志
   num=5000;      //若是沒有操作自動(dòng)返回主界面
  }
  /////////////////////////////移位按鍵選擇設(shè)置的位置
  if((key1=='0')&&(bflash))
  {
   pos=(pos+2)%6;
   num=5000;
  }
  if((!bflash)&&(key1=='0'))      //一鍵關(guān)閉鬧鈴睡懶覺按鍵，下次又開鬧鈴
  {  
   clockdown=1;       
  }
  ///////////////////////////// 時(shí)分秒設(shè)置，加按鍵，
  if((key1=='#')&&(bflash))
  { 
   num=5000;      //
   if(mod==0)       //時(shí)間設(shè)置
   {
    if(pos==0)
    {
     hour=(hour+1)%24;
    }
    else if(pos==2)
    {
     minute=(minute+1)%60;
    }
    else
    {
     second=(second+1)%60;
    }
   }
   ////////////////////////////////年月日設(shè)置
   if(mod==1)
   {
    if(pos==0)
    {
     year=(year+1)%100;
    }
    else if(pos==2)
    {
     month=(month+1)%13;
    }
    else
    {
     if(month==2)     //二月處理
     {
      if(year%4==0)     //閏年二月
      date=(date+1)%30;
      else
      date=(date+1)%29;
     }
     /////////////////////////////////////////////////大月設(shè)置
     else if((month==1)||(month==3)||(month==5)||(month==7)||(month==8)||(month==10)||(month==12))
      date=(date+1)%32;
     else  /////////////////////////////////////////小月設(shè)置
      date=(date+1)%31;
     }     
   }
   //////////////////////////////////////////////鬧鈴1設(shè)置
   if(mod==2)
   {
    if(pos==0)         //鬧鈴1開關(guān)設(shè)置
    {
     clock1[2]=(clock1[2]+1)%2;
    }
    if(pos==2)
    {
     clock1[0]=(clock1[0]+1)%24;
    }
    if(pos==4)
    {
     clock1[1]=(clock1[1]+1)%60;
    }
   }
   //////////////////////////////////////////////鬧鈴2設(shè)置
   if(mod==3)
   {
    if(pos==0)           //鬧鈴2開關(guān)設(shè)置
    {
     clock2[2]=(clock2[2]+1)%2;
    }
    if(pos==2)
    {
     clock2[0]=(clock2[0]+1)%24;
    }
    if(pos==4)
    {
     clock2[1]=(clock2[1]+1)%60;
    }
   }
  }
  if((!bflash)&&(key1=='#'))      //查看鬧鈴設(shè)置
  {  
   mod=(mod+1)%2+2;       
  }
  ///////////////////////////////////////////////確認(rèn)鍵設(shè)置
  if(key1=='D')
  {
   if(bflash)           //清除設(shè)置標(biāo)志
   {
    bflash=0;
    mod=0;
    TimeToBCD();
    Set_Ds1302(time_temp);
    while(!Write_Nbyte_iic(SLAVE,0x50,clock1,3));
    while(!Write_Nbyte_iic(SLAVE,0x60,clock2,3));
   }
   else         //切換時(shí)間和日期
    mod=(mod+1)%2;
   num=5000;          //自動(dòng)返回時(shí)間界面
  }
  key2=key1;
 }            //鍵值保存。釋放按鍵用
}
//////////////////////////////////////
/********************鬧鈴響一分鐘****************************/
void CLOCK()
{ 
 if((clock1[0]==hour)&&(clock1[1]==minute)&&(clock1[3])||((clock2[0]==hour)&&(clock2[1]==minute)&&(clock2[3])))
 {
 
  if(!clockdown)     //沒有睡懶覺則正常響鈴
   BEEP=~BEEP;
  else
   BEEP=1;    //否則關(guān)閉鬧鈴
 }        
 else
 {
  clockdown=0;         //恢復(fù)鬧鈴
  BEEP=1;             //關(guān)閉鬧鈴
 }     
}
/////////////////////////////////////////
main()
{
 while(!Read_Nbyte_iic(SLAVE,0x50,clock1,3));
 while(!Read_Nbyte_iic(SLAVE,0x60,clock2,3));
 TimeInit();      //斷電以后喚醒時(shí)鐘
 Init_Ds1302();
 while(1)
 {
  Get_Ds1302(DataTime); //讀取時(shí)間
  TimerDis();   //段碼處理
  KeySet();    //掃描按鍵
  if(!bflash)   //如果沒有進(jìn)入設(shè)置時(shí)間則正常顯示否則時(shí)間暫停
  {
   TimeToBin();
  }
  CLOCK();  //鬧鈴設(shè)置
 }
}
/*******************************************************************************************************************************/
#ifndef  _DS1302_H_
#define  _DS1302_H_
/*********************************************************************************/
#include<reg51.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
sbit RST = P3^4;
sbit SCLK  = P3^5;
sbit IO    = P3^6;
/********以下是函數(shù)聲明********/
void  Ds1302_Write_Byte(uchar ch);   //寫一字節(jié)數(shù)據(jù)函數(shù)聲明
uchar Ds1302_Read_Byte();        //讀一字節(jié)數(shù)據(jù)函數(shù)聲明
void  Write_Ds1302(uchar cmd,uchar indata); //寫DS1302函數(shù)聲明
uchar Read_Ds1302(uchar addr);   //讀DS1302函數(shù)聲明
void  Set_Ds1302(uchar *str);    //設(shè)置時(shí)鐘數(shù)據(jù)地址 格式為: 秒 分 時(shí) 日 月 星期 年
void  Get_Ds1302(uchar *str);    //讀當(dāng)前時(shí)間函數(shù)聲明
void  Init_Ds1302();     //DS1302初始化函數(shù)聲明
/********以下是寫一字節(jié)數(shù)據(jù)函數(shù)********/
void Ds1302_Write_Byte(uchar ch)
{
   uchar n;
   EA=0;
   for(n=0;n<8;n++)
   {
    SCLK=0;             //寫時(shí)低電平改變數(shù)據(jù)
    if(ch&0x01)
    IO=1;
    else
    IO=0;
    SCLK=1;            //高電平把數(shù)據(jù)寫入DS1302
    _nop_();
 _nop_();
    ch=ch>>1;
   }
   EA=1;
}
/********以下是讀一字節(jié)數(shù)據(jù)函數(shù)********/
uchar Ds1302_Read_Byte()   
{
   uchar n,temp=0;
   EA=0;
   IO=1;               
   for(n=0;n<8;n++)
   {
    SCLK=1;
    if(IO)
    temp|=0x80;
    else
    temp&=0x7f;
    SCLK=0;             //產(chǎn)生下跳沿
    temp=temp>>1;
   }
   EA=1;
   return (temp);
}
/********寫DS1302函數(shù), 往DS1302的某個(gè)地址寫入數(shù)據(jù) ********/
void Write_Ds1302(uchar cmd,uchar indata)
{
   SCLK=0;
   RST=1;
   Ds1302_Write_Byte(cmd);       
   Ds1302_Write_Byte(indata);
   SCLK=0;
   RST=0;
}
/********讀DS1302函數(shù),讀DS1302某地址的的數(shù)據(jù)********/
uchar Read_Ds1302(uchar addr)
{
   uchar backdata;
   RST=0;
   SCLK=0;
   RST=1;
   Ds1302_Write_Byte(addr);        //先寫地址
   backdata=Ds1302_Read_Byte();    //然后讀數(shù)據(jù)
   SCLK=0;
   RST=0;
   return (backdata);
}
/********設(shè)置初始時(shí)間函數(shù)********/
void Set_Ds1302(uchar *str)
{
   uchar n,addr = 0x80;
   Write_Ds1302(0x8e,0x00);          //寫控制字，允許寫操作
   for(n=0;n<7;n++)
   {
     Write_Ds1302(addr,*str);
     addr=addr+2;
  str++;
   }
   Write_Ds1302(0x8e,0x80);          //寫保護(hù)，不允許寫
}
/********讀取當(dāng)前時(shí)間函數(shù)********/
void Get_Ds1302(uchar *str)
{
 uchar n,addr = 0x81;
 for(n=0;n<7;n++)
 {
  str[n]=Read_Ds1302(addr);
  addr+=2;
 }
}
/************初始化時(shí)間********************/
void Init_Ds1302()
{
 RST=0;
    SCLK=0;
 RST=1;
 Write_Ds1302(0x80,0x00);  //寫秒寄存器
    Write_Ds1302(0x90,0xab);  //寫充電器
    Write_Ds1302(0x8e,0x80);  //寫保護(hù)控制字，禁止寫
}
///////////////////////////////////////
#endif
/***********************************************************************************************************************/
#ifndef _KEY_H_
#define _KEY_H_
/****************************************************/
#define KEYIO P1       //定義鍵盤的輸入口
unsigned char code KeyTab[17]="123A456B789C*0#D";         //鍵盤查表
/***********************************************/
void delay_ms(unsigned int time)   //誤差 -0.000000000003us
{
    unsigned char a,b;
 while(time--)
 {
       for(b=102;b>0;b--)
        for(a=3;a>0;a--);
 }
}
/**************************************************/
///////////////////////////////////////////////
unsigned char KeyRvs(void)    //反轉(zhuǎn)法
{
  unsigned char temH, temL, key;
 delay_ms(10);     //兩次掃描間隔為10ms，消除抖動(dòng)導(dǎo)致的誤操作
  KEYIO = 0x0f; temL = KEYIO;//高四位先輸出0；讀入，低四位含有按鍵信息
  KEYIO = 0xf0; temH = KEYIO;//然后反轉(zhuǎn)輸出0；讀入，高四位含有按鍵信息
 switch(temL)
 {
  case 0x0e: key = 0; break;
  case 0x0d: key = 1; break;
  case 0x0b: key = 2; break;
  case 0x07: key = 3; break;
  default: return 16;//按下的不是上述按鍵，就當(dāng)是沒有按鍵
  }
 switch(temH)
 {
  case 0xe0: return  key;
  case 0xd0: return (key + 4);
  case 0xb0: return (key + 8);
  case 0x70: return (key + 12);
  default: return 16;//按下的不是上述按鍵，就當(dāng)是沒有按鍵
 }
 
 
}
/**********************************************************/ 
#endif
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
#ifndef  _IIC_H
#define  _IIC_H_
/***************************************************/

#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define SLAVE 0xa0   //IIC器件地址  注意全部接地
#define Rslave SLAVE+1   //送讀控制字
sbit SDA=P3^0;     //IIC數(shù)據(jù)接口
sbit SCL=P3^1;     //IIC時(shí)鐘接口
////////////////////////////////////////////////////////
void delay_iic(uint time)
{
 for(time;time>0;time--);
}
///////////////////////////////////////
void start_iic()
{
 SDA=1;
 SCL=1;
 delay_iic(10);
 SDA=0;
 delay_iic(10);
 SCL=0;
}

void stop_iic()
{
 SDA=0;
 SCL=1;
 delay_iic(10);
 SDA=1;
 delay_iic(10);
 SCL=0;
}

void ack_iic()
{
 SDA=0;
 SCL=1;
 delay_iic(10);
 SCL=0;
 SDA=1;
}

void nack_iic()
{
 SDA=1;
 SCL=1;
 delay_iic(10);
 SCL=0;
 SDA=0;
}

////////////////////////* write 1 byte   *//////////////////////
void write_byte(uchar ch)
{
 uchar i;
 for(i=0;i<8;i++)
 {
  if(ch&0x80)
  SDA=1;
  else
  SDA=0;
  SCL=1;
  delay_iic(10);
  SCL=0;
  ch=ch<<1;
 }
 SDA=1;
 SCL=1;
 delay_iic(10);
 if(SDA==1)
 F0=0;
 else
 F0=1;
 SCL=0;
}
///////////////////////////*  read 1 byte  *////////////////////////
uchar read_byte()
{
 uchar i;
 uchar r=0;
 SDA=1;
 for(i=0;i<8;i++)
 {
  r=r<<1;
  SCL=1;
  delay_iic(10);
  if(SDA==1)
  r++;
  SCL=0;
 }
 return r;
}
/***********************寫一個(gè)字節(jié)**************************
bit  Write_Byte_iic(uchar addr,uchar ch)
{
 start_iic();  //產(chǎn)生起始信號(hào)
 write_byte(SLAVE);   //發(fā)送從器件地址
 if(F0==0) return 0;   //檢查應(yīng)答位
 write_byte(addr);   //發(fā)送目的地址
 if(F0==0) return 0;
 write_byte(ch);   //發(fā)送8為數(shù)據(jù)
 if(F0==0) return 0;
 stop_iic();      //停止信號(hào)
 return 1;
}
  
/********************讀一個(gè)字節(jié)***************************
uchar Read_Byte_iic(uchar addr)
{ 
 uchar ch;       
 start_iic();    //啟動(dòng)IIC
 write_byte(SLAVE);    //寫器件地址
 if(F0==0)return 0;
 write_byte(addr);    //寫讀取的地址
 if(F0==0)return 0;
 start_iic();   //再次產(chǎn)生起始信號(hào)，不能少
 write_byte(Rslave);  //送讀控制字
 if(F0==0)return 0;
 ch=read_byte();   //讀出指定單元的內(nèi)容
 nack_iic();    //非應(yīng)答信號(hào)
 stop_iic();    //停止IIC
 return (ch); 
}
 ************************************************************/
////////////////////////////////////////////////////////////
bit Read_Nbyte_iic(uchar slave,uint addr,uchar *str,uchar  numb)
{
 uchar i;
 start_iic();
 write_byte(slave);  //write  iic  addr
 if(F0==0)
 return 0;
 write_byte(addr);  //write  data   addr
 if(F0==0)
 return 0;
 start_iic();   //再次產(chǎn)生起始信號(hào)，不能少
 write_byte(Rslave);  //送讀控制字
 if(F0==0)
 return 0;
 for(i=0;i<numb-1;i++)    //
 {
  *str=read_byte();
  ack_iic();
  str++;
 }
 *str=read_byte();
 nack_iic();
 stop_iic();
 return(1);
}
/////////////////////////* write n  byte  *////////////////////////////
bit Write_Nbyte_iic(uchar slave,uint addr,uchar *str,uchar numb)
{
 uchar i;
 start_iic();
 write_byte(slave);  //write  iic  addr
 if(F0==0)
 return 0;
 write_byte(addr);  //write  data   addr
 if(F0==0)
 return 0;
 for(i=0;i<numb;i++)    //write data
 {
  write_byte(*str);
  if(F0==0)
  return 0;
  str++;
 }
 stop_iic();       //stop iic
 return(1);
}

/////////////////////////////////////////////////////////////////
#endif
【關(guān)閉窗口】

相關(guān)文章