標題: 單片機矩陣鍵盤用Proteus仿真在數(shù)碼管顯示 [打印本頁]
作者: lumancui    時間: 2020-5-20 14:03
標題: 單片機矩陣鍵盤用Proteus仿真在數(shù)碼管顯示
矩陣鍵盤用Proteus仿真在數(shù)碼管顯示


單片機源程序如下:
  1. /*******************************************************************************  
  2. 文件名稱： main.c
  3. 作 者：   
  4. 版 本：    V1.00
  5. 說 明：    矩陣鍵盤掃描實驗
  6. 修改記錄：  
  7. *******************************************************************************/
  8. /*******************************************************************************   
  9. * 功能描述:                                                              *
  10. *          掃描矩陣鍵盤                                                  *
  11. *          當有鍵按下時按照按鍵的位置                                    *
  12. *          顯示當前的鍵值

  14. *接線說明：P00~P07-SA~SG，P10~P13-R1~R4，P14~P17-C1~C4，P20-C0                                               
  15. *******************************************************************************/
  16. #include <reg52.h>
  17. #include<intrins.h>

  19. #define uchar unsigned char
  20. #define uint unsigned int

  22. #define PSEG P0
  23. #define PKEY P1

  25. sbit C0  = P2^0;//位定義

  27. void delayms(uint);
  28. uchar scan(void);

  30. uchar code seg[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};
  31. /**********主函數(shù)******************************************/
  32. void main(void)
  33. {
  34.         uchar key;
  35.         C0=1;
  36.         while(1)
  37.         {
  38.                 key=scan();     //讀取鍵盤值
  39.                 if(key!=16)
  40.                 PSEG=seg[key];  //顯示
  41.         }
  42. }
  43. /***********延時函數(shù)***************************************/
  44. void delayms(uint j)
  45. {
  46. uchar i;
  47. for(;j>0;j--)
  48.           {
  49.          i=250;
  50.             while(--i);
  51.             i=249;
  52.             while(--i);
  53.            }
  54. }
  55. /***********鍵盤掃描函數(shù)***********************************/
  56. uchar scan(void)
  57. {
  58. uchar k=16,m,n,in;
  59. PKEY=0xf0;                //掃描所有行
  60. if((PKEY&0xf0)!=0xf0)
  61.         {
  62.         for(m=0;m<4;m++)
  63.                 {
  64.                  PKEY=~(0x01<<m);
  65.                  for(n=0;n<4;n++)
  66.                         {
  67.                          in=PKEY;
  68.                          in=in>>(4+n);
  69.                          if((in&0x01)==0)
  70.                                 {
  71.                                  delayms(10);
  72.                                  if((in&0x01)==0){k=n+m*4;break;}
  73.                                 }
  74.                         }
  75.                  if(k!=16){break;}
  76.                 }
  77.         }
  78. return(k);
  79. }
復制代碼

所有資料51hei提供下載:
Proteus.zip (24.5 KB, 下載次數(shù): 28)






歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1