單片機6位數(shù)電子密碼鎖源碼+PCB+仿真原理圖設(shè)計（可改密碼）

ID:323479 · 發(fā)表于 2018-5-6 15:33

電子密碼鎖的電路原理圖

Altium Designer畫的原理圖和PCB圖如下：(51hei附件中可下載工程文件)

密碼鎖仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

以下是一套單片機電子密碼鎖程序：

/*******************************************************************************
初始密碼：000000 密碼位數(shù)：6位
注意：掉電后，所設(shè)密碼會丟失，重新上電時，密碼恢復(fù)為原始的000000
與P1.0相連的8位發(fā)光LED點亮代表鎖被打開；熄滅代表鎖被鎖上
程序功能：
1、開鎖：
下載程序后，直接按六次數(shù)字0（即代表密碼000000），LED亮，鎖被打開，輸入密碼時，
六位數(shù)碼管依次顯示小橫杠。
2、更改密碼：
只有當(dāng)開鎖（LED亮）后，該功能方可使用。
首先按下更改密碼鍵，然后設(shè)置相應(yīng)密碼，此時六位數(shù)碼管會顯示設(shè)置密碼對應(yīng)
的數(shù)字。最后設(shè)置完六位后，按下確認(rèn)密碼更改，此后新密碼即生效。
3、重試密碼：
當(dāng)輸入密碼時，密碼輸錯后按下重試鍵，可重新輸入六位密碼。
當(dāng)設(shè)置密碼時，設(shè)置中途想更改密碼，也可按下此鍵重新設(shè)置。
4、關(guān)閉密碼鎖：
按下上鎖按鍵即可將打開的密碼鎖關(guān)閉。
功能測試：輸入原始密碼000000---按下更改密碼按鍵---按0到9設(shè)置密碼---按確認(rèn)鍵
密碼更改---按上鎖按鍵關(guān)閉密碼鎖---輸入新的密碼打開密碼鎖
*******************************************************************************/
#include<reg52.h>
#define uchar unsigned char
#define uint unsigned int
uchar old1,old2,old3,old4,old5,old6; //原始密碼000000
unsigned char PassWord[6];
uchar new1,new2,new3,new4,new5,new6; //每次MCU采集到的密碼輸入
uchar a=16,b=16,c=16,d=16,e=16,f=16; //送入數(shù)碼管顯示的變量
uchar wei,key,temp;
unsigned char st=0;
bit allow,genggai,ok,wanbi,retry,close; //各個狀態(tài)位
sbit beep=P3^6;
sbit Lock=P3^7;
sbit GLED=P3^5;
sbit RLED=P3^4;
sbit SCL = P3^3; //引腳定義
sbit SDA = P3^2;
unsigned char code table[]=
{0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,
0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x00,0x40};
void InitI2C();
void I2CStart();
void I2CStop();
void I2CSend(uchar byte);
uchar I2CRead();
uchar read_eeprom(uchar addr);
void write_eeprom(uchar addr, uchar databyte);
/*****************************************************************************
** 函數(shù)名稱：delay
** 功能描述：延時
******************************************************************************/
void delay(unsigned int i)
{
uint j,k;
for(j=i;j>0;j--)
for(k=125;k>0;k--);
}
/*****************************************************************************
** 函數(shù)名稱：InitI2C
** 功能描述：配置模擬I2C的IO端口
******************************************************************************/
void InitI2C()
{
SDA = 1;
SCL = 1;
}
/*****************************************************************************
** 函數(shù)名稱：I2CStart
** 功能描述：發(fā)送I2C總線起始狀態(tài)
** 輸入：無
** 輸出：無
** 全局變量：無
** 調(diào)用模塊：delay()
** 可移植性：直接移植
******************************************************************************/
void I2CStart()
{
SDA = 1;
delay(1); // 延時子程序
SCL = 1;
delay(1);
SDA = 0;
delay(1);
SCL = 0;
}
/*****************************************************************************
** 函數(shù)名稱：I2CStop
** 功能描述：發(fā)送I2C總線停止起始狀態(tài)
** 輸入：無
** 輸出：無
** 全局變量：無
** 調(diào)用模塊：delay()
** 可移植性：直接移植
******************************************************************************/
void I2CStop()
{
SCL = 0;
delay(1);
SDA = 0;
delay(1);
SCL = 1;
delay(1);
SDA = 1;
delay(1);
}
/*****************************************************************************
** 函數(shù)名稱：I2CSend
** 功能描述：向I2C總線發(fā)送一個字節(jié)數(shù)據(jù)，并檢測應(yīng)答
** 輸入：待發(fā)送字節(jié)byte
** 輸出：無
** 全局變量：無
** 調(diào)用模塊：delay()
** 可移植性：直接移植
******************************************************************************/
void I2CSend(uchar byte)
{
uchar mask;
uchar i;
mask = 0x80;
for(i = 0; i < 8; i++)
{
SCL = 0;
delay(1);
if((mask & byte) == 0)
{
SDA = 0;
}
else
{
SDA = 1;
}
mask >>= 1;
delay(1);
SCL = 1;
delay(1);
}
SCL = 0;
SDA = 1;
delay(1);
SCL = 1;
delay(1);
SCL = 0;
}
/*****************************************************************************
** 函數(shù)名稱：I2CRead
** 功能描述：從I2C總線讀取最后一個字節(jié)數(shù)據(jù)，并發(fā)送非應(yīng)答位
** 輸入：無
** 輸出：接收到的字節(jié)byte
** 全局變量：無
** 調(diào)用模塊：delay()
** 可移植性：直接移植
******************************************************************************/
uchar I2CRead()
{
uchar byte;
uchar i;
byte = 0;
for(i = 0; i < 8; i++)
{
SCL = 0;
SDA = 1;
delay(1);
SCL = 1;
delay(1);
byte <<= 1;
if(SDA == 1)
{
byte |= 0x01;
}
delay(1);
}
SCL = 0;
SDA = 1;
delay(1);
SCL = 1;
delay(1);
SCL = 0;
return byte;
}
/*****************************************************************************
** 函數(shù)名稱：read_eeprom
** 功能描述：讀取EEPROM數(shù)據(jù)函數(shù)
** 輸入：EEPROM中目的地址addr
** 輸出：讀取的數(shù)據(jù)
******************************************************************************/
uchar read_eeprom(uchar addr)
{
uchar databyte;
I2CStart();
I2CSend(0xa0);
I2CSend(addr);
I2CStart();
I2CSend(0xa1);
databyte = I2CRead();
I2CStop();
return databyte;
}
/*****************************************************************************
** 函數(shù)名稱：write_eeprom
** 功能描述：向EEPROM寫入數(shù)據(jù)函數(shù)
** 輸入：EEPROM中目的地址addr及寫入的數(shù)據(jù)
** 輸出：無
******************************************************************************/
void write_eeprom(uchar addr, uchar databyte)
{
I2CStart();
I2CSend(0xa0);
I2CSend(addr);
I2CSend(databyte);
I2CStop();
}
void display(void)
{
switch(st)
{
case 0: st=1;P0=0xff;P2=table[a];P0=0xfe;break;
case 1: st=2;P0=0xff;P2=table[b];P0=0xfd;break;
case 2: st=3;P0=0xff;P2=table[c];P0=0xfb;break;
case 3: st=4;P0=0xff;P2=table[d];P0=0xf7;break;
case 4: st=5;P0=0xff;P2=table[e];P0=0xef;break;
case 5: st=0;P0=0xff;P2=table[f];P0=0xdf;break;
}
}
void Timer0() interrupt 1
{
TR0=0;
TH0 = (65535-2000)/256;
TL0 = (65535-2000)%256;
display();
TR0=1;
}
void keyscan(void)
{
P1=0xfe;
temp=P1;
temp=temp&0xf0;
if(temp!=0xf0)
{
delay(10);
if(temp!=0xf0)
{
temp=P1;
switch(temp)
{
case 0xee: key=0;wei++;break;
case 0xde: key=1;wei++;break;
case 0xbe: key=2;wei++;break;
case 0x7e: key=3;wei++;break;
}
beep=0;delay(50);beep=1;
while(temp!=0xf0)
{
temp=P1;
temp=temp&0xf0;
}
}
}
P1=0xfd;
temp=P1;
temp=temp&0xf0;
if(temp!=0xf0)
{
delay(10);
if(temp!=0xf0)
{
temp=P1;
switch(temp)
{
case 0xed: key=4;wei++;break;
case 0xdd: key=5;wei++;break;
case 0xbd: key=6;wei++;break;
case 0x7d: key=7;wei++;break;
}
beep=0;delay(50);beep=1;
while(temp!=0xf0)
{
temp=P1;
temp=temp&0xf0;
}
}
}
P1=0xfb;
temp=P1;
temp=temp&0xf0;
if(temp!=0xf0)
{
delay(10);
if(temp!=0xf0)
{
temp=P1;
switch(temp)
{
case 0xeb: key=8;wei++;break;
case 0xdb: key=9;wei++;break;
case 0xbb: genggai=1;wei=0;break;
case 0x7b: if(allow) ok=1;break;
}
beep=0;delay(50);beep=1;
while(temp!=0xf0)
{
temp=P1;
temp=temp&0xf0;
}
}
}
P1=0xf7;
temp=P1;
temp=temp&0xf0;
if(temp!=0xf0)
{
delay(10);
if(temp!=0xf0)
{
temp=P1;
switch(temp)
{
case 0xe7: retry=1;break;
case 0xd7: close=1;break;
}
beep=0;delay(50);beep=1;
while(temp!=0xf0)
{
temp=P1;
temp=temp&0xf0;
}
}
}
}
void shumima(void) //對按鍵采集來的數(shù)據(jù)進行分配
{
if(!wanbi)
{
switch(wei)
{
case 1: new1=key;if(!allow)a=17;else a=key; break;
case 2: new2=key;if(a==17) b=17;else b=key; break;
case 3: new3=key;if(a==17) c=17;else c=key; break;
case 4: new4=key;if(a==17) d=17;else d=key; break;
case 5: new5=key;if(a==17) e=17;else e=key; break;
case 6: new6=key;if(a==17) f=17;else f=key;wanbi=1;break;
}
}
}
void yanzheng(void) //驗證密碼是否正確
{
if(wanbi) //只有當(dāng)六位密碼均輸入完畢后方進行驗證
{
if((new1==PassWord[0])&(new2==PassWord[1])&(new3==PassWord[2])&(new4==PassWord[3])&(new5==PassWord[4])&(new6==PassWord[5]))
allow=1; //當(dāng)輸入的密碼正確，會得到allow置一
}
}
void WritePassWord(void)
{
unsigned char j=0;
for(j=0;j<6;j++) //從02地址開始寫初始密碼數(shù)據(jù)
{
write_eeprom(j,PassWord[j]); //初始密碼123456
delay(10);
}
}
void ReadPassWord(void)
{
unsigned char j=0;
for(j=0;j<6;j++) //將24C02中的密碼讀取出來保存在dumima_tab1[]數(shù)組中
{
PassWord[j] = read_eeprom(j);
delay(10);
}
}
void WritePassWord_Ini(void)
{
unsigned char j=0;
for(j=0;j<6;j++) //從02地址開始寫初始密碼數(shù)據(jù)
{
write_eeprom(j,j+1); //初始密碼123456
delay(10);
}
}
void main(void)
{
InitI2C(); //初始化
TMOD = 0x01;
TH0 = (65535-2000)/256;
TL0 = (65535-2000)%256;
EA=1;
ET0=1;
TR0=1;
//WritePassWord_Ini();
ReadPassWord();
if(PassWord[0]==0xff) WritePassWord_Ini();
while(1)
{
keyscan();
shumima();
yanzheng();
if(allow) //驗證完后，若allow為1，則開鎖
{
Lock=0;GLED=0;RLED=1;
if(!genggai) wanbi=0;
}
else
{
Lock=1;GLED=1;RLED=0;
if(wanbi)
{
delay(500);
beep=0;delay(500);beep=1;delay(500);
beep=0;delay(100);beep=1;delay(200);
beep=0;delay(100);beep=1;delay(200);
beep=0;delay(100);beep=1;delay(200);
beep=0;delay(100);beep=1;delay(200);
beep=0;delay(100);beep=1;delay(200);
beep=0;delay(100);beep=1;
wei=0;wanbi=0;allow=0;
a=16;b=16;c=16;d=16;e=16;f=16;
new1=0;new2=0;new3=0;new4=0;new5=0;new6=0;
}
}
if(genggai) //當(dāng)S16更改密碼鍵被按下，genggai會被置一
{
if(allow) //若已經(jīng)把鎖打開，才有更改密碼的權(quán)限
{
while(!wanbi) //當(dāng)新的六位密碼沒有設(shè)定完，則一直在這里循環(huán)
{
delay(20);
keyscan();
shumima();
if(retry|close) //而當(dāng)探測到重試鍵S18或者關(guān)閉密碼鎖鍵S19被按下時，則跳出
{
wanbi=1;
break;
}
}
}
}
if(ok) //更改密碼時，當(dāng)所有六位新密碼均被按下時，可以按下此鍵，結(jié)束密碼更改
{ //其他時間按下此鍵無效
ok=0; wei=0;Lock=1;GLED=1;RLED=0;
genggai=0;
PassWord[0]=new1;PassWord[1]=new2;PassWord[2]=new3; //此時，舊的密碼將被代替
PassWord[3]=new4;PassWord[4]=new5;PassWord[5]=new6;
WritePassWord();
wei=0;wanbi=0;allow=0;
a=16;b=16;c=16;d=16;e=16;f=16;
new1=0;new2=0;new3=0;new4=0;new5=0;new6=0;
}
if(retry) //當(dāng)重試按鍵S18被按下，retry會被置位
{
retry=0; wei=0;wanbi=0;
a=16;b=16;c=16;d=16;e=16;f=16;
new1=0;new2=0;new3=0;new4=0;new5=0;new6=0;
}
if(close) //當(dāng)關(guān)閉密碼鎖按鍵被按下，close會被置位
{
close=0;genggai=0;//所有變量均被清零。
wei=0; wanbi=0;
allow=0;
Lock=1;GLED=1;RLED=0;
a=16;b=16;c=16;d=16;e=16;f=16;
new1=0;new2=0;new3=0;new4=0;new5=0;new6=0;
}
}
}

復(fù)制代碼

全部資料51hei下載地址：

源程序.rar (135.13 KB, 下載次數(shù): 562)

原理圖 PCB圖.rar (734.5 KB, 下載次數(shù): 408)

仿真.rar (29.08 KB, 下載次數(shù): 530)

ID:118735 · 發(fā)表于 2018-12-27 17:44

樓主厲害

ID:567837 · 發(fā)表于 2019-6-20 13:34

資料很好

ID:282095 · 發(fā)表于 2019-6-20 14:01

密碼鎖可以實現(xiàn)遠(yuǎn)程控制嗎

ID:425825 · 發(fā)表于 2019-6-21 21:51

鵬博士PBs 發(fā)表于 2019-6-20 14:01
密碼鎖可以實現(xiàn)遠(yuǎn)程控制嗎

需要什么樣的遠(yuǎn)程？熱點、局域網(wǎng)還是廣域網(wǎng)的呢？

ID:473471 · 發(fā)表于 2019-7-2 22:20

好資料留個腳印

ID:515362 · 發(fā)表于 2019-7-3 18:46

感謝樓主無私分享

ID:640942 · 發(fā)表于 2019-11-13 09:05

感謝樓主分享

ID:352449 · 發(fā)表于 2019-11-18 00:57

下載看看，學(xué)習(xí)學(xué)習(xí)。

ID:644272 · 發(fā)表于 2019-11-19 12:37

樓主好厲害，好資料

ID:656942 · 發(fā)表于 2019-12-6 15:01

請問樓主有原件清單嗎

ID:634141 · 發(fā)表于 2019-12-22 16:33

這個真心不錯，先收藏了

ID:561156 · 發(fā)表于 2019-12-22 20:52

哇，這個程序剛好解決了我的一個問題

ID:680994 · 發(fā)表于 2020-1-5 17:59

膜拜大佬，虛心求學(xué)

ID:683564 · 發(fā)表于 2020-1-8 14:33

樓主你好這個在stc89c52中在開發(fā)板上如何連線使得電路正常工作

ID:697662 · 發(fā)表于 2020-3-2 14:42

下載了為什么打不開啊

ID:737227 · 發(fā)表于 2020-4-24 18:41

多謝分享

ID:798056 · 發(fā)表于 2020-7-5 22:31

人機交互界面該怎么設(shè)置

ID:771985 · 發(fā)表于 2020-8-7 17:25

樓主，怎么設(shè)置多個密碼都能夠開門

ID:757431 · 發(fā)表于 2020-9-6 15:39

969355263 發(fā)表于 2020-1-8 14:33
樓主你好這個在stc89c52中在開發(fā)板上如何連線使得電路正常工作

問題加一，已經(jīng)焊好了不知道怎么連上電源和燒代碼進去單片機

ID:825446 · 發(fā)表于 2020-10-6 11:04

有51單片機的密碼鎖程序嗎

ID:835186 · 發(fā)表于 2020-10-27 18:22

下載完怎么看不了

ID:328014 · 發(fā)表于 2020-10-27 18:45

1726739743 發(fā)表于 2020-10-27 18:22
下載完怎么看不了

我剛幫你測試了下,要用Proteus7.5版本才能打開,效果如下,輸入123456,變綠燈,仿真成功

ID:852225 · 發(fā)表于 2020-12-1 10:44

佩服樓主

ID:865382 · 發(fā)表于 2021-12-25 15:05

忘記密碼怎么辦啊

ID:865382 · 發(fā)表于 2021-12-25 17:26

yhj1999 發(fā)表于 2020-8-7 17:25
樓主，怎么設(shè)置多個密碼都能夠開門

你這個問題解決了嗎

ID:1042648 · 發(fā)表于 2022-8-22 16:55

怎么把密碼由6位數(shù)改成10位數(shù)呢？

ID:1042173 · 發(fā)表于 2022-8-22 23:30

51hei團團發(fā)表于 2020-10-27 18:45
我剛幫你測試了下,要用Proteus7.5版本才能打開,效果如下,輸入123456,變綠燈,仿真成功

給我發(fā)個程序來吶，好不？

ID:1131735 · 發(fā)表于 2024-9-11 08:14

留個腳印

ID:1123430 · 發(fā)表于 2024-9-23 00:04

樓主厲害啊！！！

ID:1132424 · 發(fā)表于 2024-9-23 10:29

這個能成功嗎

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

單片機6位數(shù)電子密碼鎖源碼+PCB+仿真原理圖設(shè)計（可改密碼）

評分