📄 main.c

📁 单片机51 实现万年历编程
💻 C
📖 第 1 页 / 共 2 页
字号:
12 下一页
#include<reg51.h> 
#include <intrins.h>
#include <stdio.h>

#define uint unsigned int
#define uchar unsigned char
#define Nop() _nop_()
sbit ACC0 = ACC^0;
sbit ACC7 = ACC^7;
sbit T_CLK = P3^1; /*实时时钟时钟线引脚 */
sbit T_IO = P3^2; /*实时时钟数据线引脚 */
sbit T_RST = P3^0; /*实时时钟复位线引脚 */

sbit RS=P1^0;   //设置连接线
sbit RW=P1^1;
sbit E=P1^2;
sbit D7=P2^7;
uchar a[7]={0,0,0,1,1,0,7}; 
uchar b[7];
uint SEC,MIN,HOUR,DAY,MONTH,YEAR,WEEKDAY;
unsigned char year_lunar;
unsigned char month_lunar;
unsigned char day_lunar;
uint yue,ri;
///以下为LCD驱动程序
void busy()          
{ 
   do {P2=0xff;  
      RS=0; 
      RW=1;
	   E=0;
      E=1;
     }while (D7);
}

void write_com(char commend)
{ 
  busy();
  P2=commend;
  RS=0;
  RW=0;
  E=0;
}

void write_char(char lcddata)
{ busy();
  P2=lcddata;
   RS=1;
  RW=0;
  E=0;
}

void write_string(char * s)
{
while (*s!=0x00)
write_char(*s++);
}

void i_lcd()//
{ 
  write_com(0x38);//置功能
  write_com(0x01);//清屏 
  write_com(0x06);//输入模式 
  write_com(0x0c);//显示开
}
/////以上为LCD驱动程序

void delay(uint i)   //延时几豪秒
  {
      uint j,k;
	  for(j=0;j<=i;j++)
	   for(k=0;k<125;k++); //1MS
   }          
  //////////将数据写入DS1302 
 //////////将数据写入DS1302 
void RTInputByte(unsigned char d) 
{ 
	unsigned char i;
	ACC = d;
	for(i=8; i>0; i--)
	{
		Nop();
		T_IO = ACC0; /*相当于汇编中的 RRC */
		Nop();
		T_CLK = 1;
		Nop();
		T_CLK = 0;
		Nop();
		ACC = ACC >> 1;
		Nop(); 
	} 
}
/******************************************************************** 


***********************************************************************/
unsigned char RTOutputByte(void) 
{ 
	unsigned char i;
	T_IO = 1;
	for(i=8; i>0; i--)
	{
		Nop();
		ACC = ACC >>1; /*相当于汇编中的 RRC */
		Nop();
		ACC7 = T_IO;
		Nop();
		T_CLK = 1;
		Nop();
		T_CLK = 0;
		Nop();
	} 
	return(ACC); 
}
/******************************************************************** 


***********************************************************************/
void W1302(unsigned char ucAddr, unsigned char ucDa)
{
	T_RST = 0;
	Nop();
	T_CLK = 0;
	Nop();
	T_RST = 1;
	Nop();
	RTInputByte(ucAddr); /* 地址，命令 */
	Nop();
	RTInputByte(ucDa); /* 写1Byte数据*/
	Nop();
	T_CLK = 1;
	Nop();
	T_RST = 0;
} 
/******************************************************************** 

***********************************************************************/
unsigned char R1302(unsigned char ucAddr)
{
	unsigned char ucData;
	T_RST = 0;
	Nop();
	T_CLK = 0;
	Nop();
	T_RST = 1;
	Nop();
	RTInputByte(ucAddr); /* 地址，命令 */
	Nop();
	ucData = RTOutputByte(); /* 读1Byte数据 */
	Nop();
	T_CLK = 1;
	Nop();
	T_RST = 0;
	Nop();
	return(ucData);
}
/******************************************************************** 


***********************************************************************/
void BurstW1302T(unsigned char *pWClock)
{
	unsigned char i;
	W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
	Nop();
	T_RST = 0;
	Nop();
	T_CLK = 0;
	Nop();
	T_RST = 1;
	Nop();
	RTInputByte(0xbe); /* 0xbe:时钟多字节写命令 */
	Nop();
	for (i = 8; i>0; i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/
	{
		Nop();
		RTInputByte(*pWClock); /* 写1Byte数据*/
		Nop();
		pWClock++;
		Nop();
	}
	T_CLK = 1;
	Nop();
	T_RST = 0;
} 
/******************************************************************** 


***********************************************************************/
void BurstR1302T(unsigned char *pRClock)
{
	unsigned char i;
	T_RST = 0;
	Nop();
	T_CLK = 0;
	Nop();
	T_RST = 1;
	Nop();
	RTInputByte(0xbf); /* 0xbf:时钟多字节读命令 */
	Nop();
	for (i=8; i>0; i--) 
	{
		Nop();
		*pRClock = RTOutputByte(); /* 读1Byte数据 */
		Nop();
		pRClock++;
		Nop();
	}
	T_CLK = 1;
	Nop();
	T_RST = 0;
}
/******************************************************************** 


***********************************************************************/
void BurstW1302R(unsigned char *pWReg)
{
	unsigned char i;
	W1302(0x8e,0x00); /* 控制命令,WP=0,写操作*/
	Nop();
	T_RST = 0;
	Nop();
	T_CLK = 0;
	Nop();
	T_RST = 1;
	Nop();
	RTInputByte(0xfe); /* 0xbe:时钟多字节写命令 */
	Nop();
	for (i=31; i>0; i--) /* 31Byte 寄存器数据 */
	{
		Nop();
		RTInputByte(*pWReg); /* 写1Byte数据*/
		Nop();
		pWReg++;
		Nop();
	}
	T_CLK = 1;
	Nop();
	T_RST = 0;
} 
/******************************************************************** 


***********************************************************************/
void BurstR1302R(unsigned char *pRReg)
{
	unsigned char i;
	T_RST = 0;
	Nop();
	T_CLK = 0;
	Nop();
	T_RST = 1;
	Nop();
	RTInputByte(0xff); /* 0xff:时钟多字节读命令 */
	Nop();
	for (i=31; i>0; i--) /*31Byte 寄存器数据 */
	{
		Nop();
		*pRReg = RTOutputByte(); /* 读1Byte数据 */
		Nop();
		pRReg++;
		Nop();
	}
	T_CLK = 1;
	Nop();
	T_RST = 0;
}
/******************************************************************** 


***********************************************************************/
void Set1302(unsigned char *pClock) 
{
	unsigned char i;
	unsigned char ucAddr = 0x80; 
	/**转换为bcd码*****/
	for(i = 0;i <7;i++)
	{
		pClock[i] = (((pClock[i]/10) << 4) | (pClock[i]%10));
	}
	W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
	Nop();
	for(i =7; i>0; i--)
	{ 
		Nop();
		W1302(ucAddr,*pClock); /* 秒 分 时 日 月 星期 年 */
		Nop(); 
		pClock++;
		ucAddr +=2;
	}
	W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/
}
/******************************************************************** 

***********************************************************************/
void Get1302(unsigned char *ucCurtime) 
{
	unsigned char i;
	unsigned char ucAddr = 0x81;
	for (i=0; i<7; i++)
	{
		ucCurtime[i] = R1302(ucAddr); //*格式为: 秒 分 时 日 月 星期 年 */	 
	    ucCurtime[i]=(ucCurtime[i]>>4)*10+(ucCurtime[i]&0x0f); //转换
		ucAddr += 2;
	}
}

/////初始化 DS1302
void initialize_DS1302(void) 
{ 
  T_CLK=0; 
  T_RST=0; 
  W1302(0x8e,0x00); 
  W1302(0x90,0x00); //////////
}  
void solution_time(void)
  {	  
       Get1302(b) ;
	   SEC=b[0];	   //miao
	   MIN=b[1];		//fen
	   HOUR=b[2];		//shi 
	   DAY=b[3];		 //日期
	  MONTH=b[4];
	   WEEKDAY=b[5];		   //月
	   YEAR=b[6];		   //年
  }	
   /*****************************************************************************
公历年对应的农历数据,每年三字节,
格式第一字节BIT7-4 位表示闰月月份,值为0 为无闰月,BIT3-0 对应农历第1-4 月的大小
第二字节BIT7-0 对应农历第5-12 月大小,第三字节BIT7 表示农历第13 个月大小
月份对应的位为1 表示本农历月大(30 天),为0 表示小(29 天)
第三字节BIT6-5 表示春节的公历月份,BIT4-0 表示春节的公历日期
*****************************************************************************/
unsigned char code year_code[]={
                    0x09,0x2e,0x50,    //1999
                    0x0C,0x96,0x45,    //2000 
                    0x4d,0x4A,0xB8,    //2001
                    0x0d,0x4A,0x4C,    //2002
                    0x0d,0xA5,0x41,    //2003
                    0x25,0xAA,0xB6,    //2004
                    0x05,0x6A,0x49,    //2005
                    0x7A,0xAd,0xBd,    //2006
12 下一页
💿 文件大小 48 K
👤 上传用户 cando99
📂 所属分类单片机开发
🏷️ 相关标签

#单片机 #万年历 #编程
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -