標題: 51單片機電子密碼鎖仿真及程序 制作成功功能全 [打印本頁]
作者: 41241    時間: 2016-5-27 19:15
標題: 51單片機電子密碼鎖仿真及程序 制作成功功能全
花了兩個星期做的51單片機電子密碼鎖，分享給大家



基于80C51液晶顯示和24C01密碼實時保護的電子密碼鎖
程序（完整版本請下載附件）：
  1. #include<reg51.h>
  2. #include<12864.h>
  3. #include<keypad.h>
  4. #include<24C01.h>

  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;

  13. uchar idata key[6]={0,0,0,0,0,0};
  14. uchar idata iic[6]={0,1,2,3,4,5};

  16. void press(uchar *s)
  17. {
  18.            uchar dat;
  19. //**************************************************
  20.        P3=0xf0;                                                                //保存第一位密碼
  21.            while(P3==0xf0);
  22.        dat=key_scan();
  23.            if((dat!=0x0a)&&(dat!=0x0b))
  24.          {   *s=dat;
  25.                          Left();
  26.                          star_12864(star,0x05,16);
  27.              }
  28.            s++;                  
  29. //**************************************************
  30.            P3=0xf0;                                                          //保存第二位密碼
  31.            while(P3==0xf0);                                                 
  32.        dat=key_scan();
  33.            if((dat!=0x0a)&&(dat!=0x0b))
  34.          {   *s=dat;
  35.                          Left();
  36.                          star_12864(star,0x05,24);
  37.                   }
  38.            s++;       
  39. //**************************************************
  40.            P3=0xf0;                                                          //保存第三位密碼
  41.            while(P3==0xf0);                                                 
  42.        dat=key_scan();
  43.            if((dat!=0x0a)&&(dat!=0x0b))
  44.          {   *s=dat;
  45.                          Left();
  46.                          star_12864(star,0x05,32);
  47.                   }
  48.            s++;       
  49. //**************************************************
  50.            P3=0xf0;                                                          //保存第四位密碼
  51.            while(P3==0xf0);                                                 
  52.            dat=key_scan();
  53.            if((dat!=0x0a)&&(dat!=0x0b))
  54.          {   *s=dat;
  55.                          Left();
  56.                          star_12864(star,0x05,40);
  57.                   }
  58.            s++;       
  59. //**************************************************
  60.            P3=0xf0;                                                          //保存第五位密碼
  61.            while(P3==0xf0);                                                 
  62.        dat=key_scan();
  63.            if((dat!=0x0a)&&(dat!=0x0b))
  64.          {   *s=dat;
  65.                          Left();
  66.                          star_12864(star,0x05,48);
  67.                   }
  68.            s++;       
  69. //**************************************************
  70.            P3=0xf0;                                                          //保存第六位密碼
  71.            while(P3==0xf0);                                                 
  72.        dat=key_scan();
  73.            if((dat!=0x0a)&&(dat!=0x0b))
  74.          {   *s=dat;
  75.                          Left();
  76.                          star_12864(star,0x05,56);
  77.                   }
  78. //**************************************************
  79.            do{P3=0xf0;                                                        //鍵入Enter鍵盤繼續(xù)執(zhí)行下面語句，否則等待
  80.               while(P3==0xf0);                                                 
  81.           dat=key_scan();
  82.               }while(dat!=0x0b);
  83. }

  85. void Delay10ms(void)           //延時10ms
  86. {
  87.         uint i,j,k;
  88.         for(i=5;i>0;i--)
  89.         for(j=4;j>0;j--)
  90.         for(k=248;k>0;k--);

  92. }

  94. void main()
  95. {
  96.       uchar dat;
  97.       uchar i=0,j=0,k;
  98.       uchar x;
  99.           LED1=1;
  100.           LED2=1;
  101.           SOUND=0;
  102.           INIT=1;
  103.       if(INIT==0)                   //密碼初始化
  104.       {
  105.              x=SendB(iic,0x50,6);
  106.                  Delay10ms();
  107.       }             //首先從IIC器件中讀出密碼以供下面輸入密碼進行比較
  108.       x=ReadB(iic,0x50,6);
  109.       Init_12864();
  110.           for(i=0;i<150;i++){Delay10ms();}
  111. //**********************************若密碼不正確，循環(huán)執(zhí)行do{}while（）********************************************
  112. do{
  113.              LED1=1;
  114.              System();                  //顯示："請輸入密碼"字幕  
  115.              press(key);
  116.                  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])) //密碼比較,若密碼正確責進入系統(tǒng)，若密碼不正確則顯示密碼錯誤，重新輸入密碼
  117.          {
  118.                     true();
  119.                     do
  120.                     {
  121.                        P3=0xf0;                                                        //鍵入1或2繼續(xù)執(zhí)行下面語句，否則等待
  122.                    while(P3==0xf0);                                                 
  123.                dat=key_scan();
  124.                  }while(dat!=0x01&&dat!=0x02);
  125.                     if(dat==1)                                                       //開鎖
  126.                     {
  127.                         LED1=0;
  128.                                 unlock();
  129.                             for(i=0;i<100;i++){Delay10ms();}
  130.                     continue;
  131.                      }
  132.                     if(dat==2)                                                        //修改密碼
  133.                    {
  134.                        do{
  135.                               System();
  136.                                   press(key);
  137.                                   again();
  138.                                   press(iic);
  139.                                       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]))
  140.                                       {
  141.                                           succeed();                                //修改密碼成功
  142.                                                   for(i=0;i<100;i++){Delay10ms();}
  143.                                       Delay10ms();
  144.                               x=SendB(iic,0x50,6);
  145.                                       Delay10ms();       
  146.                           x=ReadB(iic,0x50,6);break;
  147.                                        }
  148.                                       else                             //修改密碼不成功，重新修改
  149.                                           {
  150.                                               repeat();
  151.                                                   for(i=0;i<100;i++){Delay10ms();}
  152.                                            }
  153.                                   }while(1);   
  154.                     }
  155.                  
  156.                  }
  157.                 else                                                                           //密碼不正確，重新輸入密碼
  158.                 {
  159.                     j++;
  160.                         if(j==3)
  161.                         {
  162.                            for(i=0;i<8;i++)
  163.                            {
  164.                               LED2=0;
  165.                                   for(k=0;k<5;k++){Delay10ms();}
  166.                                   LED2=1;
  167.                                   for(k=0;k<5;k++){Delay10ms();}
  168.                                 }
  169.                                 j=0;
  170.                          }
  171.                         error();
  172.                         for(i=0;i<50;i++){Delay10ms();}
  173.                  }
  174. }while(1);         
  175.       
  176.                     
  177.           
  178. }
復制代碼




基于24C02和12864顯示的電子密碼鎖設(shè)計.rar

76.92 KB, 下載次數(shù): 99, 下載積分: 黑幣 -5

51單片機電子密碼鎖
作者: 炳文    時間: 2016-12-3 09:26
12864啊
作者: xyzcom    時間: 2017-11-28 15:29
顯示器名字學校怎么改？



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1