电子密码锁C程序

C51电子密码锁

#include

#include

#define LCM_Data P0

#define PCOM P1

#define uchar unsigned char

#define uint unsigned int

sbit dula=P2^6;//数码管段选

sbit wela=P2^7;//数码管位选

sbit lcd1602_rs=P3^5;

sbit lcd1602_rw=P3^6;

sbit lcd1602_en=P3^4;

sbit Scl=P2^1; //24C02串行时钟

sbit Sda=P2^0; //24C02串行数据

sbit ALAM = P2^5; //报警

sbit KEY = P2^4; //开锁

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中断计数器,秒计数器

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(void)

{

unsigned int TempCyc = 5552;

while(TempCyc--);

}

//===================400ms延时==============================

void Delay400Ms(void)

{

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

{;}

}

}

void Nop(void) //空操作

{

_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;

}

/*发送数据子程序，Data为要求发送的数据*/

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

Data=temp;

BitCounter--;

}

while(BitCounter);

Scl=0;

}

/*读一字节的数据，并返回该字节值*/

uchar Read(void)

{

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

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--);

}

//--------------------------写指令---------------------------

write_1602com(uchar com)//****液晶写入指令函数****

{

lcd1602_rs=0;//数据/指令选择置为指令

lcd1602_rw=0; //读写选择置为写

P0=com;//送入数据 delay(1); lcd1602_en=1;//拉高使能端，为制造有效的下降沿做准备 delay(1);

lcd1602_en=0;//en由高变低，产生下降沿，液晶执行命令

}

//-------------------------写数据-----------------------------

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(void)

{

write_1602com(0x38);//设置液晶工作模式，意思：16*2行显示，5*7点阵，8位数据 write_1602com(0x0c);//开显示不显示光标

write_1602com(0x06);//整屏不移动，光标自动右移

write_1602com(0x01);//清显示

}

//==============将按键值编码为数值=========================

unsigned char coding(unsigned char m)

{

unsigned char k;

switch(m)

{

case (0xee): k=1;break;

case (0xde): k=2;break;

case (0xbe): k=3;break;

case (0x7e): k='A';break;

case (0xed): k=4;break;

case (0xdd): k=5;break;

case (0xbd): k=6;break;

case (0x7d): k='B';break;

case (0xeb): k=7;break;

case (0xdb): k=8;break;

case (0xbb): k=9;break;

}

case (0xe7): k='*';break; case (0xd7): k=0;break; case (0xb7): k='#';break; case (0x77): k='D';break; } return(k);

//=====================按键检测并返回按键值=============================== unsigned char keynum(void)

{

unsigned char row,col,keynum;

PCOM=0xf0;

if((PCOM&0xf0)!=0xf0)

{

Delay5Ms();

//Delay5Ms();

if((PCOM&0xf0)!=0xf0)

{

} row=PCOM&0xf0; //确定行线 keynum=row|0x0f; PCOM=keynum; col=PCOM&0x0f; keynum=row+col; while((PCOM&0xf0)!=0xf0) { PCOM=0xf0; } return keynum; } else return 0;

else return 0; //无键按下时返回0

}

//=======================一声提示音，表示有效输入======================== void OneAlam(void)

{

ALAM=0;

Delay5Ms();

ALAM=1;

//========================二声提示音，表示操作成功======================== void TwoAlam(void)

{

ALAM=0;

Delay5Ms();

ALAM=1;

Delay5Ms();

ALAM=0;

Delay5Ms();

ALAM=1;

}

//========================三声提示音,表示错误======================== void ThreeAlam(void)

{

ALAM=0;

Delay5Ms();

ALAM=1;

Delay5Ms();

ALAM=0;

Delay5Ms();

ALAM=1;

Delay5Ms();

ALAM=0;

Delay5Ms();

ALAM=1;

}

//=======================显示提示输入=========================

void DisplayChar(void)

{

unsigned char i;

if(pass==1)

{

write_1602com(er);

for(i=0;i

{

write_1602dat(LockOpen[i]);

}

}

else

{

if(N==0)

{

write_1602com(er);

for(i=0;i

{

write_1602dat(Error[i]);

}

}

else

{

write_1602com(er);

for(i=0;i

{

write_1602dat(start_line[i]);

}

}

}

}

//========================重置================================================== void ResetPassword(void)

{

unsigned char i;

unsigned char j;

密码if(pass==0) //函数 Ensure(void)中第一次输入正确密码就会将PASS置1 { pass=0; DisplayChar(); ThreeAlam(); } else { if(ReInputEn==1) //在键确认函数 Ensure(void)中两次输入正确密码就会将ReInputEn置1 { if(N==6) { ReInputCont++; if(ReInputCont==2) { for(i=0;i

储

{ write_1602com(er); for(j=0;j

}

} } }

//=======================输入密码错误超过三过，报警并锁死键盘======================

void Alam_KeyUnable(void)

{

P1=0x00;

{

ALAM=~ALAM;

Delay5Ms();

}

}

//=======================取消所

============================================

void Cancel(void)

{

unsigned char i;

unsigned char j;

write_1602com(er);

for(j=0;j

{

write_1602dat(start_line[j]);

}

TwoAlam(); //提示音

for(i=0;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(void)

{

unsigned char i,j;

RdFromROM(CurrentPassword,0,6);

if(N==6) //N的值由main函数确定

{

//从24C02里读出存储密码 if(ReInputEn==0) //重置密码功能未开启

{

盘

for(i=0;i

开锁，

{ write_1602com(er); for(j=0;j

志位

灯亮

提示

输入

器清零

========

存储

TwoAlam(); //操作成功提示音 KEY=0; //开锁 pass=1; //置正确标 TR0=1; //开启定时 open_led=0; //开锁指示 for(j=0;j

} { write_1602dat(initword[j]); //显示初始化密码 } TwoAlam(); Delay400Ms(); TwoAlam(); N=0;

else //不同于初始密码时

{

write_1602com(er);

for(j=0;j

{

write_1602dat(Error[j]);

}

ThreeAlam(); //错误提示音

pass=0;

}

}

}// if(ReInputEn==0) 重置密码功能未开启

else //当已经开启重置密码功能时，而按下开锁键，

{

write_1602com(er);

for(j=0;j

{

write_1602dat(Er_try[j]);

}

ThreeAlam();

}

}// if(N==6) N的值由main函数确定

else // if(N!=6)

{

write_1602com(er);

for(j=0;j

{

write_1602dat(Error[j]);

}

ThreeAlam(); //错误提示音

pass=0;

}

N=0; //将输入数据计数器清零，为下一次输入作准备

operation=1;

}// void Ensure(void)

//==============================主函数===============================

void main(void)

{

unsigned char key,NUM;

unsigned char i,j;

数

dula=0;//关闭数码管段选 wela=0;//关闭数码管位选 PCOM=0xFF; TMOD=0x11; TL0=0xB0; TH0=0x3C; EA=1; ET0=1; TR0=0; Delay400Ms(); //启动等待，等LCM讲入工作状态 lcd_init(); //LCD初始化 write_1602com(yi);//显示固定符号从第一行第0个位置之后开始显示 for(i=0;i

else { NUM=coding(key); // coding(KEY)将按键值编码为数值 { switch(NUM)

{

大于6位时则无效。

以下程序$$$$$$$$$$$$

容

case ('A'): ; break; case ('B'): ; break; case ('C'): ; break; case ('D'): ResetPassword(); break; //重新设置密码 case ('*'): Cancel(); break; //取消当前输入 case ('#'): Ensure(); break; //确认键， default: { write_1602com(er); for(i=0;i

if(NUM==6) write_1602dat('6');

if(NUM==7) write_1602dat('7');

if(NUM==8) write_1602dat('8');

if(NUM==9) write_1602dat('9'); */

//&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&

write_1602com(er+6+j);

write_1602dat('*');

}

输入密码

InputData[N]=NUM; //从0位开始,循环6次保存6位 N++; //接受6个有效按键位N就不符合if(N

else //输入数据位数大于6后，跳出程序 {

N=6;

break;

}

}//default:

}// switch(NUM)

} // NUM=coding(KEY)无意义 }// if(KEY=0)

} // if(KEY!=0)

}//while(1)

}//main

//*********************************中断服务函**************************************

void time0_int(void) interrupt 1

{

TL0=0xB0;

TH0=0x3C;

//TR0=1;

countt0++;

if(countt0==20)

{

countt0=0;

second++;

if(pass==1)

{

if(second==1)

{

open_led=1; //关指示灯

TR0=0; //关定时器 数

TL0=0xB0; TH0=0x3C; second=0; }

}

else // if(pass!=1) {

if(second==3) {

TR0=0; second=0; key_disable=0; s3_keydown=0; TL0=0xB0; TH0=0x3C; }

else

TR0=1; }

} // if(countt0==20) } //键盘锁定3秒后释放