標(biāo)題: 電子密碼鎖設(shè)計(jì)24c01+12864,希望能幫到大家 [打印本頁(yè)]
作者: a8818075    時(shí)間: 2017-6-13 21:52
標(biāo)題: 電子密碼鎖設(shè)計(jì)24c01+12864,希望能幫到大家
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）：


單片機(jī)源程序如下:
  1. #include<reg51.h>
  2. #include<keyinput.h>
  3. #include<12864.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. /************************ 密碼校驗(yàn)函數(shù) **************************/
  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鍵盤(pán)繼續(xù)執(zhí)行下面語(yǔ)句，否則等待
  73.               while(P3==0xf0);                                                 
  74.           dat=key_scan();
  75.               }while(dat!=0x0b);
  76. }

  78. /****************************** 延時(shí)10ms函數(shù) *******************************/
  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--);

  85. }

  87. /****************************** 主函數(shù) *******************************/
  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器件中讀出密碼以供下面輸入密碼進(jìn)行比較
  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{                                  //若密碼不正確，循環(huán)執(zhí)行do{}while（）
  104.              LED1=1;
  105.              System();                  //顯示：請(qǐng)輸入密碼
  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])) //密碼比較,若密碼正確責(zé)進(jìn)入系統(tǒng)，若密碼不正確則顯示密碼錯(cuò)誤，重新輸入密碼
  108.          {
  109.                     true();
  110.                     do {
  111.                        P3=0xf0;                                                        //鍵入1或2繼續(xù)執(zhí)行下面語(yǔ)句，否則等待
  112.                    while(P3==0xf0);                                                 
  113.                dat=key_scan();
  114.                 }while(dat!=0x01&&dat!=0x02);         
  115.                     if(dat==1) {                                       //開(kāi)鎖
  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. ……………………

  146. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
電子密碼鎖.zip (121.93 KB, 下載次數(shù): 141)



作者: cjjcjj1    時(shí)間: 2017-6-14 09:39
提示: 作者被禁止或刪除 內(nèi)容自動(dòng)屏蔽
作者: a8818075    時(shí)間: 2017-6-14 14:09
因?yàn)榘l(fā)送過(guò)于匆忙有些引腳的定義大家自己修改一下，程序是絕對(duì)沒(méi)問(wèn)題的
作者: 348652560    時(shí)間: 2017-6-14 22:33
謝謝分享，太好了正好需要
作者: lxr0029    時(shí)間: 2017-6-15 08:54
感謝樓主分享
作者: sq000    時(shí)間: 2020-7-26 21:35
a8818075 發(fā)表于 2017-6-14 14:09
因?yàn)榘l(fā)送過(guò)于匆忙有些引腳的定義大家自己修改一下，程序是絕對(duì)沒(méi)問(wèn)題的

朋友，是不是rs...rw...e三個(gè)要改，但是改了也不行啊，望指導(dǎo)，萬(wàn)分感謝
作者: yhj1999    時(shí)間: 2020-8-7 17:36
樓主，要設(shè)置多個(gè)密碼都能夠開(kāi)鎖，程序要怎么搞呢




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