已阅读5页,还剩5页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
单片机电子密码锁 (可以修改设置密码) 基于51单片机与 AT24C02与 LCD1602显示 其电路图连接如下: 本人已经用硬件实验,程序可用。正确 本程序特点:装载后读者可以自改密码,然后需要再次载入程序时: 可以把主程序 aa=Sendstring(0xa0,1,table2,6);这一句去掉。 然后程序的电子锁密码就是你个人设置的密码。 程序代码为: #include #include #include #define uchar unsigned char #define uint unsigned int #define LCDIO P2 #define delay4us() _nop_();_nop_();_nop_();_nop_(); uchar buffer6=0; sbit sda=P37; sbit scl=P36; sbit beep=P35; bit flag=0,aa; /用户蹲渊义定时溢出标志位 uchar DSY_BUFFER16= ; uchar DSY_BUFFER116= ; uchar Userpassword6=0; sbit rs=P04; sbit rd=P03; sbit lcden=P02; sbit led=P30; uchar code table2=123456; uchar code table=Your Password.; void delayms(uint z) uint x,y; for(x=z;x0;x-) for(y=110;y0;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_com(com); for(i=0;i16;i+) write_date(pi); void init_lcd() lcden=0; write_com(0x38); write_com(0x0c); write_com(0x06); write_com(0x01); write_com(0x80); 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; void 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;i8;i+) scl=1; rd=1; rd|=sda; delay4us(); scl=0; delay4us(); scl=0; delay4us(); return rd; uchar sendbyte(uchar wd) uchar i; bit ack0; for(i=0;i8;i+) sda=(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 slave,uchar subaddr,uchar *buffer,uchar n) uchar i; start(); if(!sendbyte(slave) return 0; if(!sendbyte(subaddr) return 0; start(); if(!sendbyte(slave+1) return 0; for(i=0;in-1;i+) bufferi=recbyte(); ack(); buffern-1=recbyte(); noack(); stop(); return 1; uchar Sendstring(uchar slave,uchar subaddr,uchar *buffer,uchar n) uchar i; start(); if(!sendbyte(slave) return 0; if(!sendbyte(subaddr) return 0; for(i=0;in;i+) if(!sendbyte(bufferi) return 0; stop(); return 1; void clear_password() uchar i; for(i=0;i6;i+) Userpasswordi= ; for(i=0;i40x0F; 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_lcd(); delayms(5); aa=Sendstring(0xa0,1,table2,6); delayms(5); aa=Recstring(0xa0,1,buffer,6); delayms(10); P1=0x0f; while(1) if(P1!=0x0f) temp=Keys_Scan(); switch(temp) case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: case 8: case 9: if (i=5) /密码限制在 6 位以内 Userpasswordi=temp; DSY_BUFFERi=*; Display_String(DSY_BUFFER,0xc0); i+; break; case 10: /按 A键开锁 for(k=0;k6;k+) if(bufferk=(Userpasswordk+48) flag=1; else flag=0; if (flag=1) flag=0; i=0; led=0; /点亮 LED clear_password(); Display_String(OPEN OK! ,0xc0); IS_valid_user = 1; j=0; else j+; led=1; /关闭 LED clear_password(); Display_String(ERROR!Have try ,0xc0); write_com(0xcf); write_date(0x30+j); IS_valid_user=0; i=0; break; case 11: /按 B键上锁 led=1; clear_password(); Display_String(table,0x80); Display_String(Lock OK! ,0xc0); i=0; IS_valid_user=0; break; case 12: /按 C 键设置新密码 /如果是合法用户则提示输入新密码 if ( !IS_valid_user) i=0; Display_String(No rights ! ,0xc0); delayms(1000); Display_String(Your Password.,0x80); Display_String(Lock OK! ,0xc0); else i=0; Display_String(New Password: ,0x80); Display_String( ,0xc0); break; case 13: /按 D 键保存新密码 if ( !IS_valid_user) i=0; Display_String(No rights ! ,0xc0); delayms(1000); Display_String(Your Password.,0x80); Display_String(Lock OK! ,0xc0); else i = 0; init(); delayms(5); for(k=0;k6;k+) Userpasswordk=Userpasswordk+48; aa=Sendstring(0xa0,1,Userpassword,6); delayms(5); aa=Recstring(0xa0,1,buffer,6); delayms(5); clear_password(); Display_String(table,0x00); Display_String(Password Saved! ,0xc0); delayms(1000); Display_String(Do lock agian ? ,0xc0); break; case 14: /按 E
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 全国中小企业股份转让系统两网公司及退市公司
- 信息技术背景下高中物理教学情境创设的策略分析
- 部编版七年级下学期语文第8课《土地的誓言》同步练习
- 2024年广东省中考英语模拟最后一卷试题(含答案+作文范文)
- 续写接话的构思与设计-2024年高考英语一轮复习读后续写
- 煤制甲醇行业相关投资计划提议范本
- 物流仓储相关行业投资规划报告范本
- 实验电炉相关行业投资方案范本
- 2024年河南省南阳市镇平县中考语文一模试卷(含解析)
- 智能制造装备项目节能分析报告
- 【总结】2021年证券从业考试证券发行与承销考点总结三色记忆法
- 生本教育下初中语文阅读教学初探
- 衍纸艺术在装饰设计中的运用表现
- 人社部:正式取消!污水处理工职业资格证书!
- 铝合金锭——成分性能对比
- 高中化学-硫及其化合物教学设计学情分析教材分析课后反思
- 2020年广东省广州市中考生物试卷
- 道路工程档案管理办法
- 孔繁森精神PPT课件
- 2020无症状高尿酸血症的管理共识要点(完整版)
- 青少年常见心理问题及对策
评论
0/150
提交评论