//本程序用于pic單片機(jī)外接鍵盤的識(shí)別，通過(guò)編程，使按下K1鍵時(shí)第一個(gè)數(shù)碼管顯示1，按下K2鍵時(shí)第一
//個(gè)數(shù)碼管上顯示2，按下K3鍵時(shí)第一個(gè)數(shù)碼管上顯示3，按下K4鍵時(shí)第一個(gè)數(shù)碼管上顯示4，
//對(duì)鍵盤的掃描采用查詢方式。

#include "p18f458.h"

static volatile int table[20]={0xc0，0xf9，0xa4，0xb0，0x99，0x92，0x82，0XD8，0x80，0x90，0x88，0x83，0xc6，0xa1，0x86，0x8e，0x7f，0xbf，0x89，0xff};
volatile unsigned char data;
unsigned int i;
unsigned char j=0;

/*初始化子程序*/
void initial()
{
 TRISA=0x00;     /*A口設(shè)置為輸出*/
 TRISB=0XF0;     /*RB1輸出，RB4輸入*/
 TRISC=0x00;     /*SDO引腳為輸出，SCK引腳為輸出*/
 TRISE=0x00;     /*E口設(shè)置為輸出*/
 INTCON=0x00;    /*關(guān)閉所有中斷*/
 SSPCON1=0x30;    /*SSPEN=1;CKP=1，F(xiàn)OSC/4*/
 SSPSTAT=0xC0;    /*時(shí)鐘下降沿發(fā)送數(shù)據(jù)*/
 PIR1=0;      /*清除SSPIF標(biāo)志*/ 
}

/*軟件延時(shí)子程序*/
void DELAY()
{
 for(i = 6553; --i ;)
 continue;
}

/*鍵盤掃描子程序*/
int  KEYSCAN()
{ 
 PORTBbits.RB1=0;
 PORTAbits.RA3=0;
 PORTE=0;     /*將K1，K2，K3，K4四條列線置0*/
 while(1)
 {
  if (PORTBbits.RB4==0)
  break;
 }       /*等待有鍵按下，RB4為0表示有鍵按下*/
 DELAY();     /*軟件延時(shí)*/
 if (PORTBbits.RB4==0)
  KEYSERVE();    /*如果仍有鍵按下，則調(diào)用鍵服務(wù)子程序*/
 else j=0x00;     /*如果為干擾，則令返回值為0*/
 return(j);
}
 
/*鍵服務(wù)子程序*/
int  KEYSERVE()
{
 PORTBbits.RB1=0;    /*K1，K2置低電平，K3，K4置高電平*/
 PORTAbits.RA3=0;    /*RB4為0，表示按鍵為K1，K2中的一個(gè)*/
 PORTE=3;     /*RB4為1，表示按鍵為K3，K4中的一個(gè)*/
 if(PORTBbits.RB4==0)
 {
  PORTBbits.RB1=0;   /*K1置低電平，K2置高電平*/
  PORTAbits.RA3=1;   /*RB4為0，表示按鍵為K1;RB4為1，表示按鍵為K2*/
  if(PORTBbits.RB4==0) j=0X01;
  else {j=0X02; PORTAbits.RA3=0;}
 }
 else
 {
  PORTEbits.RE0=0;   /*K3置低電平，K4置高電平*/
  PORTEbits.RE1=1;   /*RB4為0，表示按鍵為K3;RB4為1，表示按鍵為K4*/
  if(PORTBbits.RB4==0) j=0X03;
  else {j=0X04; PORTEbits.RE1=0;}  
 }
 while(1)
 {
  if(PORTBbits.RB4==1) break; /*為了防止一次按鍵多次識(shí)別，等鍵松開(kāi)才返回*/
 }
 return(j);
}

/*顯示子程序*/
void SPILED(char data)
{
 PORTAbits.RA5=0;    /*LACK送低電平，為鎖存做準(zhǔn)備*/
 SSPBUF=data;     /*啟動(dòng)發(fā)送*/
 do
 {
 ;
 }while(PIR1bits.SSPIF==0);  /*等待發(fā)送完畢*/
 PIR1bits.SSPIF=0;    /*清除SSPIF標(biāo)志*/
 PORTAbits.RA5=1;    /*最后給鎖存信號(hào)，代表顯示任務(wù)完成*/
}

/*鍵盤掃描查詢方式輸入主程序*/
main()
{
 initial();      /*系統(tǒng)初始化*/  
 while(1)
 {
  KEYSCAN();
  if(j!=0)     /*如果j=0，證明先前的按鍵為干擾，則不予顯示*/
  {
   data=table[j];
   SPILED(data);   /*發(fā)送顯示段碼顯示*/
  }
   }
}