找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2098|回复: 0
打印 上一主题 下一主题
收起左侧

时钟

[复制链接]
跳转到指定楼层
楼主
ID:129350 发表于 2016-7-5 20:50 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
/*DS1302 端口设置 */
sbit SCK=P3^6;        //DS1302时钟
sbit SDA=P3^4;      //DS1302 IO
sbit RST= P3^5;   // DS1302复位
bit ReadRTC_Flag;      //读DS1302全局变量
/* 12864端口定义*/
#define LCD_data P0             //带字库液晶12864数据口
sbit LCD_RS = P2^4;            //寄存器选择输入
sbit LCD_RW = P2^5;            //液晶读/写控制
sbit LCD_EN = P2^6;     //液晶使能控制
sbit    PSB=P2^1;          //并口控制
sbit    RES=P2^7;
uchar code dis1[] = {"  电子设计天地 "};        //液晶显示的汉字
uchar code dis2[] = {"有志者,事竟成!"};
uchar code dis4[] = {'0','1','2','3','4','5','6','7','8','9'};
unsigned char temp;
#define delayNOP() {_nop_();_nop_();_nop_();_nop_();};
void lcd_pos(uchar X,uchar Y); //确定显示位置
unsigned char l_tmpdate[7]={0,7,16,19,10,1,9};//秒分时日月周年09-10-1916:07:00
code unsigned char write_rtc_address[7]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c}; //秒分时日月周年 最低位读写位
code unsigned char read_rtc_address[7]={0x81,0x83,0x85,0x87,0x89,0x8b,0x8d};
void Write_Ds1302_byte(unsigned char temp);
void Write_Ds1302( unsigned char address,unsigned char dat );
unsigned char Read_Ds1302 ( unsigned char address );
void Read_RTC(void);//read RTC
void Set_RTC(void); //set RTC
void InitTIMER0(void);//inital timer0
/*******************************************************************/
/*                                                                */
/* 延时函数                                                       */
/*                                                                */
/*******************************************************************/
void delay(unsigned int m)            //延时程序
{
  unsigned int i,j;
  for(i=0;i<m;i++)
     for(j=0;j<10;j++);
}
/*******************************************************************/
/*                                                                 */
/*检查LCD忙状态                                                   */
/*lcd_busy为1时,忙,等待。lcd-busy为0时,闲,可写指令与数据。      */
/*                                                                */
/*******************************************************************/
bit lcd_busy()
{                          
    bit result;
    LCD_RS = 0;
    LCD_RW = 1;
    LCD_EN = 1;
    delayNOP();
    result = (bit)(P0&0x80);
    LCD_EN = 0;
    return(result);
}
/*******************************************************************/
/*                                                                */
/*写指令数据到LCD                                                 */
/*RS=L,RW=L,E=高脉冲,D0-D7=指令码。                             */
/*                                                                */
/*******************************************************************/
void lcd_wcmd(uchar cmd)
{                          
   while(lcd_busy());
    LCD_RS = 0;
    LCD_RW = 0;
    LCD_EN = 0;
    _nop_();
    _nop_();
    P0 = cmd;
    delay(1);
    LCD_EN = 1;
    delay(1);
    LCD_EN = 0;
}
/*******************************************************************/
/*                                                                */
/*写显示数据到LCD                                                 */
/*RS=H,RW=L,E=高脉冲,D0-D7=数据。                               */
/*                                                                */
/*******************************************************************/
void lcd_wdat(uchar dat)
{                          
   while(lcd_busy());
    LCD_RS = 1;
    LCD_RW = 0;
    LCD_EN = 0;
    P0 = dat;
    delayNOP();
    LCD_EN = 1;
    delay(1);
    LCD_EN = 0;
}
/*******************************************************************/
/*                                                                */
/* LCD初始化设定                                                 */
/*                                                                */
/*******************************************************************/
void lcd_init()
{
    P0=0xFF;
P2=0xFF;
delay(40);
PSB=1;             //并口方式。
delay(1);
RES=0;
delay(1);
RES=1;
delay(10);
lcd_wcmd(0x30);
delay(100);
lcd_wcmd(0x30);
delay(37);
lcd_wcmd(0x08);      
delay(100);
lcd_wcmd(0x10);
delay(100);
lcd_wcmd(0x0c);  //显示开,关光标
delay(100);
lcd_wcmd(0x01);  //清除LCD的显示内容
delay(100);
lcd_wcmd(0x06);
delay(100);
     



}
/*********************************************************/
/*                                                      */
/* 设定显示位置                                          */
/*                                                      */
/*********************************************************/
void lcd_pos(uchar X,uchar Y)
{                          
   uchar pos;
   if (X==0)
     {X=0x80;}
   else if (X==1)
     {X=0x90;}
   else if (X==2)
     {X=0x88;}
   else if (X==3)
     {X=0x98;}
   pos = X+Y ;
   lcd_wcmd(pos);     //显示地址
}
void InitTIMER0(void)
{
TMOD|=0x01;//定时器设置 16位
TH0=0xef;//初始化值
TL0=0xf0;
ET0=1;
TR0=1;
EA=1;
}
void Write_Ds1302_Byte(unsigned char temp)
{
unsigned char i;
for(i=0;i<8;i++)     //循环8次 写入数据
{
      SCK=0;
      SDA=temp&0x01;     //每次传输低字节
      temp>>=1;    //右移一位
      SCK=1;
}
}  
/****************************************************************************/
void Write_Ds1302( unsigned char address,unsigned char dat )     
{
   RST=0;
   _nop_();
   SCK=0;
   _nop_();
   RST=1;
   _nop_();  //启动
   Write_Ds1302_Byte(address); //发送地址
   Write_Ds1302_Byte(dat);   //发送数据
   RST=0;   //恢复
}
/****************************************************************************/
unsigned char Read_Ds1302 ( unsigned char address )
{
   unsigned char i,temp=0x00;
   RST=0;
   _nop_();
   SCK=0;
   _nop_();
   RST=1;
   _nop_();
   Write_Ds1302_Byte(address);
   for (i=0;i<8;i++)    //循环8次 读取数据
   {  
     if(SDA)
     temp|=0x80;    //每次传输低字节
     SCK=0;
     temp>>=1;    //右移一位
     SCK=1;
   }
    RST=0;
_nop_();   //以下为DS1302复位的稳定时间
    RST=0;
SCK=0;
_nop_();
SCK=1;
_nop_();
SDA=0;
_nop_();
SDA=1;
_nop_();
return(temp);    //返回
}
/****************************************************************************/
void Read_RTC(void)   //读取 日历
{
unsigned char i,*P;
P=read_rtc_address;//地址传递
for(i=0;i<7;i++)   //分7次读取 秒分时日月周年
{
  l_tmpdate[i]=Read_Ds1302 (*P);
  P++;
}
}
/***********************************************************************/
void Set_RTC(void)   //设定 日历
{
    unsigned char i,*p,tmp;
for(i=0;i<7;i++)
{           //BCD处理
    tmp=l_tmpdate[i]/10;
    l_tmpdate[i]=l_tmpdate[i]%10;
    l_tmpdate[i]=l_tmpdate[i]+tmp*16;
}
    Write_Ds1302(0x8E,0X00);
    p=write_rtc_address; //传地址
    for(i=0;i<7;i++)   //7次写入 秒分时日月周年
    {
     Write_Ds1302(*p,l_tmpdate[i]);
     p++;
    }
    Write_Ds1302(0x8E,0x80);
}
void tim(void) interrupt 1 using 1//中断,用于数码管扫描
{
    static unsigned char i,num;
    TH0=0xf5;
    TL0=0xe0;
   //P0=table[l_tmpdisplay];   //查表法得到要显示数字的数码段
//P2=table1;
i++;
if(i==8)
    {
     i=0;
     num++;
     if(20==num)       //隔段时间读取1302的数据。时间间隔可以调整
     {
         ReadRTC_Flag=1; //使用标志位判断
         num=0;
     }
   
    }
}
void main()
{
uchar i;
InitTIMER0();
Set_RTC();
lcd_init();
    delay(100);
              //初始化LCD            
while(1)
{  
  if(ReadRTC_Flag)
  {
      ReadRTC_Flag=0;
   Read_RTC();
   lcd_pos(0,0);             //设置显示位置为第一行的第1个字符
      i = 0;
    while(dis1[i] != '\0')
       {                         //显示字符
         lcd_wdat(dis1[i]);
         i++;
       }
     
      lcd_pos(1,0);             //设置显示位置为第二行的第1个字符
      i = 0;
    delay(10);
      while(dis2[i] != '\0')
      {
         lcd_wdat(dis2[i]);      //显示字符
         i++;
      }
   lcd_pos(2,0);
   lcd_wdat(dis4[l_tmpdate[6]/16]);          //DS1302是BCD码,进行处理得到十位与个位数。
   lcd_pos(2,1);            
        lcd_wdat(dis4[l_tmpdate[6]%16]);
   lcd_pos(2,2);            
        lcd_wdat('-');
   lcd_pos(2,3);            
        lcd_wdat(dis4[l_tmpdate[4]/16]);
   lcd_pos(2,4);            
        lcd_wdat(dis4[l_tmpdate[4]%16]);
   lcd_pos(2,5);            
        lcd_wdat('-');
   lcd_pos(2,6);            
        lcd_wdat(dis4[l_tmpdate[3]/16]);
   lcd_pos(2,7);            
        lcd_wdat(dis4[l_tmpdate[3]%16]);           //设置显示位置为第三行的第1个字符
      
   lcd_pos(3,0);             //设置显示位置为第四行的第1个字符
        lcd_wdat(dis4[l_tmpdate[2]/16]);
   lcd_pos(3,1);            
        lcd_wdat(dis4[l_tmpdate[2]%16]);
   lcd_pos(3,2);            
        lcd_wdat(':');
   lcd_pos(3,3);            
        lcd_wdat(dis4[l_tmpdate[1]/16]);
   lcd_pos(3,4);            
        lcd_wdat(dis4[l_tmpdate[1]%16]);
   lcd_pos(3,5);            
        lcd_wdat(':');
   lcd_pos(3,6);            
        lcd_wdat(dis4[l_tmpdate[0]/16]);
   lcd_pos(3,7);            
        lcd_wdat(dis4[l_tmpdate[0]%16]);
   
  }
}
}
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表