基于51单片机的密码锁设计(2)

temp=P2&0xf0; while(temp!=0xf0) {

switch(temp) { case 0xe0:ch='4';break; case 0xd0:ch='5';break; case 0xb0:ch='6';break; default:ch=p;break; }

while(temp!=0xf0) { temp=P2; temp=temp&0xf0; } }

P2=0xfb; delay(1);

temp=P2&0xf0; while(temp!=0xf0) {

switch(temp)

10

单片机原理及系统课程设计报告

{ case 0xe0:ch='1';break; case 0xd0:ch='2';break; case 0xb0:ch='3';break; default:ch=p;break; }

while(temp!=0xf0) { temp=P2; temp=temp&0xf0; } }

P2=0xf7; delay(1);

temp=P2&0xf0; while(temp!=0xf0) {

switch(temp) { case 0xe0:ch='A';break; case 0xd0:ch='0';break; case 0xb0:ch='B';break; default:ch=p;break; }

while(temp!=0xf0) { temp=P2; temp=temp&0xf0; } }

return ch; }

void wcom(uchar com) {

rs=0; P3=com;

delay(1); //写命令延时可以为1 en=1;

delay(1); //写命令延时可以为1 en=0; }

void wdat(uchar dat)

11

单片机原理及系统课程设计报告

{

rs=1; P3=dat;

delay(1); //此处写数据延时可以为1 en=1;

delay(4); //此处写数据延时至少为4 en=0; }

void init() {

en=0;

wcom(0x38); wcom(0x0c); wcom(0x06); wcom(0x01); }

void error() {

char m2; wcom(0xc6);

for(m2=0;m2<5;m2++) {

wdat(table0[m2]); } }

void open() {

char m2; wcom(0xc6);

for(m2=0;m2<4;m2++) {

wdat(table1[m2]); } }

void pass() {

char m2; wcom(0x80);

for(m2=0;m2<9;m2++) {

wdat(table2[m2]); }

12

单片机原理及系统课程设计报告

}

change(int m) {

delay(500); wcom(m); wdat('*'); }

main() {

rw=0; ledg=0; ledr=0; relay=0; buzz=0; init(); delay(5); pass();

wcom(0x89);

while(keyscan()==p) {

delay(3); keyscan(); }

wdat(keyscan()); n0=keyscan(); change(0x89); delay(10); ch=p;

while(keyscan()==p) {

delay(3); keyscan(); }

wdat(keyscan()); n1=keyscan(); change(0x8a); ch=p;

while(keyscan()==p) {

delay(3); keyscan(); }

13

单片机原理及系统课程设计报告

wdat(keyscan()); n2=keyscan(); change(0x8b); ch=p;

while(keyscan()==p) {

delay(3); keyscan(); }

wdat(keyscan()); n3=keyscan(); change(0x8c); ch=p;

while(keyscan()==p) {

delay(3); keyscan(); }

wdat(keyscan()); n4=keyscan(); change(0x8d); ch=p;

while(keyscan()==p) {

delay(3); keyscan(); }

wdat(keyscan()); n5=keyscan(); change(0x8e);

if(n0=='2'&&n1=='0'&&n2=='1'&&n3=='4'&&n4=='1'&&n5=='9') {

int m3=1; open(); relay=1; delay(3000); relay=0; while(m3) { int m4,m5; ledg=0; for(m4=200;m4>0;m4--)

14

单片机原理及系统课程设计报告

{ keyscan(); if(keyscan()=='A') { m4=0; m3=0; } } ledg=1; if(m3!=0) { for(m5=200;m5>0;m5--) { keyscan(); if(keyscan()=='A') { m3=0; } } } } } else {

ledr=1; error(); buzz=1; delay(5000); }

15

单片机原理及系统课程设计报告

附录2Proteus仿真

16