1602电子密码锁c程序

本文格式为Word版，下载可任意编辑——1602电子密码锁c程序#include

#defineucharunsignedchar#defineuintunsignedintsbitlcdrs=P2^4;//液晶数据、指令端sbitwr=P2^5;//读、写端sbitlcden=P2^6;//液晶使能端sbitspeaker=P2^3;//扬声器ucharcodetable[]={\ucharcodetable1[]={\ucharcodetable2[]={\welcome!!!\ucharcodetable4[]={\ucharcodetable5[]={\ucharcodetable6[]={\fuckyou!\ucharcodetable7[]={\getout!!\ucharcodetable8[]={\setsucceed\bitflag,flag1,flag2,flag3,flag4,flag5,rst;ucharkey,count;voiddelayms(uintx){uinti,j;for(i=x;i>0;i--)//延时函数for(j=110;j>0;j--);}

voidwrite_com(ucharcom)//液晶写指令函数{wr=0;lcdrs=0;P0=com;delayms(5);lcden=1;delayms(5);lcden=0;}

voidwrite_data(uchardate)//液晶写数据函数{wr=0;lcdrs=1;P0=date;delayms(5);lcden=1;delayms(5);lcden=0;}//液晶初始化函数voidlcdinit()

{lcden=0;write_com(0x38);write_com(0x06);write_com(0x0f);write_com(0x01);}

voidkeyscan()//键盘扫描函数{uchartemp;P1=0xfe;if(P1!=0xfe){delayms(8);if(P1!=0xfe){temp=0xf0switch(temp){case0xe0:key=0;flag5=1;break;?*?字符，把对应的数字放入数组中case0xd0:key=1;flag5=1;break;进数组，只是为了防止删减密码case0xb0:key=2;flag5=1;break;正确的密码中case0x70:key=3;flag5=1;break;}while(P1!=0xfe);write_data('*');count++;}}P1=0xfd;if(P1!=0xfd){delayms(8);if(P1!=0xfd){temp=0xf0switch(temp){case0xe0:key=4;flag5=1;break;

//数字键盘按下时显示//flag5为1时才能把数据放//时把key的值装进已输入

case0xd0:key=5;flag5=1;break;case0xb0:key=6;flag5=1;break;case0x70:key=7;flag5=1;break;}while(P1!=0xfd);write_data('*');count++;}}P1=0xfb;if(P1!=0xfb){delayms(8);if(P1!=0xfb){temp=0xf0switch(temp){case0xe0:key=8;write_data('*');flag5=1;count++;break;case0xd0:key=9;write_data('*');flag5=1;count++;break;case0xb0:flag=1;break;case0x70:rst=1;break;}while(P1!=0xfb);}}P1=0xf7;if(P1!=0xf7){delayms(8);if(P1!=0xf7){temp=0xf0switch(temp){case0xe0:switch(count){case1:write_com(0xc5);write_data('');write_com(0xc5);break;当按下clean键时，往前一个地址显示空字符，case2:write_com(0xc6);write_data('');write_com(0xc6);break;再把指针指回前一个地址case3:write_com(0xc7);write_data('');write_com(0xc7);break;case4:write_com(0xc8);write_data('');write_com(0xc8);break;

////

case5:write_com(0xc