密码(完整版)单片机电子密码锁(可以修改设置密码)——基于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);

半月湾($59.99/年),升级带宽至200M起步 三网CN2 GIA线路

在前面的文章中就有介绍到半月湾Half Moon Bay Cloud服务商有提供洛杉矶DC5数据中心云服务器,这个堪比我们可能熟悉的某服务商,如果我们有用过的话会发现这个服务商的价格比较贵,而且一直缺货。这里,于是半月湾服务商看到机会来了,于是有新增同机房的CN2 GIA优化线路。在之前的文章中介绍到Half Moon Bay Cloud DC5机房且进行过测评。这次的变化是从原来基础的年付49....

亚洲云-浙江高防BGP,至强铂金8270,提供自助防火墙管理,超大内存满足你各种需求

官方网站:点击访问亚洲云官网618活动方案:618特价活动(6.18-6.30)全站首月活动月底结束!地区:浙江高防BGPCPU:至强铂金8270主频7 默频3.61 睿频4.0核心:8核(最高支持64核)内存:8G(最高支持128G)DDR4 3200硬盘:40G系统盘+80G数据盘带宽:上行:20Mbps/下行:1000Mbps防御:100G(可加至300G)防火墙:提供自助 天机盾+金盾 管...

TmhHost暑假活动:高端线路VPS季付8折优惠,可选洛杉矶CN2 GIA/日本软银/香港三网CN2 GIA/韩国双向CN2等

tmhhost怎么样?tmhhost正在搞暑假大促销活动,全部是高端线路VPS,现在直接季付8折优惠,活动截止时间是8月31日。可选机房及线路有美国洛杉矶cn2 gia+200G高防、洛杉矶三网CN2 GIA、洛杉矶CERA机房CN2 GIA,日本软银(100M带宽)、香港BGP直连200M带宽、香港三网CN2 GIA、韩国双向CN2。点击进入:tmhhost官方网站地址tmhhost优惠码:Tm...

修改密码为你推荐
找不到光驱为什么我的电脑光驱找不到?96155北京公积金96155客户服务电话,怎么一步一步进到修改还款额度的地方?公章制作制作公章尺寸标准大小,字体,字号?手机区号手机号码+86是移动区号还是联通的区号?ps抠图技巧photoshop最基本的抠图方法和技巧!网易公开课怎么下载如何下载网易公开课商标注册查询官网怎么查商标有没有注册虚拟专用网拨号网络与虚拟专用网的区别office2007简体中文版如何激活office2007 professional简体中文专业版啊?南北互通什么叫网络运营商之间的互联互通啊????跟服务器有关吗??
域名买卖 厦门域名注册 hostmonster wavecom 外贸主机 毫秒英文 佛山高防服务器 umax120 服务器监测 如何注册阿里云邮箱 空间租赁 带宽租赁 我的世界服务器ip 免费网络 atom处理器 阿里云邮箱申请 大化网 石家庄服务器 godaddyssl register.com 更多