矩阵式键盘实现的电子密码锁

#include<reg51.h>   //包含51单片机寄存器定义的头文件
sbit P14=P1^4;      //将P14位定义为P1.4引脚
sbit P15=P1^5;      //将P15位定义为P1.5引脚
sbit P16=P1^6;      //将P16位定义为P1.6引脚
sbit P17=P1^7;      //将P17位定义为P1.7引脚
sbit sound=P3^7;    //将sound位定义为P3.7
unsigned char keyval;    //储存按键值
/**************************************************************
函数功能：延时输出音频
**************************************************************/
 void delay(void)   
{
   unsigned char i;
    for(i=0;i<200;i++)
             ;
 }

/**************************************************************
函数功能：软件延时子程序
**************************************************************/
 void delay20ms(void)   
{
   unsigned char i,j;
    for(i=0;i<100;i++)
     for(j=0;j<60;j++)
           ;
 }
/**************************************************************
函数功能：主函数
**************************************************************/ 
 void main(void)
 {
   unsigned char D[ ]={0,8,0,8,7,4,11};      //设定密码
   EA=1;                  //开总中断
    ET0=1;                 //定时器T0中断允许         
    TMOD=0x01;            //使用定时器T0的模式1
    TH0=(65536-500)/256;  //定时器T0的高8位赋初值
    TL0=(65536-500)%256;  //定时器T0的高8位赋初值
    TR0=1;                //启动定时器T0
    keyval=0xff;          //按键值初始化
    
    while(keyval!=D[0])   //第一位密码输入不正确，等待
         ;         
    while(keyval!=D[1])   //第二位密码输入不正确，等待
         ;
    while(keyval!=D[2])   //第三位密码输入不正确，等待
         ;    
    while(keyval!=D[3])   //第四位密码输入不正确，等待
         ;
    while(keyval!=D[4])   //第五位密码输入不正确，等待
         ;
    while(keyval!=D[5])   //第六位密码输入不正确，等待
         ;   
    while(keyval!=D[6])  //没有输入“OK”，等待
       ;         
     P3=0xfe;           //P3.0引脚输出低电平，点亮LED

}
/**************************************************************
函数功能：定时器0的中断服务子程序，进行键盘扫描，判断键位
**************************************************************/ 
  void time0_interserve(void) interrupt 1 using 1    //定时器T0的中断编号为1，使用第一组寄存器
  {
     unsigned char i;
     TR0=0;                  //关闭定时器T0      
     P1=0xf0;                 //所有行线置为低电平“0”，所有列线置为高电平“1”
      if((P1&0xf0)!=0xf0)      //列线中有一位为低电平“0”，说明有键按下
         delay20ms();           //延时一段时间、软件消抖
      if((P1&0xf0)!=0xf0)      //确实有键按下
        {
           P1=0xfe;             //第一行置为低电平“0”（P1.0输出低电平“0”）
           if(P14==0)           //如果检测到接P1.4引脚的列线为低电平“0”
             keyval=1;            //可判断是S1键被按下
           if(P15==0)             //如果检测到接P1.5引脚的列线为低电平“0”
             keyval=2;            //可判断是S2键被按下
           if(P16==0)             //如果检测到接P1.6引脚的列线为低电平“0”
             keyval=3;            //可判断是S3键被按下
           if(P17==0)            //如果检测到接P1.7引脚的列线为低电平“0”
             keyval=4;           //可判断是S4键被按下

           P1=0xfd;             //第二行置为低电平“0”（P1.1输出低电平“0”）
          if(P14==0)           //如果检测到接P1.4引脚的列线为低电平“0”
             keyval=5;            //可判断是S5键被按下
           if(P15==0)             //如果检测到接P1.5引脚的列线为低电平“0”
             keyval=6;            //可判断是S6键被按下
           if(P16==0)             //如果检测到接P1.6引脚的列线为低电平“0”
             keyval=7;            //可判断是S7键被按下
           if(P17==0)            //如果检测到接P1.7引脚的列线为低电平“0”
             keyval=8;           //可判断是S8键被按下
        
           P1=0xfb;             //第三行置为低电平“0”（P1.2输出低电平“0”）
        if(P14==0)          //如果检测到接P1.4引脚的列线为低电平“0”
             keyval=9;          //可判断是S9键被按下
           if(P15==0)           //如果检测到接P1.5引脚的列线为低电平“0”
             keyval=0;         //可判断是S10键被按下
           if(P16==0)          //如果检测到接P1.6引脚的列线为低电平“0”
             keyval=11;        //可判断是S11键被按下
       if(P17==0)          //如果检测到接P1.7引脚的列线为低电平“0”
                         keyval=12;        //可判断是S12键被按下
            
                       P1=0xf7;             //第四行置为低电平“0”（P1.3输出低电平“0”）
                    if(P14==0)          //如果检测到接P1.4引脚的列线为低电平“0”
                         keyval=13;          //可判断是S13键被按下
                       if(P15==0)           //如果检测到接P1.5引脚的列线为低电平“0”
                         keyval=14;         //可判断是S14键被按下
                       if(P16==0)          //如果检测到接P1.6引脚的列线为低电平“0”
                         keyval=15;        //可判断是S15键被按下
                       if(P17==0)          //如果检测到接P1.7引脚的列线为低电平“0”
                         keyval=16;        //可判断是S16键被按下
          for(i=0;i<200;i++)  //让P3.7引脚电平不断取反输出音频
           {
              sound=0;
              delay();
                 sound=1;
                 delay();
           }
        }
     TR0=1;                    //开启定时器T0
     TH0=(65536-500)/256;  //定时器T0的高8位赋初值
      TL0=(65536-500)%256;  //定时器T0的高8位赋初值         
 }