原创 C密码锁程序和原理图.rar

/*****************************************/
/* Copyright (c) 2005, 通信工程学院      */
/* All rights reserved.                  */
/* 作    者：戴 佳       */
/*****************************************/

#ifndef _PWLOCK_H   // 防止PWLock.h被重复引用

#define _PWLOCK_H

#include <reg52.h>
#include <absacc.h>
#include <stdio.h> 
#include <math.h>

#define uchar unsigned char
#define uint unsigned int

uchar digbit;     // 字位
uchar wordbuf[6];    // 字型码缓冲区
uchar t1count;     // 定时器1由50ms累积到1s所用的计数器
uchar count;     // 密码位计数
uchar pw[6];     // 初始密码存储区
uchar pwbuf[6];     // 输入密码存储区
bit enterflag;     // 确认键按下与否标志
bit pwflag;      // 密码正确与否标志
bit showflag;     // 数码管显示与否标志
sbit green="P3"^0;
sbit red="P3"^1;

void display(void);    // 显示函数

#endif

/*****************************************/
/* Copyright (c) 2005, 通信工程学院      */
/* All rights reserved.                  */
/* 作    者：戴 佳       */
/*****************************************/

#include "PWLock.h"

/* 键消抖延时函数 */
void delay(void)
{
 uchar i;
 for (i=300;i>0;i--);
}

/* 键扫描函数 */
uchar keyscan(void)
{
 uchar scancode,tmpcode;
 P1 = 0xf0;         // 发全0行扫描码
 if ((P1&0xf0)!=0xf0)     // 若有键按下
 {
  delay();       // 延时去抖动
  if ((P1&0xf0)!=0xf0)    // 延时后再判断一次，去除抖动影响
  {
   scancode = 0xfe;
   while((scancode&0x10)!=0)  // 逐行扫描
   {
    P1 = scancode;    // 输出行扫描码
    if ((P1&0xf0)!=0xf0)  // 本行有键按下
    {
     tmpcode = (P1&0xf0)|0x0f;

     /* 返回特征字节码，为1的位即对应于行和列 */
     return((~scancode)+(~tmpcode));
    }
    else scancode = (scancode<<1)|0x01;  // 行扫描码左移一位
   }
  }
 }
 return(0);        // 无键按下，返回值为0  
}

/* 定时器0中断服务子程序，2ms定时动态扫描显示 */
void time0_int(void) interrupt 1
{
 /* 重置2ms定时 */
 TH0 = -2000/256;
 TL0 = -2000%256;

 if (showflag==1)
  display();    // 调用显示函数
}

/* 定时器1中断服务子程序，50ms*/
void time1_int(void) interrupt 3
{
 uchar k;
 /* 重置50ms定时 */
 TH1 = -50000/256;
 TL1 = -50000%256;

 if (t1count<20)    
 {
  t1count++;
 }
 else      // 计时到1s
 {
  TR1 = 0;    // 关闭计数器1
  t1count = 0; 
  green = 1;    // 绿灯不亮
  red = 1;    // 红灯不亮
  showflag = 1;   // 打开数码管显示
  digbit = 0x01;   // 从数码管第1位开始动态显示
  for (k=0;k<6;k++)  // 显示888888
   wordbuf[k] = 8;
 }
}

/* 根据共阴极字型编码表获取0~9，A~B字型代码 */
uchar getcode(uchar i)
{
 uchar p;
 switch (i)
 {
  case 0:  p="0x3f"; break;   /* 0 */
  case 1:  p="0x06"; break;   /* 1 */
  case 2:  p="0x5B"; break;   /* 2 */
  case 3:  p="0x4F"; break;   /* 3 */
  case 4:  p="0x66"; break;   /* 4 */
  case 5:  p="0x6D"; break;   /* 5 */
  case 6:  p="0x7D"; break;   /* 6 */
  case 7:  p="0x07"; break;   /* 7 */
  case 8:  p="0x7F"; break;   /* 8 */
  case 9:  p="0x67"; break;   /* 9 */
  case 10: p="0x77"; break;   /* A */
  case 11: p="0x7C"; break;   /* B */
  case 12: p="0x39"; break;   /* C */
  case 13: p="0x5E"; break;   /* D */
  case 14: p="0x79"; break;   /* E */
  case 15: p="0x71"; break;   /* F */
  default:    break;
 }
 return(p);
}

/* 显示函数 */
void display(void)
{
 uchar i;
 switch (digbit)
 {
  case 1:  i=0; break;
  case 2:  i=1; break;
  case 4:  i=2; break;
  case 8:  i=3; break;
  case 16: i=4; break;
  case 32: i=5; break;
  default:  break;
 }

 P2 = 0x0;      // 关闭显示
 P0 = getcode(wordbuf);  // 送字型码
 P2 = digbit;     // 送字位码
 
 if (digbit<0x20)    // 共6位
  digbit = digbit*2;   // 左移一位
 else
     digbit = 0x01;
}