/*******************************************************************/
/*                                                                 */
/* ME500單片機開發系統演示程序 - 矩陣鍵盤鍵值顯示                  */
/*                                                                 */
/* 一位數碼管顯示                                                  */
/*                                                                 */
/* 版本： V1.0 (2006/11/20)                                        */
/* 作者： gguoqing (Email: gguoqing@willar.com)                    */
/* 網站： www.willar.com(偉納電子)   www.mcusj.com(偉納單片機世界) */
/* 郵箱： support@willar.com                                       */
/*                                                                 */                                                                  
/*【版權】Copyright(C)偉納電子 www.willar.com  All Rights Reserved */
/*【聲明】此程序僅用于學習與參考，引用請注明版權和作者信息！       */
/*                                                                 */
/*******************************************************************/

#include <reg51.h>
#include <intrins.h>
	                
#define uchar unsigned char
#define uint  unsigned int

uchar table[17]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82, //0,1,2,3,4,5,6
  0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e,0xBF};//7,8,9,A,B,C,D,E,F,-

sbit BEEP = P3^7;         //蜂鳴器驅動線
uchar dis_buf;            //顯示緩存
uchar  temp;
uchar  key;               //鍵順序嗎

void beep();              //蜂鳴器
void delay0(uchar x);      //x*0.14MS
//--------------------------------------------------
/* 延時子程序*/

void  delay(uchar x)
{ uchar j;
    while((x--)!=0)
    { for(j=0;j<125;j++)
         {;}
    }
}
//--------------------------------------------------
 /*鍵掃描子程序*/
 void  keyscan(void)
 { 
    P1=0x0F;         //低四位輸入  
    delay(1);
	temp=P1;         //讀P1口 
    temp=temp&0x0F;
    temp=~(temp|0xF0);
    if(temp==1)
        key=0;
    else if(temp==2)
        key=1;
    else if(temp==4)
        key=2;
    else if(temp==8)
        key=3;
    else
        key=16;
        
    P1=0xF0;        //高四位輸入
    delay(1);
	temp=P1;          //讀P1口       
    temp=temp&0xF0;
    temp=~((temp>>4)|0xF0);
    if(temp==1)
        key=key+0;
    else if(temp==2)
        key=key+4;
    else if(temp==4)
        key=key+8;
    else if(temp==8)
        key=key+12;
    else
        key=16;
    	
     dis_buf=table[key];	//查表得鍵值
 }
//--------------------------------------------------
/*判斷鍵是否按下*/
 void  keydown(void)
 {  
  	P1=0xF0;
	if(P1!=0xF0)
	{
	  keyscan();
	  beep();
      while(P1!=0xF0);  //等待鍵釋放
	}
 } 
//--------------------------------------------------

void beep()
{
  unsigned char i;
  for (i=0;i<180;i++)
   {
   delay0(6);
   BEEP=!BEEP;       //BEEP取反
   } 
   BEEP=1;           //關閉蜂鳴器
   delay(250);       //延時     
}
//--------------------------------------------------
void delay0(uchar x)    //x*0.14MS
{
 unsigned char i;
  while(x--)
 {
  for (i = 0; i<13; i++) {}
 }
}
//-------------------------------------------------- 
    main()
 {
    P0=0xFF;           //置P0口
    P2=0xFF;           //置P2口  
    dis_buf=0xBF;
    
    while(1)
    { 
       keydown();
	   P0 = dis_buf;   //鍵值送顯示
       delay(2);
       P2 = 0x7F;
    }
  }   
//--------------------------------------------------