找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 36792|回复: 64
收起左侧

51单片机电子密码锁Proteus仿真+程序+原理图

  [复制链接]
ID:100983 发表于 2015-12-29 09:33 | 显示全部楼层 |阅读模式
51单片机电子密码锁 仿真和程序源代码都有电路原理图可以下载附件打开仿真文件即可看到
0.png 1.png

51单片机源程序:
  1. //-----------------------------------------------------------------
  2. //原始程序中相邻两位密码不能相同.
  3. //本压缩包中的HEX由修改后的新程序编译生成,允许输入任意密码.
  4. //-----------------------------------------------------------------
  5. //实训100例中本例内的main函数可用以下代码替换.
  6. //改动的主要是main函数中while循环内的代码.
  7. //-----------------------------------------------------------------
  8. // 主程序
  9. //-----------------------------------------------------------------
  10. void main()
  11. {
  12.    uchar i = 0;
  13.    uchar IIC_Password[10];
  14.    uchar IS_Valid_User = 0;
  15.    P0 = 0xFF;     
  16.    P1 = 0xFF;
  17.    P2 = 0xFF;  

  18.    TMOD = 0x02;                     //T0设置为8位自动重装模式
  19.    TH0 = 175;                  
  20.    TL0 = 175;
  21.    TR0 = 1;                         //启动T0

  22.    DelayMS(10);               
  23.    LCD_Init();                      //初始化LCD  
  24.    
  25.    IIC_24C04_Init();                //初始化24C04  
  26.    
  27.    Display_String(Title_Text,0x00); //在第1行显示标题
  28.    
  29.    //24C04的内容已由初始化BIN文件导入
  30.    //将24C04中预先写入的密码读入pass
  31.    RecString(0xa0, 0 , IIC_Password, 6);   
  32.    IIC_Password[6] = '\0';

  33.    while(1)
  34.    {
  35.       P1 = 0xF0;
  36.       if(P1 != 0xF0) KeyNo = Keys_Scan();  //扫描键盘获取键序号KeyNo

  37.       switch ( KeyNo )
  38.       {
  39.            case 0:  case 1: case 2: case 3: case 4:
  40.            case 5:  case 6: case 7: case 8: case 9:
  41.                         
  42.                    if ( i<= 5 )             //密码限制在6位以内
  43.                    {
  44.                         //如果i为0则执行一次清屏
  45.                         if (i ==0) Display_String("                ",0x40);
  46.                     
  47.                         UserPassword[i] = KeyNo + '0';
  48.                         UserPassword[i+1] = '\0';
  49.               
  50.                         DSY_BUFFER[i] = '*';
  51.                         DSY_BUFFER[i+1] = '\0';
  52.                     
  53.                         Display_String(DSY_BUFFER,0x40);
  54.                      
  55.                         i++;
  56.                     }
  57.                     break;
  58.                
  59.            case 10: //按A键开锁
  60.                     if (strcmp(UserPassword,IIC_Password) == 0)
  61.                     {
  62.                        LED_OPEN = 0;  //点亮LED
  63.                        Clear_Password();
  64.                        Display_String("Unlock OK!      ",0x40);
  65.                        IS_Valid_User = 1;
  66.                     }
  67.                     else
  68.                     {
  69.                        LED_OPEN =1;   //关闭LED
  70.                        Clear_Password();
  71.                        Display_String("ERROR !         ",0x40);
  72.                        IS_Valid_User = 0;
  73.                     }
  74.                     i = 0;
  75.                     break;
  76.                     
  77.            case 11: //按B键上锁
  78.                     LED_OPEN =1;   
  79.                     Clear_Password();
  80.                     Display_String(Title_Text,0x00);
  81.                     Display_String("                ",0x40);
  82.                     i = 0;                        
  83.                     IS_Valid_User = 0;               
  84.                     break;
  85.                                    
  86.            case 12: //按C键设置新密码
  87.                     //如果是合法用户则提示输入新密码
  88.                     if ( !IS_Valid_User ) Display_String("No rights !",0x40);
  89.                     else
  90.                     {
  91.                        i = 0;
  92.                        Display_String("New Password:   ",0x00);
  93.                        Display_String("                ",0x40);
  94.                      }
  95.            
  96.                     break;                        
  97.                     
  98.            case 13: //按D键保存新密码
  99.                     if ( !IS_Valid_User ) Display_String("No rights !",0x40);
  100.                     else
  101.                     {
  102.                        SendString(0xa0, 0 , UserPassword, 6);
  103.                        
  104.                        //重新读入刚写的密码
  105.                        RecString(0xa0, 0 , IIC_Password, 6);   
  106.                        IIC_Password[6] = '\0';                           
  107.                        
  108.                        i = 0;
  109.                        Display_String(Title_Text,0x00);
  110.                        Display_String("Password Saved! ",0x40);
  111.                      }               
  112.                     
  113.                     break;                        
  114.       
  115.            case 14: //按E键消除所有输入
  116.                     i = 0;
  117.                     Clear_Password();
  118.                     Display_String("                ",0x40);            
  119.        }

  120.        Beep();         
  121.        DelayMS(100);
  122.        P1= 0xF0;
  123.        while (P1 != 0xF0);    //如果有键未释放则等待
  124.        while (P1 == 0xF0);    //如果没有再次按下按键则等待
  125.    }
  126. }
复制代码


34 用24C04与1602LCD设计电子密码锁.rar

23.71 KB, 下载次数: 1032

评分

参与人数 3黑币 +61 收起 理由
千葉北辰 + 6 很给力!
waitc + 5 赞一个!
admin + 50 共享资料的积分奖励!

查看全部评分

回复

使用道具 举报

ID:99972 发表于 2016-1-8 15:50 | 显示全部楼层
不错哦 谢谢楼主的分享
回复

使用道具 举报

ID:105654 发表于 2016-2-21 11:27 | 显示全部楼层
修改密码后,显示密码是错误的
回复

使用道具 举报

ID:114304 发表于 2016-4-15 22:14 | 显示全部楼层
非常好 感谢楼主
回复

使用道具 举报

ID:122526 发表于 2016-5-22 11:26 | 显示全部楼层
很有用,谢大神。
回复

使用道具 举报

ID:126435 发表于 2016-6-12 22:25 | 显示全部楼层
很详细,很好
回复

使用道具 举报

ID:74143 发表于 2016-6-18 13:06 | 显示全部楼层
不错,很好的资料
回复

使用道具 举报

ID:128277 发表于 2016-6-27 13:14 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

ID:128277 发表于 2016-6-27 13:15 | 显示全部楼层
不错很不错的资料能解决燃煤直接!谢谢楼主
回复

使用道具 举报

ID:128495 发表于 2016-6-28 23:30 | 显示全部楼层
不错很不错的资料能解决燃煤直接!谢谢楼主
回复

使用道具 举报

ID:130020 发表于 2016-10-14 18:55 | 显示全部楼层
请问楼主有源程序吗
回复

使用道具 举报

ID:142802 发表于 2016-10-15 10:02 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

ID:142802 发表于 2016-10-15 10:03 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

ID:142813 发表于 2016-10-15 11:55 | 显示全部楼层
非常棒的分享
回复

使用道具 举报

ID:142417 发表于 2016-10-15 13:55 | 显示全部楼层
代码生成hex文件不能仿真啊
回复

使用道具 举报

ID:108662 发表于 2016-10-30 14:13 | 显示全部楼层
代码不完整
回复

使用道具 举报

ID:146723 发表于 2016-11-7 22:28 | 显示全部楼层
不错 下来看看
回复

使用道具 举报

ID:149843 发表于 2016-11-23 23:10 | 显示全部楼层
感谢楼主分享
回复

使用道具 举报

ID:151309 发表于 2016-11-30 20:21 | 显示全部楼层
感谢楼主 学习了
回复

使用道具 举报

ID:151309 发表于 2016-11-30 20:22 | 显示全部楼层
学习密码锁了
回复

使用道具 举报

ID:153281 发表于 2016-12-13 08:53 | 显示全部楼层
正在学习,感谢lz
回复

使用道具 举报

ID:147823 发表于 2016-12-14 09:32 | 显示全部楼层
我要下载 可是没有黑币
回复

使用道具 举报

ID:147666 发表于 2016-12-22 11:22 | 显示全部楼层
程序有错误
回复

使用道具 举报

ID:147666 发表于 2016-12-22 11:23 | 显示全部楼层

对,有错误
回复

使用道具 举报

ID:157782 发表于 2017-1-1 14:25 | 显示全部楼层
加112356778
回复

使用道具 举报

ID:205103 发表于 2017-5-26 21:17 | 显示全部楼层
太棒啦
回复

使用道具 举报

ID:207209 发表于 2017-6-2 20:54 | 显示全部楼层
让我试试
回复

使用道具 举报

ID:90419 发表于 2017-7-25 19:49 | 显示全部楼层
不错 ,谢谢楼主的分享
回复

使用道具 举报

ID:230498 发表于 2017-9-2 00:27 | 显示全部楼层
如何获取黑比
回复

使用道具 举报

ID:246147 发表于 2017-11-5 01:17 | 显示全部楼层
好。。。。。。。
回复

使用道具 举报

ID:248216 发表于 2017-11-10 22:07 | 显示全部楼层
好东西
回复

使用道具 举报

ID:247623 发表于 2017-11-11 16:47 | 显示全部楼层
设置新密码功能无法实现;
原始密码123456,设置新密码后,保存新密码,但最后开锁还是要用123456,这个BUG要修复
回复

使用道具 举报

ID:263751 发表于 2017-12-19 16:07 | 显示全部楼层
我想要
回复

使用道具 举报

ID:170442 发表于 2018-3-28 23:16 | 显示全部楼层
谢谢楼主
回复

使用道具 举报

ID:96011 发表于 2018-4-3 12:30 | 显示全部楼层
谢谢楼主的无私分享
回复

使用道具 举报

ID:330674 发表于 2018-5-15 20:34 | 显示全部楼层
能发给我一份看看不
回复

使用道具 举报

ID:336735 发表于 2018-5-23 19:22 | 显示全部楼层
挺不错的,有说明就更好了
回复

使用道具 举报

ID:393450 发表于 2018-9-4 16:28 来自手机 | 显示全部楼层
可以密码改成8位吗
回复

使用道具 举报

ID:435728 发表于 2018-11-29 15:42 | 显示全部楼层
非常用心,写的很精准
回复

使用道具 举报

ID:434173 发表于 2018-11-30 10:35 | 显示全部楼层
不错哦 谢谢楼主的分享
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表