单片机密码锁C程序完整代码

单片机密码锁C程序完整代码2009-08-18 14:39#include<AT89x51.h>#include"intrins.h"#include"key.h"#include"xsh.h"#include"24c02.h"#define ulong unsigned longbit BJCB=0;//报警标志XG=0,//修改密码标志位BJ=0,//报警标志位SJ=0;//锁键盘标志位// xg=0;//修改密码标志位uchar PSWD0_0[16]={0};//密码输入缓存存储单元//uchar code PSWD0_1[16]={1,2,3,4,5,6,7,8,1,2,3,4,5,6,7,8};//用户初始密码存储单元//uchar PSWD1_0[16]={0};//读出密码缓存存储单元uchar PSWD1_1[16]={1,2,3,4,5,6,7,8,1,2,3,4,5,6,7,8};//管理员初始密码存储单元sbit OUT=P3^5;//输出端口sbit L1=P0^2;//上电指示sbit L2=P0^1;//开锁指示sbit L3=P0^0;//报警指示uint mg=0,//密码个数KSC=0,//开锁次数BJC=0,//报警次数TCNTY=0,//用户按键定时次数累加TCNTG=0,//管理员输入密码定时次数yhsh,//用户输入标志位glsh,//管理员输标志位shw;//密码输完标志位void yhmimaxig();//密码修改程序void glmimaxig();//管理员修改程序void bjyin(ulong t){ulong c;uint n;for(c=0;c<t;c++){for(n=0;n<50;n++); //延时BEEP=~BEEP; //取反输出到喇叭的信号}}void delay_10ms(void){uint i = 1000;while(i--);}//////////////定时中断服务函数////////////////////////////////////// void timer0() interrupt 1{uint i;TH0=(65536-50000)/256; //对TH0 TL0赋值50MS定时TL0=(65536-50000)%256; //重装计数初值if(yhsh==1){TCNTY++;//用户定时计数if(shw==1){TR0=0;TCNTY=0;}if(TCNTY==200){TR0=0;//关闭T0定时器TCNTY=0;mg=0;//密码个数清零L1=1;for(i=0;i<2;i++)//声光报警电路{L3=0;bjyin(1000);L3=1;delay(1000);}L1=0;}}else if(glsh==1){TCNTG++;//管理员定时计数if(shw==1){TR0=0;TCNTG=0;}if(TCNTG==160){TR0=0;//关闭T0定时器TCNTG=0;mg=0;//密码个数清零L1=1;for(i=0;i<2;i++)//声光报警电路{L3=0;bjyin(1000);L3=1;delay(1000);}L1=0;}}}void main(){uint i;TMOD=0x01; //定时器工作在方式1ET0=1;EA=1;TH0=(65536-50000)/256; //对TH0 TL0赋值TL0=(65536-50000)%256; //使定时器0.05秒中断一次//Read_page24c02(0x00,PSWD1_1,16);//向24c02里读用户初始密码 //i2cWrite24LC16B(0,0X20);/////////////第一次向24c02里写入初始管理员密码、用户密码、开锁次数/////////////////////KSC=i2cRead24LC16B(0X20);loop: L1=0;//上电红灯亮L2=1;//开锁成功后绿灯亮L3=1;//输错时黄灯亮报警OUT=0;//开信号关闭display_0(KSC);//开锁前显示///////////密码输入/////////////////if(SJ==0)//锁键盘标志位为0{do{flag=0;//键盘标志位key();if(flag==1&&num==12) //判断是否为管理员功能键按下{goto gl;}if(flag==1&&num<=9){PSWD0_0[mg]=num;mg++;//密码个数}if(flag==1&&num==14&&mg>=1)//输入错误删除{mg=mg-1;}if(mg==1) //有密码键按下开定时器限时{TR0=1;yhsh=1;}}while(num!=15);if(mg!=16){for(i=mg;i<16;i++){PSWD0_0[i]=0;}}/////////////////密码比较电路//////////////////////////// if(flag==1&&num==15){ flag=0;yhsh=0;shw=1;num=0;for(i=0;i<16;i++) //从24c02里读出16个密码{PSWD1_1[i]=i2cRead24LC16B(i);delay_10ms;}for(i=0;i<16;i++){if(PSWD1_1[i]!=PSWD0_0[i]){BJCB=1;break;}else}}if(BJCB!=0){BJC++;if(BJC!=3){BJCB=0; //第一次和第二次报警delay(500);mg=0;//密码个数清零L1=1;for(i=0;i<3;i++)//声光报警电路{L3=0;display_3();bjyin(1000);L3=1;delay(1000);}goto loop;}else if(BJC==3){BJC=0;BJCB=0;display_5();//三次输入密码失败,自锁SJ=1;//锁键盘标志位mg=0;//密码个数清零L1=1;for(i=0;i<2;i++)//声光报警电路{L3=0;bjyin(1000);L3=1;delay(1000);}goto loop;}}elseif(BJCB==0){display_1(KSC);i2cWrite24LC16B(KSC,0X20);if(KSC==100){SJ=1;}L2=0;L1=1;OUT=1;mg=0;//密码个数清零loop1:do //键盘扫描等待功能键按下{flag=0;key();if(flag){flag=0;switch(num){case 13:{display_2();do{flag=0;//键盘标志位key();if(flag==1&&num<=9){PSWD0_0[mg]=num;mg++;//密码个数}if(flag==1&&num==14&&mg>=1)//输入错误删除{mg=mg-1;}if(mg==16){do //键盘扫描等待功能键按下{flag=0;key();}while(num!=15);}}while(num!=15);if(mg!=16&&num==15){for(i=mg;i<16;i++){PSWD0_0[i]=0;}}if(flag==1&&num==15){flag=0;mg=0;for(i=0;i<16;i++) //用一次写一个向24c02里写{i2cWrite24LC16B(PSWD0_0[i],i);delay_10ms;}display_1(KSC);do //键盘扫描等待功能键按下{flag=0;key();}while(num!=11); //按下返回键，锁锁返回{goto loop;}}};break;case 11: {goto loop;//break;}}}}while(flag!=0);//如果设置密码键按下goto loop1;// i2cWrite24c02_page(0x00,PSWD1_1,mg);}}else{do{flag=0;key();}while(num!=12);//判断是否为管理员功能键按下gl:do//管理员输入密码{flag=0;key();if(flag==1&&num<=9){PSWD0_0[mg]=num;mg++;//密码个数}if(flag==1&&num==14&&mg>=1)//删除键按下{mg=mg-1;}if(mg==1){TR0=1;}//开定时器TO限5秒开锁}while(num!=15);if(mg!=16&&num==15){for(i=mg;i<16;i++){PSWD0_0[i]=0;}}//////////管理员密码比较/////////////////////// //Read_page24c02(0x10,PSWD0_1,16)for(i=0;i<16;i++) //从24c02里读出16个密码{PSWD1_1[i]=i2cRead24LC16B((0x10+i));delay_10ms;}if(flag==1&&num==15){ flag=0;shw=1;num=0;for(i=0;i<mg;i++){if(PSWD1_1[i]!=PSWD0_0[i]){ BJCB=1;break;}elseBJCB=0;}}if(BJCB!=0){BJC++;if(BJC!=3){BJCB=0; //第一次和第二次报警mg=0;//密码个数清零L1=1;for(i=0;i<2;i++)//声光报警电路{L3=0;display_3();bjyin(1000);L3=1;delay(1000);}display_1(KSC);goto loop;}else{BJCB=0;display_5();//三次输入密码失败,自锁mg=0;//密码个数清零delay(10000);display_1(KSC);goto loop;}}else{SJ=0;display_4();//管理员开锁显示mg=0;L2=0;L1=1;L3=0;//密码个数清零do //键盘扫描等待功能键按下{flag=0;key();}while(flag==0); //如果设置密码键按下if(flag==1&&num==13){flag=0;display_2();do{flag=0;//键盘标志位key();if(flag==1&&num<=9){PSWD0_0[mg]=num;mg++;//密码个数}if(flag==1&&num==14&&mg>=1)//输入错误删除 {mg=mg-1;}if(mg==16){do //键盘扫描等待功能键按下{flag=0;key();}while(num!=15);}}while(num!=15);if(mg!=16&&num==15){for(i=mg;i<16;i++){PSWD0_0[i]=0;}}if(flag==1&&num==15){flag=0;mg=0;for(i=0;i<16;i++) //用一次写一个向24c02里写{i2cWrite24LC16B(PSWD0_0[i],(0x10+i));delay_10ms;}display_4();do //键盘扫描等待功能键按下{flag=0;key();}while(num!=11); //按下返回键，锁锁返回{goto loop;}}}if(flag==1&&num==10){KSC=0;i2cWrite24LC16B(KSC,0X20);display_1(KSC);do //键盘扫描等待功能键按下{flag=0;key();}while(num!=11);//按下返回键，锁锁返回goto loop;}if(flag==1&&num==11)//按下返回键，锁锁返回{goto loop;}}}}#ifndef _key_h#define _key_h#include<AT89x51.h>#define uchar unsigned char#define uint unsigned intbit flag=0;//按键按下标志位sbit BEEP=P3^7;//蜂鸣器端口delay(int z)//延时1ms{ int x,y;for (x=z;x>0;x--)for (y=140;y>0;y--);}uchar num;//按键返回值////////按键音程序////////////////// void yin(){int c,n;if(flag==1){for(c=0;c<80;c++){for(n=0;n<50;n++); //延时BEEP=~BEEP; //取反输出到喇叭的信号}}}////////////键盘程序/////////////////// int key(){ uchar temp;P2=0X7f;temp=P2&0x0f;if(temp!=0x0f){delay(5);if(temp!=0x0f){temp=P2;switch(temp){ case 0x77:num=0;break;case 0x7b:num=1;break;case 0x7d:num=2;break;case 0x7e:num=3;}do{ //等待按键抬起 temp=P2;temp=temp&0x0f;}while(temp!=0x0f);flag=1;yin();}}P2=0Xbf;temp=P2&0x0f;if(temp!=0x0f){delay(5);if(temp!=0x0f){temp=P2;switch(temp){ case 0xb7:num=4;break;case 0xbb:num=5;break;case 0xbd:num=6;break;case 0xbe:num=7;break;}do{temp=P2;temp=temp&0x0f;}while(temp!=0x0f);flag=1;yin();}}P2=0Xdf;temp=P2&0x0f;if(temp!=0x0f){delay(5);if(temp!=0x0f){temp=P2;switch(temp){ case 0xd7:num=8;case 0xdb:num=9;break;case 0xdd:num=10;break;case 0xde:num=11;break;}do{temp=P2;temp=temp&0x0f;}while(temp!=0x0f);flag=1;yin();}}P2=0Xef;temp=P2&0x0f;if(temp!=0x0f){delay(5);if(temp!=0x0f){temp=P2;switch(temp){ case 0xe7:num=12;break;case 0xeb:num=13;break;case 0xed:num=14;break;case 0xee:num=15;break;}do{temp=P2;temp=temp&0x0f;}while(temp!=0x0f);flag=1;yin();}}return(num);}#endif#ifndef _xsh_h#define _xsh_h#include<AT89x51.h>#define uchar unsigned char#define uint unsigned intsbit shj=P1^0;//串口数据口sbit sck=P1^1;//串口时钟uchar code tab[20]={ 0x88,/*0*/0xBE,/*1*/0xC4,/*2*/0x94,/*3*/0xB2,/*4*/0x91,/*5*/0x81,/*6*/0xBC,/*7*/0x80,/*8*/0x90,/*9*/0xA0,/*A*/0x83,/*b*/0xC9,/*C*/0x86,/*d*/0xC1,/*E*/0xE1,/*F*/0xA8,/*N*/0xF7,/*-*/0x94,/*反E*/0xE0/*P*/ }; //共阳数码管uchar code sb0[3]={8,8,8},/*开锁后显示*/code sb1[3]={0,15,15},/*开锁前显示*/code sb2[6]={17,17,17,17,17,17},/*修改显示*/code sb3[6]={16,0,16,0,16,0},/*第一二次报警显示*/ code sb4[6]={8,8,8,8,8,8},/*管理员进入显示*/code sb5[6]={18,18,18,18,18,18};/*第三次报警显示*///////////////////////////*显示电路*///////////////////////// void writedata(uchar num)//传送一个字节{uchar temp;int i;temp=tab[num];for(i=0;i<8;i++){ temp=temp<<1;shj=CY;sck=0;sck=1;}}void display_0(uchar temp)//开锁前状态{ int i,g,s,q;uchar m;q=temp/100;s=temp%100/10;g=temp%10;for(i=0;i<3;i++){m=sb1[i];writedata(m);}writedata(q);writedata(s);writedata(g);}void display_1(uchar temp)//开锁后状态{int i,g,s,q;uchar m;q=temp/100;s=temp%100/10;g=temp%10;for(i=0;i<3;i++){m=sb0[i];writedata(m);}writedata(q);writedata(s);writedata(g);}void display_2()//修改密码显示{int i;uchar m;for(i=0;i<6;i++){m=sb2[i];writedata(m);}}void display_3()//报警显示{int i;uchar m;for(i=0;i<6;i++){m=sb3[i];writedata(m);}}void display_4()//管理员模式显示{int i;uchar m;for(i=0;i<6;i++){m=sb4[i];writedata(m);}}void display_5()//管理员模式显示{int i;uchar m;for(i=0;i<6;i++){m=sb5[i];writedata(m);}}#endif#ifndef _24c02_h#define _24c02_h#include<AT89x51.h>#define WriteDeviceAddress 0xa0#define ReadDeviceAddress 0xa1sbit SDA=P1^5;//I2C数据端sbit SCL=P1^6;//I2C时钟端///////////////////////24C0224C08读写驱动程序///////////////////////void DelayMs(unsigned int number) {unsigned char temp;for(;number>=1;number--){for(temp=112;temp>=1;temp--) ;}}void i2cStart(void){SDA=1;SCL=1;_nop_();_nop_();_nop_();_nop_();_nop_();SDA=0;_nop_();_nop_();_nop_();_nop_();_nop_();SCL=0;}void i2cStop(void){SDA=0;SCL=1;_nop_();_nop_();_nop_();_nop_();_nop_();SDA=1;_nop_();_nop_();_nop_();_nop_();_nop_();}void i2cAck(void){SDA=0;SCL=1;_nop_();_nop_();_nop_();_nop_();SDA=1;SCL=0;}void i2cNoAck(void){SDA=1;SCL=1;_nop_();_nop_();_nop_();_nop_();SDA=0;SCL=0;}void i2cWrite8Bit(unsigned char input) {unsigned char temp;for(temp=8;temp!=0;temp--){SDA=(bit)(input&0x80);SCL=1;_nop_();_nop_();_nop_();_nop_();_nop_();SCL=0;input=input<<1;}DelayMs(20);}unsigned char i2cRead8Bit(void){unsigned char temp,rbyte=0;for(temp=8;temp!=0;temp--){SCL=1;_nop_();_nop_();_nop_();rbyte=rbyte<<1;rbyte=rbyte|((unsigned char)(SDA));SCL=0;}return(rbyte);}void i2cWrite24LC16B(unsigned char wdata,unsigned char RomAddress) {i2cStart();i2cWrite8Bit(WriteDeviceAddress);i2cAck();i2cWrite8Bit(RomAddress);i2cAck();i2cWrite8Bit(wdata);i2cAck();i2cStop();DelayMs(20);}//写入多个字节到24c02中//传入参数：地址、待写入的数据的首地址、数据长度bit i2cWrite24c02_page(uchar RomAddress,uchar *WRdata,uchar length) {uint i;i2cStart();i2cWrite8Bit(WriteDeviceAddress);i2cAck();i2cWrite8Bit(RomAddress);i2cAck();for(i=0;i<length;i++){i2cWrite8Bit(*WRdata);i2cAck();WRdata++;}i2cStop();DelayMs(20);return(1);}unsigned char i2cRead24LC16B(unsigned char RomAddress){unsigned char x;i2cStart();i2cWrite8Bit(WriteDeviceAddress);i2cAck();i2cWrite8Bit(RomAddress);i2cAck();i2cStart();i2cWrite8Bit(ReadDeviceAddress);i2cAck();_nop_();_nop_();_nop_();x=0;x=i2cRead8Bit();i2cNoAck();i2cStop();return(x);}//从24c02中读出多个字节bit Read_page24c02(uchar RomAddress,uchar p[],uint n) { uint i;i2cStart();i2cWrite8Bit(WriteDeviceAddress);i2cAck();i2cWrite8Bit(RomAddress);i2cAck();i2cStart();i2cWrite8Bit(ReadDeviceAddress);i2cAck();_nop_();_nop_();_nop_();for(i=0;i<n-1;i++){p[i]=i2cRead8Bit();i2cAck();}p[n-1]=i2cRead8Bit();i2cNoAck();i2cStop();return(1);}。