單片機(jī)設(shè)計(jì)的電子日歷_第1頁
單片機(jī)設(shè)計(jì)的電子日歷_第2頁
單片機(jī)設(shè)計(jì)的電子日歷_第3頁
單片機(jī)設(shè)計(jì)的電子日歷_第4頁
免費(fèi)預(yù)覽已結(jié)束,剩余4頁可下載查看

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡介

1、電子日歷程序#include<reg51.h>#define uchar unsigned char#define uint unsigned int#define shuju P0sbit rs=P20;sbit rw=P21;sbit en=P22;sbit stop=P30;/暫停sbit jia=P31;/ 加計(jì)數(shù)sbit jian=P32;/減計(jì)數(shù)繼續(xù)uchar ci,num,shi,fen,miao,num20,nian=13,yue=12,ri=2,week,t;uchar code table1="2013-12-02Mon"uchar code

2、 table2="00:00:00"uchar code xingqi="MonTusWedThuFriSatSun"void delay(uint z);void xieins(uchar ins);void xieda(uchar da);void chushi();void display(uchar add,uchar dat);void keyscan();void xieweek();void main()chushi();while(1)keyscan();void delay(uint z)/延時(shí) 1msuint x,y;for(x=z;

3、x>0;x-)for(y=115;y>0;y-);void xieins(uchar ins)/ 寫指令rs=0;rw=0;shuju=ins;en=0;delay(5);en=1;delay(5);en=0;void xieda(uchar da)/ 寫數(shù)據(jù)rs=1;rw=0;shuju=da;en=0;delay(5);en=1;delay(5);en=0;void chushi()xieins(0x38);/功能設(shè)置8 位數(shù)據(jù)接口雙行顯示xieins(0x0c);/顯示設(shè)置開啟顯示屏關(guān)閉光標(biāo)光標(biāo)不閃爍xieins(0x06);/輸入模式設(shè)置光標(biāo)右移一格且地址數(shù)加1xieins

4、(0x01);/清屏TMOD=0x01;TH0=(65536-50000)/256;TL0=(65536-50000)%256;EA=1;ET0=1;TR0=1;/開定時(shí)器0xieins(0x80);for(num=0;num<16;num+)xieda(table1num);/ 顯示第一行delay(5);xieins(0xc4);for(num=0;num<8;num+)xieda(table2num);/顯示第二行delay(5);void display(uchar add,uchar dat)/ 地址數(shù)據(jù)uchar shi,ge;shi=dat/10;ge=dat%10;

5、xieins(add);delay(5);xieda(shi+0x30);delay(5);xieda(ge+0x30);delay(5);void timer0() interrupt 1num20+;TH0=(65536-50000)/256;TL0=(65536-50000)%256;if(num20=20)num20=0;miao+;if(miao=60)miao=0;fen+;if(fen=60)fen=0;shi+;if(shi=24)shi=0;ri+;xieweek();/week+;if(ri=31)/ 可定意義變量ri=1;yue+;if(yue=13)yue=1;nian

6、+;display(0x82,nian);display(0x85,yue);display(0x88,ri);display(0xc4,shi);display(0xc7,fen);display(0xca,miao);void keyscan()if(stop=0)delay(10);if(stop=0)while(!stop);TR0=0;ci+;xieins(0x0f);/ 顯示光標(biāo)光標(biāo)閃爍if(ci=1)xieins(0xcb);if(ci=2)xieins(0xc8);if(ci=3)xieins(0xc5);if(ci=4)xieins(0x8d);if(ci=5)xieins(

7、0x89);if(ci=6)xieins(0x86);if(ci=7)xieins(0x83);if(ci=8)ci=0;xieins(0x0c);TR0=1;if(jia=0)delay(10);if(jia=0)while(!jia);if(ci=1)miao+;if(miao=60)miao=0;display(0xca,miao);xieins(0xcb);if(ci=2)fen+;if(fen=60)fen=0;display(0xc7,fen);xieins(0xc8);if(ci=3)shi+;if(shi=24)shi=0;display(0xc4,shi);xieins(0x

8、c5);if(ci=4)week+;if(week=7)week=0;xieweek();/display(0x8d,week);xieins(0x8f);if(ci=5)ri+;if(ri=31)ri=1;display(0x88,ri);xieins(0x89);if(ci=6)yue+;if(yue=13)yue=1;display(0x85,yue);xieins(0x86);if(ci=7)nian+;display(0x82,nian);xieins(0x83);if(jian=0)delay(10);if(jian=0)while(!jian);if(ci=1)if(miao=0

9、)miao=60;miao-;display(0xca,miao);xieins(0xcb);if(ci=2)if(fen=0)fen=60;fen-;display(0xc7,fen);xieins(0xc8);if(ci=3)if(shi=0)shi=24;shi-;display(0xc4,shi);xieins(0xc5);if(ci=4)if(week=0)week=7;week-;xieweek();/display(0x8d,week);xieins(0x8f);if(ci=5)if(ri=1)ri=31;ri-;display(0x88,ri);xieins(0x89);if(ci=6)if(yue=1)yue=13;yue-;display(0x85,yue);xieins(0x86);if(ci=7)

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

最新文檔

評論

0/150

提交評論