找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

帖子
查看: 10099|回復(fù): 38
收起左側(cè)

用24C04與單片機(jī)設(shè)計(jì)電子密碼鎖 程序+Protues仿真 1602LCD顯示

  [復(fù)制鏈接]
ID:84768 發(fā)表于 2015-7-4 17:44 | 顯示全部樓層 |閱讀模式
進(jìn)來請(qǐng)看

1.png 0.png
單片機(jī)程序與仿真文件下載: 用24C04與1602LCD設(shè)計(jì)電子密碼鎖.zip (26.03 KB, 下載次數(shù): 180)

以下是源程序預(yù)覽:
  1. //-----------------------------------------------------------------
  2. //原始程序中相鄰兩位密碼不能相同.
  3. //本壓縮包中的HEX由修改后的新程序編譯生成,允許輸入任意密碼.
  4. //-----------------------------------------------------------------
  5. //實(shí)訓(xùn)100例中本例內(nèi)的main函數(shù)可用以下代碼替換.
  6. //改動(dòng)的主要是main函數(shù)中while循環(huán)內(nèi)的代碼.
  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設(shè)置為8位自動(dòng)重裝模式
  19.    TH0 = 175;                  
  20.    TL0 = 175;
  21.    TR0 = 1;                         //啟動(dòng)T0

  22.    DelayMS(10);               
  23.    LCD_Init();                      //初始化LCD  
  24.    
  25.    IIC_24C04_Init();                //初始化24C04  
  26.    
  27.    Display_String(Title_Text,0x00); //在第1行顯示標(biāo)題
  28.    
  29.    //24C04的內(nèi)容已由初始化BIN文件導(dǎo)入
  30.    //將24C04中預(yù)先寫入的密碼讀入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();  //掃描鍵盤獲取鍵序號(hào)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位以內(nèi)
  43.                    {
  44.                         //如果i為0則執(zhí)行一次清屏
  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;  //點(diǎn)亮LED
  63.                        Clear_Password();
  64.                        Display_String("Unlock OK!      ",0x40);
  65.                        IS_Valid_User = 1;
  66.                     }
  67.                     else
  68.                     {
  69.                        LED_OPEN =1;   //關(guān)閉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鍵設(shè)置新密碼
  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. }
復(fù)制代碼


評(píng)分

參與人數(shù) 2黑幣 +55 收起 理由
tieq1952 + 5 贊一個(gè)!
admin + 50 共享資料的積分獎(jiǎng)勵(lì)!

查看全部評(píng)分

相關(guān)帖子

回復(fù)

使用道具 舉報(bào)

ID:84777 發(fā)表于 2015-7-4 21:27 | 顯示全部樓層
厲害,,,51黑有你更精彩!!
回復(fù)

使用道具 舉報(bào)

ID:86064 發(fā)表于 2015-7-18 20:01 | 顯示全部樓層
厲害,,,,太棒了
回復(fù)

使用道具 舉報(bào)

ID:86086 發(fā)表于 2015-7-18 22:01 | 顯示全部樓層
看看思路希望能得到一些靈感,謝謝分享
回復(fù)

使用道具 舉報(bào)

ID:70839 發(fā)表于 2015-8-11 18:25 | 顯示全部樓層
支持樓主,很不錯(cuò),學(xué)習(xí)參考下
回復(fù)

使用道具 舉報(bào)

ID:76840 發(fā)表于 2015-8-12 12:28 | 顯示全部樓層
怎么修改的密碼是錯(cuò)誤的,不能保存進(jìn)去?
回復(fù)

使用道具 舉報(bào)

ID:84033 發(fā)表于 2015-8-27 22:18 | 顯示全部樓層
電子密碼鎖在今后還是有更大 的發(fā)展空間的
回復(fù)

使用道具 舉報(bào)

ID:79615 發(fā)表于 2015-8-28 22:06 來自觸屏版 | 顯示全部樓層
很好的東西�。。。�
回復(fù)

使用道具 舉報(bào)

ID:89999 發(fā)表于 2015-9-13 11:51 | 顯示全部樓層
感謝分享
回復(fù)

使用道具 舉報(bào)

ID:44267 發(fā)表于 2015-9-18 11:12 | 顯示全部樓層
太強(qiáng)了
回復(fù)

使用道具 舉報(bào)

ID:83138 發(fā)表于 2015-9-18 21:32 | 顯示全部樓層
51Hei(51黑)論壇有你更精彩
回復(fù)

使用道具 舉報(bào)

ID:73691 發(fā)表于 2015-9-25 07:23 | 顯示全部樓層
真的很不錯(cuò)
回復(fù)

使用道具 舉報(bào)

ID:44267 發(fā)表于 2015-9-25 08:09 | 顯示全部樓層
強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)強(qiáng)
回復(fù)

使用道具 舉報(bào)

ID:90789 發(fā)表于 2015-10-5 15:43 來自觸屏版 | 顯示全部樓層
ludaijin 發(fā)表于 2015-9-18 11:12
太強(qiáng)了

求兩個(gè)按鍵輸入的電子密碼鎖
回復(fù)

使用道具 舉報(bào)

ID:91448 發(fā)表于 2015-10-7 00:32 來自觸屏版 | 顯示全部樓層
太強(qiáng)啦,學(xué)習(xí)~
回復(fù)

使用道具 舉報(bào)

ID:97070 發(fā)表于 2015-11-25 18:11 | 顯示全部樓層
值得來圍觀,請(qǐng)問有仿真和程序嗎?
回復(fù)

使用道具 舉報(bào)

ID:97070 發(fā)表于 2015-11-25 18:24 | 顯示全部樓層
居然不公開程序,有點(diǎn)失望
回復(fù)

使用道具 舉報(bào)

ID:98132 發(fā)表于 2015-12-5 17:22 | 顯示全部樓層
這個(gè)程序有源代碼嗎
回復(fù)

使用道具 舉報(bào)

ID:98832 發(fā)表于 2015-12-10 15:10 | 顯示全部樓層
有源代碼嗎?急需啊
回復(fù)

使用道具 舉報(bào)

ID:98832 發(fā)表于 2015-12-10 18:54 | 顯示全部樓層
有沒有源代碼啊
回復(fù)

使用道具 舉報(bào)

ID:99459 發(fā)表于 2015-12-12 18:55 | 顯示全部樓層
有沒有不用24c04的?
回復(fù)

使用道具 舉報(bào)

ID:44267 發(fā)表于 2015-12-22 16:32 | 顯示全部樓層
樓上有朋友做出來了嘛
回復(fù)

使用道具 舉報(bào)

ID:120850 發(fā)表于 2016-5-15 22:14 | 顯示全部樓層
程序是不是有錯(cuò)》?除了頭文件之外還缺點(diǎn)什么?
回復(fù)

使用道具 舉報(bào)

ID:157011 發(fā)表于 2016-12-23 16:17 | 顯示全部樓層
有源代碼嗎?我編譯的時(shí)候出現(xiàn)了錯(cuò)誤
回復(fù)

使用道具 舉報(bào)

ID:89286 發(fā)表于 2016-12-25 09:24 | 顯示全部樓層
thanks for sharing
回復(fù)

使用道具 舉報(bào)

ID:183867 發(fā)表于 2017-3-27 16:44 | 顯示全部樓層
尤源代碼嗎
回復(fù)

使用道具 舉報(bào)

ID:159521 發(fā)表于 2017-3-27 17:39 | 顯示全部樓層
很不錯(cuò),正在學(xué)習(xí)
回復(fù)

使用道具 舉報(bào)

ID:244527 發(fā)表于 2017-10-31 13:23 | 顯示全部樓層
樓主,不用總線怎么寫啊
回復(fù)

使用道具 舉報(bào)

ID:245820 發(fā)表于 2017-11-3 21:33 | 顯示全部樓層
非常不錯(cuò)
回復(fù)

使用道具 舉報(bào)

ID:144383 發(fā)表于 2017-12-6 17:30 來自觸屏版 | 顯示全部樓層
不錯(cuò)學(xué)習(xí)一下
回復(fù)

使用道具 舉報(bào)

ID:257027 發(fā)表于 2017-12-6 20:39 | 顯示全部樓層
支持樓主,很不錯(cuò),學(xué)習(xí)參考下
回復(fù)

使用道具 舉報(bào)

ID:259267 發(fā)表于 2017-12-11 15:40 | 顯示全部樓層
厲害,,,51黑有你更精彩��!
回復(fù)

使用道具 舉報(bào)

ID:253767 發(fā)表于 2017-12-11 17:42 | 顯示全部樓層
好東西,學(xué)習(xí)了
回復(fù)

使用道具 舉報(bào)

ID:287564 發(fā)表于 2018-3-13 10:46 | 顯示全部樓層
厲害,,,51黑有你更精彩��!
回復(fù)

使用道具 舉報(bào)

ID:110278 發(fā)表于 2018-3-13 20:55 | 顯示全部樓層
非常好,學(xué)習(xí)了。
回復(fù)

使用道具 舉報(bào)

ID:294933 發(fā)表于 2018-3-21 22:53 | 顯示全部樓層
實(shí)訓(xùn)想做這個(gè)   謝謝大佬的分享  對(duì)于我這種小白很有用  拿走了  就是有點(diǎn)貴啊  這個(gè)  傷心
回復(fù)

使用道具 舉報(bào)

ID:236699 發(fā)表于 2018-3-22 08:09 | 顯示全部樓層
感謝分享
回復(fù)

使用道具 舉報(bào)

ID:294933 發(fā)表于 2018-3-22 09:09 | 顯示全部樓層
大佬這個(gè)編譯了為什么會(huì)有錯(cuò)啊  解釋下唄   小白一個(gè)不知道什么意思
回復(fù)

使用道具 舉報(bào)

ID:294933 發(fā)表于 2018-3-22 10:04 | 顯示全部樓層
看不懂啊 大佬指點(diǎn)下  說明意思  頭文件一直報(bào)錯(cuò)
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表