电子密码锁设计24c01+12864,希望能帮到大家

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）：


单片机源程序如下:

1. #include<reg51.h>
   
2. #include<keyinput.h>
   
3. #include<12864.h>
   
4. #include<24C01.h>
   
5. 
   
6. #define uchar unsigned char
   
7. #define uint unsigned int
   
8. sbit LED1=P1^5;
   
9. sbit LED2=P1^6;
   
10. sbit INIT=P2^2;
    
11. sbit SOUND=P1^7;
    
12. 
    
13. uchar idata key[6]={0,0,0,0,0,0};
    
14. uchar idata iic[6]={0,1,2,3,4,5};
    
15. 
    
16. /************************ 密码校验函数 **************************/
    
17. void press(uchar *s) {
    
18.            uchar dat;
    
19.        P3=0xf0;                                                                //第一位密码
    
20.            while(P3==0xf0);
    
21.        dat=key_scan();
    
22.            if((dat!=0x0a)&&(dat!=0x0b))
    
23.          {   *s=dat;
    
24.                          Left();
    
25.                          star_12864(star,0x05,16);
    
26.              }
    
27.            s++;                  
    
28.            P3=0xf0;                                                          //第二位密码
    
29.            while(P3==0xf0);                                                 
    
30.        dat=key_scan();
    
31.            if((dat!=0x0a)&&(dat!=0x0b))
    
32.          {   *s=dat;
    
33.                          Left();
    
34.                          star_12864(star,0x05,24);
    
35.                   }
    
36.            s++;       
    
37.            P3=0xf0;                                                          //第三位密码
    
38.            while(P3==0xf0);                                                 
    
39.        dat=key_scan();
    
40.            if((dat!=0x0a)&&(dat!=0x0b))
    
41.          {   *s=dat;
    
42.                          Left();
    
43.                          star_12864(star,0x05,32);
    
44.                   }
    
45.            s++;       
    
46.            P3=0xf0;                                                          //第四位密码
    
47.            while(P3==0xf0);                                                 
    
48.            dat=key_scan();
    
49.            if((dat!=0x0a)&&(dat!=0x0b))
    
50.          {   *s=dat;
    
51.                          Left();
    
52.                          star_12864(star,0x05,40);
    
53.                   }
    
54.            s++;       
    
55.            P3=0xf0;                                                          //第五位密码
    
56.            while(P3==0xf0);                                                 
    
57.        dat=key_scan();
    
58.            if((dat!=0x0a)&&(dat!=0x0b))
    
59.          {   *s=dat;
    
60.                          Left();
    
61.                          star_12864(star,0x05,48);
    
62.                   }
    
63.            s++;       
    
64.            P3=0xf0;                                                          //第六位密码
    
65.            while(P3==0xf0);                                                 
    
66.        dat=key_scan();
    
67.            if((dat!=0x0a)&&(dat!=0x0b))
    
68.          {   *s=dat;
    
69.                          Left();
    
70.                          star_12864(star,0x05,56);
    
71.                   }
    
72.            do{P3=0xf0;                                                        //键入Enter键盘继续执行下面语句，否则等待
    
73.               while(P3==0xf0);                                                 
    
74.           dat=key_scan();
    
75.               }while(dat!=0x0b);
    
76. }
    
77. 
    
78. /****************************** 延时10ms函数 *******************************/
    
79. void Delay10ms(void) {
    
80.         uint i,j,k;
    
81.         for(i=5;i>0;i--)
    
82.         for(j=4;j>0;j--)
    
83.         for(k=248;k>0;k--);
    
84. 
    
85. }
    
86. 
    
87. /****************************** 主函数 *******************************/
    
88. void main() {
    
89.       uchar dat;
    
90.       uchar i=0,j=0,k;
    
91.       uchar x;
    
92.           LED1=1;
    
93.           LED2=1;
    
94.           SOUND=0;
    
95.           INIT=1;
    
96.       if(INIT==0){                   //密码初始化，先从IIC器件中读出密码以供下面输入密码进行比较
    
97.              x=SendB(iic,0x50,6);
    
98.                  Delay10ms();
    
99.       }              
    
100.       x=ReadB(iic,0x50,6);
     
101.       Init_12864();
     
102.           for(i=0;i<50;i++){Delay10ms();}
     
103.           do{                                  //若密码不正确，循环执行do{}while（）
     
104.              LED1=1;
     
105.              System();                  //显示：请输入密码
     
106.              press(key);
     
107.                  if((key[0]==iic[0])&&(key[1]==iic[1])&&(key[2]==iic[2])&&(key[3]==iic[3])&&(key[4]==iic[4])&&(key[5]==iic[5])) //密码比较,若密码正确责进入系统，若密码不正确则显示密码错误，重新输入密码
     
108.          {
     
109.                     true();
     
110.                     do {
     
111.                        P3=0xf0;                                                        //键入1或2继续执行下面语句，否则等待
     
112.                    while(P3==0xf0);                                                 
     
113.                dat=key_scan();
     
114.                 }while(dat!=0x01&&dat!=0x02);         
     
115.                     if(dat==1) {                                       //开锁
     
116.                         LED1=0; j=0;
     
117.                                 unlock();
     
118.                             for(i=0;i<100;i++){Delay10ms();}
     
119.                     continue;
     
120.                     }
     
121.                     if(dat==2) {                                                        //修改密码
     
122.                        do{
     
123.                               j=0;
     
124.                                           System();
     
125.                                   press(key);
     
126.                                   again();
     
127.                                   press(iic);
     
128.                                       if((key[0]==iic[0])&&(key[1]==iic[1])&&(key[2]==iic[2])&&(key[3]==iic[3])&&(key[4]==iic[4])&&(key[5]==iic[5]))
     
129.                                       {
     
130.                                           succeed();                                //修改密码成功
     
131.                                                   for(i=0;i<100;i++){Delay10ms();}
     
132.                                       Delay10ms();
     
133.                               x=SendB(iic,0x50,6);
     
134.                                       Delay10ms();       
     
135.                           x=ReadB(iic,0x50,6);break;
     
136.                                       }
     
137.                                       else         {                                            //修改密码不成功，重新修改
     
138.                                               repeat();
     
139.                                                   for(i=0;i<100;i++){Delay10ms();}
     
140.                                           }
     
141.                                  }while(1);   
     
142.                     }
     
143.                  
     
144. ……………………
     
145. 
     
146. …………限于本文篇幅 余下代码请从51黑下载附件…………
     

复制代码

所有资料51hei提供下载:
电子密码锁.zip (121.93 KB, 下载次数: 141)

2017-6-13 21:50 上传

点击文件名下载附件

因为发送过于匆忙有些引脚的定义大家自己修改一下，程序是绝对没问题的

谢谢分享，太好了正好需要

感谢楼主分享

a8818075 发表于 2017-6-14 14:09
因为发送过于匆忙有些引脚的定义大家自己修改一下，程序是绝对没问题的

朋友，是不是rs...rw...e三个要改，但是改了也不行啊，望指导，万分感谢

楼主，要设置多个密码都能够开锁，程序要怎么搞呢