mega8515的矩阵键盘与LED显示程序

/******************************************************************
//文件名称：Key4X4_Led
//功    能：4X4矩阵键盘控制LED小灯
//作    者：懒猫爱飞
//日    期：2010.05.25
*******************************************************************/
#include
#include

#define uchar unsigned char
#define uint  unsigned int

uint Key_num=20;

//宏定义左移，右移函数crol为左移，cror为右移
#define crol(a,n) a=(a<>(8-n))
#define cror(a,n) a=(a>>n)|(a<<(8-n))

/****************************************************************
//函数名称： delay(void)
//功    能：延时
//入口参数：无
//出口参数：无
*****************************************************************/
void delay(void)
{
 uint i;
 for(i=1;i<100;i++)
    ;
}

/****************************************************************
//函数名称：delay_1ms(void)
//功    能：延时1ms
//入口参数：无
//出口参数：无
*****************************************************************/
void delay_1ms(void)//1ms
{
 uint i;
 for(i=1;i<(uint)(8*143-2);i++)
    ;
}
/****************************************************************
//函数名称：delay_ms(uint time)
//功    能：延时time ms
//入口参数：time
//出口参数：无
*****************************************************************/
void delay_ms(uint time)//time*1ms
{
   uint i="0";
   while(i    {
   delay_1ms();
    i++;
   }
}
/****************************************************************
//函数名称：Port_init(void)
//功    能：端口初始化
//入口参数：无
//出口参数：无
*****************************************************************/
void Port_init(void)
{
 DDRA  = 0xff;   //A口输出口,控制LED
 PORTA = 0xff;
 
 DDRB  = 0x00;         //B口设为输出口,控制LED
 PORTB = 0x00;
 
 DDRC  = 0xff;   //C口
 PORTC = 0xff;
 
 DDRD  = 0xf0;   //D口低四位输入,置高电平,高四位输出,置低电平
 PORTD = 0x00;
}

/****************************************************************
//函数名称：uchar Key_scan(void)
//功    能：键盘扫描,读取键值
//入口参数：无
//出口参数：无
*****************************************************************/
uchar Key_scan(void)
{
    uchar i,j;
 DDRD = 0xf0;           //设置PD高四位为输出口，低四位为输入口
 PORTD = 0x00;         // 初始运行输出全为0
 if((PIND & 0x0f) == 0x0f) return 20;   // 判断有无按键动作，没有，返回0    
 else
 {
  delay_ms(10);                     //按键消抖
  if((PIND & 0x0f) == 0x0f) return 20;      //再次判断是否有按键动作
  else
  {
   for(i = 4;i < 8;i++)                //逐行输出0
   {
    PORTD = ~(1 << i) | 0x0f;      //第i行输出0
    for(j = 0;j < 4;j++)
    {
     if((PIND & (1 << j)) == 0)        //逐列检测
     Key_num= (i - 4) * 4 + j;      //计算键值
    }
   }
  return Key_num;       //
  }
 }
}
/****************************************************************
//函数名称：Led_display(void)
//功    能：Led显示控制
//入口参数：无
//出口参数：无
*****************************************************************/
void Led_display(void)
{
 switch(Key_num) //根据键码值选择控制情况
 {
  case 0:PORTA=0xfe;PORTC=0xff;break;
  case 1:PORTA=0xfc;PORTC=0xff;break;
  case 2:PORTA=0xf8;PORTC=0xff;break;
  case 3:PORTA=0xf0;PORTC=0xff;break;
  case 4:PORTA=0xe0;PORTC=0xff;break;
  case 5:PORTA=0xc0;PORTC=0xff;break;
  case 6:PORTA=0x80;PORTC=0xff;break;
  case 7:PORTA=0x00;PORTC=0xff;break;
  case 8:PORTA=0x00;PORTC=0xfe;break;
  case 9:PORTA=0x00;PORTC=0xfc;break;
  case 10:PORTA=0x00;PORTC=0xf8;break;
  case 11:PORTA=0x00;PORTC=0xf0;break;
  case 12:PORTA=0x00;PORTC=0xe0;break;
  case 13:PORTA=0x00;PORTC=0xc0;break;
  case 14:PORTA=0x00;PORTC=0x80;break;
  case 15:PORTA=0x00;PORTC=0x00;break;
  default: break;
 }
}
/****************************************************************
//函数名称：main(void)
//功    能：主程序
//入口参数：无
//出口参数：无
*****************************************************************/
void main(void)
{
 //#define debug1
 #ifdef debug1
  Key_code=2;//测试函数Led_display()是否可用
 #endif
 
 Port_init();
 while(1)
 {
  Key_scan();
  Led_display();
 }
}