找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2979|回復(fù): 3
打印 上一主題 下一主題
收起左側(cè)

單片機(jī)LED數(shù)碼管顯示數(shù)字及左移程序Proteus仿真(獨(dú)立按鍵)

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
單片機(jī)獨(dú)立按鍵控制LED數(shù)碼管顯示數(shù)字及左移
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)



單片機(jī)源程序如下:
  1. #include<reg51.h>
  2. #include<intrins.h>
  3. #define uchar unsigned char
  4. #define uint unsigned int
  5. disp_DK[]= {0xc0,0xf9,0xa4,0xb0,0x99,
  6. 0x92,0x82,0xf8,0x80,0x90,0xbf};
  7. uchar find[]={0,0,0,0};

  8. void Delay_ms(uint xms)
  9. {
  10.         uchar t;
  11.         while (xms--)
  12.         for(t=0;t<120;t++);
  13. }

  14. uchar keychuli()
  15. {
  16.         uchar key;
  17.         P1=0xff;
  18.         key=P1;
  19.         key=~key;
  20.         key=key&0xff;
  21.         return key;
  22. }

  23. uchar keyscan()
  24.         {
  25.                 uchar keys,keyzhi;
  26.                 keys= keychuli();
  27.                 if(keys!=0)
  28.                 {Delay_ms(1);
  29.                         Delay_ms(1);
  30.                         keys=keychuli();
  31.                         if(keys!=0)
  32.                         {
  33.                                 keyzhi=keys;
  34.                                 while(keys!=0)
  35.                                 {       
  36.                                         Delay_ms(1) ;
  37.                                         keys=keychuli();
  38.                                 }
  39.                         }
  40.                 }
  41.         else keyzhi=0;
  42.         return keyzhi;
  43.         }
  44.        
  45. void display()
  46. {
  47.         uchar i, k, aa=0x08;
  48.         for(i=0;i<4;i++)
  49.         {
  50.                 P2=aa;
  51.                 k=find[i];
  52.                 P0=disp_DK[k];
  53.                 aa=_cror_(aa,1) ;
  54.                 Delay_ms(1);
  55.                 P0=0xff;
  56.         }
  57. }

  58. void dischuli()
  59. {
  60.         find[3]=find[2];
  61.         find[2]=find[1];
  62.         find[1]=find[0];
  63. }

  64. void keyaa()
  65. {
  66.         find[0]=1;
  67. }
  68. void keybb()
  69. {
  70.         find[0]=2;
  71. }
  72. void keycc()
  73. {
  74.         find[0]=3;
  75. }
  76. void keydd()
  77. {
  78.         find[0]=4;
  79. }
  80. void keyee()
  81. {
  82.         find[0]=5;
  83. }
  84. void keyff()
  85. {
  86.         find[0]=6;
  87. }
  88. void keygg()
  89. {
  90.         find[0]=7;
  91. }
  92. void keyhh()
  93. {
  94.         find[0]=8;
  95. }

  96. void main(void)
  97. { uchar keys;
  98.   while(1)
  99.                 {
  100.                 display();
  101.                 keys=keyscan();
  102.                 if (keys!=0) {dischuli();}
  103.                 switch(keys)
  104.                         {case 0x00:break;
  105.                         case 0x01:keyaa();break;
  106.                         case 0x02:keybb();break;
  107.                         case 0x04:keycc();break;
  108.                         case 0x08:keydd();break;
  109.                         case 0x10:keyee();break;
  110.                         case 0x20:keyff();break;
  111.                         case 0x40:keygg();break;
  112.                         case 0x80:keyhh();break;
  113.                         default:break;
  114.                         }
  115.                 }
  116. }
復(fù)制代碼

Keil代碼與Proteus仿真下載:
LED數(shù)碼管顯示.zip (91.66 KB, 下載次數(shù): 29)

評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:1134495 發(fā)表于 2024-11-2 23:48 | 只看該作者
請問使用矩陣鍵盤的話應(yīng)該怎么改


// 矩陣鍵盤讀取按鍵鍵碼
unsigned char MatrixKey()
{
    unsigned char KeyNumber = 0;

    P1 = 0xFF;
    P1_3 = 0;
    if (P1_7 == 0) {Delay_ms(20); while (P1_7 == 0); Delay_ms(20); KeyNumber = 16;}
    if (P1_6 == 0) {Delay_ms(20); while (P1_6 == 0); Delay_ms(20); KeyNumber = 15;}
    if (P1_5 == 0) {Delay_ms(20); while (P1_5 == 0); Delay_ms(20); KeyNumber = 14;}
    if (P1_4 == 0) {Delay_ms(20); while (P1_4 == 0); Delay_ms(20); KeyNumber = 13;}

    P1 = 0xFF;
    P1_2 = 0;
    if (P1_7 == 0) {Delay_ms(20); while (P1_7 == 0); Delay_ms(20); KeyNumber = 12;}
    if (P1_6 == 0) {Delay_ms(20); while (P1_6 == 0); Delay_ms(20); KeyNumber = 11;}
    if (P1_5 == 0) {Delay_ms(20); while (P1_5 == 0); Delay_ms(20); KeyNumber = 10;}
    if (P1_4 == 0) {Delay_ms(20); while (P1_4 == 0); Delay_ms(20); KeyNumber = 9;}

    P1 = 0xFF;
    P1_1 = 0;
    if (P1_7 == 0) {Delay_ms(20); while (P1_7 == 0); Delay_ms(20); KeyNumber = 8;}
    if (P1_6 == 0) {Delay_ms(20); while (P1_6 == 0); Delay_ms(20); KeyNumber = 7;}
    if (P1_5 == 0) {Delay_ms(20); while (P1_5 == 0); Delay_ms(20); KeyNumber = 6;}
    if (P1_4 == 0) {Delay_ms(20); while (P1_4 == 0); Delay_ms(20); KeyNumber = 5;}

    P1 = 0xFF;
    P1_0 = 0;
    if (P1_7 == 0) {Delay_ms(20); while (P1_7 == 0); Delay_ms(20); KeyNumber = 4;}
    if (P1_6 == 0) {Delay_ms(20); while (P1_6 == 0); Delay_ms(20); KeyNumber = 3;}
    if (P1_5 == 0) {Delay_ms(20); while (P1_5 == 0); Delay_ms(20); KeyNumber = 2;}
    if (P1_4 == 0) {Delay_ms(20); while (P1_4 == 0); Delay_ms(20); KeyNumber = 1;}

    return KeyNumber;
}
回復(fù)

使用道具 舉報(bào)

板凳
ID:1135525 發(fā)表于 2024-11-5 10:53 來自手機(jī) | 只看該作者
終于找到關(guān)于多個(gè)數(shù)碼管動(dòng)態(tài)顯示的帖子了
回復(fù)

使用道具 舉報(bào)

地板
ID:1135525 發(fā)表于 2024-11-5 14:31 | 只看該作者
U2是什么元件
回復(fù)

使用道具 舉報(bào)

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表