电子台历单片机代码

⑴ 跪求 51单片机+12864液晶+1302时钟制成的万年历c程序

顶层文件 万年历.C
#include<reg51.h>
#include "LCD1602.h"
#include "DS1302.h"
#define uchar unsigned char
#define uint unsigned int
sbit speaker=P2^4;
bit key_flag1=0,key_flag2=0;
SYSTEMTIME adjusted;
uchar sec_add=0,min_add=0,hou_add=0,day_add=0,mon_add=0,yea_add=0;
uchar data_alarm[7]={0};
/************键盘控制******************************/
int key_scan() //扫描是否有键按下
{ int i=0;
uint temp;
P1=0xf0;
temp=P1;
if(temp!=0xf0)
i=1;
else
i=0;
return i;
}
uchar key_value() //确定按键的值
{
uint m=0,n=0,temp;
uchar value;
uchar v[4][3]={'2','1','0','5','4','3','8','7','6','b','a','9'} ;
P1=0xfe; temp=P1; if(temp!=0xfe)m=0;
P1=0xfd;temp=P1 ;if(temp!=0xfd)m=1;
P1=0xfb;temp=P1 ;if(temp!=0xfb)m=2;
P1=0xf7;temp=P1 ;if(temp!=0xf7)m=3;
P1=0xef;temp=P1 ;if(temp!=0xef)n=0;
P1=0xdf;temp=P1 ;if(temp!=0xdf)n=1;
P1=0xbf;temp=P1 ;if(temp!=0xbf)n=2;
value=v[m][n];
return value;
}
/***************************设置闹铃函数*******************************/
void naoling(void)
{
uchar i=0,l=0,j;
init1602();
while(key_flag2&&i<12)
if(key_scan()){j=key_value();write_data(j);if(i%2==0)data_alarm[l]=(j-'0')*10;else {data_alarm[l]+=(j-'0');l++;}i++;delay(600);}
write_com(0x01);
}
uchar according(void)
{ uchar k;
if(data_alarm[0]==adjusted.Year&&data_alarm[1]==adjusted.Month&&data_alarm[2]==adjusted.Day&&data_alarm[3]==adjusted.Hour&&data_alarm[4]==adjusted.Minute&&data_alarm[5]==adjusted.Second)
k=1;
else k=0;
return k;
}
void speak(void)
{uint i=50;
while(i)
{speaker=0;
delay(1);
speaker=1;
delay(1);
i--;
}
}
void alarm(void)
{uint i=10;
while(i)
{
speak();
delay(10);
i--;
}
}
/**************************修改时间操作********************************/
void reset(void)
{
sec_add=0;
min_add=0;
hou_add=0;
day_add=0;
mon_add=0;
yea_add=0 ;
}
void adjust(void)
{

if(key_scan()&&key_flag1)
switch(key_value())
{case '0':sec_add++;break;
case '1':min_add++;break;
case '2':hou_add++;break;
case '3':day_add++;break;
case '4':mon_add++;break;
case '5':yea_add++;break;
case 'b':reset();break;
default: break;
}
adjusted.Second+=sec_add;
adjusted.Minute+=min_add;
adjusted.Hour+=hou_add;
adjusted.Day+=day_add;
adjusted.Month+=mon_add;
adjusted.Year+=yea_add;
if(adjusted.Second>59) adjusted.Second=adjusted.Second%60;

if(adjusted.Minute>59) adjusted.Minute=adjusted.Minute%60;

if(adjusted.Hour>23) adjusted.Hour=adjusted.Hour%24;

if(adjusted.Day>31) adjusted.Day=adjusted.Day%31;

if(adjusted.Month>12) adjusted.Month=adjusted.Month%12;

if(adjusted.Year>100) adjusted.Year=adjusted.Year%100;

}

/**************************中断处理函数*********************************/
void changing(void) interrupt 0 using 0 //需要修改时间和日期，或者停止修改
{
if(key_flag1)key_flag1=0;
else key_flag1=1;
}
void alarming(void) interrupt 3 using 0 //需要设置闹铃或者停止设置
{
if(key_flag2)key_flag2=0;
else key_flag2=1;
}
/********************************主函数***********************************/
main()
{uint i;
uchar *l;
uchar p1[]="D:",p2[]="T:";
SYSTEMTIME T;
EA=1;
EX0=1;
IT0=1;
EA=1;
EX1=1;
IT1=1;
init1602();
Initial_DS1302() ;

while(1)
{ write_com(0x80);
write_string(p1,2);
write_com(0xc0);
write_string(p2,2);
DS1302_GetTime(&T) ;
adjusted.Second=T.Second;
adjusted.Minute=T.Minute;
adjusted.Hour=T.Hour;
adjusted.Week=T.Week;
adjusted.Day=T.Day;
adjusted.Month=T.Month;
adjusted.Year=T.Year;
for(i=0;i<9;i++)
{
adjusted.DateString[i]=T.DateString[i];
adjusted.TimeString[i]=T.TimeString[i];
}
adjust();
if(key_flag2)naoling();
if(according())alarm();
DateToStr(&adjusted);
TimeToStr(&adjusted);
write_com(0x82);
write_string(adjusted.DateString,8);
write_com(0xc2);
write_string(adjusted.TimeString,8);
delay(10);
}
（二）头文件1 显示模块 LCD1602.H
#ifndef LCD_CHAR_1602_2009_5_9
#define LCD_CHAR_1602_2009_5_9
#define uchar unsigned char
#define uint unsigned int
sbit lcdrs = P2^0;
sbit lcdrw = P2^1;
sbit lcden = P2^2;
void delay(uint z) // 延时
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void write_com(uchar com) // 写入指令数据到 lcd
{
lcdrw=0;
lcdrs=0;
P0=com;
delay(5);
lcden=1;
delay(5);
lcden=0;
}

void write_data(uchar date) // 写入字符显示数据到 lcd
{
lcdrw=0;
lcdrs=1;
P0=date;
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void init1602() // 初始化设定
{
lcdrw=0;
lcden=0;
write_com(0x3C);
write_com(0x0c);
write_com(0x06);
write_com(0x01);
write_com(0x80);
}
void write_string(uchar *pp,uint n)
{
int i;
for(i=0;i<n;i++)
write_data(pp[i]);
}
#endif
(三)头文件2 时钟模块 DS1302.H
#ifndef _REAL_TIMER_DS1302_2009_5_20_
#define _REAL_TIMER_DS1302_2003_5_20_

sbit DS1302_CLK = P2^6; //实时时钟时钟线引脚
sbit DS1302_IO = P2^7; //实时时钟数据线引脚
sbit DS1302_RST = P2^5; //实时时钟复位线引脚
sbit ACC0 = ACC^0;
sbit ACC7 = ACC^7;

typedef struct SYSTEM_TIME
{
unsigned char Second;
unsigned char Minute;
unsigned char Hour;
unsigned char Week;
unsigned char Day;
unsigned char Month;
unsigned char Year;
unsigned char DateString[9]; //用这两个字符串来放置读取的时间
unsigned char TimeString[9];
}SYSTEMTIME; //定义的时间类型

#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_RAM(X) (0xC0+(X)*2) //用于计算 DS1302_RAM 地址的宏

/******内部指令**********/
void DS1302InputByte(unsigned char d) //实时时钟写入一字节(内部函数)
{
unsigned char i;
ACC = d;
for(i=8; i>0; i--)
{
DS1302_IO = ACC0;
DS1302_CLK = 1;
DS1302_CLK = 0;
ACC = ACC >> 1; //因为在前面已经定义了ACC0 = ACC^0;以便再次利用DS1302_IO = ACC0;
}
}

unsigned char DS1302OutputByte(void) //实时时钟读取一字节(内部函数)
{
unsigned char i;
for(i=8; i>0; i--)
{
ACC = ACC >>1;
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_SetProtect(bit flag) //是否写保护
{
if(flag)
Write1302(0x8E,0x10);
else
Write1302(0x8E,0x00);
}

void DS1302_SetTime(unsigned char Address, unsigned char Value) // 设置时间函数
{
DS1302_SetProtect(0);
Write1302(Address, ((Value/10)<<4 | (Value%10))); //将十进制数转换为BCD码
} //在DS1302中的与日历、时钟相关的寄存器存放的数据必须为BCD码形式

void DS1302_GetTime(SYSTEMTIME *Time)
{
unsigned char ReadValue;
ReadValue = Read1302(DS1302_SECOND);
Time->Second = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //将BCD码转换为十进制数
ReadValue = Read1302(DS1302_MINUTE);
Time->Minute = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_HOUR);
Time->Hour = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_DAY);
Time->Day = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_WEEK);
Time->Week = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_MONTH);
Time->Month = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_YEAR);
Time->Year = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
}
unsigned char *DataToBCD(SYSTEMTIME *Time)
{
unsigned char D[8];
D[0]=Time->Second/10<<4+Time->Second%10;
D[1]=Time->Minute/10<<4+Time->Minute%10;
D[2]=Time->Hour/10<<4+Time->Hour%10;
D[3]=Time->Day/10<<4+Time->Day%10;
D[4]=Time->Month/10<<4+Time->Month%10;
D[5]=Time->Week/10<<4+Time->Week%10;
D[6]=Time->Year/10<<4+Time->Year%10;
return D;
}
void DateToStr(SYSTEMTIME *Time)
{
//将十进制数转换为液晶显示的ASCII值
Time->DateString[0] = Time->Year/10 + '0';
Time->DateString[1] = Time->Year%10 + '0';
Time->DateString[2] = '-';
Time->DateString[3] = Time->Month/10 + '0';
Time->DateString[4] = Time->Month%10 + '0';
Time->DateString[5] = '-';
Time->DateString[6] = Time->Day/10 + '0';
Time->DateString[7] = Time->Day%10 + '0';
Time->DateString[8] = '\0';
}

void TimeToStr(SYSTEMTIME *Time)
{
//将十进制数转换为液晶显示的ASCII值
Time->TimeString[0] = Time->Hour/10 + '0';
Time->TimeString[1] = Time->Hour%10 + '0';
Time->TimeString[2] = ':';
Time->TimeString[3] = Time->Minute/10 + '0';
Time->TimeString[4] = Time->Minute%10 + '0';
Time->TimeString[5] = ':';
Time->TimeString[6] = Time->Second/10 + '0';
Time->TimeString[7] = Time->Second%10 + '0';
Time->DateString[8] = '\0';
}
void Initial_DS1302(void)
{
unsigned char Second;
Second=Read1302(DS1302_SECOND);
if(Second&0x80) //初始化时间
DS1302_SetTime(DS1302_SECOND,0);
}
void DS1302_TimeStop(bit flag) // 是否将时钟停止
{
unsigned char Data;
Data=Read1302(DS1302_SECOND);
DS1302_SetProtect(0);
if(flag)
Write1302(DS1302_SECOND, Data|0x80);
else
Write1302(DS1302_SECOND, Data&0x7F);
}
#endif

⑵ C51单片机的万年历程序设计

我这有个数码管显示的程序
以前做的，。。
你可以在我这个程序上修改修改
包括键盘扫描，还有动态显示
。
。

【。。。】
#include
//常量参数
#define TMODW 0x01;
#define SCONW 0x00;
#define xplay 0x04;//显示分频系数
//显示位选
unsigned char data stb;
//键值缓存,0xFF无键命令
unsigned char data keynum;
//显示字型变量
unsigned char data play[8];
//工作参数
unsigned char data l,m;
//字型码
unsigned char code BCDPC[10]=
{0x3F,0x06,0x5B,0x4F,0x66,
0x6D,0x7D,0x07,0x7F,0x6F};
//字位码
unsigned char code STBCODE[8]=
{0x01,0x02,0x04,0x08,
0x10,0x20,0x40,0x80 };
//400Hz xplay分频计数
unsigned char data cttime;
//时钟参数
unsigned char data hr,min,sec,sec100;
//调整时钟参数（时钟“走”）
void ct1()
{sec100++;
if (sec100==100)
{sec100=0;sec++;
if (sec==60)
{sec=0;min++;
if (min==60)
{min=0;hr++;
if (hr==24) hr=0;
}
}
}
}
//时钟参数→LED 显示缓存7段参数转换函数；
void xcplay()
{play[0]=BCDPC[hr/10];
play[1]=BCDPC[hr%10];
play[2]=BCDPC[min/10];
play[3]=BCDPC[min%10];
play[4]=BCDPC[sec/10];
play[5]=BCDPC[sec%10];
play[6]=BCDPC[sec100/10];
play[7]=BCDPC[sec100%10];
}
//显示扫描
void cplay()
{T0=1;//T0－高电平消隐
T1=0;//T1－低电平准备发脉冲前沿
TI=0;//？
P1=0;//？
SBUF=STBCODE[stb];
while (TI==0)
{
};
TI=0;
SBUF=play[stb];
while (TI==0)
{
};
T1=1;
T0=0;
stb=++stb&0x07;
}

extern void cthl0();
//定时器0中断处理程序
void ct0(void) interrupt 1 using 1
{cthl0();
cttime--;
if (cttime==0)
{cttime=xplay;
ct1();//调用时钟“走”函数
xcplay();//调用时钟参数→Led显示缓存转换函数
};
cplay();
}
void w20ms()
{for (l=0;l<41;l++)
{for (m=0;m<81;m++)
{
}
}
}
void tkey()
{P1=0xF0;
keynum=0xFF;
if (P1!=0xF0)
{w20ms();
P1=0xF0;
if (P1!=0xF0)
{P1=0xFE;
switch (P1)
{case 0xEE:keynum=0;break;
case 0xDE:keynum=1;break;
case 0xBE:keynum=2;break;
case 0x7E:keynum=3;break;
}
P1=0xFD;
switch (P1)
{case 0xED:keynum=4;break;
case 0xDD:keynum=5;break;
case 0xBD:keynum=6;break;
case 0x7B:keynum=7;break;
}
P1=0xFB;
switch (P1)
{
case 0xEB:keynum=8;break;
}
};
};
P1=0x00;
}
void command()
{switch (keynum)
{
case 0:{hr=hr+1;
if (hr==24)
hr=0;
}
break;

case 1:{min=min+1;
if (min==60)
min=0;
}
break;

case 2:{sec=sec+1;
if (sec==60)
sec=0;
}
break;

case 3:{sec100=0;
}
break;

case 4:{
while(!(P1=0xED))
{
hr=0;
min=0;
sec=0;
}
}
break;

case 5:{hr=hr-1;
if (hr==00)
hr=24;
}
break;
case 6:{min=min-1;
if (min==00)
min=59;
}
break;

case 7:{sec=sec-1;
if (sec==00)
sec=0;
}
break;

case 0xFF:break;
}
keynum=0xFF;
}
main ()
{ hr=8;
min=5;
sec=8;
sec100=0;
TMOD=TMODW;
SCON=SCONW;
ET0=1;
TR0=1;
EA=1;
cttime=xplay;
while (1)
{w20ms();
tkey();
command();

};
}

⑶ 急求 51单片机的万年历课设电路图及代码 谢谢

别人没事，翻几天资料给你写论文，你觉得可能嘛？反正我是不会说我学电子信息工程的，我不会做51单片机那些电子自动化的东西的

⑷ 单片机做的日历 c语言程序

这是一个DS1302时钟程序，根据自己的硬件电路适当改改就可以做成日历了 /********************************************************************
*DS1302控制程序 2011.12.01 wqz
********************************************************************/
#include<reg52.h>
#include<intrins.h>

typedef unsigned uchar;sbit sda=P2^1; //DS1302
sbit clk=P2^0;
sbit ce=P2^2;
//sbit sda=P3^4;
//sbit clk=P3^6;
//sbit ce=P3^5;
//
//sbit _138_A=P2^2; //138A,B,C口
//sbit _138_B=P2^3;
//sbit _138_C=P2^4;sbit IO =P1^7; //595控制信号
sbit RLK =P1^6;
sbit CLK =P1^5;#define my_delay5us() _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();\
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_()
//#define T0_init() TMOD=0x01;TH0=0xb8;TL0=0x00;TR0=1;ET0=1;EA=1uchar cc[8]; //将要显示的时间由BCD码转换成要显示的数值存放在CC[]中
uchar bb[8]; //存放从DS1302中读取出来的数据
uchar aa[7]={0,30,18,20,12,6,11}; //初始时间
uchar code write_rtc[]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c}; //时间寄存器写地址
uchar code tember[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40}; //共阴数码管显示表void my_delay1ms(int t); //延时1ms函数
void write_1byte(uchar temp); //写一字节数据
uchar read_1byte(); //读一字李数据
void write_addr_data(uchar Addr, uchar Data); //先写地址再写数据
uchar writeadd_readdat(uchar ucAddr); //先写地址再读数据
void write1_readM(); //连续读多个字节数据
void ds1302_init(); //DS1302初始化/********************************************************************
*
* 主函数
********************************************************************/void main()
{
uchar i,j,dat; my_delay1ms(10);
ds1302_init(); //给DS1302付初值 11年12月20日 周六 18-30-00
// T0_init(); while(1)
{
write1_readM(); //读DS1302中的数据 cc[0]=bb[0]%16;
cc[1]=bb[0]/16;
cc[2]=10;
cc[3]=bb[1]%16;
cc[4]=bb[1]/16;
cc[5]=10;
cc[6]=bb[2]%16;
cc[7]=bb[2]/16; for(j=0;j<8;j++)
{
dat=tember[cc[j]];
RLK=0;
my_delay5us();
for(i=0;i<8;i++)
{
if(dat&0x80)IO=1;
else IO=0;
my_delay5us();
CLK=1;
my_delay5us();
CLK=0;
dat<<=1;
}
my_delay5us();
RLK=1;
}
my_delay1ms(500);
}
}/**********************************************************************/void my_delay1ms(int t) //延时
{
uchar i,j;
while(t--)
{
for(i=4;i>0;i--)
for(j=50;j>0;j--);
}
}/**********************************************************************/void write_1byte(uchar temp) //写一字节数据
{
uchar i; clk=0;
my_delay5us();
for (i=0;i<8;i++)
{
if(temp&0x01)sda=1;
else sda=0;
my_delay5us();
clk=1;
my_delay5us();
clk=0;
temp>>=1;
}
}/**********************************************************************/uchar read_1byte() //读一字节数据
{
uchar i,num;
for (i=0;i<8;i++)
{
num>>=1;
if(sda)
num|=0x80;
my_delay5us();
clk=1;
my_delay5us();
clk=0;
}
return num;
}/**********************************************************************/void write_addr_data(uchar Addr, uchar Data) //先写地址再写数据
{
ce = 0;
my_delay5us();
clk = 0;
my_delay5us();
ce = 1;
my_delay5us();
write_1byte(Addr); // 地址，命令
write_1byte(Data); // 写1Byte数据
my_delay5us();
clk=1;
my_delay5us();
ce =0;
} /**********************************************************************/uchar writeadd_readdat(uchar ucAddr) //先写地址再读数据
{
uchar num1=0; ce = 0 ;
my_delay5us();
clk = 0;
my_delay5us();
ce = 1;
my_delay5us();
write_1byte(ucAddr); // 地址，命令
num1 = read_1byte(); // 读1Byte数据
my_delay5us();
clk = 1;
my_delay5us();
ce =0; return(num1);
}/**********************************************************************/void write1_readM() //连续读多个字节数据
{
uchar i,Addr; Addr=0x81;
for (i=0;i<7;i++)
{
bb[i] = writeadd_readdat( Addr);//*格式为: 秒 分 时 日 月 星期 年
Addr += 2;
}
}/**********************************************************************/void ds1302_init() //初始时间 11年12月20日 周六 18-30-00
{
uchar i,*p,tmp; for(i=0;i<7;i++)
{ /*如想设置DS1302的“秒”，设置时间为37秒，所以输入的是十*/
tmp=aa[i]/10; /*进制数37，对应的16进制是0x25，但是DS1302寄存器使用的是压*/
aa[i]=aa[i]%10; /*缩BCD码，所以应该写入BCD数值37才行，即0x37。所以需要将*/
aa[i]=aa[i]+tmp*16; /*10进制的37转换为16进制表示的0x37*/
}
write_addr_data(0x8E,0X00);

p=write_rtc; //传地址
for(i=0;i<7;i++) //7次写入 秒分时日月周年
{
write_addr_data(*p,aa[i]);
p++;
} write_addr_data(0x8E,0x80);
}/**********************************************************************///void ET0_ser() interrupt 1
//{
//// uchar i;
//
// TH0=0x55;
// TL0=0x00;
//
//// P0=tember[cc[i]];
//// switch(i)
//// {
//// case 0 : _138_A=1;_138_B=1;_138_C=1; break;
//// case 1 : _138_A=0;_138_B=1;_138_C=1; break;
//// case 2 : _138_A=1;_138_B=0;_138_C=1; break;
//// case 3 : _138_A=0;_138_B=0;_138_C=1; break;
//// case 4 : _138_A=1;_138_B=1;_138_C=0; break;
//// case 5 : _138_A=0;_138_B=1;_138_C=0; break;
//// case 6 : _138_A=1;_138_B=0;_138_C=0; break;
//// case 7 : _138_A=0;_138_B=0;_138_C=0; break;
//// }
//// i++;
//// if(i==8)i=0;
//}

⑸ 基于51单片机，DS1302,1602实现万年历（年月日时分秒）及闹钟功能的C程序，不要显示农历和温度，谢谢！！

【八】电子表、万年历系列
[1]单片机公交车环境监测及时间显示系统
功能描述：
1、按键调时间
2、带备用电池（断电继续走时）
3、监测噪声和温湿度并实时显示
4、超过报警值蜂鸣器会响
☆已作出的实物优酷视频演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMxMDUwMA==.html
[2]单片机语音报时电子表

功能描述：
1、按键调试设置闹钟
2、带备用电池（断电继续走时）
3、整点语音报时
☆已作出的实物优酷视频演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMwMjM0OA==.html
[3]单片机红外遥控电子表语音报时语音播报温湿度

功能描述：
1、红外遥控调时间设定闹钟
2、带备用电池（断电继续走时）
3、整点语音报时语音播报温湿度
4、按键遥控语音报时语音播报温湿度
☆已作出的实物优酷视频演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMxMTUyOA==.html
[4]单片机红外遥控电子表语音报时格林威治时间双显示

功能描述：
1、红外遥控调时间设定闹钟
2、带备用电池（断电继续走时）
3、整点语音报时语音播报温湿度
4、按键遥控语音报时语音播报温湿度
☆已作出的实物优酷视频演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMxMTUyOA==.html
[5]单片机多功能万年历电子表系统节日提醒温湿度显示

功能描述：
1、按键调时间，设置闹钟
2、带备用电池（断电继续走时）
3、阳历、农历节日提醒；可显示上午、中午、晚上、午夜、深夜等时间段
4、温湿度实时显示（可替换其他传感器数据显示）
5、功能扩展：语音播报万年历、温湿度等。（此项功能为扩展功能，需要需补差价）
☆已作出的实物优酷视频演示地址：
http://v.youku.com/v_show/id_XMTU0MjI4OTExNg==.html
【二十】GPS授时定位系统系列
[1]GPS自动授时系统 语音报时/播报温湿度
实现功能：
1.可设置授时模式为自动授时和手动更新
2.可脱离GPS数据利用本地时钟芯片准确走时
3.可设置静音模式、整点报时和自动语音播报温湿度及其混合模式等四种语音工作模式
4.可以切换显示本地时间和温湿度数据和GPS卫星时间数据和定位数据
5.经过分析GPS数据，利用算法缩短了解析时间在秒级时间内就能获取到GPS时间数据（正常情况下，完成定位需要几分钟以上）
6.（亮点）利用算法自动计算星期参数和农历参数，程序内部算法输入任何阳历日期数据即可得到准确的星期数据和农历数据
7.利用12864串口工作模式，节省了8个IO
8.可根据需求进行功能定制
☆已作出的实物优酷视频演示地址：
http://v.youku.com/v_show/id_XMjUzMzcyNTkyOA==.html

⑹ 我用单片机c程序写的一个日历，求高手帮我补充下主函数部分的年月日闰年平年的判断条件

year++;
if(((year%100)==0)&&((year%400)==0))||(((year%100)!=0)&&((year%4)==0))
{
February=29;//2月有29天
}
else
{
February=28;//2月有28天
}

注：符合磨做氏下面两种情况中的一种就是润年：1.能被100整除而且能被400整除瞎散胡灶
2.不能被100整除但是能被4整除

⑺ AT89C52+DS1302单片机万年历程序

参考程序，可以调节时间，设置闹钟，音乐闹铃

#include<reg52.h>
#include<INTRINS.H>
/************************************************************/
#define uchar unsigned char
#define uint unsigned int
#define TIME (0X10000-50000)
#define FLAG 0XEF //闹钟标志
/************************************************************/
//引脚连接图
sbit CLK=P1^2;
sbit RST=P1^4;
sbit DAT=P1^3;
sbit RS=P1^5;
sbit RW=P1^6;
sbit E=P1^7;
sbit P32=P3^2;

sbit KEY1 = P2^7;
sbit KEY2 = P2^6;
sbit KEY3 = P2^5;
sbit KEY4 = P2^4;

sbit ACC_7=ACC^7;
/************************************************************/
//全局变量及常量定义
uchar i=20,j;
uchar DataBuf[16] = {};//日期
uchar TimeBuf[16] = {};//时间
uchar alarm[2],time[3];
uchar code Day[]={31,28,31,30,31,30,31,31,30,31,30,31};//12个月的最大日期(非闰年)

//闰年月星期表
const unsigned char WeekTab[] = {

(3 << 5) + 31,///1月
(6 << 5) + 29,///2月
(0 << 5) + 31,///3月
(3 << 5) + 30,///4月
(5 << 5) + 31,//5月
(1 << 5) + 30,//6月
(3 << 5) + 31,//7月
(6 << 5) + 31,//8月
(1 << 5) + 30,//9月
(4 << 5) + 31,//10月
(0 << 5) + 30,//11月
(2 << 5) + 31 //12月
};

//音律表
uint code table1[]={64260,64400,64524,64580,64684,64777,
64820,64898,64968,65030,65058,65110,65157,65178,65217};
//发声部分的延时时间
uchar code table2[]={0x82,1,0x81,0xf4,0xd4,0xb4,0xa4,
0x94,0xe2,1,0xe1,0xd4,0xb4,0xc4,0xb4,4,0};

//闹钟中用的全局变量
uchar th1,tl1;

/************************************************************/
//延时1ms函数
delay1ms(uchar time)
{
uchar i,j;
for(i=0;i<time;i++)
{
for(j=0;j<250;j++);
}
}

/************************************************************/
//LCD控制函数
Enable()
{
RS=0;
RW=0;
E=0;
delay1ms(3);
E=1;
}

/************************************************************/
//LCD1602写入字符函数
LCD1602_WriteSChr(uchar i)
{
P0=i;
RS=1;
RW=0;
E=0;
delay1ms(2);
E=1;
}

/************************************************************/
//LCD1602写入字符串函数
//入口函数
//uchar data *address : 写入数据首地址
//ucharm:写入字节数
LCD1602_WriteStr(uchar *address,uchar m)
{
uchar i,j;
for(i=0;i<m;i++,address++)
{
j=*address;
LCD1602_WriteSChr(j);
}
}

/************************************************************/
//LCD显示
void LCDShow(void)
{
P0=0XC; //显示器开、光标关
Enable();
//P0=0x80; //写入显示起始地址
//Enable();
//LCD1602_WriteStr(DataBuf,16); //写入日期显示缓存
P0=0xc1; //写入显示起始地址
Enable();

LCD1602_WriteStr(TimeBuf,16); //写入时间显示缓存
}

/************************************************************/
//DS1302写入子程序
void DS1302_Write(uchar temp)
{
uchar i;
CLK=0; //将DS1320时钟脉冲拉低
_nop_();//延时一指令周期
RST=1; //RST置高电平
_nop_();//延时一指令周期
for(i=0;i<8;i++) //循环8次
{
DAT=temp&0x01; //向DS1302写入一字节数据
_nop_(); //延时一指令周期
CLK=1; //拉高时钟脉冲
temp>>=1; //右移一位
CLK=0; //拉低时钟脉冲
}
}

/************************************************************/
//DS1302读取子程序
uchar DS1302_Read()
{
uchar i,j=0;
for(i=0;i<8;i++)//循环8次
{
j>>=1; //右移一位
_nop_(); //延时一指令周期
CLK=0; //拉低时钟脉冲
_nop_(); //延时一指令周期
if(DAT) //判断接收该位数据是否为1
j|=0x80;//该位置1
_nop_(); //延时一指令周期
CLK=1; //拉高时钟脉冲
}
return(j); //返回数值
}

/************************************************************/
//部分显示数据初始化
TimeStart()
{
TimeBuf[0]=TimeBuf[8]=TimeBuf[9]=TimeBuf[10]=0x20; //不显示字符
TimeBuf[2]=TimeBuf[5]=':'; //时间分隔显示
DS1302_Write(0xc1);
alarm[0]=DS1302_Read();
RST=0;
DS1302_Write(0xc3);
alarm[1]=DS1302_Read();
RST=0;
DS1302_Write(0xc5);
DataBuf[0]=DS1302_Read();
RST=0;
}

/************************************************************/
//读取时间
ReadTime()
{
uchar i,m,n;
for(m=0,i=0,n=0x85;i<7;i+=3,n-=2,m++) //连续读取时,分,秒
{
DS1302_Write(n); //写入读取寄存器指令
time[m]=DS1302_Read(); //读取数据
RST=0; //将RST电平拉低，停止传输
TimeBuf[i]=time[m]/16+0x30; //将两位数据的十位转为字符格式
TimeBuf[i+1]=time[m]%16+0x30;//将两位数据的个位转为字符格式
}
}

/************************************************************/
//功能选择超时定时器
time0() interrupt 1 using 1
{
i--;
if(i==0)
{
if(j!=0)
j--;
i=20;
}
TH0=TIME/256,TL0=TIME%256;
}

/************************************************************/
//产生闹铃音调
intime1() interrupt 3
{
TH1=th1,TL1=tl1;
P32=!P32;
}

/************************************************************/
//闹钟显示
void AlarmShow(void)
{
uchar i,j,a,b,n;
ET1=1;
for(j=0;j<6;j++)
{
i=0;
while(1)
{
a=table2[i];
if(a==0)
break;
b=a&0xf;
a>>=4;
if(a==0)
{
TR1=0;
goto D1;
}
a=((--a)<<1)/2;
TH1=th1=table1[a]/256,TL1=tl1=table1[a]%256;
TR1=1;
D1: do
{
b--;
for(n=0;n<3;n++)
{
ReadTime();
LCDShow();
P2=0xff;
if(KEY4 == 1)
{
delay1ms(100);
if(KEY4 == 1)
{
TR1=0;
ET1=0;
P32 = 1;
return;
}
}
}
}while(b!=0);
i++;
}
TR1=0;
}
ET1=0;
}

/************************************************************/
//设置日期、时间
void SetTime(void)
{
uchar i=0xc2,year,month,day,n;
TimeBuf[6]=TimeBuf[7]=0x30;
DataBuf[14]=DataBuf[15]=0x20;
LCDShow();
while(1)
{
P0=0xe; //显示器开、光标开
Enable();
P0=i; //定光标
Enable();
P2=0xff;
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
delay1ms(100); //延时0.1s去抖动
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
j=7;
if(KEY1 == 1)
{
i+=3; //更改设置项目
if(i==0x8e)
i=0xc2;
else if(i>0xc5)
i=0xc2;
}
else if(KEY2 == 1)
{
year=(DataBuf[4]&0xf)*10+(DataBuf[5]&0xf); //将字符格式的年份转换为数值格式
month=(DataBuf[7]&0xf)*10+(DataBuf[8]&0xf); //将字符格式的月份转换为数值格式
day=(DataBuf[10]&0xf)*10+(DataBuf[11]&0xf); //将字符格式的日数转换为数值格式
if(i==0x85) //设置年份
{
year++;
if(year>99)
year=0;
if((year%4)!=0)
if(month==2&&day==29)
day=28;
}
else if(i==0x88) //设置月份
{
month++;
if(month>12)
month=1;
if(day>Day[month-1])
{
day=Day[month-1];
if(month==2&&(year%4)==0) //计算是否闰年
day=29;
}
}
else if(i==0x8b) //设置日期
{
day++;
if(day>Day[month-1])
{
if(month==2&&(year%4)==0) //计算是否闰年
{
if(day>29)
day=1;
}
if(month!=2)
day=1;
}
}
else if(i==0xc2) //设置小时
{
n=(TimeBuf[0]&0xf)*10+(TimeBuf[1]&0xf);
n++;
if(n>23)
n=0;
TimeBuf[0]=n/10+0x30;
TimeBuf[1]=n%10+0x30;
}
else //设置分钟
{
n=(TimeBuf[3]&0xf)*10+(TimeBuf[4]&0xf);
n++;
if(n>59)
n=0;
TimeBuf[3]=n/10+0x30;
TimeBuf[4]=n%10+0x30;
}
DataBuf[4]=year/10+0x30; //将数值格式的日期转换为字符形式
DataBuf[5]=year%10+0x30;
DataBuf[7]=month/10+0x30;
DataBuf[8]=month%10+0x30;
DataBuf[10]=day/10+0x30;
DataBuf[11]=day%10+0x30;
LCDShow();
}
else if(KEY3 == 1) //按保存退出键后,向DS1302写入设置后的日期时间
{
DS1302_Write(0x8c);
DS1302_Write((DataBuf[4]&0xf)*16+(DataBuf[5]&0xf));
RST=0;
DS1302_Write(0x8a);
DS1302_Write(SetWeek());
RST=0;
for(i=7,n=0x88;i<11;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((DataBuf[i]&0xf)*16+(DataBuf[i+1]&0xf));
RST=0;
}
for(i=0;i<7;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((TimeBuf[i]&0xf)*16+(TimeBuf[i+1]&0xf));
RST=0;
}
TR0=0;
return;
}
else
{
TR0=0;
return;
}
}
}
if(j==0)
{
TR0=0;
return;
}
}
}

/************************************************************/
//设置闹钟
void SetAlarm(void)
{
uchar i,n;
for(i=1;i<16;i++)
{
DataBuf[i]=0x20;
}
TimeBuf[0]=alarm[0]/16+0x30;
TimeBuf[1]=(alarm[0]&0xf)+0x30;
TimeBuf[3]=alarm[1]/16+0x30;
TimeBuf[4]=(alarm[1]&0xf)+0x30;
TimeBuf[6]=TimeBuf[7]=0x30;
LCDShow();
i=0xc2;
while(1)
{
P0=0xe; //显示器开、光标开
Enable();
P0=i; //定光标
Enable();
P2=0xff;
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
delay1ms(100); //延时0.1s去抖动
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
j=7;
if(KEY1 == 1)
{
i+=3;
if(i>0xc5)
i=0xc2;
}
else if(KEY2 == 1)
{
if(i==0xc2)
{
n=(TimeBuf[0]&0xf)*10+(TimeBuf[1]&0xf);
n++;
if(n>23)
n=0;
TimeBuf[0]=n/10+0x30;
TimeBuf[1]=n%10+0x30;
}
else
{
n=(TimeBuf[3]&0xf)*10+(TimeBuf[4]&0xf);
n++;
if(n>59)
n=0;
TimeBuf[3]=n/10+0x30;
TimeBuf[4]=n%10+0x30;
}
LCDShow();
}
else if(KEY3 == 1)
{
DS1302_Write(0xc0);
DS1302_Write((TimeBuf[0]&0xf)*16+(TimeBuf[1]&0xf));
RST=0;
DS1302_Write(0xc2);
DS1302_Write((TimeBuf[3]&0xf)*16+(TimeBuf[4]&0xf));
RST=0;
DataBuf[0]=FLAG;
DS1302_Write(0xc4);
DS1302_Write(DataBuf[0]);
RST=0;
TR0=0;
TimeStart();
return;
}
else
{
TR0=0;
TimeStart();
return;
}
}
}
if(j==0)
{
TR0=0;
TimeStart();
return;
}
}
}

/************************************************************/
//DS1302初始化程序
void DS1302_Init(void)
{
uchar i,n;

DS1302_Write(0x8c);
DS1302_Write((DataBuf[4]&0xf)*16+(DataBuf[5]&0xf));
RST=0;
DS1302_Write(0x8a);
DS1302_Write(SetWeek());
RST=0;
for(i=7,n=0x88;i<11;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((DataBuf[i]&0xf)*16+(DataBuf[i+1]&0xf));
RST=0;
}
for(i=0;i<7;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((TimeBuf[i]&0xf)*16+(TimeBuf[i+1]&0xf));
RST=0;
}
}

/************************************************************/
//主函数
main()
{
IE=0x82;
TMOD=0x11;
DS1302_Write(0x8E); //禁止写保护
DS1302_Write(0);
RST=0;
P0=1; //清屏并光标复位
Enable();
P0=0x38; //设置显示模式:8位2行5x7点阵
Enable();
P0=6; //文字不动,光标自动右移
Enable();
DS1302_Init();
TimeStart();

while(1)
{
ReadTime(); //读取时间
LCDShow(); //显示时间

if(DataBuf[0]!=0x20)
if(time[0]==alarm[0])
if(time[1]==alarm[1])
if(time[2]==0)
AlarmShow();

P2=0xff;
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1))
{
delay1ms(100); //延时0.1s去抖动
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1))
{
j=7;
TH0=TIME/256,TL0=TIME%256;
TR0=1;
if(KEY1 == 1)
{
SetTime();
}
else if(KEY2 == 1)
{
SetAlarm();
}
else if(KEY3 == 1)
{
TR0=0;
if(DataBuf[0]==FLAG)
DataBuf[0]=0x20;
else
DataBuf[0]=FLAG;
DS1302_Write(0xc4);
DS1302_Write(DataBuf[0]);
RST=0;
}
}
}
delay1ms(100);
}
}

⑻ 51单片机 制作 日历时钟 用汇编语言 要详细的代码和硬件图示

你好这是基于DS1302日历时钟的单片机汇编程序 51单片机
ORG 0000H
MOV SP,#30H
LOAD EQU P2.0
CLR LOAD
MOV R0,#0FH
MOV R1,#0AH ;亮度
ACALL TRT

MOV R0,#02H
MOV R1,#0BH ;扫描位数
ACALL TRT

MOV R0,#0FFH
MOV R1,#09H ;译码
ACALL TRT

MOV R0,#01H
MOV R1,#0CH
CALL TRT
SETB P1.0
MOV 22H,#00H
;以下为按键扫描输入初值子程序
KEYSET: MOV 73H,#01H ;设温度初值为10度
MOV 74H,#00H
MOV 75H,#00H
CALL DISPLAY
KEY1: CALL KS1 ;调判断有无键按下子程序
JNZ LK1 ;有键按下(A)<>0转消抖延时
AJMP KEY1 ;无键按下返回,等键按下
LK1: CALL DEL10MS ;延时
CALL KS1 ;若有键按下则为真实按下
JNZ KEYI ;键按下(A)<>0转键扫描
AJMP KEY1 ;不是键按下返回
KEYI: JNB ACC.0,KEYR ;加1键未按下,转查减1键
LK2: CALL KS1 ;等待键释放
CALL DEL10MS
JNZ LK2 ;未释放,等待
INC 75H ;末位加1
MOV A,75H
CJNE A,#0AH,PPA
MOV 75H,#00H
INC 74H
MOV A,74H
CJNE A,#0AH,PPA
MOV 74H,#00H
INC 73H
PPA: CALL DISPLAY
AJMP KEY1 ;转再次扫描
KEYR: JNB ACC.1,KEYH ;减1键未按下,转查上限确认键
LK3: CALL KS1
CALL DEL10MS
JNZ LK3
MOV A,75H
CJNE A,#00H,PPC
MOV 75H,#09H
MOV A,74H
CJNE A,#00H,PPD
MOV 74H,#09H
DEC 73H
AJMP PPB
PPD: DEC 74H
AJMP PPB
PPC: DEC 75H
PPB: CALL DISPLAY
AJMP KEY1 ;再次扫描
KEYH: JNB ACC.2,KEYL ;上限键未按下,转查下限确认键
LK4: CALL KS1
CALL DEL10MS
JNZ LK4
MOV A,73H
MOV 70H,A ;保存上限
MOV A,74H
MOV 71H,A
MOV A,75H
MOV 72H,A
AJMP KEY1
;KEYL: JNB ACC.3,KEY1
LK5: CALL KS1
CALL DEL10MS
JNZ LK5
MOV A,73H
MOV 6DH,A ;保存下限
MOV A,74H
MOV 6EH,A
MOV A,75H
MOV 6FH,A

EX_CON: ;CPL P1.3 ;使用仪器测试时用
CALL DS18B20 ;转DS18B20采样子程序
CALL DISPLAY
;以下为后向通道控制部分
CONTROL:MOV A,73H
CJNE A,6DH,NEQA
MOV A,74H
CJNE A,6EH,NEQB
CLR P1.5
CLR P1.6
JMP EX_CON ;样温=下限,返回采样
NEQA: JNC NEQD ;CY=0,即(73H)>(6DH)时转比上限
SETB P1.5
CLR P1.6
JMP EX_CON
NEQB: JNC NEQD
SETB P1.5
CLR P1.6
JMP EX_CON
NEQD: MOV A,73H
CJNE A,70H,NEQE
MOV A,74H
CJNE A,71H,NEQF
CLR P1.5
CLR P1.6
JMP EX_CON ;样温=上限,返回采样
NEQE: JNC NEQH ;CY=0,即(73H)>(70H)时转打开降温开关
CLR P1.5
CLR P1.6
JMP EX_CON
NEQF: JNC NEQH
CLR P1.5
CLR P1.6
JMP EX_CON
NEQH: CLR P1.5
SETB P1.6
JMP EX_CON

KS1: MOV P0,#0FFH
MOV A,P0
CPL A
ANL A,#0FH
RET
DEL10MS:MOV R7,#20
S2: MOV R6,#250
S1: DJNZ R6,S1
DJNZ R7,S2
RET

;以下为显示
DISPLAY:MOV A,73H ;字码
MOV R0,A
MOV R1,#01H ;位置
ACALL TRT

MOV A,74H
MOV R0, A
MOV R1,#02H
ACALL TRT

MOV A,75H
MOV R0,A
MOV R1,#03H
ACALL TRT
RET
;JMP DIS

DS18B20:LCALL RESET ;测试温度探头存在否?
MOV A,#0CCH
LCALL WRITE
MOV A,#44H
LCALL WRITE ;命令字写入探头内
MOV R7,#70D ;延时
CALL DE11
LCALL RESET
MOV A,#0CCH
LCALL WRITE
MOV A,#0BEH
LCALL WRITE
LCALL READ ;读取探头内的温度值
MOV B,A
MOV 21H,A ;保存温度值低位
LCALL READ
MOV 20H,A ;保存温度值高位
LCALL EXCHANG ;温度值B转D并送入显示缓存
RET

RESET:
LA: SETB P1.0 ;复位
NOP
LB: CLR P1.0 ;480US < TS < 960US
MOV R7,#36D
CALL DE11
SETB P1.0 ;60US < T <90US
LC: MOV R7,#6D
CALL DE11
CLR C
ORL C,P1.0
JC LB
LF: MOV R7,#18D ;T > 270
CALL DE11
SETB P1.0
RET

WRITE:
MOV R3,#8
WR1: SETB P1.0
CLR P1.0 ;延时
MOV R4,#2
WR2: DJNZ R4,WR2
RRC A
MOV P1.0,C ;写的数据在线上需延时
MOV R4,#18
WR3: DJNZ R4,WR3
NOP
SETB P1.0
DJNZ R3,WR1
SETB P1.0
RET

READ:
MOV R3,#8
RD1: CLR C
SETB P1.0 ;适当延时
NOP
NOP
CLR P1.0 ;适当延时
NOP
NOP
SETB P1.0 ;延时
MOV R4,#9
RD2: DJNZ R4,RD2
MOV C,P1.0
RRC A
MOV R5,#23
RD3: DJNZ R5,RD3
DJNZ R3,RD1
RET

DELAY: MOV R7,#10
DL2: MOV R6,#200
DL1: MOV R5,#250
DL0: DJNZ R5,DL0
DJNZ R6,DL1
DJNZ R7,DL2
RET

EXCHANG: MOV A,21H
SWAP A
ANL A,#0FH
MOV 24H,A
MOV A,20H
ANL A,#07H
SWAP A
ADD A,24H
MOV B,#10D
DIV AB
MOV 73H,A
MOV 74H,B
MOV A,21H
ANL A,#0FH
mov dptr,#SADDR ;小数部分的转换查表
movc a,@a+dptr
MOV 75H,A
ret
SADDR: DB 00H,1H,02h ; bo_ying address in eeprom 0800h-0A08H
DB 03H,3H,04h ; da_ling address in eeprom 0A10H-0AD3H
DB 04H,05H,06h ;shou_ying address in eeprom 0AE0H-0C25H
DB 06H,7H,08h ; lu_ying address in eeprom 0C30H-0D75H
DB 08H,9H,9h,9H

DELAY15US: ;12MHZ ,15US
DE11: NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
DJNZ R7,DE11
RET

TRT: CLR P2.0 ;LOAD
MOV R2,#08H
MOV A,R1
T_1: CLR P2.2 ;SETB P2.2 ;CLK
RLC A
MOV P2.1,C ;DATA
CALL TDELAY
SETB P2.2 ;CLR P2.2
DJNZ R2,T_1
CALL TDELAY
MOV R2, #08H
MOV A,R0
TT2: CLR P2.2 ;SETB P2.2
RLC A
MOV P2.1,C
CALL TDELAY
SETB P2.2 ;CLR P2.2
DJNZ R2,TT2
SETB P2.0 ;CLR P2.0
RET

TDELAY: MOV R6,#01H
TMS0: MOV R7,#03H
TMS1: DJNZ R7,TMS1
DJNZ R6,TMS0
RET

⑼ C51系列单片机课程设计：电子闹钟和万年历的程序

#include<reg52.h>
#include<亏渗衫intrins.h>
#define uchar unsigned char
#define uint unsigned int

sbit dq=P3^7; //////18b20
sbit lcden=P2^7; ////lcd
sbit rs=P2^6;
sbit wr=P2^5;
sbit sck=P3^6; ////1302
sbit sda=P3^4;
sbit rst=P3^5;

sbit a=P1^0;
sbit b=P1^1;
sbit c=P1^2;
sbit d=P1^3;
sbit kj=P1^4;
sbit beep=P1^5;
uchar ritime;
uchar startflag;
uchar ridate[33];
uchar bitnum;
uchar rireceok;
uchar ricode[4];
uchar riprosok;
uchar dis[8];
void dis_key(void);
void riwork(void);
void ripros(void);
void keyscan(void);
void bep(void);
void timer0init(void);
void init0init(void);
uchar key0,key1,key2,key0num,passwordok;
uchar key,p,m,pnum,sha;
uchar password[9];
uchar password1[9]={6,7,4,6,8,8,6,4,6};
void password_scan();
void post_key();
void dj1();
void dj2();
//////////////////////函数声明1302
void wr1302_byte(uchar byte);
void wr1302 (uchar add,uchar dat);
uchar read1302(uchar add);
uchar time_date[7]={10,3,12,8,21,37,20};////年周月日时分秒
uchar time_add[7]={0x8c,0x8a,0x88,0x86,0x84,0x82,0x80};////写入地址
uchar read_add[7]={0x8d,0x8b,0x89,0x87,0x85,0x83,0x81};////读出地址
uchar disp[13]; ////将读出时间装入
void set_rtc();
void read_rtc();
void timepost(); ////处理时间为10进制
void display();
void password_display();
void timeplay();
void runnian1(); ///闰年加
void runnian2(); ///闰年减
void keypost(); //按键处理
///////////销腔////////////////// 函数声明 lcd ///////喊枯/////////////
uchar code lcd_tab[]="0123456789- ():c";
uchar code lcd_tab1[]="Plese Password:";
uchar code table1[]="key=00-00-00-00";
uchar code table[]=" QQ:674688646";
uchar code numtab[]="0123456789ABCDEF";
uchar code numtab1[]=" 1234567890";
void delay(uint z);
void init_lcd();
void write_com(uchar com);
void write_date(uchar x);
///////////////////////////18b20////////////
void init18b20(void);
void wr1820_byte(uchar dat);
uchar read18b20_byte(void);
uchar read1820(void);
void delay1(uint t);
//////////////////////////////////////////

void timer0init(void) //开定时器2
{
TMOD=0X02;
TH0=0X00;
TL0=0X00;
ET0=1;
EA=1;
TR0=1;
}
void init0init(void) //外部中断
{
IT0=1;
EX0=1;
EA=1;
}
void riwork(void)
{
dis[0]=ricode[0]/16;
dis[1]=ricode[0]%16;
dis[2]=ricode[1]/16;
dis[3]=ricode[1]%16;
dis[4]=ricode[2]/16;
dis[5]=ricode[2]%16;
dis[6]=ricode[3]/16;
dis[7]=ricode[3]%16;
}
void ripros(void)
{ uchar j,k,i,value;
k=1;
for(j=0;j<4;j++)
{
for(i=0;i<8;i++)
{
value=value>>1;
if(ridate[k]>6)
{
value=value|0x80;
}
k++;
}
ricode[j]=value;
}
riprosok=1;
}
void timer0 () interrupt 1
{
ritime++;
}
void int0() interrupt 0
{
if(startflag==1)
{
if(ritime>32)//检测引导码
{
bitnum=0;
}
ridate[bitnum]=ritime;
ritime=0;
bitnum++;
if(bitnum==33)
{
bitnum=0;
rireceok=1;
}
}
else
{
startflag=1;
ritime=0;
}
}

void keyscan(void)
{ if(rireceok==1)
{bep(); //按键发声 但影响蜂鸣器操作
ripros();
rireceok=0;
}
if(riprosok==1)
{ riwork();
riprosok=0;
switch(ricode[2])
{ case 0x46:p=1;pnum++;break;

case 0x0c:key=1;break;
case 0x18:key=2;break;
case 0x5e:key=3;break;
case 0x08:key=4;break;
case 0x1c:key=5;break;
case 0x5a:key=6;break;
case 0x42:key=7;break;
case 0x52:key=8;break;
case 0x4a:key=9;break;
case 0x16:key=10;break;

case 0x09:key0=1;key0num++;break;
case 0x15:key1=1;break;
case 0x07:sha=1;key2=1;break;
if(key0==1){if(key0num==1)read_rtc();}
}
}
////按下设定键后读一次1302保证time_date内数据正常
}

void bep(void)
{
beep=0;delay(100);beep=1;
}
///////////////////////////////////////////////////////////
void write_com(uchar com) /////写命令
{
rs=0;
P0=com;
lcden=1;
delay(5);
lcden=0;
}
void write_date(uchar x)/////写数据
{
rs=1;
P0=x;
delay(5);
lcden=1;
delay(5);
lcden=0;
}

void init_lcd()// ///lcd初始化
{
wr=0;
lcden=0;
write_com(0x38);
write_com(0x0c);
write_com(0x06);
write_com(0x01);
}
void display()
{timepost();
write_com(0x80+2);
write_date(lcd_tab[2]);
write_date(lcd_tab[0]);
write_date(lcd_tab[disp[0]]);
write_date(lcd_tab[disp[1]]);
write_date(lcd_tab[10]);
write_date(lcd_tab[disp[3]]);
write_date(lcd_tab[disp[4]]);
write_date(lcd_tab[10]);
write_date(lcd_tab[disp[5]]);
write_date(lcd_tab[disp[6]]);
write_date(lcd_tab[11]);
write_date(lcd_tab[12]);
write_date(lcd_tab[disp[2]]);
write_date(lcd_tab[13]);
write_com(0x80+0x40+4);/////////第二行
write_date(lcd_tab[disp[7]]);
write_date(lcd_tab[disp[8]]);
write_date(lcd_tab[14]);
write_date(lcd_tab[disp[9]]);
write_date(lcd_tab[disp[10]]);
write_date(lcd_tab[14]);
write_date(lcd_tab[disp[11]]);
write_date(lcd_tab[disp[12]]);
write_date(lcd_tab[11]);
write_date(lcd_tab[read1820()/10]);/////显示温度
write_date(lcd_tab[read1820()%10]);
write_date(lcd_tab[15]);
}
//////////////// 1302 //////////////////////////////
void wr1302_byte(uchar byte) /////写入一个字节
{ uchar i;
for(i=0;i<8;i++)
{ sck=0;
sda=byte&0x01;
byte>>=1;
sck=1;
}
}
void wr1302 (uchar add,uchar dat)/////写进1302 时间和地址
{ rst=0;
_nop_();
sck=0;
_nop_();
rst=1;
_nop_();
wr1302_byte(add);
wr1302_byte(dat);
rst=0;
//_nop_();
//sda=1;
//sck=1;
}
uchar read1302(uchar add)
{ uchar i,temp;
rst=0;
_nop_();
sck=0;
_nop_();
rst=1;
_nop_();
wr1302_byte(add);////////////////////写入要读的地址
for(i=0;i<8;i++)
{
if(sda)temp=temp|0x80;
sck=0;
temp>>=1;
_nop_();
sck=1;
}
rst=0; //////// 延时很重要
_nop_();
sck=0;
_nop_();
sck=1;
_nop_();
sda=0;
_nop_();
sda=1;
_nop_();
return temp;
}
void set_rtc()
{
uchar i,j;
for(i=0;i<7;i++)
{
j=time_date[i]/10; ///////将10进制变成16进制
time_date[i]=time_date[i]%10;
time_date[i]=time_date[i]+j*16;
}
wr1302(0x8e,0x00);//////去除写保护
for(i=0;i<7;i++)
{
wr1302(time_add[i],time_date[i]);
}
wr1302(0x8e,0x80);//////加写保护
}

void read_rtc()
{uchar i,j;
for(i=0;i<7;i++)
{
time_date[i]=read1302(read_add[i]);
////将读到的bcd码转化成10进制码
j=time_date[i]&0x0f;
time_date[i]>>=4;
time_date[i]&=0x0f;
time_date[i]*=10;
time_date[i]=time_date[i]+j;

}
}
void timepost()
{ disp[0]=time_date[0]/10;/////年
disp[1]=time_date[0]%10;
disp[2]=time_date[1]%10;/////周
disp[3]=time_date[2]/10;/////月
disp[4]=time_date[2]%10;/////
disp[5]=time_date[3]/10;/////日
disp[6]=time_date[3]%10;////
disp[7]=time_date[4]/10;////时
disp[8]=time_date[4]%10;////
disp[9]=time_date[5]/10;////分
disp[10]=time_date[5]%10;////
disp[11]=time_date[6]/10;////秒
disp[12]=time_date[6]%10;////

}
void delay(uint z)
{
uint x,y;
for(x=0;x<20;x++)
for(y=z;y>0;y--);
}

/////////////////////////18b20////////
void delay1(uint t)
{
while (t--);
}

void init18b20(void)
{
uchar n;
dq=1;
delay1(8);
dq=0;
delay1(80);
dq=1;
delay1(8);
n=dq;
delay1(4);
}

void wr18b20_byte(uchar dat)
{
uchar i;
for(i=0;i<8;i++)
{
dq=0;
dq=dat&0x01;
delay1(4);
dq=1;
dat>>=1;
}
delay1(4);
}
uchar read18b20_byte(void)
{
uchar i,value;
for(i=0;i<8;i++)
{ dq=0;
value>>=1;
dq=1;
if(dq)
value|=0x80;
delay1(4);
}
return value;
}
uchar read1820(void)
{ uchar a,b;
init18b20();
wr18b20_byte(0xcc);
wr18b20_byte(0x44);
delay1(50);
init18b20();
wr18b20_byte(0xcc);
wr18b20_byte(0xbe);
a=read18b20_byte();
b=read18b20_byte();
b<<=4;
b+=(a&0xf0)>>4;
return b;
}
///////////////////////////////////////////////////////
void keypost()
{ uchar n;
if(key0==1)
{
if(key0num==1)
{write_com(0x80+0x40+10);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[6]++;
if(time_date[6]==60)time_date[6]=0;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[6]--;
if(time_date[6]==-1)time_date[6]=59;
display();

}
}
if(key0num==2)
{write_com(0x80+0x40+8);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[5]++;
if(time_date[5]==60)time_date[5]=0;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[5]--;
if(time_date[5]==-1)time_date[5]=59;
display();
}
}
if(key0num==3)
{write_com(0x80+0x40+5);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[4]++;
if(time_date[4]==24)time_date[4]=0;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[4]--;
if(time_date[4]==-1)time_date[4]=23;
display();
}
}
if(key0num==4)
{write_com(0x80+14);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[1]++;
if(time_date[1]==8)time_date[1]=1;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[1]--;
if(time_date[1]==0)time_date[1]=7;
display();
}
}

if(key0num==5)
{write_com(0x80+10);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[3]++;
runnian1();
display();
}

if(key2==1)
{
key2=0;n=1;
time_date[3]--;
if(time_date[3]<1)time_date[3]=31;
runnian2();
display();
}
}
if(key0num==6)
{write_com(0x80+7);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[2]++;
if(time_date[2]>12)time_date[2]=1;
runnian2();
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[2]--;
if(time_date[2]==0)time_date[2]=12;
runnian2();
display();
}
}
if(key0num==7)
{write_com(0x80+4);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[0]++;
if(time_date[0]==100)time_date[0]=0;
runnian2();
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[0]--;
if(time_date[0]==-1)time_date[0]=99;
runnian2();
display();
}
}

if(key0num==8)
{ key0num=0;key0=0;
write_com(0x0c);
if(n){n=0;set_rtc();}

}
}
else
{
read_rtc();
timepost();
display();
if(time_date[5]==0) ///整点报时
{if(time_date[6]==0)beep=0;
else beep=1;
}
}
}
void runnian1()////闰年加
{
if(time_date[2]==2) /////判断2月
{ if((time_date[0]+4)%4==0)
{ if(time_date[3]>29)time_date[3]=1;}//判断闰年
else
{if(time_date[3]>28)time_date[3]=1;}
}
else
{ if(time_date[2]<8)///判断月小于8
{
if((time_date[2]+1)%2==0)
{if(time_date[3]>31)time_date[3]=1;}
else
{if(time_date[3]>30)time_date[3]=1;}
}
if(time_date[2]>7)
{
if((time_date[2])%2==0)
{if(time_date[3]>31)time_date[3]=1;}
else
{if(time_date[3]>30)time_date[3]=1;}
}
}
}
void runnian2()//闰年减
{
if(time_date[2]==2) /////判断2月
{ if((time_date[0]+4)%4==0)
{ if(time_date[3]>29)time_date[3]=29;}//判断闰年
else
{if(time_date[3]>28)time_date[3]=28;}
}
else
{
if(time_date[2]<8)///判断月小于8
{
if((time_date[2]+1)%2==0)
{if(time_date[3]>31)time_date[3]=31;}
else
{if(time_date[3]>30)time_date[3]=30;}
}
if(time_date[2]>7)
{
if((time_date[2])%2==0)
{if(time_date[3]>31)time_date[3]=31;}
else
{if(time_date[3]>30)time_date[3]=30;}
}
}
}
void password_scan() ////////输入密码界面
{uchar l,i,j;
write_com(0x80);
for(l=0;l<15;l++)
{write_date(lcd_tab1[l]);}
write_com(0x80+0x40+4+i);
write_com(0x0f);delay(1000);
if(key!=0)
{
password[i]=key;
write_com(0x80+0x40+4+i);
write_date(numtab1[key]);
write_com(0x14);
i++;key=0;
}
if(i>0)
{if(sha==1)
{sha=0;i--;
write_com(0x80+0x40+4+i);
write_date(numtab1[0]);
write_com(0x10);
}
}
if(i==9)
{ i=0;
for(j=0;j<9;j++)
{
if(password1[j]==password[j])m++;
else {init_lcd();m=0;break;}
}
if(m==9)
{
m=0;passwordok=1;
p=0;pnum=0;key=0;
init_lcd();
for(i=0;i<15;i++)
{write_date(table[i]);}
write_com(0x80+0x40);
for(i=0;i<15;i++)
{write_date(table1[i]);}
}
}
}
void dis_key(void) //显示键值
{
write_com(0x80+0x40+4);
write_date(numtab[dis[0]]);
write_date(numtab[dis[1]]);
write_com(0x80+0x40+7);
write_date(numtab[dis[2]]);
write_date(numtab[dis[3]]);
write_com(0x80+0x40+10);
write_date(numtab[dis[4]]);
write_date(numtab[dis[5]]);
write_com(0x80+0x40+13);
write_date(numtab[dis[6]]);
write_date(numtab[dis[7]]);

}
void timeplay()
{
if(p==1)
{ uchar v;key0num=0;key0=0;
if(v==0){v=1;init_lcd();key=0;}
if(pnum==1)
{
password_scan();
}
if(pnum==2)
{ p=0;pnum=0;m=0;v=0;
init_lcd();
}
}
else keypost();
}
//////////////////////////主函数////////////////////////
void main()
{
init_lcd(); /////初始化lcd
timer0init();///// 开定时器中断
init0init();///// 开外部器中断
key=0;
while(1)
{
keyscan();

if(passwordok)
{ dis_key();
post_key();
if(p==1)
{ if(pnum==1)
{if(ricode[2]!=0x46)pnum=0;}
if(pnum==2)
{pnum=0;m=0;
passwordok=0;p=0;
break;
}
}
}
else timeplay();
}
}

void post_key()
{
if(key==1){key=0;kj=0;}
if(key==2){key=0;kj=1;}
if(key==3){key=0;dj1();}
if(key==4){key=0;dj2();}
}
void dj1()
{
uint i;
for(i=0;i<512;i++)
{if(rireceok==1)break;
a=0;b=0;delay(20);
a=1;b=0;delay(20);
b=0;c=0;delay(20);
b=1;c=0;delay(20);
c=0;d=0;delay(20);
c=1;d=0;delay(20);
d=0;a=0;delay(20);
d=1;delay(20);
}
}
void dj2()
{ uint i;
for(i=0;i<512;i++)
{if(rireceok==1)break;
d=0;a=0;delay(20);
a=1;d=0;delay(20);
c=0;d=0;delay(20);
c=0;d=1;delay(20);
b=0;c=0;delay(20);
c=1;b=0;delay(20);
a=0;b=0;delay(20);
a=0;b=1;delay(20);
}
}

使用方法 本程序用于HC6800 V2.6 实验箱，需要装上1602液晶屏，18b20 温度传感器，红外接收头，和步进电机，同时保证遥控器好用（要用配套的小遥控器并且要按键值和我的一样才能准确的操作本程序）
我的遥控器按键值如下
ch-0x45 ch 0x46 ch+0x47

<< 0x44 >> 0x40 >= 0x43

- 0x07 + 0x15 EQ 0x09

0 0x16 100+ 0x19 200+ 0x0d

1 0x0c 2 0x18 3 0x5e

4 0x08 5 0x1c 6 0x5a

7 0x42 8 0x52 9 0x4a

主要操作键为 ch EQ + - 123456789 等键，

程序下进去后 1602会显示日期 时间 温度
用EQ键可对日期 时间进行设定
用+ - 键对日期时间进行调节
调节日期时会自动识别大小月，及闰年并对日期进行相应调整

按下ch键后 会进入输入密码界面 依次输入674688646 会进入按键读值界面 ，输入错误可用 - 键退回
在按键读值界面 连续按两次ch 键后，程序 会退出到时间显示界面
在按键读值界面 按1 打开继电器 按2 关闭继电器 按3 步进电机正转一周，按 4 步进电机反转一周 ，步进电机转的过程中按其他键，步进电机停止

⑽ 关于51单片机编程错误C242和C187的问题！！这是一个DS1302和12864LCD可调式中文电子日历的程序

程序不全，无法判断，

error C242是初始化对象时的数量超过你的定义，可能是初始化数组时{}中的数量超过你数组定义的数量。