单片机实现万年历程序Word下载.docx

单片机实现万年历程序Word下载.docx

《单片机实现万年历程序Word下载.docx》由会员分享，可在线阅读，更多相关《单片机实现万年历程序Word下载.docx（16页珍藏版）》请在冰豆网上搜索。

//液晶的命令和数据控制口

sbitledrw=P2^6;

//液晶的写数据口

sbitlcden=P2^7;

//液晶显示模块的使能端

sbittimeds=P3^3;

//时钟芯片地址闸

sbittimerw=P3^4;

//时钟芯片读写

sbittimeas=P3^5;

sbittimeen=P3^6;

//时钟芯片片选

ucharcodetable[]="

20 

- 

week"

;

ucharcodetable1[]="

:

:

"

//要显示的字符串

charnum,shi,fen,miao,nian=2000,yue,ri,week,numfun,anumfun,flag,flag1;

ucharleap;

voiddelay（uintx）{

uchari,j;

for（i=x;

i>

0;

i--）

for（j=110;

j>

j--）;

}

voiddidi（）

{

beep=0;

delay（1000）;

beep=1;

voidwrite_com（ucharcom）{

lcdrs=0;

P0=com;

delay（5）;

lcden=1;

delay（20）;

lcden=0;

voidwrite_date（uchardate）{

lcdrs=1;

P0=date;

voidwrite_sfm（ucharadd,uchardate）{

ucharshi,ge;

shi=date/10;

ge=date%10;

write_com（0x80+0x40+add）;

write_date（0x30+shi）;

write_date（0x30+ge）;

voidwrite_nyr（ucharadd,uchardate）{

write_com（0x80+add）;

voidwrite_zhou（ucharadd,uchardate）

write_date（0x30+date）;

voidwrite_ds（ucharadd,uchardate）{

timeen=0;

timeas=1;

timeds=1;

timerw=1;

P1=add;

timeas=0;

timerw=0;

P1=date;

timeen=1;

ucharread_ds（ucharadd）{

uchards_date;

timeds=0;

P1=0xff;

ds_date=P1;

returnds_date;

voidkeyscan（）{

if（flag1==1）//用来关闭闹钟铃声

if（timeadd==0）

delay（5）;

if（timeadd==0）

{

while（!

timeadd==0）;

flag1=0;

}

if（timesub==0）

if（timesub==0）

timesub==0）;

if（timefun==0）

timefun）;

flag=1;

numfun++;

if（numfun==1）

write_com（0x80+0x40+0x0a）;

write_com（0x0f）;

if（numfun==2）

write_com（0x80+0x40+0x07）;

if（numfun==3）

write_com（0x80+0x40+0x04）;

if（numfun==4）

write_com（0x80+0x0f）;

if（numfun==5）

write_com（0x80+0x09）;

if（numfun==6）

write_com（0x80+0x06）;

if（numfun==7）

write_com（0x80+0x03）;

if（numfun==8）

numfun=0;

flag=0;

if（numfun!

=0）

timeadd）;

miao++;

if（miao==60）

miao=0;

write_sfm（9,miao）;

write_com（0x80+0x40+9）;

write_ds（0,miao）;

fen++;

if（fen==60）

fen=0;

write_sfm（6,fen）;

write_com（0x80+0x40+6）;

write_ds（2,fen）;

shi++;

if（shi==24）

shi=0;

write_sfm（3,shi）;

write_com（0x80+0x40+3）;

write_ds（4,shi）;

week++;

if（week==8）

week=1;

write_zhou（0x0f,week）;

write_ds（6,week）;

if（nian==0）

switch（yue）{

case1:

ri++;

if（ri==32）ri=1;

break;

case2:

if（ri==30）ri=1;

case3:

case4:

if（ri==31）ri=1;

case5:

case6:

case7:

case8:

case9:

case10:

case11:

case12:

elseif（leap&

&

yue==2）

if（ri==30）

ri=1;

elseif（yue==2&

leap==0）

if（ri==29）

else

switch（yue）{

case1:

case3:

case4:

case5:

case6:

case7:

case8:

case9:

case10:

case11:

case12:

write_nyr（8,ri）;

write_com（0x80+0x08）;

write_ds（7,ri）;

yue++;

if（yue==13）

yue=0;

write_nyr（5,yue）;

write_com（0x80+0x05）;

write_ds（8,yue）;

nian++;

if（nian==100）

nian=0;

leap=nian%4==0&

nian%100!

=0;

write_nyr（2,nian）;

write_com（0x80+2）;

write_ds（9,nian）;

timesub）;

miao--;

if（miao==-1）

miao=59;

fen--;

if（fen==-1）

fen=59;

write_ds（2,fen）;

shi--;

if（shi==-1）

shi=23;

week--;

if（week==0）

week=7;