




版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
基于stc89c51單片機(jī)的簡易萬年歷//基于stc89c51單片機(jī)的簡易萬年歷設(shè)計//zzuli-wuzhipeng#include<reg52.h>#defineucharunsignedchar#defineuintunsignedintucharshi=0,fen=0,miao=0,ri=7,yue=1,Z=1,Y=1,i,K1num;uintnian=2015;ucharcount_10ms,K1num;sbitrs=P2^0;sbitrw=P2^1;sbitlcden=P2^2;sbitK1=P3^0;sbitK2=P3^1;sbitK3=P3^2;sbitBEEP=P3^7;voiddelay(uintx)//簡單延時程序{ uinta,b; for(a=x;a>0;a--) for(b=10;b>0;b--);}bi(uintt)//控制響鈴時間程序{intc,n;for(c=0;c<t;c++){for(n=0;n<50;n++);BEEP=~BEEP;}return(t);}voidwrite_com(ucharcom)// 1602液晶寫指令{ P0=com; rs=0; rw=0; lcden=0; delay(10); lcden=1; delay(10); lcden=0; }voidwrite_date(uchardate)//1602液晶寫數(shù)據(jù){ P0=date; rs=1; rw=0; write_com(0x06); write_com(0x01); }voidtimer1_init()//定時器初始化{TMOD=0x01;TH0=0x4c;TL0=0x00;EA=1;ET0=1;TR0=1;}voidtimer0()interrupt1using0// 中斷程序{TH0=0x4c;TL0=0x00;count_10ms++;if(count_10ms==20){count_10ms=0; miao++; if(miao==60) { miao=0; fen++; if(fen==60) { fen=0; shi++; if(shi==24) { shi=0; if(yue==1||yue==3||yue==5||yue==7||yue==8||yue==10||yue==12) {ri++;if(ri==32){ri=1;yue++;if(yue==13){nian++;yue=1;}}} elseif(yue==4||yue==6||yue==9||yue==11) {ri++;if(ri==31){ri=1;yue++;if(yue==13){nian++;yue=1;}}} elseif(yue==2) { if((!(nian%4)&&(nian%100))||!(nian%400)) {ri++;if(ri==30){ri=1;yue++;if(yue==13){nian++;yue=1;}}} else {ri++;if(ri==29){ri=1;yue++;if(yue==13){nian++;yue=1;}}}} } } }}}voidkeycan()//鍵盤處理程序{if(K1==0)//功能選擇鍵{K1num++;delay(1); if(K1==0) { while(!K1); bi(200);if(K1num==1){TR0=0;write_com(0x80+0);write_com(0x0f);} if(K1num==2){write_com(0x80+3);write_com(0x0f);} if(K1num==3){write_com(0x80+6);write_com(0x0f);} if(K1num==4){write_com(0x80+11);write_com(0x0f);} if(K1num==5){write_com(0x80+14);write_com(0x0f);} if(K1num==6){write_com(0xc0+3);write_com(0x0f);} if(K1num==7){write_com(0xc0+6);write_com(0x0f);} if(K1num==8){write_com(0xc0+9);write_com(0x0f);} if(K1num==9){K1num=0;write_com(0x0c);TR0=1;} }}if(K1num!=0) //功能加 { if(K2==0) { delay(1); if(K2==0) { while(!K2); bi(200);if(K1num==1){shi++;if(shi==24)shi=0;shijian(shi,0x80+0);write_com(0x80);} if(K1num==2){fen++;if(fen==60)fen=0;shijian(fen,0x80+3);write_com(0x80+3);} if(K1num==3){miao++;if(miao==60)miao=0;shijian(miao,0x80+6);write_com(0x80+60);} if(K1num==4){Z++;if(Z==24)Z=0;shijian(Z,0x80+11);write_com(0x80+11);} if(K1num==5){Y++;if(Y==60)Y=0;shijian(Y,0x80+14);write_com(0x80+14);} if(K1num==6){nian++;if(nian==2999)nian=2015;shijian(nian,0xc0+0);write_com(0xc0+0);} if(K1num==7){yue++;if(yue==13)yue=1;shijian(yue,0xc0+5);write_com(0xc0+5);} if(K1num==8){ri++; if(yue==1||yue==3||yue==5||yue==7||yue==8||yue==10||yue==12) {if(ri==32){ri=1;}} elseif(yue==4||yue==6||yue==9||yue==11) {if(ri==31){ri=1;}} elseif(yue==2) { if((!(nian%4)&&(nian%100))||!(nian%400)) {if(ri==30){ri=1;}} else {if(ri==29){ri=1;}} } shijian(ri,0xc0+8);write_com(0xc0+8); } } } } if(K1num!=0) //功能減 { if(K3==0) { delay(1); if(K3==0) { while(!K3); bi(200);if(K1num==1){shi--;if(shi==-1)shi=23;shijian(shi,0x80+0);write_com(0x80);} if(K1num==2){fen--;if(fen==-1)fen=59;shijian(fen,0x80+3);write_com(0x80+3);} if(K1num==3){miao--;if(miao==-1)miao=59;shijian(miao,0x80+6);write_com(0x80+6);} if(K1num==4){Z--;if(Z==-1)Z=23;shijian(Z,0x80+11);write_com(0x80+11);} if(K1num==5){Y--;if(Y==-1)Y=59;shijian(Y,0x80+14);write_com(0x80+14);} if(K1num==6){nian--;if(nian==1000)nian=2015;shijian(nian,0xc0+0);write_com(0xc0+0);} if(K1num==7){yue--;if(yue==0)yue=12;shijian(yue,0xc0+5);write_com(0xc0+5);} if(K1num==8){ri--; if(yue==1||yue==3||yue==5||yue==7||yue==8||yue==10||yue==12) {if(ri==0){ri=31;}} elseif(yue==4||yue==6||yue==9||yue==11) {if(ri==0){ri=30;}} elseif(yue==2) { if((!(nian%4)&&(nian%100))||!(nian%400)) {if(ri==0){ri=29;}}
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 湖南省常德市澧縣2024-2025學(xué)年七年級上學(xué)期期末生物學(xué)試題(含答案)
- 新時代農(nóng)業(yè)現(xiàn)代化智能種植技術(shù)的創(chuàng)新與發(fā)展戰(zhàn)略
- 新材料研發(fā)及產(chǎn)業(yè)化應(yīng)用合作協(xié)議
- 云計算服務(wù)與安全策略解析
- 《先秦諸子哲學(xué)思想比較:大三哲學(xué)文化課教案》
- 養(yǎng)殖業(yè)合作飼養(yǎng)及利潤分配協(xié)議
- 電力工程設(shè)計與安裝施工合同
- 智能基金投資管理及銷售協(xié)議
- 烏江自刎的英雄故事征文
- 中小學(xué)生科普讀物讀后感
- 初中語文“經(jīng)典誦讀與海量閱讀”校本課程實施方案
- 2025 春夏·淘寶天貓運(yùn)動戶外行業(yè)趨勢白皮書
- 西門子S7-1200 PLC應(yīng)用技術(shù)項目教程(第3版) 課件 1.認(rèn)識S7-1200PLC寬屏-(LAD+SCL)
- 《稅法》(第六版)全書教案電子講義
- 翻斗車司機(jī)安全培訓(xùn)
- 計算機(jī)軟件配置管理計劃規(guī)范
- 《勞動保障監(jiān)察條例》課件
- 中華人民共和國學(xué)前教育法
- 辯論英文課件教學(xué)課件
- 2021年廣東省公務(wù)員錄用考試《行測》題(鄉(xiāng)鎮(zhèn)卷)【原卷版】
- 2020年全國中學(xué)生生物學(xué)競賽聯(lián)賽試題真題(含答案解析)
評論
0/150
提交評論