万年历程序(不要嫌程序长,功能很齐全,而且对初学者很有帮助)

#include

#include

#define uint unsigned int

#define uchar unsigned char

void Stopwatch(); //声明秒表函数

void Clock(); //声明闹钟函数

void Output(); //声明输出函数

void important(); //声明重要函数（相当于mian()函数）

void TLimit(); //声明调节温度上下限函数

sbit DS1302_CLK = P1^7; //实时时钟时钟线引脚

sbit DS1302_IO = P1^6; //实时时钟数据线引脚

sbit DS1302_RST = P1^5; //实时时钟复位线引脚

sbit wireless_1 = P3^0; //温度过上限标志

sbit wireless_2 = P3^1; //温度适中标志

sbit wireless_3 = P3^2; //温度过下限标志

sbit fan = P3^4; //开风扇标志

sbit clock=P3^5; //开关闹钟

sbit setclock = P3^6; //闹钟开启控制

sbit stopwatch = P3^7; //秒表开启控制

sbit ACC0 = ACC^0;

sbit ACC7 = ACC^7;

char hide_sec,hide_min,hide_hour,hide_day,hide_week,hide_month,hide_year; //秒,分,时到日,月,年位闪的计数

sbit Set = P2^0; //模式切换键

sbit Up = P2^1; //加法按钮

sbit Down = P2^2; //减法按钮

sbit out = P2^3; //立刻跳出调整模式按钮

sbit DQ = P1^0; //温度传送数据IO口

char c3,c2=0;

char c=0,LowerBonud=20,UpperLimit=30;

char a1=0,a2=0,a3=0,a4=0;

char k[8]={'0','0',':','0','0',':','0','0'};

void InitTimer0(void)//产生10ms时间间隔

{

TMOD = (TMOD & 0XF0) | 0X01; //定时器0工作在模式1，16Bit定时器模式

TH0 = (65536 - 8000)/256;

TL0 = (65536 - 8000)%256;

TR0 =1; ET0 =1;//开启定时器和中断

EA = 1;

}

char done,count,temp,flag,up_flag,down_flag; //

uchar temp_value; //温度值

uchar TempBuffer[5],week_value[2],h[8]; //

unsigned char NL[5];

void show_time(); //液晶显示程序

/***********1602液晶显示部分子程序****************/

//Port Definitions**********************************************************

sbit LcdRs = P2^5;

sbit LcdRw = P2^6;

sbit LcdEn = P2^7;

sfr DBPort = 0x80; //P0=0x80,P1=0x90,P2=0xA0,P3=0xB0.数据端口

//内部等待函数************************************************************************** unsigned char LCD_Wait(void)

{

LcdRs=0;

LcdRw=1; _nop_();

LcdEn=1; _nop_();

LcdEn=0;

return DBPort;

}

//向LCD写入命令或数据************************************************************

#define LCD_COMMAND 0 // Command

#define LCD_DA TA 1 // Data

#define LCD_CLEAR_SCREEN 0x01 // 清屏

#define LCD_HOMING 0x02 // 光标返回原点

void LCD_Write(bit style, unsigned char input)

{

LcdEn=0;

LcdRs=style;

LcdRw=0; _nop_();

DBPort=input; _nop_();//注意顺序

LcdEn=1; _nop_();//注意顺序

LcdEn=0; _nop_();

LCD_Wait();

}

//设置显示模式************************************************************

#define LCD_SHOW 0x04 //显示开

#define LCD_HIDE 0x00 //显示关

#define LCD_CURSOR 0x02 //显示光标

#define LCD_NO_CURSOR 0x00 //无光标

#define LCD_FLASH 0x01 //光标闪动

#define LCD_NO_FLASH 0x00 //光标不闪动

void LCD_SetDisplay(unsigned char DisplayMode)

{

LCD_Write(LCD_COMMAND, 0x08|DisplayMode);

}

//设置输入模式************************************************************ #define LCD_AC_UP 0x02

#define LCD_AC_DOWN 0x00 // default

#define LCD_MOVE 0x01 // 画面可平移

#define LCD_NO_MOVE 0x00 //default

void LCD_SetInput(unsigned char InputMode)

{

LCD_Write(LCD_COMMAND, 0x04|InputMode);

}

//初始化LCD************************************************************ void LCD_Initial()

{

LcdEn=0;

LCD_Write(LCD_COMMAND,0x38); //8位数据端口,2行显示,5*7点阵LCD_Write(LCD_COMMAND,0x38);

LCD_SetDisplay(LCD_SHOW|LCD_NO_CURSOR); //开启显示, 无光标

LCD_Write(LCD_COMMAND,LCD_CLEAR_SCREEN); //清屏

LCD_SetInput(LCD_AC_UP|LCD_NO_MOVE); //AC递增, 画面不动

}

//液晶字符输入的位置************************

void GotoXY(unsigned char x, unsigned char y)

{

if(y==0)

LCD_Write(LCD_COMMAND,0x80|x);

if(y==1)

LCD_Write(LCD_COMMAND,0x80|(x-0x40));

}

//将字符输出到液晶显示

void Print(unsigned char *str)

{

while(*str!='\0')//while(*str!='\0')

{

LCD_Write(LCD_DA TA,*str);

str++;

}

}

/***********DS1302时钟部分子程序******************/

typedef struct SYSTEMTIME

{

unsigned char Second;

unsigned char Minute;

unsigned char Hour;

unsigned char Week;

unsigned char Day;

unsigned char Month;

unsigned char Y ear;

unsigned char Y earH;

unsigned char Y earL;

unsigned char day;

unsigned char month;

unsigned char year;

unsigned char DateString[11];

unsigned char NLDateString[12];

unsigned char TimeString[9];

}SYSTEMTIME; //定义的时间类型

SYSTEMTIME CurrentTime; //

#define AM(X) X

#define PM(X) (X+12) // 转成24小时制

#define DS1302_SECOND 0x80 //时钟芯片的寄存器位置,存放时间#define DS1302_MINUTE 0x82

#define DS1302_HOUR 0x84

#define DS1302_WEEK 0x8A

#define DS1302_DAY 0x86

#define DS1302_MONTH 0x88

#define DS1302_YEAR 0x8C

#define DS1302_YEARH 0xC0

void DS1302InputByte(unsigned char d) //实时时钟写入一字节(内部函数) {

unsigned char i;

ACC = d;

for(i=8; i>0; i--)

{

DS1302_IO = ACC0; //相当于汇编中的RRC

DS1302_CLK = 1;

DS1302_CLK = 0;

ACC = ACC >> 1;

}

}

unsigned char DS1302OutputByte(void) //实时时钟读取一字节(内部函数)

{

unsigned char i;

for(i=8; i>0; i--)

{

ACC = ACC >>1; //相当于汇编中的RRC

ACC7 = DS1302_IO;

DS1302_CLK = 1;

DS1302_CLK = 0;

}

return(ACC);

}

void Write1302(unsigned char ucAddr, unsigned char ucDa) //ucAddr: DS1302地址, ucData: 要写的数据

{

DS1302_RST = 0;

DS1302_CLK = 0;

DS1302_RST = 1;

DS1302InputByte(ucAddr); // 地址，命令

DS1302InputByte(ucDa); // 写1Byte数据

DS1302_CLK = 1;

DS1302_RST = 0;

}

unsigned char Read1302(unsigned char ucAddr) //读取DS1302某地址的数据

{

unsigned char ucData;

DS1302_RST = 0;

DS1302_CLK = 0;

DS1302_RST = 1;

DS1302InputByte(ucAddr|0x01); // 地址，命令

ucData = DS1302OutputByte(); // 读1Byte数据

DS1302_CLK = 1;

DS1302_RST = 0;

return(ucData);

}

void DS1302_GetTime(SYSTEMTIME *Time) //获取时钟芯片的时钟数据到自定义的结构型数组

{

unsigned char ReadV alue;

ReadV alue = Read1302(DS1302_SECOND);

Time->Second = ((ReadV alue&0x70)>>4)*10 + (ReadV alue&0x0F);

ReadV alue = Read1302(DS1302_MINUTE);

Time->Minute = ((ReadV alue&0x70)>>4)*10 + (ReadV alue&0x0F);

ReadV alue = Read1302(DS1302_HOUR);

Time->Hour = ((ReadV alue&0x70)>>4)*10 + (ReadV alue&0x0F);

ReadV alue = Read1302(DS1302_DAY);

Time->Day = ((ReadV alue&0x70)>>4)*10 + (ReadV alue&0x0F);

ReadV alue = Read1302(DS1302_WEEK);

Time->Week = ((ReadV alue&0x70)>>4)*10 + (ReadV alue&0x0F);

ReadV alue = Read1302(DS1302_MONTH);

Time->Month = ((ReadV alue&0x70)>>4)*10 + (ReadV alue&0x0F);

ReadV alue = Read1302(DS1302_YEAR);

Time->Y ear = ((ReadV alue&0x70)>>4)*10 + (ReadV alue&0x0F);

Time->Y earH = 20;

}

void DateToStr(SYSTEMTIME *Time) //将时间年,月,日,星期数据转换成液晶显示字符串,放到数组里DateString[]

{ if(hide_year<2) //这里的if,else语句都是判断位闪烁,<2显示数据,>2就不显示,输出字符串为2007/07/22

{

Time->DateString[0] = Time->Y earH/10 + '0';

Time->DateString[1] = Time->Y earH%10 + '0';

Time->DateString[2] = Time->Y ear/10 + '0';

Time->DateString[3] = Time->Y ear%10 + '0';

}

else

{

Time->DateString[0] = ' ';

Time->DateString[1] = ' ';

Time->DateString[2] = ' ';

Time->DateString[3] = ' ';

}

Time->DateString[4] = '/';

if(hide_month<2)

{

Time->DateString[5] = Time->Month/10 + '0';

Time->DateString[6] = Time->Month%10 + '0';

}

else

{

Time->DateString[5] = ' ';

Time->DateString[6] = ' ';

}

Time->DateString[7] = '/';

if(hide_day<2)

{

Time->DateString[8] = Time->Day/10 + '0';

Time->DateString[9] = Time->Day%10 + '0';

}

else

{

Time->DateString[8] = ' ';

Time->DateString[9] = ' ';

}

if(hide_week<2)

{

week_value[0] = Time->Week%10 + '0'; //星期的数据另外放到week_value[]数组里,跟年,月,日的分开存放,因为等一下要在最后显示

}

else

{

week_value[0] = ' ';

}

week_value[1] = '\0';

Time->DateString[10] = '\0'; //字符串末尾加'\0' ,判断结束字符

}

void TimeToStr(SYSTEMTIME *Time) //将时,分,秒数据转换成液晶显示字符放到数组TimeString[];

{ if(hide_hour<2)

{

Time->TimeString[0] = Time->Hour/10 + '0';

Time->TimeString[1] = Time->Hour%10 + '0';

h[0]=Time->TimeString[0];

h[1]=Time->TimeString[1];

}

else

{

Time->TimeString[0] = ' ';

Time->TimeString[1] = ' ';

}

Time->TimeString[2] = ':';

h[2]=Time->TimeString[2];

if(hide_min<2)

{

Time->TimeString[3] = Time->Minute/10 + '0';

Time->TimeString[4] = Time->Minute%10 + '0';

h[3]=Time->TimeString[3];

h[4]=Time->TimeString[4];

}

else

{

Time->TimeString[3] = ' ';

Time->TimeString[4] = ' ';

}

Time->TimeString[5] = ':';

h[5]=Time->TimeString[5];

if(hide_sec<2)

{

Time->TimeString[6] = Time->Second/10 + '0';

Time->TimeString[7] = Time->Second%10 + '0';

h[6]=Time->TimeString[6];

h[7]=Time->TimeString[7];

}

else

{

Time->TimeString[6] = ' ';

Time->TimeString[7] = ' ';

}

Time->DateString[8] = '\0';

if ((a1==h[4])&&(a2==h[3])&&(a3<=h[7])&&((a4==h[6])||(a4==h[6]-1))) {clock=0;c=10;}

}

void Initial_DS1302(void) //时钟芯片初始化

{

unsigned char Second=Read1302(DS1302_SECOND);

if(Second&0x80) //判断时钟芯片是否关闭

{

Write1302(0x8e,0x00); //写入允许

Write1302(0xC0,0x20);

Write1302(0x8c,0x09); //以下写入初始化时间日期:2007/07/25.星期: 3. 时间: 23:59:55 Write1302(0x88,0x06);

Write1302(0x86,0x05);

Write1302(0x8a,0x07); //xingqi

Write1302(0x84,0x23);

Write1302(0x82,0x59);

Write1302(0x80,0x55);

Write1302(0x8e,0x80); //禁止写入

}

}

/***********ds18b20子程序*************************/

/***********ds18b20延迟子函数（晶振12MHz ）*******/

void delay_18B20(unsigned int i)

{

while(i--);

}

/**********ds18b20初始化函数**********************/

void Init_DS18B20(void)

{

unsigned char x=0;

DQ = 1; //DQ复位

delay_18B20(8); //稍做延时

DQ = 0; //单片机将DQ拉低

delay_18B20(80); //精确延时大于480us

DQ = 1; //拉高总线

delay_18B20(14);

x=DQ; //稍做延时后如果x=0则初始化成功x=1则初始化失败

delay_18B20(20);

}

/***********ds18b20读一个字节**************/

unsigned char ReadOneChar(void)

{

uchar i=0;

uchar dat = 0;

for (i=8;i>0;i--)

{

DQ = 0; // 给脉冲信号

dat>>=1; //数据右移一位

DQ = 1; // 给脉冲信号

if(DQ)

dat|=0x80; //按位或，取最高位

delay_18B20(4);

}

return(dat);

}

/*************ds18b20写一个字节****************/

void WriteOneChar(uchar dat)

{

unsigned char i=0;

for (i=8; i>0; i--)

{

DQ = 0;

DQ = dat&0x01; //取最低位

delay_18B20(5);

DQ = 1; //上升沿将数据送入

dat>>=1;

}

}

/**************读取ds18b20当前温度************/

void ReadTemp(void)

{

unsigned char a=0;

unsigned char b=0;

unsigned char t=0;

Init_DS18B20();

WriteOneChar(0xCC); // 跳过读序号列号的操作WriteOneChar(0x44); // 启动温度转换

delay_18B20(100); // this message is wery important

Init_DS18B20();

WriteOneChar(0xCC); //跳过读序号列号的操作

WriteOneChar(0xBE); //读取温度寄存器等（共可读9个寄存器）前两个就是温度

delay_18B20(100);

a=ReadOneChar(); //读取温度值低位

b=ReadOneChar(); //读取温度值高位

temp_value=b<<4; //左移四位，扩大16倍，变为一个字节的高四位

temp_value+=(a&0xf0)>>4;//取温度值的地位的高四位，右移四位后与温度的高四位相加得到温度值

if (temp_value>=UpperLimit) {wireless_1 =0;fan=1;}

else {wireless_1 =1;fan=0;}

if ((temp_value>LowerBonud)&&(temp_value

else wireless_2 =1;

if (temp_value<=LowerBonud) wireless_3 =0;

else wireless_3 =1;

}

void temp_to_str() //温度数据转换成液晶字符显示

{

TempBuffer[0]=temp_value/10+'0'; //十位

TempBuffer[1]=temp_value%10+'0'; //个位

TempBuffer[2]=0xdf; //温度符号

TempBuffer[3]='C';

TempBuffer[4]='\0';

}

void Delay1ms(unsigned int count)

{

unsigned int i,j;

for(i=0;i

for(j=0;j<120;j++)

{

if (!stopwatch) {c++;Stopwatch();}

if (!setclock) {c2++;Clock();}

if ((!out)&&(!Set)) {TLimit();}

if (!out) clock=1; //关闭闹钟

}

}

/*延时子程序*/

void mdelay(uint delay)

{ uint i;

for(;delay>0;delay--)

for(i=0;i<32;i++); //1ms延时.

}

/*****************************阳历转换阴历***********************************/ code unsigned char year_code[597]={

0x04,0xAe,0x53, //1901 0

0x0A,0x57,0x48, //1902 3

0x55,0x26,0xBd, //1903 6

0x0d,0x26,0x50, //1904 9

0x0d,0x95,0x44, //1905 12

0x46,0xAA,0xB9, //1906 15

0x05,0x6A,0x4d, //1907 18

0x09,0xAd,0x42, //1908 21

0x24,0xAe,0xB6, //1909

0x04,0xAe,0x4A, //1910

0x6A,0x4d,0xBe, //1911

0x0A,0x4d,0x52, //1912

0x0d,0x25,0x46, //1913

0x5d,0x52,0xBA, //1914

0x0B,0x54,0x4e, //1915

0x0d,0x6A,0x43, //1916

0x29,0x6d,0x37, //1917

0x09,0x5B,0x4B, //1918

0x74,0x9B,0xC1, //1919

0x04,0x97,0x54, //1920

0x0A,0x4B,0x48, //1921

0x5B,0x25,0xBC, //1922

0x06,0xA5,0x50, //1923

0x06,0xd4,0x45, //1924

0x4A,0xdA,0xB8, //1925

0x02,0xB6,0x4d, //1926

0x09,0x57,0x42, //1927

0x24,0x97,0xB7, //1928

0x04,0x97,0x4A, //1929

0x66,0x4B,0x3e, //1930

0x0d,0x4A,0x51, //1931

0x0e,0xA5,0x46, //1932

0x56,0xd4,0xBA, //1933

0x05,0xAd,0x4e, //1934

0x02,0xB6,0x44, //1935

0x39,0x37,0x38, //1936

0x09,0x2e,0x4B, //1937

0x0C,0x95,0x53, //1939 0x0d,0x4A,0x48, //1940 0x6d,0xA5,0x3B, //1941 0x0B,0x55,0x4f, //1942 0x05,0x6A,0x45, //1943 0x4A,0xAd,0xB9, //1944 0x02,0x5d,0x4d, //1945 0x09,0x2d,0x42, //1946 0x2C,0x95,0xB6, //1947 0x0A,0x95,0x4A, //1948 0x7B,0x4A,0xBd, //1949 0x06,0xCA,0x51, //1950 0x0B,0x55,0x46, //1951 0x55,0x5A,0xBB, //1952 0x04,0xdA,0x4e, //1953 0x0A,0x5B,0x43, //1954 0x35,0x2B,0xB8, //1955 0x05,0x2B,0x4C, //1956 0x8A,0x95,0x3f, //1957 0x0e,0x95,0x52, //1958 0x06,0xAA,0x48, //1959 0x7A,0xd5,0x3C, //1960 0x0A,0xB5,0x4f, //1961 0x04,0xB6,0x45, //1962 0x4A,0x57,0x39, //1963 0x0A,0x57,0x4d, //1964 0x05,0x26,0x42, //1965 0x3e,0x93,0x35, //1966 0x0d,0x95,0x49, //1967 0x75,0xAA,0xBe, //1968 0x05,0x6A,0x51, //1969 0x09,0x6d,0x46, //1970 0x54,0xAe,0xBB, //1971 0x04,0xAd,0x4f, //1972 0x0A,0x4d,0x43, //1973 0x4d,0x26,0xB7, //1974 0x0d,0x25,0x4B, //1975 0x8d,0x52,0xBf, //1976 0x0B,0x54,0x52, //1977 0x0B,0x6A,0x47, //1978 0x69,0x6d,0x3C, //1979 0x09,0x5B,0x50, //1980 0x04,0x9B,0x45, //1981

0x0A,0x4B,0x4d, //1983

0xAB,0x25,0xC2, //1984

0x06,0xA5,0x54, //1985

0x06,0xd4,0x49, //1986

0x6A,0xdA,0x3d, //1987

0x0A,0xB6,0x51, //1988

0x09,0x37,0x46, //1989

0x54,0x97,0xBB, //1990

0x04,0x97,0x4f, //1991

0x06,0x4B,0x44, //1992

0x36,0xA5,0x37, //1993

0x0e,0xA5,0x4A, //1994

0x86,0xB2,0xBf, //1995

0x05,0xAC,0x53, //1996

0x0A,0xB6,0x47, //1997

0x59,0x36,0xBC, //1998

0x09,0x2e,0x50, //1999 294 0x0C,0x96,0x45, //2000 297 0x4d,0x4A,0xB8, //2001

0x0d,0x4A,0x4C, //2002

0x0d,0xA5,0x41, //2003

0x25,0xAA,0xB6, //2004

0x05,0x6A,0x49, //2005

0x7A,0xAd,0xBd, //2006

0x02,0x5d,0x52, //2007

0x09,0x2d,0x47, //2008

0x5C,0x95,0xBA, //2009

0x0A,0x95,0x4e, //2010

0x0B,0x4A,0x43, //2011

0x4B,0x55,0x37, //2012

0x0A,0xd5,0x4A, //2013

0x95,0x5A,0xBf, //2014

0x04,0xBA,0x53, //2015

0x0A,0x5B,0x48, //2016

0x65,0x2B,0xBC, //2017

0x05,0x2B,0x50, //2018

0x0A,0x93,0x45, //2019

0x47,0x4A,0xB9, //2020

0x06,0xAA,0x4C, //2021

0x0A,0xd5,0x41, //2022

0x24,0xdA,0xB6, //2023

0x04,0xB6,0x4A, //2024

0x69,0x57,0x3d, //2025

0x0d,0x26,0x46, //2027 0x5e,0x93,0x3A, //2028 0x0d,0x53,0x4d, //2029 0x05,0xAA,0x43, //2030 0x36,0xB5,0x37, //2031 0x09,0x6d,0x4B, //2032 0xB4,0xAe,0xBf, //2033 0x04,0xAd,0x53, //2034 0x0A,0x4d,0x48, //2035 0x6d,0x25,0xBC, //2036 0x0d,0x25,0x4f, //2037 0x0d,0x52,0x44, //2038 0x5d,0xAA,0x38, //2039 0x0B,0x5A,0x4C, //2040 0x05,0x6d,0x41, //2041 0x24,0xAd,0xB6, //2042 0x04,0x9B,0x4A, //2043 0x7A,0x4B,0xBe, //2044 0x0A,0x4B,0x51, //2045 0x0A,0xA5,0x46, //2046 0x5B,0x52,0xBA, //2047 0x06,0xd2,0x4e, //2048 0x0A,0xdA,0x42, //2049 0x35,0x5B,0x37, //2050 0x09,0x37,0x4B, //2051 0x84,0x97,0xC1, //2052 0x04,0x97,0x53, //2053 0x06,0x4B,0x48, //2054 0x66,0xA5,0x3C, //2055 0x0e,0xA5,0x4f, //2056 0x06,0xB2,0x44, //2057 0x4A,0xB6,0x38, //2058 0x0A,0xAe,0x4C, //2059 0x09,0x2e,0x42, //2060 0x3C,0x97,0x35, //2061 0x0C,0x96,0x49, //2062 0x7d,0x4A,0xBd, //2063 0x0d,0x4A,0x51, //2064 0x0d,0xA5,0x45, //2065 0x55,0xAA,0xBA, //2066 0x05,0x6A,0x4e, //2067 0x0A,0x6d,0x43, //2068 0x45,0x2e,0xB7, //2069

0x8A,0x95,0xBf, //2071

0x0A,0x95,0x53, //2072

0x0B,0x4A,0x47, //2073

0x6B,0x55,0x3B, //2074

0x0A,0xd5,0x4f, //2075

0x05,0x5A,0x45, //2076

0x4A,0x5d,0x38, //2077

0x0A,0x5B,0x4C, //2078

0x05,0x2B,0x42, //2079

0x3A,0x93,0xB6, //2080

0x06,0x93,0x49, //2081

0x77,0x29,0xBd, //2082

0x06,0xAA,0x51, //2083

0x0A,0xd5,0x46, //2084

0x54,0xdA,0xBA, //2085

0x04,0xB6,0x4e, //2086

0x0A,0x57,0x43, //2087

0x45,0x27,0x38, //2088

0x0d,0x26,0x4A, //2089

0x8e,0x93,0x3e, //2090

0x0d,0x52,0x52, //2091

0x0d,0xAA,0x47, //2092

0x66,0xB5,0x3B, //2093

0x05,0x6d,0x4f, //2094

0x04,0xAe,0x45, //2095

0x4A,0x4e,0xB9, //2096

0x0A,0x4d,0x4C, //2097

0x0d,0x15,0x41, //2098

0x2d,0x92,0xB5, //2099

};

//月份数据表

code unsigned char day_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};

code unsigned int day_code2[3]={0x111,0x130,0x14e};

/**************************************************************************** * 子函数,用于读取数据表中农历月的大月或小月,如果该月为大返回1,为小返回0

****************************************************************************/ bit GetMoonDay(unsigned char month_p,unsigned short table_addr)

{

switch (month_p)

{

case 1:

if((year_code[table_addr]&0x08)==0) return(0);

else return(1);

case 2:

if((year_code[table_addr]&0x04)==0) return(0);

else return(1);

case 3:

if((year_code[table_addr]&0x02)==0) return(0);

else return(1);

case 4:

if((year_code[table_addr]&0x01)==0) return(0);

else return(1);

case 5:

if((year_code[table_addr+1]&0x80)==0) return(0);

else return(1);

case 6:

if((year_code[table_addr+1]&0x40)==0) return(0);

else return(1);

case 7:

if((year_code[table_addr+1]&0x20)==0) return(0);

else return(1);

case 8:

if((year_code[table_addr+1]&0x10)==0) return(0);

else return(1);

case 9:

if((year_code[table_addr+1]&0x08)==0) return(0);

else return(1);

case 10:

if((year_code[table_addr+1]&0x04)==0) return(0);

else return(1);

case 11:

if((year_code[table_addr+1]&0x02)==0) return(0);

else return(1);

case 12:

if((year_code[table_addr+1]&0x01)==0) return(0);

else return(1);

case 13:

if((year_code[table_addr+2]&0x80)==0) return(0);

else return(1);

}

return(0);

}

/****************************************************************************** ***************************

** 函数名称:GetChinaCalendar

** 功能描述:公农历转换(只允许1901-2099年)

** 输入: year 公历年

** month 公历月

** day 公历日

** p 储存农历日期地址

** 输出: 1 成功

** 0 失败

** 作者: Campo

** 修改: 赖皮

** 日期: 2007年02月06日

**-------------------------------------------------------------------------------------------------------

** 修改人:

** 日期:

**------------------------------------------------------------------------------------------------------

******************************************************************************* *************************/

unsigned char GetChinaCalendar(

unsigned int year,

unsigned char month,

unsigned char day)

{

unsigned char temp1,temp2,temp3,month_p,yearH,yearL;

unsigned char flag_y;

unsigned short temp4,table_addr;

yearH=year/100; yearL=year%100;

if((yearH!=19)&&(yearH!=20)) return(0);

// 定位数据表地址

if(yearH==20) table_addr=(yearL+100-1)*3;

else table_addr=(yearL-1)*3;

// 取当年春节所在的公历月份

temp1=year_code[table_addr+2]&0x60;

temp1>>=5;

// 取当年春节所在的公历日

temp2=year_code[table_addr+2]&31;

// 计算当年春年离当年元旦的天数,春节只会在公历1月或2月

if(temp1==1) t emp3=temp2-1;

else temp3=temp2+31-1;

// 计算公历日离当年元旦的天数

if (month<10) temp4=day_code1[month-1]+day-1;

else temp4=day_code2[month-10]+day-1;

// 如果公历月大于2月并且该年的2月为闰月,天数加1

if ((month>2)&&(yearL%4==0)) temp4++;

// 判断公历日在春节前还是春节后

if (temp4>=temp3)

{

temp4-=temp3;

month=1;

month_p=1;

flag_y=0;

if(GetMoonDay(month_p,table_addr)==0) temp1=29; //小月29天

else temp1=30; //大小30天// 从数据表中取该年的闰月月份,如为0则该年无闰月

temp2=year_code[table_addr]/16;

while(temp4>=temp1)

{

temp4-=temp1;

month_p++;

if(month==temp2)

{

NL[4]='R';

flag_y=~flag_y;

if(flag_y==0) {month++;NL[4]=' ';}

}

else {month++;NL[4]=' ';}

if(GetMoonDay(month_p,table_addr)==0) temp1=29;

else temp1=30;

}

day=temp4+1;

}

// 公历日在春节前使用下面代码进行运算

else

{

temp3-=temp4;

if (yearL==0)

{

yearL=100-1;

yearH=19;

}

else yearL--;

table_addr-=3;

month=12;

temp2=year_code[table_addr]/16;

if (temp2==0) {month_p=12;NL[4]=' ';}

else {month_p=13;NL[4]='R';}

flag_y=0;

if(GetMoonDay(month_p,table_addr)==0) temp1=29;

else temp1=30;

while(temp3>temp1)

{

temp3-=temp1;

month_p--;

if(flag_y==0) month--;

if(month==temp2) flag_y=~flag_y;

if(GetMoonDay(month_p,table_addr)==0) temp1=29;

else temp1=30;

}

day=temp1-temp3+1;

}

/////////////////////////

NL[0]=yearH;

NL[1]=yearL;

NL[2]=month;

NL[3]=day;

return(1);

}

void zhuan(SYSTEMTIME *Time)

{

GetChinaCalendar(Time->Y earH*100+Time->Y ear,Time->Month,Time->Day);

Time->day = NL[3];

Time->month =NL[2];

//将时间年,月,日,星期数据转换成液晶显示字符串,放到数组里DateString[]

if(hide_year<2) //这里的if,else语句都是判断位闪烁,<2显示数据,>2就不显示,输出字符串为2007/07/22

{

Time->NLDateString[0] = NL[0]/10 + '0';

Time->NLDateString[1] = NL[0]%10 + '0';

Time->NLDateString[2] = NL[1]/10 + '0';

Time->NLDateString[3] = NL[1]%10 + '0';

}

else

{