单片机电子密码锁 (可以修改设置密码)――基于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);
桔子数据(徐州铭联信息科技有限公司)成立于2020年,是国内领先的互联网业务平台服务提供商。公司专注为用户提供低价高性能云计算产品,致力于云计算应用的易用性开发,并引导云计算在国内普及。目前公司研发以及运营云服务基础设施服务平台(IaaS),面向全球客户提供基于云计算的IT解决方案与客户服务,拥有丰富的国内BGP、双线高防、香港等优质的IDC资源。 公司一直秉承”以人为本、客户为尊、永...
易探云怎么样?易探云是国内一家云计算服务商家,致力香港服务器、国内外服务器租用及托管等互联网业务,目前主要地区为运作香港BGP、香港CN2、广东、北京、深圳等地区。易探云服务器均选择当下热门线路,比如CN2 GIA、BGP线路、CN2线路等,所有云主机支持月付,并且首月优惠,年付优惠,优惠后香港沙田云服务器/独立ip/香港CN2线路,每月仅18元,188元/年。点击进入:易探云官方网站地址1、香港...
想必我们有一些朋友应该陆续收到国内和国外的域名注册商关于域名即将涨价的信息。大概的意思是说从9月1日开始,.COM域名会涨价一点点,大约需要单个9.99美元左右一个。其实对于大部分用户来说也没多大的影响,毕竟如今什么都涨价,域名涨一点点也不要紧。如果是域名较多的话,确实增加续费成本和注册成本。今天整理看到Dynadot有发布新的八月份域名优惠活动,.COM首年注册依然是仅需48元,本次优惠活动截止...