加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

基于51单片机的红外遥控密码锁设计源程序

(2018-07-13 22:24:08)
标签:

基于51单片机

红外遥控密码锁

密码锁设计

        基于51单片机的红外遥控密码锁设计源程序

#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;
}        

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
  {
  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
  {
  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
       
                m=0;
                f=1;
                return;
         }       //找到启始码
         if(f==1)
        {
                if(Tc>Inum1&&Tc
                {
                        Im[m/8]=Im[m/8]>>1|0x80; m++; 
                }
            if(Tc>Inum2&&Tc
                {
                        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;   //取码完成后判断读码是否正确
                }          //准备读下一码   
        }
}


0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有