• 大小: 68KB
    文件类型: .rar
    金币: 1
    下载: 0 次
    发布日期: 2021-06-09
  • 语言: 其他
  • 标签: 密码锁  Proteus  

资源简介

密码锁 Proteus密码锁 Proteus密码锁 Proteus密码锁 Proteus密码锁 Proteus密码锁 Proteus密码锁 Proteus

资源截图

代码片段和文件信息

/*
六位密码原始密码为362330该程序有点问题也有不完善的地方就是修改密码后如果输入的密码与修改的密码
相同则锁会开如果有一次输入有错则密码会变回原来的密码即362330.可能因为定义的数组
pws[6]为全局变量但是也不肯定.希望下载的人提出宝贵的意见大家共同交流谢谢.
*/
#include
#define uchar unsigned char
#define uint unsigned int
uint num=10; //开始让数码管什么都显示
bit set=0; //定义设置密码的位
char count=-1; //开始让COUNT=-1方便后面显示数码管
sbit Beep=P1^2; //蜂鸣器
uchar temp;
uchar pws[6]={362330}; //原始密码
uchar pwx[6]; //按下的数字存储区
bit rightflag; //密码正确标志位
uchar workbuf[6];
uchar code tabledu[]={
0x3f0x060x5b0x4f0x660x6d0x7d0x070x7f0x6f0x000x40
}; //段选码共阴极
uchar code tablewe[]={
0xfe0xfd0xfb0xf70xef0xdf
}; //位选码
uint keyscan();
void delay(uchar z) //延时ms级
{
uchar y;
for(;z>0;z--)
for(y=120;y>0;y--);
}
void setpw() //设置密码函数
{
keyscan();
}
uint keyscan() //键盘扫描函数
{
P3=0xfe;
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
delay(5); //键盘去抖最好20ms以上这里用了5ms
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
count++;//按键计数加1
temp=P3;
switch(temp)
{
case 0xee: 
{
num=7;
if(count<6) //六位密码所以COUNT<6
{
if(set==0) //设置密码键没有按下时
pwx[count]=num; //存储按下的数字
else
pws[count]=num; //设置密码键按下时设置新密码
workbuf[count]=tabledu[11]; //相应位的数码管显示“--“不显示相应的数字密码是保密的
}
}
break;
case 0xde: 
{
num=8;
if(count<6) //以下扫描键盘的原理差不多同上
{
if(set==0)
pwx[count]=num;
else
pws[count]=num;
workbuf[count]=tabledu[11];
}
}
break;
case 0xbe: 
{
num=9;
{
if(count<6)
{
if(set==0)
pwx[count]=num;
else
pws[count]=num;
workbuf[count]=tabledu[11];
}

}
break;
case 0x7e: //设置密码键按下
{
set=1; //设置密码标志位置1
P1_3=0; //设置密码指示灯亮
workbuf[0]=0x00;//数码管第一位不显示
workbuf[1]=0x00;//......
workbuf[2]=0x00;//......
workbuf[3]=0x00;
workbuf[4]=0x00;
workbuf[5]=0x00;//......
count=-1; //按键计数复位为-1
if(count<6) //密码没有设置完继续设置密码
{
setpw(); //设置密码
}
}
break;
}
while(temp!=0xf0)  //按键抬起检测
{
temp=P3;
temp=temp&0xf0;
}
}
}
P3=0xfd;
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
delay(5);
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
count++;
temp=P3;
switch(temp)
{
case 0xed: 
{
num=4;
if(count<6)
{
if(set==0)
pwx[count]=num;
else
pws[count]=num;
workbuf[count]=tabledu[11];
}
}
break;
case 0xdd: 
{
num=5;
if(count<6)
{
if(set==0)
pwx[count]=num;
else
pws[count]=num;
workbuf[count]=tabledu[11];
}
}
break;
case 0xbd:
{
num=6;
if(count<6)
{
if(set==0)
pwx[count]=num;
else
pws[count]=num;
workbuf[count]=tabledu[11];

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        742  2009-07-27 17:34  密码锁\diy.PWI

     文件      13585  2008-07-06 22:09  密码锁\keilc\bb

     文件       3877  2008-07-06 22:09  密码锁\keilc\bb.hex

     文件      20952  2008-07-06 22:09  密码锁\keilc\bb.M51

     文件        194  2009-07-27 17:29  密码锁\keilc\bb.plg

     文件       2075  2005-05-29 13:45  密码锁\keilc\bb_Uv2.Bak

     文件       7596  2008-07-06 22:08  密码锁\keilc\main.c

     文件      25235  2008-07-06 22:09  密码锁\keilc\main.LST

     文件      15741  2008-07-06 22:09  密码锁\keilc\main.OBJ

     文件      11785  2008-07-06 22:09  密码锁\keilc\STARTUP.lst

     文件        896  2008-07-06 22:09  密码锁\keilc\STARTUP.obj

     文件       2194  2009-06-19 18:51  密码锁\keilc\bb.Uv2

    .......       938  2009-07-13 15:11  密码锁\keilc\bb_Opt.Bak

     文件        934  2009-07-27 17:29  密码锁\keilc\bb.Opt

     文件     126935  2009-07-27 17:33  密码锁\Last Loaded diy.DBK

     文件     126935  2009-07-27 17:34  密码锁\diy.DSN

     目录          0  2009-07-27 17:28  密码锁\keilc

     目录          0  2009-07-27 17:27  密码锁

     文件        115  2009-11-26 16:03  密码.txt

----------- ---------  ---------- -----  ----

               360729                    19


评论

共有 条评论