设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机仿真论坛 › 功能很全的单片机电子密码锁Proteus仿真与源码分享
返回列表 发新帖
查看: 4104|回复: 1
打印 上一主题 下一主题
收起左侧

功能很全的单片机电子密码锁Proteus仿真与源码分享

[复制链接]
跳转到指定楼层
楼主
ID:88481 发表于 2018-4-20 17:51 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
电子密码锁仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


资料包：


密码锁的单片机源程序如下:
  1. /********       
  2.                 1.按键说明:        按键K1~K3为数字"1~3",K5~K7为数字"4~6",K9~K11为数字"7~9",
  3.                                         K13为"0",K14为设置键,K15为取消键,K16为回车键.
  4.                 2.程序说明: 按数字键输入正确密码,回车确定.LED亮.否则5次错误,蜂鸣器响.按键暂时失效.       
  5.                                         按设置键进入修改密码,先输入旧密码,再输入两次新密码,回车确定.
  6.                                         关电后密码自动保存.                       
  7.                 3.使用说明: 先找到程序中"E2Read(num0,0x05,sizeof(num0));"语句屏蔽后下载到单片机,
  8.                                         操作一次密码设置(初始密码为"0"),以清除EEPROM内原有数据,关电.解除屏蔽再下载.                                                                                                                                                **********/

  10. #include "Lcd1602.h"
  11. #include "Key.h"
  12. #include "Eeprom.h"

  14. bit BeedOn = 0;                         //蜂鸣器标志
  15. bit set = 0;                         //设置标志
  16. bit On = 0;                                  //密码打开标志
  17. bit clag = 0;                          //清除输入指针标志
  18. uchar Paserror = 0;                   //密码错误次数
  19. uchar Passcou = 0;                  //更改密码引索

  21. uchar T0RH=0,T0RL=0;
  22. uchar num0[8],num1[8],num2[8];

  24. void ConfigTime0(uchar ms);


  27. void main()
  28. {
  29.         EA = 1;
  30.         ConfigTime0(2);
  31.         Lcd1602Init();
  32.         E2Read(num0,0x05,sizeof(num0));
  33.         LcdShowStr(0,0,"Please input...");
  34.         while(1)
  35.         {
  36.                 KeyDriver();
  37.         }
  38. }
  39.        
  40. void InCoumNum(uchar *buf,uchar n)          //输入数据
  41. {
  42.         static uchar i;

  44.         if (clag)
  45.         {
  46.                 i = 0;
  47.                 clag = 0;
  48.         }
  49.         if (i < 8)
  50.         {                          
  51.                 buf[i] = n;
  52.                 i++;
  53.                 LcdShowStr(16-i,1,"*");
  54.         }
  55.         else
  56.                 i = 0;
  57. }


  60. bit ContNum(uchar *dat1,uchar *dat2)        //对比数据
  61. {
  62.         uchar i;

  64.         for (i=0;i<8;i++)
  65.         {
  66.                 if (*dat1++ != *dat2++)
  67.                         return 0;
  68.         }
  69.         return 1;
  70. }

  72. void ClsNum(uchar *dat)                          //清除数据
  73. {
  74.         uchar i;

  76.         for (i=0;i<8;i++)
  77.         {
  78.                 *dat++ = 0;
  79.         }
  80. }

  82. void CopyNum(uchar *dat1,uchar *dat2)         //复制数据
  83. {
  84.         uchar i;

  86.         for (i=0;i<8;i++)
  87.         {
  88.                 *dat1++ = *dat2++;
  89.         }
  90. }

  92. void PasErrCou()                  //密码错误次数显示
  93. {
  94.         uchar str[1];

  96.         Paserror++;
  97.         str[0] = Paserror+'0';
  98.         LcdShowStr(0,1,"ERROR");
  99.         LcdShowStr(6,1,str);
  100.         if (Paserror >= 5)
  101.         {
  102.                 BeedOn = 1;
  103.         }
  104. }

  106. void SetPass()
  107. {
  108.         if (!On && !set)       
  109.         {
  110.                 LcdClsFull();
  111.                 LcdShowStr(0,0,"Set the Passwor");
  112.                 set = 1;
  113.         }
  114. }

  116. void Esc()                                //复位
  117. {
  118.         Passcou = 0;
  119.         On = 0;
  120.         set = 0;
  121.         BeedOn = 0;
  122.         Pout = 1;
  123.         clag = 1;
  124.         ClsNum(num1);
  125.         ClsNum(num2);
  126. }                                                                  

  128. void Enter()
  129. {
  130.         if (!set)
  131.         {
  132.                 if (!ContNum(num1,num0))                  
  133.                 {                                                 
  134.                         ClsNum(num1);
  135.                         LcdClsStr(0,1,16);
  136.                         PasErrCou();
  137.                 }
  138.                 else
  139.                 {
  140.                         LcdClsFull();
  141.                         LcdShowStr(0,0,"Welcome to use!");
  142.                         LcdShowStr(0,1,"Turn ON");
  143.                         ClsNum(num1);
  144.                         Paserror =0;               
  145.                         Pout = 0;
  146.                         On = 1;
  147.                 }
  148.         }
  149.         else
  150.         {
  151.                 switch (Passcou)
  152.                 {
  153.                         case 0: if (ContNum(num1,num0))                 //密码输入正确
  154.                                         {
  155.                                                 LcdClsFull();
  156.                                                 LcdShowStr(0,0,"Enter the new");
  157.                                                 ClsNum(num1);
  158.                                                 Passcou = 1;
  159.                                         }
  160.                                         else                                                //密码输入错误清除输入数
  161.                                         {
  162.                                                 ClsNum(num1);
  163.                                                 LcdClsStr(0,1,16);
  164.                                                 PasErrCou();
  165.                                         }       
  166.                                         break;
  167.                         case 1:        LcdClsFull();
  168.                                         LcdShowStr(0,0,"Enter new too");
  169.                                         Passcou = 2;
  170.                                         break;
  171.                         case 2: if (ContNum(num1,num2))                  
  172.                                         {
  173.                                                 LcdClsFull();
  174.                                                 LcdShowStr(0,0,"Set pass OK  ");
  175.                                                 CopyNum(num0,num2);
  176.                                                 E2Write(num0,0x05,sizeof(num0));
  177.                                                 Esc();
  178.                                         }
  179.                                         else
  180.                                         {
  181.                                                 ClsNum(num2);
  182.                                                 LcdClsStr(0,1,16);
  183.                                         }                       
  184.                                 default:  break;
  185.                 }                                                                               
  186.         }
  187.         clag = 1;       
  188. }


  191. void KeyAction(uchar kcod)
  192. {
  193.         if (Paserror < 5)
  194.         {
  195.         if ((kcod >= 0x00) && (kcod <= 0x09))
  196.         {
  197.                 if (!On)                                                                   //密码打开状态禁止输入
  198.                 {                          
  199.                         switch(Passcou)
  200.                         {
  201.                                 case 0: InCoumNum(num1,kcod);                //输入数字
  202.                                         break;
  203.                                 case 1: InCoumNum(num1,kcod);
  204.                                         break;
  205.                                 case 2: InCoumNum(num2,kcod);
  206.                                         break;
  207.                                 default:
  208.                                         break;
  209.                         }
  210.                 }
  211.         }
  212.         else if (kcod == 0x1b)
  213.         {
  214.                 if (!On)       
  215.                 SetPass();                //设置密码
  216.         }
  217.         else if (kcod == 0x0d)                 //复位
  218.         {
  219.                 LcdClsStr(0,1,16);               
  220.                 LcdShowStr(0,0,"Please input...");
  221.                 Esc();
  222.         }
  223.         else if (kcod == 0x27)
  224.         {
  225.                 if (!On)
  226.                         Enter();           //确认
  227.         }
  228.         }
  229. }                                                                                       


  232. void ConfigTime0(uchar ms)
  233. {
  234.         ulong tmp;

  236.         tmp = 11059200/12;
  237.         tmp = (tmp*ms)/1000;
  238.         tmp = (65536-tmp);
  239.         T0RH = (uchar)(tmp>>8);
  240.         T0RL = (uchar)tmp;
  241.         TH0 = T0RH;
  242.         TL0 = T0RL;
  243.         TMOD &= 0xf0;
  244.         TMOD |= 0x01;
  245.         TR0 = 1;
  246.         ET0 = 1;
  247. }

  249. void InterruptTime0() interrupt 1
  250. {
  251.         static uint Errortime = 0;        //密码错误计时
  252.        
  253.         TH0 = T0RH;
  254.         TL0 = T0RL;
  255.         KeyScan();
  256.         if (BeedOn)
  257.                 Bee = ~Bee;
  258.         else
  259.                 Bee = 1;
  260.         if (Paserror >= 5)
  261. ……………………

  263. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
密码锁.zip (100.26 KB, 下载次数: 80)


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:543147 发表于 2019-5-20 21:21 | 只看该作者
解决了我仿真不出图的问题
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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