电子密码锁C程序

1、#include#define uchar unsigned char#define uint unsigned intuchar code table1=THE PASSWORD;uchar code table2=INPUT AGAIN;uchar code table3=OPEN;uchar code table4=ERROR;uchar code table5=SORRY;uchar code table6=TOMORROW AGAIN;uchar password=2,0,1,1,1,1;uchar x=0,shuru6;sbit lcdrs=P00;sbit lcden=P02;s

2、bit lcdrw=P01;void delay(uint x) /延时子程序uint i,j;for(i=x;i0;i-) for(j=120;j0;j-); void write_com(char com) /写指令lcdrs=0;P2=com;delay(5);lcden=1;delay(5);lcden=0;void write_data(uchar dat) /写数据lcdrs=1;P2=dat;delay(5);lcden=1;delay(5);lcden=0;void init() /初始化函数lcden=0;write_com(0x38);write_com(0x0c);wri

3、te_com(0x06);write_com(0x01);uchar keyscan(void) /键盘扫描函数，使用行列反转扫描法 uchar cord_h,cord_l; /行列值中间变量 P3=0xf0; /行线输出全为0 cord_h=P3&0xf0; /读入列线值 if(cord_h!=0xf0) /先检测有无按键按下 delay(10); /去抖 if(P3&0xf0)!=0xf0) cord_h=P3&0xf0; /读入列线值 P3=cord_h|0x0f; /输出当前列线值 cord_l=P3&0x0f; /读入行线值 while(P3&0x0f)!=0x0f);/等待松开并输

4、出 return(cord_h+cord_l); /键盘最后组合码值 return(0xff); /返回该值uchar KeyPro(void) /键盘检测函数 switch(keyscan() case 0xee:return 7;break;/7 按下相应的键显示相对应的码值 case 0xde:return 8;break;/8 case 0xbe:return 9;break;/9/ case 0x7e: case 0xed:return 4;break;/4 case 0xdd:return 5;break;/5 case 0xbd:return 6;break;/6/ case 0

5、x7d: case 0xeb:return 1;break;/1 case 0xdb:return 2;break;/2 case 0xbb:return 3;break;/3/ case 0x7b: case 0xe7:return 0;break;/0/ case 0xd7:/ case 0xb7:/ case 0x77: default:return 0xff;break; / 主 函 数 /void main()uchar num,mima,wrong;lcdrw=0;init();write_com(0x82);for(num=0;num12;num+)write_data(tabl

6、e1num);delay(1);while(1)mima=KeyPro();write_com(0xc4+x);write_com(0x0f);if(mima!=0xff)&(x6)write_data(*);shurux=mima;x+;if(x=6)x=0;if(shuru0=password0&shuru1=password1&shuru2=password2& / 判断密码是否正确shuru3=password3&shuru4=password4&shuru5=password5)/ write_com(0x01);delay(1);write_com(0x86);for(num=0;

7、num4;num+)write_data(table3num);delay(1);write_com(0x0c);while(1);elsewrong+;/ 如果密码输入错误三次if(wrong=3) / 则不能再次输入/write_com(0x01); /delay(1);/write_com(0x85);/for(num=0;num5;num+)/write_data(table5num); /delay(1); / /write_com(0xc1); /for(num=0;num14;num+) / /write_data(table6num); /delay(1); / /write_com(0x0c);while(1);write_com(0x01);delay(1);write_com(0x85);for(num=0;num5;num+)write_data(table4num);delay(