基于51单片机的红外遥控指纹电子密码锁程序

Demyar

基于51单片机的红外遥控指纹电子密码锁程序
$ K, ?$ w9 h0 x- S& h9 |

+ _0 _5 g. ]% i: q! w) w#include <reg52.h>
- ?+ J/ E9 Z- |+ f+ h, r#include <intrins.h>
) T) P( A0 L+ x& [7 w' x' \' n#include"24C0x.h"
#include"LCD12864.h"
#define uchar unsigned char
+ n1 j( R7 i% C- g. [1 x! @#define uint unsigned int
1 ~5 a! G( N7 @" ?! D: C* _
#define buffer1ID  0x01
#define buffer2ID  0x02
#define queren  0x88
#define tuichu  0x86
8 u# ~4 E$ Q, ], L4 f#define shanchu 0x84
0 A$ A7 ]/ j4 c! M5 t2 J
) E6 T; b* U+ [+ k#define User 1                                    
/ l) `7 {/ \4 q5 a! ^+ h! ~. Z
; I$ ]) u8 f/ A& W8 m. ]' Z# \void fan();

* Y3 t; |; {) c+ ^" d1 zsbit B0=B^0;
1 I) M% f3 E; ysbit B7=B^7;
, ?4 c- F- b$ `' |sbit k2=P3^7;
! W6 t7 G8 Q6 A9 s% l" z# Q- ~sbit jidianqi=P3^6;
sbit Feng=P2^0;

extern unsigned char times[];
uchar  Member=1,sec;
uchar  ErrorCount;
8 }# \. L  W9 j, R8 a//////////////////////////红外相关//////////////////////////
//时间计算
! }! n- Q1 @) B#define Imax 14000    //此处为晶振为11.0592时的取值,
: }# h1 I# G3 W8 O+ M9 U#define Imin 8000    //如用其它频率的晶振时,
#define Inum1 1450    //要改变相应的取值。
#define Inum2 7000
! p, j# d3 q7 ~' m: _#define Inum3 3000
//解码变量
0 b- B. g) G8 q% Y' _unsigned char Im[4]={0x00,0x00,0x00,0x00};

# Z& N1 _5 E$ }6 P2 K, @' X, r//全局变量
uchar f;
& x* V4 z5 n' j5 F' n) Vunsigned long m,Tc;
unsigned char IrOK;
//////////////////////////红外相关//////////////////////////
uchar  code buffer[User][6]=
{
3 ], d" @/ w, V0 t3 p {"000000"}
: r. ]& R; h3 f/ c};
6 T! ?: N2 w+ z" m# _: w. V
0 @( O# q5 M) F8 Q; k8 w3 e0 g0 y6 T3 \
) y9 [! J7 ^7 t! ^. o, Wuchar dz[4];
! O- G* D% y, y7 G& H2 nuchar time[4];                        
6 }1 O5 }+ i2 x" K* kuchar mima[6];
uchar mimag[6];
( C( h6 A) |3 U$ L) Wuchar mimaID[6]={1,2,3,4,5,6};
+ w7 F/ Q  {. h( h; H' A3 f1 ~

4 {6 |) F* Q* x3 {uchar Address1=20,tempx=20;
7 V- K+ `' W' @- m1 Guchar Address2=20;   
8 @) G* `- Z" k6 r# c+ r" h2 D
% u- j# U  K1 guchar data K;
* L- j. w7 m# |uchar data Key;

- q1 h* r: ]+ q4 r% d% Duint PageID;
uchar data querenma=11;
& w; v' B7 `4 m% t6 \) d, f/ h1 quchar sum[2];
int summaf,summas;
3 s# I; i2 e4 Q0 J
5 y/ J% K, _9 B1 Auchar  xdata UserPassword[7]={0};//密码
uchar  xdata DSY_BUFFER[16] ={0};//缓存


void Red_Init(void);
#include "zhiwen.h"
//检测脉冲宽度
8 d- N' |* H3 Nunsigned char check(void);
3 q4 _9 q7 a8 K0 R# ^# A
+ h9 _% L  U% {unsigned char redchange(unsigned char rednum);
! o+ X, D' t8 [, w
( N' U/ ?+ i# K, g
) S0 {0 a& F# w6 L8 A* h$ E) Y1 {void delayms(unsigned int z)
# e! G2 `7 B2 L9 H& s{
        unsigned int x,y;
- G+ O5 n! y% t        for(x=z;x>0;x--)
                for(y=110;y>0;y--);
}
9 N2 c2 ^$ K# J; _2 b
4 H$ _% n8 I9 |% y' r9 b/********************************************************************
* 名称 : Chack(uchar User_Number)
* 功能 : 单一用户密码检测
, D: L  i" W5 B0 i( l) z* 输入 : User_Number
* 输出 : 密码正确与错误，错误返回0，正确返回1
********************************************************************/
uchar Chack(uchar User_Number)
' U! A4 ?: `- z0 R! W$ g{
  V6 _8 V! K/ ^; V        uchar flag, i,temp[6],Address;
        Address=User_Number*10;
        for(i=0;i<6;i++)
5 i5 A+ O, \8 I' i        {
: i( n4 Q0 V8 Y5 s                temp=x24c02_read(Address);
                delayms(10);
, E8 j& Q6 J% j                Address++;
! ]% q0 F- Y7 |$ p6 |4 A# o6 u        }
        for(i=0;i<6;i++)
+ O" w9 o/ o0 d4 R& U& H5 G        {
0 K/ m7 r5 S; I6 v" T2 z$ W                if(temp==UserPassword)
                        flag=1;
                else         
- d  T- [/ I! H& Z% }; W& E                        flag=0;               
9 d6 F# O& V) I' L        }
                return flag;
: u$ _+ n+ K  R! I" h) U$ R/ B! T}

! q& Z. m2 s. x! {+ q! u' R/********************************************************************
7 y, D# j5 d6 z* ?* 名称 : PassWord_Chack()
* 功能 : 所有用户密码检测
* 输入 : 无
+ R3 O1 n1 f" [: i8 h* 输出 : 密码正确与错误，错误返回0，正确返回1
********************************************************************/
uchar PassWord_Chack()
# ?2 g1 z1 g- ^* R{
3 C2 g% g. D* y* f: V        uchar i=0;
0 b9 b! ]1 M, n/ ]5 }3 f        while(i<User)
( `2 T$ O% b2 ~4 _, b6 Q1 p6 I5 B        {
, V: K$ L. [1 [- t                if(Chack(i)==1)
                {
6 Y5 F; V' `. R- Z$ U                        Member=i+1;
2 ^1 ^  U1 l6 U8 w8 A- Y+ P. p                        return 1;
8 G. N& j; q& W  c                }
8 V. [% @  ^7 I! u+ a                i++;        
& E" c9 q  \# j! u" k; c; ^* [        }
+ l0 v/ ?) }; @1 A: G        return 0;        
}

void delay(uchar tt)
{  uchar i;
5 r- Q4 x% v+ p' N0 B   while(tt--)
   {
   for(i=0;i<125;i++);
/ u7 F( B8 s& o/ ~0 q   }
}
! a* ~+ O  t0 U5 W! @/********************************************************************
* 名称 : UART_Init()
* 功能 : 单片机串口初始化
# e, F. I4 W8 }8 V* 单片机：晶振11.0592MHz 波特率为9600bps
1 A! O. j# w6 x# D( |& _! K1 f) g* 指纹模块：波特率为9600bps，
$ \. C: ]* Y. _; D0 e) }********************************************************************/        
void UART_Init()
{
        SCON= 0x50;               //串口方式1        //REN=1; 允许接收
$ V7 T6 ^: B1 G; F1 f        PCON=0x00;                //SMOD=0
$ q8 M4 B8 ~; w! f. u2 v        IT1=1;
        EX1=1;
$ X, z' E' N8 }' c% f        TH0=0;
        TL0=0;
  T, n5 L) @. }' Q: R        TR0=0;
        TMOD= 0x21;               //定时器1定时方式2
        TH1= 0xFD;                //11.0592MHz  模块默认波特率为9600bps
        TL1= 0xFD;                                                                                 
- V. o7 Y% [: T& l        TR1= 1;                   //启动定时器
        EA=1;      
}
5 u! }$ e# a9 X. E
6 V( Q: M8 ]* |3 l, h6 ^/ m; Sunsigned char Keycan(void) //按键扫描程序 P1.0--P1.3为行线 P1.4--P1.7为列线
: M7 L) r- `- M, I! c; M5 Q& {{
  unsigned char rcode, ccode;
  P1 = 0x0f;      // 发全0行扫描码，列线输入
  if((P1&0x0f) != 0x0f) // 若有键按下
  {
    delay(1);// 延时去抖动
, E+ @  \# V* l8 Y! x    if((P1&0x0f) != 0x0f)
    {  rcode = 0xFE;         // 逐行扫描初值
    while((rcode&0x10) != 0)
    {
       P1 = rcode;         // 输出行扫描码
* Z* m* g) p( o$ J      if((P1&0x0f) != 0x0f) // 本行有键按下
$ {6 Z! M3 t; e& w0 Z) T8 Q      {
       ccode = (P1&0x0f)|0x0f;
' C( l1 a& j5 f; z4 b       //do{;}
) j4 K! t0 m6 ^+ w           while((P1&0x0f) != 0x0f); //等待键释放
* F/ f8 _, c: t( B  r            Feng=0;
        delay(100);
        Feng=1;
' L6 K8 @9 U0 ?0 T6 a  C; W2 m       return ((~rcode) + (~ccode)); // 返回键编码
5 G$ C% f  b+ R0 C% V7 q      }
' u" ~5 Q1 v( Z    else
2 J% P) l( S! [. c* t    rcode = (rcode<<1)|0x01; // 行扫描码左移一位
    }
( u$ V) ?4 w8 n" e4 s8 b" z    }
% n% V, Q# u$ T  }
) ]  ]+ E2 a% H/ @( M6 _: v) z, L  if(IrOK==1)
  {
   IrOK=0;
   Feng=0;
   delay(100);
   Feng=1;
; B) V% ?3 x8 o8 W$ E0 e   switch (Im[2])
   {
# s: e) L. a, u    case 0x16: return 0x28;break;                  //0
; Q4 t; h$ E2 @  n, h) K& Q2 d        case 0x0c: return 0x11;break;                         //1
1 t8 m6 O# s$ k2 u' h1 m0 s        case 0x18: return 0x71;break;                                //2
! q6 O2 G- Y. I) x        case 0x5e: return 0x41;break;                                  //3
2 O  A) q8 j" o) a% ^& R( p9 W        case 0x08: return 0x12;break;                                        //4
        case 0x1c: return 0x22;break;                           //5
# ]; j# J8 U8 |& ~        case 0x5a: return 0x42;break;                                //6
        case 0x42: return 0x14;break;                                  //7
        case 0x52: return 0x24;break;                                  //8
+ Q, y1 z7 s6 o        case 0x4a: return 0x44;break;                                        //9
/ l  \9 L' T! P" u9 E/ N        case 0x47: return 0x81;break;                                         //a
. U8 S+ b& a- s0 V' M        case 0x43: return 0x82;break;                                          //b
        case 0x0d: return 0x74;break;                                           //c
        case 0x15: return 0x88;break;                                                //d
        case 0x19: return 0x48;break;
: F1 c( K# k  P+ C, u+ o* k/ z8 e   }
4 t1 u5 A0 g' N% w" [3 E  }  
  return 0; // 无键按下，返回值为0
}
' K6 ?8 f: s; U' h; O7 z; \, _
void KeyDeal(unsigned char Key)
" D/ m' H7 Q3 K+ x+ @3 m{  //unsigned char n;
2 R5 i" m9 i/ s: @- ]  T   if(Key!=0)
, t5 q" e8 u) p& F/ E; R0 t# t {
) L! q; w/ i- }
' O! E, F% @3 K8 n( c; D                   switch(Key)
, p1 u* I  B! h3 m" Y. b+ }- v, q                   {
                   case 0x11: K=1; break;         
                   case 0x21: K=2; break;  
( }- s. k+ |* @7 |                   case 0x71: K=3; break;  
                   case 0x81:  break;      
                   case 0x12: K=4; break;
                   case 0x22: K=5; break;
) J, \4 g! ~# C* @$ ^) w6 N# Q, q/ m                   case 0x42: K=6; break;
                   case 0x82: K=34;break;               
' u  c: G: y4 W9 b6 [! f$ Z                   case 0x14: K=7; break;
6 ?( _- S( w# j0 v1 Q& @3 s                   case 0x24: K=8; break;
                   case 0x44: K=9; break;
+ d# P4 i) S8 l- X$ X                   case 0x74:  break;               
                   case 0x18:  break;               
2 P0 d- h( ?0 x9 `% j$ E+ n( r                   case 0x28: K=0; break;
3 E. N  r# }& ?' ~1 i3 c                   case 0x48:  K=11; break;
$ O7 Z6 |% R/ b0 p" n2 b2 K+ l                   case 0x88:  break;               
- b  K; ^8 q2 s1 ~4 h                   default: break;
+ q+ N7 k+ j6 i                   }
3 q3 r0 [: s* _' I  }
0 p; S) {  J$ t" C2 }- D0 O. z}
" l/ }6 n/ R( s: n# Y9 z( Y
8 W& d5 H3 V6 E6 x$ E
void shuazhiwen()
{
4 ?% V2 |/ L! S2 a* X    uchar IDs1,IDs2,IDs3;         
        LcmClearTXT();
6 L3 q; x4 G0 U: D. @2 {# \" m) I        PutStr(1,1,"请按手指开锁");      
        SFG_identify();
        while(querenma==2)
7 G0 c& ?" h% ~/ p9 Q: U        SFG_identify();
        if(querenma==0)
   {
                LcmClearTXT();
                PutStr(1,2,"门已打开");
' o: N! R$ f: K" [: s0 s( @                IDs1=PageID/100;
                IDs2=PageID/10%10;
) U9 g8 ~% T, v5 ]( Y% G                IDs3=PageID%10;
                PutStr(2,1,"编号为:");
                WriteCommand(0x8D);                //指定第三行显示位置
                WriteData(0x30+IDs1);
9 o$ O# M, y5 J8 I7 ^  ~                WriteData(0x30+IDs2);
                WriteData(0x30+IDs3);
) e; g, L- \2 G; E                ErrorCount=0;
                Feng=1;
* y: g& g' Y( w' B8 t+ P                jidianqi=0;
3 m  Z# F) x  i  M$ R                delay(2500);
' e$ T2 u8 `8 E" c4 @5 x: S- x/ o                jidianqi=1;
* J" F, ^- D8 i; p/ a& L0 h6 D
0 @" [' H% N4 P4 q! X3 B' t        }
           else if(querenma==9)
                 {
7 _& D7 @; y5 q8 f                        LcmClearTXT();
                        PutStr(1,1,"没搜索到指纹");
# d0 R2 G0 v. n0 P% b                        PutStr(2,1,"请重新按手指");
                        ErrorCount=3;
                        Feng=0;
( h0 Y* H. N# U+ y" H) ~                }
                   else
                {
                        LcmClearTXT();
& p0 s" }: K" R1 C) d- Y; ^: ?8 V                        PutStr(1,1,"接收包出错");
6 J- U+ A/ U8 J, e4 r  B                }
                delay(2000);
- J1 b: Q' v4 E   //         while(Keycan()==0);
. K  A. v; B5 ?}
void addfinger()
{
  h, D1 w9 {- O( g, o        uchar IDa1,IDa2,IDa3;
        LcmClearTXT();
        PutStr(1,2,"请按手指");   
) o# V+ }' N! \5 b% \3 h: Y! \        SFG_getimage();
        while(querenma!=0)
        SFG_getimage();
        SFG_genchar(buffer1ID);
        UART_Init();
7 ?- _; F  s9 {- z        SFG_fastsearch(buffer1ID);
# ~6 N1 S0 d8 h2 [& L9 c. R5 `1 l        while(querenma==1)
        SFG_fastsearch(buffer1ID);
2 L7 r: W$ ]1 j8 S  q
        if(querenma==0)
        {
                LcmClearTXT();
0 X( Z. ]6 b- J. a$ U                PutStr(1,1,"该指纹已存储");
                PutStr(3,0,"  按任意键继续");
; d7 s1 z4 Z! b" b- P            while(Keycan()==0);
  J" w8 k6 a2 Y* R: D( O0 j        }
        else if(querenma==9)
                {
. X- R& g- ?$ d% V: d8 ^                        LcmClearTXT();
                        PutStr(1,1,"请再次按手指");
- d$ f$ }# N7 S5 n; P                        SFG_enroll();
& K/ J1 T, I0 {3 j                        while(querenma==2)
                        SFG_enroll();
# `7 L- E5 R+ r% N1 x% G  R                        LcmClearTXT();
' H6 i( y% B' U: h) {! b                        if(querenma==0)
                        {
                                IDa1=PageID/100;IDa2=PageID/10%10;IDa3=PageID%10;
                                PutStr(1,1,"指纹采集成功");
                                PutStr(2,1,"编号为:");
                                WriteCommand(0x8D);
. W+ [! m' z; k( T                                WriteData(0x30+IDa1);WriteData(0x30+IDa2);WriteData(0x30+IDa3);
- a/ o6 ~- o: ?  K- ~                          }
                  else  if(querenma!=0)
& J" H8 F( b/ u( t& C: p, V                          {

                                PutStr(1,1,"指纹采集失败");
                                PutStr(2,1,"请重新操作");
                         }
1 ~& A! n/ P3 d1 K& G9 `- ^                PutStr(3,0,"  按任意键继续");
            while(Keycan()==0);
                   }
- Y/ |8 `/ `( Z. f# e% g( J        LcmClearTXT();
6 N$ T& ^5 r0 y  B! G; O& W                         PutStr(0,0,"按键1 : 增加指纹");
2 d/ e. p+ Z$ f" h! d/ r; i                PutStr(1,0,"按键2 : 删去指纹");
; s1 N+ P8 `0 Q3 [" y# Y                PutStr(2,0,"按键3 : 手动开锁");
                PutStr(3,0,"按键4 : 修改密码");
}
% t3 U4 k6 ?. P+ \void deletfinger()
{
        uchar i,j=0;
# R/ J% p& ?2 d% r3 I- ]0 C+ W5 V        LcmClearTXT();
        PutStr(1,0,"输入删去的指纹号");
        for(i=0;i<5;i++)dz=0;        
           Key=Keycan();
           while(Key!=queren)
           {
             Key=Keycan();
; U- x  ]) `& J$ F- E  m+ y2 |) \/ g             KeyDeal(Key);
$ G3 I# i9 D* L) `; L+ ~7 e/ s4 B             delay(30);                                                              //按键有抖动@@@
. s5 f' a: X. O. n# k6 `/ s             if(Key==0)K=10;
/ p$ l5 B9 O$ A: V             if((K>=0)&&(K<=9))
1 f$ U1 g7 v. s1 Z! X: N; c             {
              dz[j]=K;
                  if(j<3)
+ [, F! z1 f' F) W                  {        
4 y- Y: |- f6 y0 G9 N                                WriteCommand(0x88+j);                //指定第三行显示位置
                                WriteData(0x30+dz[j]);        
                  }
              ++j;
                  if(j==4)
              j=3;                                                                                                   //@@#yinhuang
             }   //显示LCD12864并行显示
& {0 u+ O; O9 }! r; j0 t  N                 if(K==34)                //按了删除键
                  {
                    if(j==0)
# U2 k; |9 Q" }8 R5 H# \$ M: p                        {
                                WriteCommand(0x88);                //指定第三行显示位置
' |' v2 a# S# F7 }& t; |* d                                WriteData(0x20);
) ^1 y$ c9 w% Y. V" c                        }
) F' S5 E% S9 ^                        else
$ N/ s/ Q+ I. W+ R$ j, m9 W                        {
& O* \, w6 ^" S                                --j;
0 V8 j7 B3 B: k. W                                WriteCommand(0x88+j);            //指定第三行显示位置
                                WriteData(0x20);
                        }
/ F4 j/ X9 W3 }, V' c& O# E                }
: I% \! O4 [  B8 Q  v0 O. O& y4 v) i        }
        if(j>=2)
& a' N0 A. n# s        PageID=dz[2]+dz[1]*10+dz[0]*100;
; K+ Y* p( B" ~        if(j==1)
; j  {' u! ]5 D2 j  o2 s$ S! z; K        PageID=dz[1]+dz[0]*10;
        if(j==0)
        PageID=dz[0];
        SFG_deletchar(PageID);
/ ]* I2 S2 |+ x7 c: K& d) m% D        if(querenma==0)
7 j6 M/ g' E9 k- F        {
                LcmClearTXT();
5 z7 q5 b; }' [- p                PutStr(1,1,"删去指纹号成功！");
        }
        else
        {
9 l8 {% j: _8 [9 z- l$ w3 M( X                LcmClearTXT();
                PutStr(1,2,"删去指纹号失败！");  
        }
9 v: c+ z& a" ?0 a- l# r# a        PutStr(2,0,"  按任意键继续");
  O  D* L1 C/ Y, n8 z        while(Keycan()==0);
        LcmClearTXT();
                         PutStr(0,0,"按键1 : 增加指纹");
                PutStr(1,0,"按键2 : 删去指纹");
                PutStr(2,0,"按键3 : 手动开锁");
/ v7 w" G( q0 F% E                PutStr(3,0,"按键4 : 修改密码");
* l0 k% d8 F+ ?0 w' r; {2 B+ }}

- y2 [' G8 i2 P& c0 H: o7 Jvoid gaimima()
{
# d+ ~* ]9 R: C9 H. r: q6 A- |/ P        uchar i,j=0,mima1[6],mima2[6];
; x+ n: S9 H( }" X        uchar k,temp;
        LcmClearTXT();
! x2 f; v$ T# T% s8 C* H2 C* w- S        PutStr(1,1,"请输入新密码");
        for(i=0;i<6;i++)mima1=0;                                                                        
           Key=Keycan();
/ K$ |! y2 N/ E! c% i% B! T      while(Key!=queren)
; K# }! x0 l) h7 `& H3 X1 O3 q           {
6 P- E" j. F/ q% z4 A             Key=Keycan();
. H; d( W/ W; o. l+ y# ^             KeyDeal(Key);
             delay(30);                                                              
5 I- w& E+ g1 O$ o9 a- H# o             if(Key==0)K=10;
             if((K>=0)&&(K<=9))
             {
0 H/ j) d+ R2 g              mima1[j]=K;
                  if(j<6)
* k) ^) h/ Z% R6 }! I- ]                  {        
/ a$ x, n& b4 ^9 m                                WriteCommand(0x89+j);                //指定第三行显示位置
" ?* }7 m$ K, h3 N                                WriteData(0x0f);        
                  }
; `- e/ h3 D$ E# _* g6 h2 T7 S              ++j;
                  if(j==7)
              j=6;                                                                                                   //@@#yinhuang
             }   //显示LCD12864并行显示
4 o) H; h. D6 p) w9 n# Q                 if(K==34)                //按了删除键
                  {
4 o/ G: ?, T: s: f: J4 d5 B# o                    if(j==0)
! j2 R7 h+ N4 z5 V. h7 T% \7 R                        {
! ^' E9 q+ z6 z# D5 H/ Z* S                                WriteCommand(0x89);                //指定第三行显示位置
" n( n$ V: G' Q. E7 x% U                                WriteData(0x20);
                        }
' G7 ^. _7 F' z: V! u. a                        else
                        {
                                --j;
1 ~" T5 G8 h" L4 S$ v                                WriteCommand(0x89+j);            //指定第三行显示位置
                                WriteData(0x20);
                        }
                }
% _% ~4 g" F" o- L! K        }
        LcmClearTXT();
# c4 l+ u2 S- S8 t        LcmClearTXT();
        j=0;
        PutStr(1,0,"请再次输入新密码");
        for(i=0;i<6;i++)mima2=0;                                                                        
           Key=Keycan();
! o" I) N7 r  G6 D* z6 M( c  ^      while(Key!=queren)
% j) M( U" B. z- |( k) U7 g5 ?6 @$ \. h           {
( ?% j8 x  Z: {             Key=Keycan();
             KeyDeal(Key);
; ]' E; B: E7 A, d, m8 k             delay(30);                                                              
             if(Key==0)K=10;
             if((K>=0)&&(K<=9))
& b; Q0 u' j- h, ~             {
              mima2[j]=K;
# o+ f" d3 L" A* r) a4 d3 ?                  if(j<6)
) b' o- }1 q0 j3 o& \0 v                  {               
' ]" F  K- m" R' R' |& Q5 W                                WriteCommand(0x89+j);                //指定第三行显示位置
                                WriteData(0x0f);        
                  }
              ++j;
                  if(j==7)
, z( x" T7 ]! d5 S3 \: c              j=6;                                                                                                   //@@#yinhuang
             }   //显示LCD12864并行显示
                 if(K==34)                //按了删除键
6 Q1 y, z. Y. X3 z: y' e4 L' M. l                  {
  [) `$ Q5 a% r8 P3 z+ J' M) W                    if(j==0)
                        {
                                WriteCommand(0x89);                //指定第三行显示位置
0 |# ~) q4 q* k$ C+ x8 ~/ c                                WriteData(0x20);
: c. i( r6 x3 W3 R1 X                        }
4 V, a! ^, d) Z) G1 ~& G6 K& X                        else
                        {
- R+ @0 f8 r& a6 d7 o7 T                                --j;
$ L. [& A9 ~5 m( ?3 O                                WriteCommand(0x89+j);            //指定第三行显示位置
                                WriteData(0x20);
9 r! u, G( `& r                        }
; d0 Z% R* t+ c2 k                }
2 \3 W4 V  G# v; H        }
        LcmClearTXT();
; ^7 o' y& C  s9 O& K5 p3 D+ K        if((mima1[0]==mima2[0])&&(mima1[1]==mima2[1])&&(mima1[2]==mima2[2])&&(mima1[3]==mima2[3])&&(mima1[4]==mima2[4])&&(mima1[5]==mima2[5]))
        {
8 d( j/ I/ D1 d- J                for(i=0;i<6;i++)
                mimaID=mima1;
" o# O3 l& V- D; z; E3 q- g                /////////////////////////////////////////////////////
                for(i=0;i<6;i++)           //密码限制在6位以内
2 A& }& a- ^7 T4 n( Z                {
2 i9 T8 ^; P- @# }3 h/ R- ]                        UserPassword=mima1+0x30;                                 
, E( e( K4 D1 Z, U4 h1 o. J7 b                }
9 T1 X$ k* ^0 f! B- [                temp=(Member-1)*10;        
- u# P% `) k5 l& s( j# U                delayms(5);
$ m# o8 z( s- Y! k" Q" }                for(k=0;k<6;k++)
" b0 ^$ V7 n0 @( f0 t  S" @/ j                {
5 t# j2 D; c9 K' ?0 \! `0 m1 u7 ]                        x24c02_write(temp,UserPassword[k]);
                        delayms(10);
                        temp++;
6 p6 t4 f5 l9 n* `) w) L% O1 K5 R                }  
/ s/ R0 }, k6 w: j$ f- k" {                //////////////////////////////////////////////////////
( y! Z* R$ q2 C                PutStr(0,1,"密码修改成功");
                PutStr(3,0,"  按任意键继续");
                ErrorCount=0;
. R. T7 x5 ^+ O, u6 X5 H4 c                while(Keycan()==0);
        }
        else
        {
) P; g3 ~4 b4 A2 i1 H                PutStr(0,0,"  密码修改失败  ");
                PutStr(1,0,"两次输入的密码不");
1 @* Y# J7 e5 u! p/ o. m: C                PutStr(2,0,"一致，请重新操作");      
- F* B9 A# Z# G  `  j                PutStr(3,0,"  按任意键继续");
                while(Keycan()==0);
        }
        LcmClearTXT();
* G. U6 [4 Y' `: |" M                         PutStr(0,0,"按键1 : 增加指纹");
4 o  t" w2 E6 J- g- Y                PutStr(1,0,"按键2 : 删去指纹");
                PutStr(2,0,"按键3 : 手动开锁");
                PutStr(3,0,"按键4 : 修改密码");
}
$ }4 Q( K. ?2 ]) O4 S1 o
0 M+ e7 P9 j" N* B/ X. ?
" Z. B# C# v/ j# ivoid zhu()
0 \0 K1 {7 r  N; {: q1 `! d{           
! m0 t- @8 Z# N' m0 @    LcmClearTXT();
        PutStr(1,2,"门已打开");
           jidianqi=0;
        delay(2500);
        jidianqi=1;
        PutStr(3,0,"  按任意键继续");
" b7 i7 ^- T7 [        while(Keycan()==0);
1 j, Z7 \  B' _( G, `7 v0 }                         PutStr(0,0,"按键1 : 增加指纹");
                PutStr(1,0,"按键2 : 删去指纹");
, q2 I! g2 o4 o4 h/ i; I+ p                PutStr(2,0,"按键3 : 手动开锁");
                PutStr(3,0,"按键4 : 修改密码");
}
- _8 l  }3 K' P- c% H) Q9 v8 i
  G% o6 k6 G) E2 K) X- a+ M* z! O
void guanliyuan()
{   
      uchar i,j=0,x=1;
             uchar Right_flag;
* o# W! i* g- z! c/ j  B/ J  {) a      LcmClearTXT();
1 p/ K4 h6 C  k0 @          PutStr(1,1,"请输入密码：");        
  m/ R# Z- G; m  Y! e! ?( e           for(i=0;i<6;i++)mima=0;                                                                        
0 a8 ~+ s+ q4 a4 `4 V2 N# u           Key=Keycan();
' D/ G$ _) h9 \! M2 i+ {      while(Key!=queren)
           {
- s- O3 A7 y; V( v             Key=Keycan();
             KeyDeal(Key);
             delay(30);                                                              
; G7 b1 @+ K/ K0 i0 ^1 ~+ K             if(Key==0)K=10;
             if((K>=0)&&(K<=9))
9 o* y) X6 N( g/ \             {
" H4 g) j' ?# ^8 S# t5 T" P) i# `              mima[j]=K;

                  if(j<6)
" r' z6 f7 [5 x* c4 e                  {        
0 Q1 S' O( [/ M: o                   WriteCommand(0x89+j);                //指定第三行显示位置
6 M$ B/ p7 m, l               WriteData(0x0f);        

6 D! Y' Z, e1 b. I                  }
              ++j;
                  if(j==7)
4 e, ?0 `$ \& t6 k& C. J( {- E              j=6;                                                                                                  
6 V* q* B: v4 \& W+ _* D: N             }   //显示LCD12864并行显示
                 if(K==34)                //按了删除键
                  {
                    if(j==0)
                        {
, z7 \$ w0 o- f) I1 e  n/ o4 e                      WriteCommand(0x89);                //指定第三行显示位置
                  WriteData(0x20);
                        }
" Z* I' }" y  [- l0 @; D                        else
9 W+ C. C$ F9 n0 d/ i4 K& \                        {
: w& X: `& u1 y/ _1 |6 [5 H                          --j;
8 j# H$ y  M  z! I                      WriteCommand(0x89+j);            //指定第三行显示位置
                  WriteData(0x20);
                        }
; H. }) M9 r5 k/ `) ~/ {2 M2 c                  }
- N! K+ ~* p9 B. z2 g" p           }
. ?/ Z  Z8 o5 y+ ?. f+ H: B& W    LcmClearTXT();
. l7 [5 H& V# M. h1 d0 W- L
4 w# e9 Y! J6 `/ W9 e3 P
" G  g& l: A. v! s3 T" Q/ s+ `          for(i=0;i<6;i++)
% k, f8 `' K* s  z         {
            UserPassword=mima+0x30;
; s( D' s! ?1 T
& h# P* F7 r6 J# e- ?6 R          }
6 q+ Y9 s/ d  F  v" H5 ~. U         if(j==6)
          {
           if(mima[0]==1&&mima[1]==3&&mima[2]==1&&mima[3]==4&&mima[4]==2&&mima[5]==0)
# d' p/ z* l$ ~; O0 W5 @            Right_flag=1;
; s% d: U* m& o& k+ c7 R                else
$ G! O$ r$ T0 |+ j2 _( q                Right_flag=0;
5 y! r$ G/ k8 z2 \                      }
          if (Right_flag==1)
9 x; C: n8 ~2 Q3 r' W/ A1 c0 {         {
7 j: S" g7 l: H/ D% T                     Right_flag=0;

- e9 v% _* r* M3 |* }9 s                   for(i=0;i<6;i++)mima=0;
                PutStr(0,0,"按键1 : 增加指纹");
1 g, z5 X5 W/ `                PutStr(1,0,"按键2 : 删去指纹");
                PutStr(2,0,"按键3 : 手动开锁");
                PutStr(3,0,"按键4 : 修改密码");
     while(i!=tuichu)
' ?* S' E0 a/ n' h      {         
+ s" F8 h0 C/ v3 V                 i=Keycan();
4 i& w+ u1 L  _, z) G  I; [3 N4 V
                KeyDeal(i);  
$ v2 V3 w* W% A            switch(K)
            {
             case 1:    addfinger();K=6; break;
5 d. I) B, O9 U             case 2:    deletfinger();    break;
3 x4 C) }7 M. Q                 case 3:         zhu();        K=8;  break;
                 case 4:    gaimima();        break;
0 V7 B3 V/ U; R7 ], u, w# I             default: break;
            }
      }
0 k7 t5 j4 v: Z, ?5 S$ {     }
    else
* i4 U2 J. W' g" ~5 p    {
) {" c2 }# j4 Z- ?
2 ~' \+ s7 N/ g/ R% j% Y                PutStr(1,2,"密码错误");
4 ], {/ V: ?+ o% j5 C" E; Z                PutStr(2,0,"  请重新操作！");
, G0 g' _; q3 S) X: H8 c                PutStr(3,0,"  按任意键继续");
             while(Keycan()==0);
4 S1 R! H: o) `                PutStr(0,0,"按键1 : 增加指纹");
                PutStr(1,0,"按键2 : 删去指纹");
                PutStr(2,0,"按键3 : 手动开锁");
* J5 d  w3 d4 c' [: q2 J                PutStr(3,0,"按键4 : 修改密码");
    }
  Key=0;

# G- N; W( ~$ E9 }" I' K! q}
void mimakaisuo()
. W4 `+ |$ x9 o' N' }- i+ d{
# W4 Y7 ~' f. c3 f) N$ m uchar i,j=0,x=1;
             uchar Right_flag;
      LcmClearTXT();
2 t; o# f, a0 ~. l' [! r0 Q# P          PutStr(1,0,"请输入密码开锁：");        
           for(i=0;i<6;i++)mima=0;                                                                        
7 |- H  ~9 Z# K0 t9 x  E: u           Key=Keycan();
      while(Key!=queren)
           {
" l( |5 R. _, m+ r$ f) l             Key=Keycan();
6 ^* y; K6 D: a, A) H, W             KeyDeal(Key);
             delay(30);                                                              
) v2 H0 a7 C) L5 F. x" r  t             if(Key==0)K=10;
             if((K>=0)&&(K<=9))
% J3 V3 ^- [/ ^4 M- M+ U0 X             {
/ a- T% N! L% m% J5 Z5 L; Q              mima[j]=K;

8 \  V( Y* W1 W0 x6 v6 D, y- X                  if(j<6)
- s; i1 b$ A1 P: k9 `* @                  {        
5 z6 T, D  }. V# G: k, q# ~$ ?% @( T0 d                   WriteCommand(0x89+j);                //指定第三行显示位置
( F2 t0 }# i% x3 c/ |" Z$ ~               WriteData(0x0f);        
. c5 v2 r/ U. r7 |0 E" I* B! k
                  }
' X8 N; L" [0 C" ?              ++j;
                  if(j==7)
3 q7 U  Q' F7 H) _( m& t$ m, s              j=6;                                                                                                  
             }   //显示LCD12864并行显示
4 b! m3 G  ^1 m. E! |6 a$ Q                 if(K==34)                //按了删除键
" Q9 n. O  c, B                  {
2 u/ r/ S* U( }/ q                    if(j==0)
( H7 `/ [2 i; H7 j# o                        {
                      WriteCommand(0x89);                //指定第三行显示位置
                  WriteData(0x20);
                        }
                        else
9 L0 X: v% P) D/ e3 @! R( k                        {
                          --j;
, s) E; }1 n( A; ], v                      WriteCommand(0x89+j);            //指定第三行显示位置
                  WriteData(0x20);
- \& M! G5 J9 r/ B7 t+ n                        }
+ F5 g& g8 h% e# i                  }
8 w  F* w3 o6 \3 [$ M           }
' p) z, r; }6 h+ ^' A- s, }    LcmClearTXT();
5 d% e! W) A* l$ Q7 [7 s
* E! z5 k. H. F+ ]& V0 [# t
          for(i=0;i<6;i++)
         {
            UserPassword=mima+0x30;

" L" X* N' S4 Q! P+ w+ W          }
         if(j==6){Right_flag=PassWord_Chack(); }
2 B- t, ?! D/ L+ l3 D7 q; ~1 }& |* O          if (Right_flag==1&&ErrorCount<3)
% \  [2 _/ |  B( A3 |. n         {
              Right_flag=0;
1 |- I8 y. N9 p                   zhu();ErrorCount=0;  
                 Feng=1;
                  for(i=0;i<6;i++)mima=0;
     }
    else
    {
; ~2 ?+ ^8 u2 P  @; z            if(ErrorCount<3)
                ErrorCount++;
( h" l7 \0 p5 y                 if(ErrorCount==3)
% Q0 U) i5 ~/ h/ }                Feng=0;

/ b6 w5 J/ |$ @3 S1 o- p4 Z: k                PutStr(1,2,"密码错误");
4 D- q% Q* E# `; i3 ^0 {                PutStr(2,0,"  还有  次机会");
' I( d0 A2 P) E) w  x                PutStr(3,0,"  按任意键继续");
9 c! H2 Y! }% y% w                WriteCommand(0x8a);
1 |/ i* ^$ Y. ]                WriteData(' ');
                WriteData(3-ErrorCount+0x30);

* g# D4 C& c9 e3 a' @4 A( g                delay(1000);

- w0 U" ~$ n* b" o    }
) F, d' ]# @7 _* ?; @  Key=0;
  LcmClearTXT();
}
6 Y  l( G& H) n/ \4 Ivoid fan()
7 p9 X7 L7 u2 Q" s3 L' B, z& Y8 Y' ?5 I{
//        PutStr(1,2,"请先按键");
//        PutStr(2,2,"再刷指纹");
  if(Key!=0x81)                        //管理员操作
  {
        PutStr(0,2,"欢迎使用");
        PutStr(1,0,"指纹密码门禁系统");
- g8 P% g- T, o$ M; ^, d        PutStr(2,0,"密码开锁请按 C键");
( F& M7 _+ @' ~& |/ X        PutStr(3,1,"请按手指开锁");
, v: _; x* s, _; ]+ k   }
  Key=Keycan();
$ W* S% P$ {' v" e, zif(k2==1)                //指纹刷机
  {
2 o! n# E2 u  a          LcmClearTXT();
         shuazhiwen();
         LcmClearTXT();
) S/ H- v4 D" T2 j3 S, _9 J2 C/ D6 d  }
  if(Key==0x81)                        //管理员操作
6 J$ L8 Y5 x2 r6 c( A3 k+ u) v  {
        LcmClearTXT();
1 F* c4 |, N+ L1 P$ T6 v2 V        guanliyuan();
" H& o5 u  C3 s% m    LcmClearTXT();
6 R* a9 n) u! s1 x  }
  if(Key==0x84&&ErrorCount<3)                        //密码开锁
  {
        LcmClearTXT();
0 K7 W8 J2 _: H( W  F7 j        mimakaisuo();
    LcmClearTXT();
  }

' K) S; X' Q, t" x$ V/ U}        
# q) c% b- _$ H! z6 ]( l
9 Y- {! {. {' q1 |# n* Bvoid main()
+ a' r/ O9 K: j{         

//PSB=0;
, ], P- S- {9 D  [* ^( B+ ^        UART_Init();           //串口初始化                  
          x24c02_init();     //24C02初始化
6 g/ |/ v4 L" O5 e. s        LcmInit();               //LCD12864初始化                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            
6 I: S! i- {! U0 I2 X4 n8 }        LcmClearTXT();           //LCD12864清屏        
, R3 P* X. |) Z5 m2 m; V# k        while(1)
  i' `) p! O) D- G# i& `6 P4 X                {
                        fan();
                        delay(100);                  
# m. l2 R! Z, m; H1 i) O- z                }        
* L4 E( K; L* C}

//外部中断解码程序_外部中断1
void intersvr1(void) interrupt 2
{
; v7 e+ f8 w5 F1 V; }# k( [ TR0=1;
' ]/ z$ _/ k  m7 u( W( A Tc=TL0*256+TH0;//提取中断时间间隔时长
TH0=0;
TL0=0;         //定时中断重新置零
2 c4 _+ C5 D3 E& ~% ^
if((Tc>Imin)&&(Tc<Imax))
{
        m=0;
- i; z6 K0 }+ i5 [7 j6 r0 l        f=1;
        return;
}       //找到启始码
if(f==1)
{
! Y3 n6 I6 Q$ A        if(Tc>Inum1&&Tc<Inum3)
- c6 b' w0 o6 [1 v8 k" u) q    {
0 R! U" n, l' q0 o           Im[m/8]=Im[m/8]>>1|0x80; m++;
    }
    if(Tc>Inum2&&Tc<Inum1)
    {
4 C' O2 L% G$ D; `  p2 Z9 g, w      Im[m/8]=Im[m/8]>>1; m++; //取码
           }
           if(m==32)
8 L, w- E7 P4 k7 i. i    {
/ B" @  |: }; R! ?# ]      m=0;  
      f=0;
      if(Im[2]==~Im[3])
      {
           IrOK=1;
: M" U3 v& J! ^9 X9 O1 O9 w                          TR0=0;
1 I& @$ R  C$ T+ J           }
3 |2 K2 {, `: Z- g6 Y# ]6 g      else IrOK=0;   //取码完成后判断读码是否正确


) @+ ~$ D5 ?, _7 _…………限于本文篇幅 余下代码请从论坛下载附件…………

游客，如果您要查看本帖隐藏内容请回复

' J) U4 U* Z7 C2 \; C" P6 J4 P7 N
6 s) [; M, D4 u3 R: C: m; ?

fanichicl

感谢分享啊 谢谢

zdmjjp

学习一下，感谢分享啊， 谢谢！

白杨

红外遥控指纹电子密码锁程序学习一下
/ Q0 B4 }: t, I  z