當前位置:首頁 > 技術(shù)學(xué)院 > 熱搜器件
[導(dǎo)讀]LCD1602顯示簡單時鐘程序

#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int
uchar code  table[]=" 2009/04/29 THU";
uchar code table1[]="TIME:00-00-00";
sbit lcd_rs=P3^0;
sbit lcd_rw=P3^1;
sbit lcd_en=P3^2;
sbit k1=P1^0;
sbit k2=P1^1;
sbit k3=P1^2;
sbit k4=P1^3;
uchar count,k1num;
char shi,fen,miao;
void delay(uchar z)
{
 uint x,y;
 for(x=z;x>0;x--)
 for(y=110;y>0;y--);
}
void write_com(uchar com)
{
 lcd_rs=0;
 lcd_en=0;
 lcd_rw=0;
 P0=com;
 delay(5);
 lcd_en=1;
 delay(5);
 lcd_en=0;
}
void write_data(uchar date)
{
 lcd_rs=1;
 lcd_en=0;
 lcd_rw=0;
 P0=date;
 delay(5);
 lcd_en=1;
 delay(5);
 lcd_en=0;
}
void write_fsm(uchar add,uchar date)
{
 uchar shi,ge;
 shi=date/10;
 ge=date%10;
 write_com(0x80+0x40+add);
 write_data(0x30+shi);
 write_data(0x30+ge);
}
void jiaxian()
{
  if(k1num!=0)
   {
   if(k2==0)
   {
    delay(5);
    if(k2==0)
    {
     while(!k2);
     if(k1num==1)
     {
      miao++;
      if(miao==60)
   
       miao=0;
       write_fsm(11,miao);
       write_com(0x80+0x40+11);
    
     }
           if(k1num==2)
     {
      fen++;
      if(fen==60)
       fen=0;
       write_fsm(8,fen);
       write_com(0x80+0x40+8);
           }
        if(k1num==3)
        {
        shi++;
      if(shi==24)
       shi=0;
       write_fsm(5,shi);
       write_com(0x80+0x40+5);
  
     }
   }
  }
 }
}
void jianxian()
{
 if(k1num!=0)
 {
  if(k3==0)
  delay(5);
  if(k3==0)
  {
   while(!k3);
   if(k1num==1)
   {
    miao--;
    if(miao==-1)
     miao=59;
     write_fsm(11,miao);
     write_com(0x80+0x40+11);
   }
   if(k1num==2)
   {
    fen--;
    if(fen==-1)
     fen=59;
     write_fsm(8,fen);
     write_com(0x80+0x40+8);
   }
   if(k1num==3)
   {
    shi--;
    if(shi==-1)
     shi=23;
     write_fsm(5,shi);
     write_com(0x80+0x40+5);
   }
  }
 }
}
void kbscan()
{
 if(k1==0)
 {
  delay(5);
  if(k1==0)
  {
   while(!k1);
   k1num++;
   TR0=0;
   if(k1num==1)
   {
    write_com(0x80+0x40+11);
    write_com(0x0f); 
   }
   if(k1num==2)
   {
    write_com(0x80+0x40+8);
   }
   if(k1num==3)
   {
    write_com(0x80+0x40+5);
   }
   if(k1num==4)
   {
    k1num=0;
    write_com(0x0c);
    TR0=1;
   }
  }
 }
  jiaxian();
  jianxian();
  
}

void init()
{
 uchar num;
 lcd_rw=0;
 lcd_en=0;
 shi=0;
 fen=0;
 miao=0;
 write_com(0x38);
 write_com(0x0c);
 write_com(0x06);
 write_com(0x01);
 write_com(0x80);
 for(num=0;num<15;num++)
 {
  write_data(table[num]);
  delay(5);
 }
 write_com(0x80+0x40);
 for(num=0;num<13;num++)
 {
  write_data(table1[num]);
  delay(5);
 }
 TMOD=0x01;
 TH0=(65536-50000)/256;
 TL0=(65536-50000)%256;
 EA=1;
 ET0=1;
 TR0=1;
}
void main()
{
 init();
 while(1)
 {
  kbscan();
  if(count==18)
 {
  count=0;
  miao++;
  if(miao==60)
  {
   miao=0;
   fen++;
   if(fen==60)
   {
    fen=0;
    shi++;
    if(shi==24)
    {
     shi=0;
    }
    write_fsm(5,shi);
   }
   write_fsm(8,fen);
  }
  write_fsm(11,miao);
 }
 
 }
}
void time0() interrupt 1
{
 TH0=(65536-50000)/256;
 TL0=(65536-50000)%256;
 count++;
 
}

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

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫毥谦F公司,隨著阿維塔和賽力斯的入局,華為引望愈發(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)意到認證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

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

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

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

8月30日消息,據(jù)媒體報道,騰訊和網(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 手機 衛(wèi)星通信

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

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

北京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ù)(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

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