51单片机设置密码程序.doc

51单片机设置密码程序，通过1602显示屏来显示相应的信息。输入密码正确时显示Welcome to use!，否则显示Password error!#include#define uint unsigned int#define uchar unsigned charsbit en=P34;sbit rs=P35;/用于控制1602sbit rw=P36;sbit IRIN = P32;/红外接收器数据线IO口sbit dula=P26;sbit wela=P27;/用于控制晶体管uchar IRCOM4=0;/定义数组IRCOM，分别装解码后得到的数据/IRCOM0 低8位地址码/IRCOM1 高8位地址码/IRCOM2 8位数据码/IRCOM3 8位数据码的反码uchar code table=Input password;uchar code table1=Welcome to use!;uchar code table2=Password error!;uchar code num=0123456789;uchar code mima=06680200668;/设定密码void delay(uint z)uint x,y;for(x=z;x0;x-)for(y=110;y0;y-);/大约是1ms，因为单片机的时钟周期为11.0592mhz。void delay014ms(unsigned char x) /x*0.14MS STC10F04延时约0.15MSuchar i;while(x-)for(i=0;i15;i+) /13;/初始化/void IR_init(void)EA=1;EX0=1; /允许总中断中断,使能 INT0 外部中断IT0=1; /触发方式为脉冲负边沿触发 IRIN=1;/I/O口初始化void write_com(uchar com)rs=0; /指令P0=com; /写指令函数delay(5);en=1;delay(5);en=0;void write_data(uchar dat)rs=1; /数据P0=dat; /写指令函数delay(5); en=1;delay(5);en=0;void init()wela=0;dula=0; /用于关闭晶体管，因为都是用P0en=0; /初始时使能为0rw=0;write_com(0x38); /显示屏模式设置为1602方案write_com(0x0c); write_com(0x0f); /显示开关/光标设置write_com(0x01); /清屏write_com(0x80); /指针置零void main()uchar i;IR_init();init();for(i=0;i14;i+)write_data(tablei);write_com(0xc0);while(1); /解码过程/void IR_CODE(void) interrupt 0 /在外部中断子程序中解码uchar j,k,N=0,n=0;uchar h,m;EX0 = 0; /防止干扰delay014ms(15);/延时2.1msif (IRIN=1)/2.1ms能够检测出各种错误信号 EX0 =1;return; /确认IR信号出现while (!IRIN); /等IR变为高电平，跳过9ms的前导低电平信号。delay014ms(18);/2.25ms4.5ms之间能够检测出引导码信号if(!IRIN)EX0 =1;return;/高电平后开始检测高电平持续的时间以确定是0还是1/for (j=0;j4;j+) /收集四组数据for (k=0;k=30) EX0=1;return; /0.14ms计数过长自动离开? /高电平计数完毕IRCOMj=IRCOMj 1; /数据最高位补0if (N=8) IRCOMj = IRCOMj | 0x80; /数据最高位补1N=0;if (IRCOM2!=IRCOM3) /不等的话表示解码失败IRCOM4=0;EX0=1;return;switch(IRCOM2) /判断第三个数码值case 0x16:n=0;write_data(num0);break;/0case 0x0c:n=1;write_data(num1);break;/1 case 0x18:n=2;write_data(num2);break;/2case 0x5e:n=3;write_data(num3);break;/3case 0x08:n=4;write_data(num4);break;/4case 0x1c:n=5;write_data(num5);break;/5case 0x5a:n=6;write_data(num6);break;/6case 0x42:n=7;write_data(num7);break;/7case 0x52:n=8;write_data(num8);break;/8case 0x4a:n=9;write_data(num9);break;/9case 0x43:n=10;goto loop;break;/playdefault:break;if(h=11)h+; /超过范围判断为错if(mimam=numn)h+;m+; loop:/确认时跳过上面的判断，防止意外if(n=10)write_com(0x01);write_com(0x80);write_com(0x