密码(完整版)单片机电子密码锁(可以修改设置密码)——基于51单片机毕业论文

修改密码  时间:2021-02-22  阅读:()

单片机电子密码锁 (可以修改设置密码)――基于51单片机与AT24C02与LCD1602显示

其电路图连接如下本人已经用硬件实验程序可用。正确 ~~本程序特点装载后读者可以自改密码然后需要再次载入程序时可以把主程序aa=Sendstring(0xa0,1,table2,6)这一句去掉。然后程序的电子锁密码就是你个人设置的密码。

LCD1

程序代码为:

#include<reg51.=P0

XrMJ

Rir

F7 !|

uchar code table[]="Your Password...";void delayms(uint z)

{uint x,y;for(x=z;x>0;x--)for(y=110;y>0;y--);

}void delay()短延时两个机器周期 ,做总线的延时{;;}void write_com(uchar com)

{rs=0;rd=0;lcden=0;

P2=com;delayms(3);lcden=1;delayms(3);lcden=0;

}void write_date(uchar date)

{rs=1;rd=0;lcden=0;

P2=date;delayms(3);lcden=1;delayms(3);lcden=0;

}void Display_String(uchar*p,uchar com)

{uchar i;write_co m(c o m);for(i=0;i<16;i++)

{write_date(p[i]);

}

}void init_lc d()

{lcden=0;write_co m(0 x38);write_co m(0 x0 c);write_co m(0 x06);write_co m(0 x01);write_co m(0 x80);

Display_String(table,0x80);

Display_String("Lock OK! ",0xc0);}

void start() {sda=1;scl=1;delay4us();sda=0;delay4us();scl=0;

}void stop()

{sda=0;scl=1;delay4us();sda=1;delay4us();scl=0;

}vo id init()初始化{sda=1;delay();scl=1;delay();

}

void ack()

{sda=0;scl=1;delay4us();scl=0;sda=1;

}void noack()

{sda=1;scl=1;delay4us();scl=0;sda=0;

}uchar recbyte()

{uchar i,rd;rd=0x00;sda=1;for(i=0;i<8;i++) {rd<<=1;scl=1;

rd|=sda;delay4us();scl=0;delay4us();

}scl=0;delay4us();return rd;

}uchar sendbyte(uchar wd)

{uchar i;bit ack0;for(i=0;i<8;i++)

{s da=(bit)(wd&0x80);

_nop_();

_nop_();scl=1;delay4us();scl=0;wd<<=1;

}delay4us();sda=1;

scl=1;delay4us();ack0=!sda;scl=0;delay4us();return ack0;

}uchar Recstring(uchar slaveuchar i;start();if(!sendbyte(slave))return 0;if(!sendbyte(subaddr))return 0;start();if(!sendbyte(slave+1))return 0;for(i=0;i<n-1;i++)

{buffer[i]=recbyte();ack();

}buffe r[n-1]=re cbyte();noack();stop();return 1;

uchar Sendstring(uchar slaveuchar i;start();if(!sendbyte(slave))return 0;if(!sendbyte(subaddr))return 0;for(i=0;i<n;i++)

{if(!sendbyte(buffer[i]))return 0;

}stop();return 1;

}void clear_password()

{ uchar i;for(i=0;i<6;i++)

{

Us e rpas swo rd[i]='';

}for(i=0;i<16;i++)

{

D SY_BUFFER[i]='';

}

()uchar temp,keynum;

P1=0x0F;delayms(5);te mp=P 1 A0 x0F;switch(temp)

{case 1:keynum=0;break;case 2:keynum=1;break;case 4:keynum=2;break;case 8:keynum=3;break;break;}

P1=0xF0;delayms(5);te mp=P 1>>4A0 x0F;switch(temp)

{case 1:keynum+=0;break;case 2:keynum+=4;break;case 4:keynum+=8;break;case 8:keynum+=12;break;break;}delayms(600);return keynum;void main()

{uchar temp,i=0,j=0,k=0,n;uchar IS_valid_user;beep=1;init();init_lc d();delayms(5);

易探云:买香港/美国/国内云服务器送QQ音乐绿钻豪华版1年,价值180元

易探云产品限时秒杀&QQ音乐典藏活动正在进行中!购买易探云香港/美国云服务器送QQ音乐绿钻豪华版1年,价值180元,性价比超级高。目前,有四大核心福利产品推荐:福利一、香港云服务器1核1G2M,仅218元/年起(香港CN2线路,全球50ms以内);福利二、美国20G高防云服务器1核1G5M,仅336元/年起(美国BGP线路,自带20G防御);福利三、2G虚拟主机低至58.8元/年(更有免费...

UCloud云服务器低至年59元

最近我们是不是在讨论较多的是关于K12教育的问题,培训机构由于资本的介入确实让家长更为焦虑,对于这样的整改我们还是很支持的。实际上,在云服务器市场中,我们也看到内卷和资本的力量,各大云服务商竞争也是相当激烈,更不用说个人和小公司服务商日子确实不好过。今天有看到UCloud发布的夏季促销活动,直接提前和双十一保价挂钩。这就是说,人家直接在暑假的时候就上线双十一的活动。早年的双十一活动会提前一周到十天...

sharktech:老牌高防服务器商,跳楼价,1G独享$70、10G共享$240、10G独享$800

不知道大家是否注意到sharktech的所有服务器的带宽价格全部跳楼跳水,降幅简直不忍直视了,还没有见过这么便宜的独立服务器。根据不同的机房,价格也是不一样的。大带宽、不限流量比较适合建站、数据备份、做下载、做流媒体、做CDN等多种业务。 官方网站:https://www.sharktech.net 付款方式:比特币、信用卡、PayPal、支付宝、西联汇款 以最贵的洛杉矶机器为例,配置表如...

修改密码为你推荐
怎么在qq空间里添加背景音乐如何在qq空间中添加背景音乐数码资源网哪个网站可以直接在线做照片?功能要齐全的`唱吧电脑版官方下载唱吧有没有电脑版的啊?唱吧电脑版官方下载电脑怎么安装唱吧,要能用的,请教教程,谢谢分词技术中文分词的应用怎么上传音乐如何上传音乐宽带接入服务器网络已连接,可无法连接到服务器为什么?网络已连接,可无法连接到服务Qzongqzong皮肤上怎样写字声母是什么什么是声母,什么是韵母网站排名靠前网站排名靠前是否就意味着运营成功?阐述原因
vps试用 asp虚拟主机 欧洲免费vps 已经备案域名 vmsnap3 账号泄露 web服务器的架设 电信托管 根服务器 美国凤凰城 lamp是什么意思 北京主机托管 时间服务器 apache启动失败 2016黑色星期五 webmin comodo cloudflare 丹弗润滑油 qq空间技术网 更多