當(dāng)前位置:首頁 > 單片機(jī) > 單片機(jī)
[導(dǎo)讀] 89c51 8位LED動態(tài)掃描時(shí)鐘程序//使用12MHz晶振,P0口輸出段碼,P2口作列掃描,用共陽LED數(shù)碼管//#include"reg51.h"codechardis_7[11]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0xff};/*共陽

89c51 8位LED動態(tài)掃描時(shí)鐘程序

//使用12MHz晶振,P0口輸出段碼,P2口作列掃描,用共陽LED數(shù)碼管
//
#include"reg51.h"
codechardis_7[11]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0xff};
/*共陽LED段碼表"0""1""2""3""4""5""6""7""8""9""不亮"*/
codecharsCAN_con[8]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//列掃描控制字
datachardisdata[6]={0x00,0x00,0x00,0x00,0x00,0x00};//計(jì)時(shí)單元數(shù)據(jù)初值,共6個(gè)
datachardis[8]={0x00,0x00,0x00,0x00,0x00,0x00,0x0a,0x00};//顯示單元數(shù)據(jù),共6個(gè)數(shù)據(jù)
datacharcon1s=0x00,con04s=0x00,con=0X00;//1秒定時(shí)用
sbitkey0=0x90;
sbitkey1=0x91;
sbitkey2=0x92;
//
/****************/
//1毫秒延時(shí)程序//
/***************/
delay1ms(intt)
{
inti,j;
for(i=0;ifor(j=0;j<120;j++)
;
}
/****************/
//鍵掃描子程序//
/****************/
keyscan()
{
EA=0;
if(key0==0)
{
delay1ms(10);
while(key0==0);
if(dis[con]==10)
{dis[7]=dis[con];dis[con]=dis[6];dis[6]=dis[7];}
con++;TR0=0;ET0=0;TR1=1;ET1=1;
if(con>=6)
{con=0;TR1=0;ET1=0;TR0=1;ET0=1;}
}
//
if(con!=0)
{
if(key1==0)
{
delay1ms(10);
while(key1==0);
disdata[con]++;
if(disdata[con]>=10)
{disdata[con]=0;}
dis[con]=disdata[con];dis[6]=0x0a;
}
}
//
if(con!=0)
{
if(key2==0)
{
delay1ms(10);
while(key2==0);
if(disdata[con]==0)
{disdata[con]=0x09;}
else{disdata[con]--;}
dis[con]=disdata[con];dis[6]=0x0a;
}
}
EA=1;
}
//
/***********/
//掃描程序//
/**********/
scan()
{
chark;
for(k=0;k<6;k++)
{
P0=dis_7[dis[k]];P2=scan_con[k];delay1ms(1);P2=0xff;
}
}
/*************/
//初始化程序//
/*************/
clearmen()
{
inti;
for(i=0;i<6;i++)
{
dis[i]=disdata[i];}
TH0=0x3C;TL0=0xB0;//;50MS定時(shí)初值(T0計(jì)時(shí)用)
TH1=0x3C;TL1=0xB0;//;50MS定時(shí)初值(T1計(jì)時(shí)用)
TMOD=0X11;ET0=1;ET1=1;TR1=0;TR0=1;EA=1;//
}
/**********/
//主程序//
/*********/
main()
{
clearmen();
while(1)
{
scan();
keyscan();
}
}
/********************/
//1秒中斷處理程序//
/*******************/
voidtime_intt0(void)interrupt1
{
ET0=0;TR0=0;TH0=0x3C;TL0=0xB0;TR0=1;
con1s++;
if(con1s==20)
{
con1s=0x00;
disdata[0]++;
if(disdata[0]>=10)
{
disdata[0]=0;disdata[1]++;
if(disdata[1]>=6)
{
disdata[1]=0;disdata[2]++;
if(disdata[2]>=10)
{
disdata[2]=0;disdata[3]++;
if(disdata[3]>=6)
{
disdata[3]=0;disdata[4]++;
if(disdata[4]>=10)
{
disdata[4]=0;disdata[5]++;
}
if(disdata[5]==2)
{
if(disdata[4]==4)
{
disdata[4]=0;disdata[5]=0;
}
}
}
}
}
}
dis[0]=disdata[0];dis[1]=disdata[1];dis[2]=disdata[2];
dis[3]=disdata[3];dis[4]=disdata[4];dis[5]=disdata[5];
}
ET0=1;
}
/********************/
//0.4秒閃爍中斷程序//
/*******************/
voidtime_intt1(void)interrupt3
{
EA=0;TR1=0;TH1=0x3C;TL1=0xB0;TR1=1;
con04s++;
if(con04s==8)
{
con04s=0x00;
dis[7]=dis[con];dis[con]=dis[6];dis[6]=dis[7];
}
EA=1;
}

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


本站聲明: 本文章由作者或相關(guān)機(jī)構(gòu)授權(quán)發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點(diǎn),本站亦不保證或承諾內(nèi)容真實(shí)性等。需要轉(zhuǎn)載請聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權(quán)益,請及時(shí)聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫?dú)角獸公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關(guān)鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉(zhuǎn)型技術(shù)解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關(guān)鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術(shù)公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認(rèn)證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時(shí)1.5...

關(guān)鍵字: 汽車 人工智能 智能驅(qū)動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務(wù)能7×24不間斷運(yùn)行,同時(shí)企業(yè)卻面臨越來越多業(yè)務(wù)中斷的風(fēng)險(xiǎn),如企業(yè)系統(tǒng)復(fù)雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務(wù)連續(xù)性,提升韌性,成...

關(guān)鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報(bào)道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關(guān)鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會開幕式在貴陽舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關(guān)鍵字: 華為 12nm EDA 半導(dǎo)體

8月28日消息,在2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會上,華為常務(wù)董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權(quán)最終是由生態(tài)的繁榮決定的。

關(guān)鍵字: 華為 12nm 手機(jī) 衛(wèi)星通信

要點(diǎn): 有效應(yīng)對環(huán)境變化,經(jīng)營業(yè)績穩(wěn)中有升 落實(shí)提質(zhì)增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務(wù)引領(lǐng)增長 以科技創(chuàng)新為引領(lǐng),提升企業(yè)核心競爭力 堅(jiān)持高質(zhì)量發(fā)展策略,塑強(qiáng)核心競爭優(yōu)勢...

關(guān)鍵字: 通信 BSP 電信運(yùn)營商 數(shù)字經(jīng)濟(jì)

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術(shù)學(xué)會聯(lián)合牽頭組建的NVI技術(shù)創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術(shù)創(chuàng)新聯(lián)...

關(guān)鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(shù)(集團(tuán))股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關(guān)鍵字: BSP 信息技術(shù)
關(guān)閉
關(guān)閉