自己做的基于單片機的密碼鎖設計（c語言設計）

時間：2011-08-16 21:08:01

關鍵字：密碼鎖 C語言基于單片機 BSP

手機看文章

掃描二維碼
隨時隨地手機看文章

[導讀]自己做的基于單片機的密碼鎖設計（c語言設計）系統(tǒng)說明該系統(tǒng)如圖所示使用了80C51單片機、普通鍵盤、排阻、1602液晶。該系統(tǒng)的功能： ①該系統(tǒng)輸入正確的密碼LED燈會亮（其實就是很多操作都可以，用LED只是代

自己做的基于單片機的密碼鎖設計（c語言設計）

系統(tǒng)說明

該系統(tǒng)如圖所示使用了80C51單片機、普通鍵盤、排阻、1602液晶。

該系統(tǒng)的功能：

①該系統(tǒng)輸入正確的密碼LED燈會亮（其實就是很多操作都可以，用LED只是代表作用，主要是操作簡單，效果明顯。）

②系統(tǒng)可以修改密碼；（系統(tǒng)斷電后重啟后必須用初始密碼（初始密碼是：000000）重新改密，當然修改的密碼可以與掉電前的一樣。）

具體操作：

①系統(tǒng)開機時顯示請輸入密碼的提示,直接輸入密碼#鍵確認

②系統(tǒng)會自動提醒密碼錯誤，數秒后系統(tǒng)會再次提醒重新輸密碼。

③在系統(tǒng)提醒輸入密碼的界面可以按*鍵修改密碼，系統(tǒng)會提醒輸入兩次密碼，并且會檢查兩次密碼是否相同。同則修改成功。否則在數秒后可以重新按*鍵修改。

④在改密前（就是按了*鍵后系統(tǒng)）會提醒身份識別，請輸入舊密碼，系統(tǒng)判斷舊密碼正確方可更改密碼。

源程序

#include<reg52.h>
#define uchar unsigned char
#define uint unsigned int
sbit lcdrs=P3^0;
sbit lcdrw=P3^1;
sbit lcden=P3^2;
sbit h1=P1^0;
sbit h2=P1^1;
sbit h3=P1^2;
sbit sa=P1^3;
sbit sb=P1^4;
sbit sc=P1^5;
sbit sd=P1^6;
sbit kd=P3^7;
uchar code table[]=" PLEASE INPUT ";
uchar code table1[]="CODE: ";
uchar code table2[]=" *****WIN*****";
uchar code table3[]=" PLEASE AFFIRM";
uchar code table4[]=" *****FAIL*****";
uchar code table5[]=" MODIFICATION";
uchar code table6[]=" IDENTITY LIMITS ";
uchar unm,M1,M2,M3,M4,M5,M6,sex,k1,k2,k3,k4,k5,k6,flge,flge1;
uchar q1,q2,q3,q4,q5,q6,w1,w2,w3,w4,w5,w6,g;

void delay(int z)
{
int x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}

void delay1(int z)
{
int x,y;
for(x=z;x>0;x--)
for(y=20000;y>0;y--);
}

void writen_com(uchar com) //1602寫命令
{
lcdrs=0;
P0=com;
delay(1);
lcden=1;
delay(1);
lcden=0;
}

void writen_dat(uchar dat) //1602寫數據
{
lcdrs=1;
P0=dat;
delay(1);
lcden=1;
delay(1);
lcden=0;
}

void main();

void cheak_mima()    //檢查第二次確認密碼是否與第一次相同
{
if(q1==w1)
{
if(q2==w2)
{
if(q3==w3)
{
   if(q4==w4)
   {
    if(q5==w5)
{
if(q6==w6)
{
    writen_com(0x01);
    writen_com(0x0f);
       writen_com(0x06);
       writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table5[unm]);
        delay(5);
      }
       writen_com(0x80+0x40+1);
        for(unm=0;unm<14;unm++)
         {
          writen_dat(table2[unm]);
    delay(5);
         }

        M1=w1;
  M2=w2;
  M3=w3;
  M4=w4;
  M5=w5;
  M6=w6;

  delay1(6);
  main();
   }
/*-----------------------------------*/   //密碼確認錯誤返回
   writen_com(0x01);
   writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table4[unm]);
        delay(5);
      }
   delay1(6);
   main();
    }
   writen_com(0x01);
   writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table4[unm]);
        delay(5);
      }
   delay1(6);
   main();
   }
      writen_com(0x01);
   writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table4[unm]);
        delay(5);
      }
   delay1(6);
   main();
}
      writen_com(0x01);
   writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table4[unm]);
        delay(5);
      }
   delay1(6);
   main();
}
      writen_com(0x01);
   writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table4[unm]);
        delay(5);
      }
   delay1(6);
   main();
}
      writen_com(0x01);
   writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table4[unm]);
        delay(5);
      }
   delay1(6);
   main();
}

/*------------------------------------*/ //第二次確認密碼

void affirm_code()
{
P1=0x07;
if(P1!=0x07)
delay(1);
if(P1!=0x07)
   {
    P1=0x77;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=1;break;
    case 1:w2=1;break;
    case 2:w3=1;break;
    case 3:w4=1;break;
    case 4:w5=1;break;
    case 5:w6=1;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=2;break;
    case 1:w2=2;break;
    case 2:w3=2;break;
    case 3:w4=2;break;
    case 4:w5=2;break;
    case 5:w6=2;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=3;break;
    case 1:w2=3;break;
    case 2:w3=3;break;
    case 3:w4=3;break;
    case 4:w5=3;break;
    case 5:w6=3;break;
   }
   sex++;
}
}
/*-------------------------------*/
    P1=0x6f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=4;break;
    case 1:w2=4;break;
    case 2:w3=4;break;
    case 3:w4=4;break;
    case 4:w5=4;break;
    case 5:w6=4;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=5;break;
    case 1:w2=5;break;
    case 2:w3=5;break;
    case 3:w4=5;break;
    case 4:w5=5;break;
    case 5:w6=5;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=6;break;
    case 1:w2=6;break;
    case 2:w3=6;break;
    case 3:w4=6;break;
    case 4:w5=6;break;
    case 5:w6=6;break;
   }
   sex++;
}
}
/*--------------------------------*/
    P1=0x5f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=7;break;
    case 1:w2=7;break;
    case 2:w3=7;break;
    case 3:w4=7;break;
    case 4:w5=7;break;
    case 5:w6=7;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=8;break;
    case 1:w2=8;break;
    case 2:w3=8;break;
    case 3:w4=8;break;
    case 4:w5=8;break;
    case 5:w6=8;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=9;break;
    case 1:w2=9;break;
    case 2:w3=9;break;
    case 3:w4=9;break;
    case 4:w5=9;break;
    case 5:w6=9;break;
   }
   sex++;
}
}
   /*-----------------------------------*/
    P1=0x3f;
    if(h2==0)  //0鍵掃描
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:w1=0;break;
    case 1:w2=0;break;
    case 2:w3=0;break;
    case 3:w4=0;break;
    case 4:w5=0;break;
    case 5:w6=0;break;
   }
   sex++;
}
}
if(h3==0)   //#鍵掃描
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
    while(!flge1)
    cheak_mima();
}
}
   }
}

/*--------------------------------------*/ //修改密碼void set_mima()
{
P1=0x07;
if(P1!=0x07)
delay(1);
if(P1!=0x07)
   {
    P1=0x77;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=1;break;
    case 1:q2=1;break;
    case 2:q3=1;break;
    case 3:q4=1;break;
    case 4:q5=1;break;
    case 5:q6=1;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=2;break;
    case 1:q2=2;break;
    case 2:q3=2;break;
    case 3:q4=2;break;
    case 4:q5=2;break;
    case 5:q6=2;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=3;break;
    case 1:q2=3;break;
    case 2:q3=3;break;
    case 3:q4=3;break;
    case 4:q5=3;break;
    case 5:q6=3;break;
   }
   sex++;
}
}
    P1=0x6f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=4;break;
    case 1:q2=4;break;
    case 2:q3=4;break;
    case 3:q4=4;break;
    case 4:q5=4;break;
    case 5:q6=4;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=5;break;
    case 1:q2=5;break;
    case 2:q3=5;break;
    case 3:q4=5;break;
    case 4:q5=5;break;
    case 5:q6=5;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=6;break;
    case 1:q2=6;break;
    case 2:q3=6;break;
    case 3:q4=6;break;
    case 4:q5=6;break;
    case 5:q6=6;break;
   }
   sex++;
}
}
    P1=0x5f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=7;break;
    case 1:q2=7;break;
    case 2:q3=7;break;
    case 3:q4=7;break;
    case 4:q5=7;break;
    case 5:q6=7;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=8;break;
    case 1:q2=8;break;
    case 2:q3=8;break;
    case 3:q4=8;break;
    case 4:q5=8;break;
    case 5:q6=8;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=9;break;
    case 1:q2=9;break;
    case 2:q3=9;break;
    case 3:q4=9;break;
    case 4:q5=9;break;
    case 5:q6=9;break;
   }
   sex++;
}
}
    P1=0x3f;
    if(h2==0)  //0鍵掃描
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:q1=0;break;
    case 1:q2=0;break;
    case 2:q3=0;break;
    case 3:q4=0;break;
    case 4:q5=0;break;
    case 5:q6=0;break;
   }
   sex++;
}
}
if(h3==0)   //#鍵掃描
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
    writen_com(0x01);
    writen_com(0x0f);
       writen_com(0x06);
       writen_com(0x80);
      for(unm=0;unm<14;unm++)
      {
        writen_dat(table3[unm]);
        delay(5);
      }
       writen_com(0x80+0x40);

        for(unm=0;unm<5;unm++)
         {
          writen_dat(table1[unm]);
          delay(5);
         }
   sex=0;
   while(!flge1)
       affirm_code();
}
}
   }
}

void init();
void cheak_identity2()
{
if(k1==M1)
{
   if(k2==M2)
    {
if(k3==M3)
   {
    if(k4==M4)
     {
   if(k5==M5)
    {
     if(k6==M6)
     {
      sex=0;
   init();
      while(!flge1)
   set_mima();
     }
writen_com(0x01);
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
   delay1(6);
main();
    }
writen_com(0x01);
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
   delay1(6);
main();
  }
writen_com(0x01);
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
delay1(6);
main();
   }
writen_com(0x01);
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
delay1(6);
main();
}

}
writen_com(0x01);
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
delay1(6);
main();
}

void cheak_identity()
{
P1=0x07;
if(P1!=0x07)
delay(1);
if(P1!=0x07)
   {
    P1=0x77;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=1;break;
    case 1:k2=1;break;
    case 2:k3=1;break;
    case 3:k4=1;break;
    case 4:k5=1;break;
    case 5:k6=1;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=2;break;
    case 1:k2=2;break;
    case 2:k3=2;break;
    case 3:k4=2;break;
    case 4:k5=2;break;
    case 5:k6=2;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=3;break;
    case 1:k2=3;break;
    case 2:k3=3;break;
    case 3:k4=3;break;
    case 4:k5=3;break;
    case 5:k6=3;break;
   }
   sex++;
}
}
/*-------------------------------*/P1=0x6f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=4;break;
    case 1:k2=4;break;
    case 2:k3=4;break;
    case 3:k4=4;break;
    case 4:k5=4;break;
    case 5:k6=4;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=5;break;
    case 1:k2=5;break;
    case 2:k3=5;break;
    case 3:k4=5;break;
    case 4:k5=5;break;
    case 5:k6=5;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=6;break;
    case 1:k2=6;break;
    case 2:k3=6;break;
    case 3:k4=6;break;
    case 4:k5=6;break;
    case 5:k6=6;break;
   }
   sex++;
}
}
/*--------------------------------*/
    P1=0x5f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=7;break;
    case 1:k2=7;break;
    case 2:k3=7;break;
    case 3:k4=7;break;
    case 4:k5=7;break;
    case 5:k6=7;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=8;break;
    case 1:k2=8;break;
    case 2:k3=8;break;
    case 3:k4=8;break;
    case 4:k5=8;break;
    case 5:k6=8;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=9;break;
    case 1:k2=9;break;
    case 2:k3=9;break;
    case 3:k4=9;break;
    case 4:k5=9;break;
    case 5:k6=9;break;
   }
   sex++;
}
}
   /*-----------------------------------*/ P1=0x3f;
    if(h2==0)  //0鍵掃描
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=0;break;
    case 1:k2=0;break;
    case 2:k3=0;break;
    case 3:k4=0;break;
    case 4:k5=0;break;
    case 5:k6=0;break;
   }
   sex++;
}
}
if(h3==0)   //#鍵掃描
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
    while(!flge1)
    cheak_identity2();
}
}
   }
}
/*---------------------------------------*/ //鍵盤掃描
void keyscan()
{
P1=0x07;
if(P1!=0x07)
delay(1);
if(P1!=0x07)
   {
    P1=0x77;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=1;break;
    case 1:k2=1;break;
    case 2:k3=1;break;
    case 3:k4=1;break;
    case 4:k5=1;break;
    case 5:k6=1;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=2;break;
    case 1:k2=2;break;
    case 2:k3=2;break;
    case 3:k4=2;break;
    case 4:k5=2;break;
    case 5:k6=2;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=3;break;
    case 1:k2=3;break;
    case 2:k3=3;break;
    case 3:k4=3;break;
    case 4:k5=3;break;
    case 5:k6=3;break;
   }
   sex++;
}
}
/*-------------------------------*/P1=0x6f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=4;break;
    case 1:k2=4;break;
    case 2:k3=4;break;
    case 3:k4=4;break;
    case 4:k5=4;break;
    case 5:k6=4;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=5;break;
    case 1:k2=5;break;
    case 2:k3=5;break;
    case 3:k4=5;break;
    case 4:k5=5;break;
    case 5:k6=5;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=6;break;
    case 1:k2=6;break;
    case 2:k3=6;break;
    case 3:k4=6;break;
    case 4:k5=6;break;
    case 5:k6=6;break;
   }
   sex++;
}
}
/*--------------------------------*/
    P1=0x5f;
    if(h1==0)
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=7;break;
    case 1:k2=7;break;
    case 2:k3=7;break;
    case 3:k4=7;break;
    case 4:k5=7;break;
    case 5:k6=7;break;
   }
   sex++;
}
}
    if(h2==0)
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=8;break;
    case 1:k2=8;break;
    case 2:k3=8;break;
    case 3:k4=8;break;
    case 4:k5=8;break;
    case 5:k6=8;break;
   }
   sex++;
}
}
if(h3==0)
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=9;break;
    case 1:k2=9;break;
    case 2:k3=9;break;
    case 3:k4=9;break;
    case 4:k5=9;break;
    case 5:k6=9;break;
   }
   sex++;
}
}
   /*-----------------------------------*/
    P1=0x3f;
    if(h1==0)  //*鍵掃描
{
   delay(1);
   if(h1==0)
   {
    while(!h1);
    writen_com(0x0f);
       writen_com(0x06);
       writen_com(0x80);
      for(unm=0;unm<16;unm++)
      {
        writen_dat(table6[unm]);
        delay(5);
      }
    while(!flge1)
    cheak_identity();
   }
}
    if(h2==0)  //0鍵掃描
{
   delay(1);
   if(h2==0)
   {
    while(!h2);
   writen_com(0x80+0x45+sex);
   writen_dat('*');
   switch(sex)
   {
    case 0:k1=0;break;
    case 1:k2=0;break;
    case 2:k3=0;break;
    case 3:k4=0;break;
    case 4:k5=0;break;
    case 5:k6=0;break;
   }
   sex++;
}
}
if(h3==0)   //#鍵掃描
{
   delay(1);
   if(h3==0)
   {
    while(!h3);
    flge=1;
}
}
   }
}

/*-------------------------------------*/   //密碼檢查
void init();
void check_code()
{
if(k1==M1)
{
   if(k2==M2)
    {
if(k3==M3)
   {
    if(k4==M4)
     {
   if(k5==M5)
    {
     if(k6==M6)
     {
      writen_com(0x01);
   kd=0;
   writen_com(0x0c);
            writen_com(0x06);
   writen_com(0x80);
   for(unm=0;unm<14;unm++)
    {
     writen_dat(table2[unm]);
     delay(5);
    }
      delay1(6);
      kd=1;
               main();
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
   delay1(6);
   main();
     }
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
   delay1(6);
main();
    }
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
   delay1(6);
main();
  }
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
delay1(6);
main();
   }
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
delay1(6);
main();
}

}
writen_com(0x0c);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table4[unm]);
delay(5);
}
delay1(6);
main();
}

void now_mima()
{
M1=0;
M2=0;
M3=0;
M4=0;
M5=0;
M6=0;
g=0;
}
void init()
{
if(g==0)
now_mima();
g=1;
flge1=0;
flge=0;
sex=0;
lcdrw=0;
lcden=0;
writen_com(0x01);
writen_com(0x38);
writen_com(0x0f);
writen_com(0x06);
writen_com(0x80);
for(unm=0;unm<14;unm++)
{
writen_dat(table[unm]);
delay(5);
}
writen_com(0x80+0x40);