|
单片机的密码锁设计程序带红外遥控功能的
电路原理图如下:
制作出来的实物图:
单片机源码:
- #include <REG52.h>
- #include<intrins.h>
- #define LCM_Data P0
- #define uchar unsigned char
- #define uint unsigned int
- //#define w 6 //定义密码位数
- //时间计算
- #define Imax 14000 //此处为晶振为11.0592时的取值,
- #define Imin 8000 //如用其它频率的晶振时,
- #define Inum1 1450 //要改变相应的取值。
- #define Inum2 700
- #define Inum3 3000
- sbit lcd1602_rs=P2^5;
- sbit lcd1602_rw=P2^6;
- sbit lcd1602_en=P2^7;
- sbit Scl=P3^4; //24C02串行时钟
- sbit Sda=P3^5; //24C02串行数据
- sbit ALAM = P2^1; //报警
- sbit KEY = P3^6; //开锁
- sbit open_led=P2^2; //开锁指示灯
- bit operation=0; //操作标志位
- bit pass=0; //密码正确标志
- bit ReInputEn=0; //重置输入充许标志
- bit s3_keydown=0; //3秒按键标志位
- bit key_disable=0; //锁定键盘标志
- unsigned char countt0,second; //t0中断计数器,秒计数器
- //解码变量
- unsigned char Im[4]={0x00,0x00,0x00,0x00};
- //全局变量
- uchar f;
- unsigned char m,Tc;
- unsigned char IrOK;
- //void Delay5Ms(void);
- unsigned char code a[]={0xFE,0xFD,0xFB,0xF7}; //控盘扫描控制表
- unsigned char code start_line[] = {"password: "};
- unsigned char code name[] = {"===Coded Lock==="}; //显示名称
- unsigned char code Correct[] = {" correct "}; //输入正确
- unsigned char code Error[] = {" error "}; //输入错误
- unsigned char code codepass[] = {" pass "};
- unsigned char code LockOpen[] = {" open "}; //OPEN
- unsigned char code SetNew[] = {"SetNewWordEnable"};
- unsigned char code Input[] = {"input: "}; //INPUT
- unsigned char code ResetOK[] = {"ResetPasswordOK "};
- unsigned char code initword[] = {"Init password..."};
- unsigned char code Er_try[] = {"error,try again!"};
- unsigned char code again[] = {"input again "};
- unsigned char InputData[6]; //输入密码暂存区
- unsigned char CurrentPassword[6]={1,3,1,4,2,0}; //当前密码值
- unsigned char TempPassword[6];
- unsigned char N=0; //密码输入位数记数
- unsigned char ErrorCont; //错误次数计数
- unsigned char CorrectCont; //正确输入计数
- unsigned char ReInputCont; //重新输入计数
- unsigned char code initpassword[6]={0,0,0,0,0,0};
- //=====================5ms延时==============================
- void Delay5Ms()
- {
- unsigned int TempCyc = 5552;
- while(TempCyc--);
- }
- //===================400ms延时==============================
- void Delay400Ms()
- {
- unsigned char TempCycA = 5;
- unsigned int TempCycB;
- while(TempCycA--)
- {
- TempCycB=7269;
- while(TempCycB--);
- }
- }
- //=============================================================================================
- //================================24C02========================================================
- //=============================================================================================
- void mDelay(uint t) //延时
- {
- uchar i;
- while(t--)
- {
- for(i=0;i<125;i++)
- {;}
- }
- }
- void Nop() //空操作
- {
- _nop_();
- _nop_();
- _nop_();
- _nop_();
- }
- /*起始条件*/
- void Start(void)
- {
- Sda=1;
- Scl=1;
- Nop();
- Sda=0;
- Nop();
- }
- /*停止条件*/
- void Stop(void)
- {
- Sda=0;
- Scl=1;
- Nop();
- Sda=1;
- Nop();
- }
- /*应答位*/
- void Ack(void)
- {
- Sda=0;
- Nop();
- Scl=1;
- Nop();
- Scl=0;
- }
- /*反向应答位*/
- void NoAck(void)
- {
- Sda=1;
- Nop();
- Scl=1;
- Nop();
- Scl=0;
- }
- /*发送数据子程序,Data为要求发送的数据*/
- void Send(uchar Data)
- {
- uchar BitCounter=8;
- uchar temp;
- do
- {
- temp=Data;
- Scl=0;
- Nop();
- if((temp&0x80)==0x80)
- Sda=1;
- else
- Sda=0;
- Scl=1;
- temp=Data<<1;
- Data=temp;
- BitCounter--;
- }
- while(BitCounter);
- Scl=0;
- }
- /*读一字节的数据,并返回该字节值*/
- uchar Read()
- {
- uchar temp=0;
- uchar temp1=0;
- uchar BitCounter=8;
- Sda=1;
- do{
- Scl=0;
- Nop();
- Scl=1;
- Nop();
- if(Sda)
- temp=temp|0x01;
- else
- temp=temp&0xfe;
- if(BitCounter-1)
- {
- temp1=temp<<1;
- temp=temp1;
- }
- BitCounter--;
- }
- while(BitCounter);
- return(temp);
- }
- void WrToROM(uchar Data[],uchar Address,uchar Num)
- {
- uchar i;
- uchar *PData;
- PData=Data;
- for(i=0;i<Num;i++)
- {
- Start();
- Send(0xa0);
- Ack();
- Send(Address+i);
- Ack();
- Send(*(PData+i));
- Ack();
- Stop();
- mDelay(20);
- }
- }
- void RdFromROM(uchar Data[],uchar Address,uchar Num)
- {
- uchar i;
- uchar *PData;
- PData=Data;
- for(i=0;i<Num;i++)
- {
- Start();
- Send(0xa0);
- Ack();
- Send(Address+i);
- Ack();
- Start();
- Send(0xa1);
- Ack();
- *(PData+i)=Read();
- Scl=0;
- NoAck();
- Stop();
- }
- }
- //==================================================================================================
- //=======================================LCD1602====================================================
- //==================================================================================================
- #define yi 0x80 //LCD第一行的初始位置,因为LCD1602字符地址首位D7恒定为1(100000000=80)
- #define er 0x80+0x40 //LCD第二行初始位置(因为第二行第一个字符位置地址是0x40)
- //----------------延时函数,后面经常调用----------------------
- void delay(uint xms)//延时函数,有参函数
- {
- uint x,y;
- for(x=xms;x>0;x--)
- for(y=110;y>0;y--);
- }
- //--------------------------写指令---------------------------
- void write_1602com(uchar com)//****液晶写入指令函数****
- {
- lcd1602_rs=0;//数据/指令选择置为指令
- lcd1602_rw=0; //读写选择置为写
- P0=com;//送入数据
- delay(1);
- lcd1602_en=1;//拉高使能端,为制造有效的下降沿做准备
- delay(1);
- lcd1602_en=0;//en由高变低,产生下降沿,液晶执行命令
- }
- //-------------------------写数据-----------------------------
- void write_1602dat(uchar dat)//***液晶写入数据函数****
- {
- lcd1602_rs=1;//数据/指令选择置为数据
- lcd1602_rw=0; //读写选择置为写
- P0=dat;//送入数据
- delay(1);
- lcd1602_en=1; //en置高电平,为制造下降沿做准备
- delay(1);
- lcd1602_en=0; //en由高变低,产生下降沿,液晶执行命令
- }
- //-------------------------初始化-------------------------
- void lcd_init()
- {
- write_1602com(0x01);//清显示
- write_1602com(0x38);//设置液晶工作模式,意思:16*2行显示,5*7点阵,8位数据
- write_1602com(0x0c);//开显示不显示光标
- write_1602com(0x06);//整屏不移动,光标自动右移
- }
- //========================================================================================
- //=========================================================================================
- //==============将按键值编码为数值=========================
- unsigned char coding(unsigned char m1,unsigned char hh)
- {
- unsigned char k;
- if(IrOK==1)
- {
- IrOK=0;
- switch(m1)
- {
- case (0x0c): k=1;break;
- case (0x18): k=2;break;
- case (0x5e): k=3;break;
- // case (0xff): k='A';break; //
- case (0x08): k=4;break;
- case (0x1c): k=5;break;
- case (0x5a): k=6;break;
- // case (0x82): k='B';break; //
- case (0x42): k=7;break;
- case (0x52): k=8;break;
- case (0x4a): k=9;break;
- // case (0x84): k='C';break; //
- case (0x43): k='*';break; //撤销
- case (0x16): k=0;break;
- case (0x15): k='#';break; //确认键
- case (0x0d): k='D';break; //重设密码
- case (0x45): k='A';break; //
- case (0x47): k='A';break; //
- case (0x44): k='A';break; //
- case (0x40): k='A';break; //
- case (0x07): k='A';break; //
- case (0x09): k='A';break; //
- case (0x19): k='A';break; //
- // default:;
- }
- }
- else
- {
- switch(hh)
- {
- case (0x11): k=1;break;
- case (0x21): k=2;break;
- case (0x41): k=3;break;
- case (0x81): k='A';break;
- case (0x12): k=4;break;
- case (0x22): k=5;break;
- case (0x42): k=6;break;
- case (0x82): k='B';break;
- case (0x14): k=7;break;
- case (0x24): k=8;break;
- case (0x44): k=9;break;
- case (0x84): k='C';break;
- case (0x18): k='*';break;
- case (0x28): k=0;break;
- case (0x48): k='#';break;
- case (0x88): k='D';break;
- // default:;
- }
- }
- return(k);
- }
- //=====================按键检测并返回按键值===============================
- unsigned char keynum()
- {
- unsigned char row,col,i;
- P1=0xf0;
- if((P1&0xf0)!=0xf0)
- {
- Delay5Ms();
- Delay5Ms();
- if((P1&0xf0)!=0xf0)
- {
- row=P1^0xf0; //确定行线
- i=0;
- P1=a[i]; //精确定位
- while(i<4)
- {
- if((P1&0xf0)!=0xf0)
- {
- col=~(P1&0xff); //确定列线
- break; //已定位后提前退出
- }
- else
- {
- i++;
- P1=a[i];
- }
- }
- }
- else
- {
- return 0;
- }
-
- while((P1&0xf0)!=0xf0);
- return (row|col); //行线与列线组合后返回
- }
- else return 0; //无键按下时返回0
- }
- //=======================一声提示音,表示有效输入========================
- void OneAlam()
- {
- ALAM=0;
- Delay5Ms();
- ALAM=1;
- }
- //========================二声提示音,表示操作成功========================
- void TwoAlam()
- {
- ALAM=0;
- Delay5Ms();
- ALAM=1;
- Delay5Ms();
- ALAM=0;
- Delay5Ms();
- ALAM=1;
- }
- //========================三声提示音,表示错误========================
- void ThreeAlam()
- {
- ALAM=0;
- Delay5Ms();
- ALAM=1;
- Delay5Ms();
- ALAM=0;
- Delay5Ms();
- ALAM=1;
- Delay5Ms();
- ALAM=0;
- Delay5Ms();
- ALAM=1;
- }
- //=====================显示输入的N个数字,用H代替以便隐藏============================
- void DisplayOne()
- {
- // DisplayOneChar(9+N,1,'*');
- write_1602com(yi+5+N);
- write_1602dat('*');
- }
- //=======================显示提示输入=========================
- void DisplayChar()
- {
- unsigned char i;
- if(pass==1)
- {
- //DisplayListChar(0,1,LockOpen);
- write_1602com(er);
- for(i=0;i<16;i++)
- {
- write_1602dat(LockOpen[i]);
- }
- }
- else
- {
- if(N==0)
- {
- //DisplayListChar(0,1,Error);
- write_1602com(er);
- for(i=0;i<16;i++)
- {
- write_1602dat(Error[i]);
- }
- }
- else
- {
- //DisplayListChar(0,1,start_line);
- write_1602com(er);
- for(i=0;i<16;i++)
- {
- write_1602dat(start_line[i]);
- }
- }
- }
- }
- void DisplayInput()
- {
- unsigned char i;
- if(CorrectCont==1)
- {
- //DisplayListChar(0,0,Input);
- write_1602com(er);
- for(i=0;i<16;i++)
- {
- write_1602dat(Input[i]);
- }
- }
- }
- //========================重置密码==================================================
- //==================================================================================
- void ResetPassword()
- {
- unsigned char i;
- unsigned char j;
- if(pass==0)
- {
- pass=0;
- DisplayChar();
- ThreeAlam();
- }
- else
- {
- if(ReInputEn==1)
- {
- if(N==6)
- {
- ReInputCont++;
- if(ReInputCont==2)
- {
- for(i=0;i<6;)
- {
- if(TempPassword[i]==InputData[i]) //将两次输入的新密码作对比
- i++;
- else
- {
- //DisplayListChar(0,1,Error);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(Error[j]);
- }
- ThreeAlam(); //错误提示
- pass=0;
- ReInputEn=0; //关闭重置功能,
- ReInputCont=0;
- DisplayChar();
- break;
- }
- }
- if(i==6)
- {
- //DisplayListChar(0,1,ResetOK);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(ResetOK[j]);
- }
- TwoAlam(); //操作成功提示
- WrToROM(TempPassword,0,6); //将新密码写入24C02存储
- ReInputEn=0;
- }
- ReInputCont=0;
- CorrectCont=0;
- }
- else
- {
- OneAlam();
- //DisplayListChar(0, 1, again); //显示再次输入一次
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(again[j]);
- }
- for(i=0;i<6;i++)
- {
- TempPassword[i]=InputData[i]; //将第一次输入的数据暂存起来
- }
- }
- N=0; //输入数据位数计数器清零
- }
- }
- }
- }
- //=======================输入密码错误超过三过,报警并锁死键盘======================
- void Alam_KeyUnable()
- {
- P1=0x00;
- {
- ALAM=~ALAM;
- Delay5Ms();
- }
- }
- //=======================取消所有操作============================================
- void Cancel()
- {
- unsigned char i;
- unsigned char j;
- //DisplayListChar(0, 1, start_line);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(start_line[j]);
- }
- TwoAlam(); //提示音
- for(i=0;i<6;i++)
- {
- InputData[i]=0;
- }
- KEY=1; //关闭锁
- ALAM=1; //报警关
- operation=0; //操作标志位清零
- pass=0; //密码正确标志清零
- ReInputEn=0; //重置输入充许标志清零
- // ErrorCont=0; //密码错误输入次数清零
- CorrectCont=0; //密码正确输入次数清零
- ReInputCont=0; //重置密码输入次数清零
- open_led=1;
- s3_keydown=0;
- key_disable=0;
- N=0; //输入位数计数器清零
- }
- //==========================确认键,并通过相应标志位执行相应功能===============================
- void Ensure()
- {
- unsigned char i,j;
- RdFromROM(CurrentPassword,0,6); //从24C02里读出存储密码
- if(N==6)
- {
- if(ReInputEn==0) //重置密码功能未开启
- {
- for(i=0;i<6;)
- {
- if(CurrentPassword[i]==InputData[i])
- {
- i++;
- }
- else
- {
- i=7;
- ErrorCont++;
- if(ErrorCont>=3&&KEY==1) //错误输入计数达三次时,报警并锁定键盘
- {
- write_1602com(er);
- for(i=0;i<16;i++)
- {
- write_1602dat(Error[i]);
- }
- Alam_KeyUnable();
- TR0=1; //开启定时
- key_disable=1; //锁定键盘
- pass=0;
- break;
- }
- }
- }
- if(i==6)
- {
- CorrectCont++;
- if(CorrectCont==1) //正确输入计数,当只有一次正确输入时,开锁,
- {
- //DisplayListChar(0,1,LockOpen);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(LockOpen[j]);
- }
- TwoAlam(); //操作成功提示音
- ErrorCont=0;
- KEY=0; //开锁
- pass=1; //置正确标志位
- TR0=1; //开启定时
- open_led=0; //开锁指示灯亮
- for(j=0;j<6;j++) //将输入清除
- {
- InputData[i]=0;
- }
- }
- else //当两次正确输入时,开启重置密码功能
- {
- //DisplayListChar(0,1,SetNew);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(SetNew[j]);
- }
- TwoAlam(); //操作成功提示
- ReInputEn=1; //允许重置密码输入
- CorrectCont=0; //正确计数器清零
- }
- }
-
- else //=========================当第一次使用或忘记密码时可以用131420对其密码初始化============
- {
- if((InputData[0]==1)&&(InputData[1]==3)&&(InputData[2]==1)&&(InputData[3]==4)&&(InputData[4]==2)&&(InputData[5]==0))
- {
- WrToROM(initpassword,0,6); //强制将初始密码写入24C02存储
- //DisplayListChar(0,1,initword); //显示初始化密码
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(initword[j]);
- }
- TwoAlam();
- Delay400Ms();
- TwoAlam();
- N=0;
- }
- else
- {
- //DisplayListChar(0,1,Error);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(Error[j]);
- }
- ThreeAlam(); //错误提示音
- pass=0;
- }
- }
- }
- else //当已经开启重置密码功能时,而按下开锁键,
- {
- //DisplayListChar(0,1,Er_try);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(Er_try[j]);
- }
- ThreeAlam();
- }
- }
- else
- {
- //DisplayListChar(0,1,Error);
- write_1602com(er);
- for(j=0;j<16;j++)
- {
- write_1602dat(Error[j]);
- }
- ThreeAlam(); //错误提示音
- pass=0;
- }
-
- N=0; //将输入数据计数器清零,为下一次输入作准备
- operation=1;
- }
- //==============================主函数===============================
- void main()
- {
- unsigned char KEY,NUM;
- unsigned char i,j;
- P1=0xFF;
- EA=1;
- TMOD=0x11;
- IT1=1;//下降沿有效
- EX1=1;//外部中断1开
-
- TH0=0;//T0赋初值
- TL0=0;
- TR0=0;//t0开始计时
- TL1=0xB0;
- TH1=0x3C;
- ET1=1;
- TR1=0;
- Delay400Ms(); //启动等待,等LCM讲入工作状态
- lcd_init(); //LCD初始化
- write_1602com(yi);//日历显示固定符号从第一行第0个位置之后开始显示
- for(i=0;i<16;i++)
- {
- write_1602dat(name[i]);//向液晶屏写日历显示的固定符号部分
- }
- write_1602com(er);//时间显示固定符号写入位置,从第2个位置后开始显示
- for(i=0;i<16;i++)
- {
- write_1602dat(start_line[i]);//写显示时间固定符号,两个冒号
- }
- write_1602com(er+9); //设置光标位置
- write_1602com(0x0f); //设置光标为闪烁
- Delay5Ms(); //延时片刻(可不要)
- N=0; //初始化数据输入位数
- while(1)
- {
- if(key_disable==1)
- Alam_KeyUnable();
- else
- ALAM=1; //关报警
- KEY=keynum();
- if(KEY!=0||IrOK==1)
- {
- if(key_disable==1)
- {
- second=0;
- }
- else
- {
- NUM=coding(Im[2],KEY);
- {
- switch(NUM)
- {
- case ('A'): ; break;
- case ('B'): ; break;
- case ('C'): ; break;
- case ('D'): ResetPassword(); break; //重新设置密码
- case ('*'): Cancel(); break; //取消当前输入
- case ('#'): Ensure(); break; //确认键,
- default:
- {
- //DisplayListChar(0,1,Input);
- write_1602com(er);
- for(i=0;i<16;i++)
- {
- write_1602dat(Input[i]);
- }
- operation=0;
- if(N<6) //当输入的密码少于6位时,接受输入并保存,大于6位时则无效。
- {
- OneAlam(); //按键提示音
- //DisplayOneChar(6+N,1,'*');
- for(j=0;j<=N;j++)
- {
- write_1602com(er+6+j);
- write_1602dat('*');
- }
- InputData[N]=NUM;
- N++;
- }
- else //输入数据位数大于6后,忽略输入
- {
- N=6;
- break;
- }
- }
- }
- }
- }
- }
- }
- }
- //*********************************中断服务函数**************************************
- void time1_int() interrupt 3
- {
- TL1=0xB0;
- TH1=0x3C;
- countt0++;
- if(countt0==20)
- {
- countt0=0;
- second++;
- if(pass==1)
- {
- if(second==1)
- {
- open_led=1; //关指示灯
- TR1=0; //关定时器
- TL1=0xB0;
- TH1=0x3C;
- second=0;
- }
- }
- else
- {
- if(second==3)
- {
- TR1=0;
- second=0;
- key_disable=0;
- s3_keydown=0;
- TL1=0xB0;
- TH1=0x3C;
- }
- else
- TR1=1;
- }
-
- }
- }
- //外部中断解码程序_外部中断0
- void intersvr1() interrupt 2 using 1
- {
- TR0=1;
- Tc=TH0*256+TL0;//提取中断时间间隔时长
- TH0=0;
- TL0=0; //定时中断重新置零
- if((Tc>Imin)&&(Tc<Imax))
- {
- m=0;
- f=1;
- return;
- } //找到启始码
- if(f==1)
- {
- if(Tc>Inum1&&Tc<Inum3)
- {
- Im[m/8]=Im[m/8]>>1|0x80; m++;
- }
- if(Tc>Inum2&&Tc<Inum1)
- {
- Im[m/8]=Im[m/8]>>1; m++; //取码
- }
- if(m==32)
- {
- m=0;
- f=0;
- if(Im[2]==~Im[3])
- {
- IrOK=1;
- TR0=0;
- }
- else IrOK=0; //取码完成后判断读码是否正确
- } //准备读下一码
- }
- }
复制代码
|
评分
-
查看全部评分
|