/*******************************************************************************************
程序名称:单片机电子密码锁 (可修改设置密码)——基于51单片机与AT24C02与LCD1602显示
————————————————单片机实验课大作业——————————————————
程序介绍:输入正确密码时,液晶屏提示,打开继电器,然后灯泡亮,蜂鸣器开始播放音乐;
输入密码错误时, 液晶屏提示,当三次错误时,蜂蜜器发出报警声
作者:walt740
编写日期:2013/12/16
********************************************************************************************/
#include<reg52.h>
#include<string.h>
#include<intrins.h>
#include<compact.h>
#include<lcd1602.h>
#include<iic.h>
#include<keyboard.h>
#include<sounder.h>
void total_init(); // 总初始化
void lock_process(); // 密码锁 处理过程
/***********************************************************************/
void main() //主函数
{
total_init();
while(1)
{
lock_process();
}
}
/**********************************************************************/
void total_init() // 总初始化
{
beep=0;
Time0_Init(); //定时器0中断初始化
init();
init_lcd();
delayms(5);
/*------------------------------修改代码(2014.8.29)-------------------------------------------*/
aa=Recstring(0xa0,1,buffer,6); //先从EEPROM中接收数据,存入buffer缓存中,
delayms(5);
if(buffer[0]==NULL) //如果数组的首个元素为空,则表示EEPROM中未有数据
{
aa=Sendstring(0xa0,1,table2,6); //执行发送语句,将默认密码存入EEPROM中
delayms(5);
aa=Recstring(0xa0,1,buffer,6); //重新接收数据,存入buffer缓存中,
delayms(10);
} /*首次执行密码锁程序会执行本段程序,以后则直接执行 aa=Recstring(0xa0,1,buffer,6);/
/*---------------------------------------------------------------------------------------------*/
P1=0x0f;
}
/**********************************************************************/
void lock_process() // 密码锁 处理过程
{
if(P1!=0x0f)
{
temp=Keys_Scan();
switch(temp)
{
case 0: case 1: case 2: case 3: case 4:
case 5: case 6: case 7: case 8: case 9:
if (i<=5) //密码限制在6位以内
{
Userpassword=temp;
DSY_BUFFER='*';
Display_String(DSY_BUFFER,0xc0);
i++;
}break;
case 10: //按A键开锁
for(k=0;k<6;k++)
{
if(buffer[k]==(Userpassword[k]+48))
flag=1;
else
flag=0;
}
if (flag==1)
{
flag=0;
i=0;
relay=0; //点亮LED
clear_password();
Display_String("OPEN OK! ",0xc0);
IS_valid_user = 1;
j=0;
Play_Song(0); //播放
}
else
{
j++;
relay=1; //关闭LED
clear_password();
Display_String("ERROR!Have try ",0xc0);
write_com(0xcf);
write_date(0x30+j);
IS_valid_user=0;
}
i=0;
break;
case 11: //按B键上锁
relay=1;
clear_password();
Display_String(table,0x80);
Display_String("Lock OK! ",0xc0);
i=0;
IS_valid_user=0;
break;
case 12: //按C键设置新密码
//如果是合法用户则提示输入新密码
if ( !IS_valid_user)
{
i=0;
Display_String("No rights ! ",0xc0);
delayms(1000);
Display_String("Input Password...",0x80);
Display_String("Lock OK! ",0xc0);
}
else
{
i=0;
Display_String("New Password: ",0x80);
Display_String(" ",0xc0);
}
break;
case 13: //按D键保存新密码
if ( !IS_valid_user)
{
i=0;
Display_String("No rights ! ",0xc0);
delayms(1000);
Display_String("Input Password...",0x80);
Display_String("Lock OK! ",0xc0);
}
else
{
i = 0;
init();
delayms(5);
for(k=0;k<6;k++)
{
Userpassword[k]=Userpassword[k]+48;
}
aa=Sendstring(0xa0,1,Userpassword,6);
delayms(5);
aa=Recstring(0xa0,1,buffer,6);
delayms(5);
clear_password();
Display_String(table,0x00);
Display_String("Password Saved! ",0xc0);
delayms(1000);
Display_String("Do lock agian ? ",0xc0);
}
break;
case 14: //按E键消除所有输入
i=0;
clear_password();
Display_String(" ",0xc0);
break;
case 15: //清除一位
if(i!=0)i--;
for(n=0;n<i;n++)
{
DSY_BUFFER1[n]='*';
}
Display_String(DSY_BUFFER1,0xc0);
}
P1=0x0f;
}
if(j==3)
{
Display_String("THIEF!!!THIEF!!!",0xc0);
j=0;
bell();
}
}
/***********************************END**************************************/
音乐数组文件
unsigned char code SONG[] ={ //祝你平安
0x26,0x20,0x20,0x20,0x20,0x20,0x26,0x10,0x20,0x10,0x20,0x80,0x26,0x20,0x30,0x20,
0x30,0x20,0x39,0x10,0x30,0x10,0x30,0x80,0x26,0x20,0x20,0x20,0x20,0x20,0x1c,0x20,
0x20,0x80,0x2b,0x20,0x26,0x20,0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x80,0x26,0x20,
0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x60,0x40,0x10,0x39,0x10,0x26,0x20,
0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x80,0x26,0x20,0x2b,0x10,0x2b,0x10,
0x2b,0x20,0x30,0x10,0x39,0x10,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x20,
0x20,0x10,0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x18,0x20,0x18,0x20,0x26,0x20,
0x20,0x20,0x20,0x40,0x26,0x20,0x2b,0x20,0x30,0x20,0x30,0x20,0x1c,0x20,0x20,0x20,
0x20,0x80,0x1c,0x20,0x1c,0x20,0x1c,0x20,0x30,0x20,0x30,0x60,0x39,0x10,0x30,0x10,
0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x10,0x26,0x10,0x26,0x10,0x2b,0x10,0x2b,0x80,
0x18,0x20,0x18,0x20,0x26,0x20,0x20,0x20,0x20,0x60,0x26,0x10,0x2b,0x20,0x30,0x20,
0x30,0x20,0x1c,0x20,0x20,0x20,0x20,0x80,0x26,0x20,0x30,0x10,0x30,0x10,0x30,0x20,
0x39,0x20,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x10,0x40,0x10,0x20,0x10,
0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x00,
//路边的野华不要采
0x30,0x1C,0x10,0x20,0x40,0x1C,0x10,0x18,0x10,0x20,0x10,0x1C,0x10,0x18,0x40,0x1C,
0x20,0x20,0x20,0x1C,0x20,0x18,0x20,0x20,0x80,0xFF,0x20,0x30,0x1C,0x10,0x18,0x20,
0x15,0x20,0x1C,0x20,0x20,0x20,0x26,0x40,0x20,0x20,0x2B,0x20,0x26,0x20,0x20,0x20,
0x30,0x80,0xFF,0x20,0x20,0x1C,0x10,0x18,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,
0x20,0x2B,0x40,0x20,0x20,0x1C,0x10,0x18,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,
0x20,0x2B,0x40,0x20,0x30,0x1C,0x10,0x18,0x20,0x15,0x20,0x1C,0x20,0x20,0x20,0x26,
0x40,0x20,0x20,0x2B,0x20,0x26,0x20,0x20,0x20,0x30,0x80,0x20,0x30,0x1C,0x10,0x20,
0x10,0x1C,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,0x20,0x2B,0x40,0x20,0x15,0x1F,
0x05,0x20,0x10,0x1C,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,0x20,0x2B,0x40,0x20,
0x30,0x1C,0x10,0x18,0x20,0x15,0x20,0x1C,0x20,0x20,0x20,0x26,0x40,0x20,0x20,0x2B,
0x20,0x26,0x20,0x20,0x20,0x30,0x30,0x20,0x30,0x1C,0x10,0x18,0x40,0x1C,0x20,0x20,
0x20,0x26,0x40,0x13,0x60,0x18,0x20,0x15,0x40,0x13,0x40,0x18,0x80,0x00,
};
还有很多,你们可以看压缩包里的
|