單片機電子密碼鎖_(可以修改設(shè)置密碼)——基于51單片機與AT24C02與LCD1602顯示

單片機電子密碼鎖 （可以修改設(shè)置密碼） 基于51單片機與 AT24C02與 LCD1602顯示 其電路圖連接如下： 本人已經(jīng)用硬件實驗，程序可用。正確 本程序特點：裝載后讀者可以自改密碼，然后需要再次載入程序時： 可以把主程序 aa=Sendstring(0xa0,1,table2,6)；這一句去掉。 然后程序的電子鎖密碼就是你個人設(shè)置的密碼。 程序代碼為： #include #include #include #define uchar unsigned char #define uint unsigned int #define LCDIO P2 #define delay4us() _nop_()；_nop_()；_nop_()；_nop_()； uchar buffer6=0； sbit sda=P37； sbit scl=P36； sbit beep=P35； bit flag=0,aa； /用戶蹲淵義定時溢出標志位 uchar DSY_BUFFER16= ； uchar DSY_BUFFER116= ； uchar Userpassword6=0； sbit rs=P04； sbit rd=P03； sbit lcden=P02； sbit led=P30； uchar code table2=123456； uchar code table=Your Password.； void delayms(uint z) uint x,y； for(x=z；x0；x-) for(y=110；y0；y-)； void delay() /短延時，兩個機器周期 ,做總線的延時用 ； void write_com(uchar com) rs=0； rd=0； lcden=0； P2=com； delayms(3)； lcden=1； delayms(3)； lcden=0； void write_date(uchar date) rs=1； rd=0； lcden=0； P2=date； delayms(3)； lcden=1； delayms(3)； lcden=0； void Display_String(uchar *p,uchar com) uchar i； write_com(com)； for(i=0；i16；i+) write_date(pi)； void init_lcd() lcden=0； write_com(0x38)； write_com(0x0c)； write_com(0x06)； write_com(0x01)； write_com(0x80)； Display_String(table,0x80)； Display_String(Lock OK! ,0xc0)； void start() sda=1； scl=1； delay4us()； sda=0； delay4us()； scl=0； void stop() sda=0； scl=1； delay4us()； sda=1； delay4us()； scl=0； void init() /初始化 sda=1； delay()； scl=1； delay()； void ack() sda=0； scl=1； delay4us()； scl=0； sda=1； void noack() sda=1； scl=1； delay4us()； scl=0； sda=0； uchar recbyte() uchar i,rd； rd=0x00； sda=1； for(i=0；i8；i+) scl=1； rd=1； rd|=sda； delay4us()； scl=0； delay4us()； scl=0； delay4us()； return rd； uchar sendbyte(uchar wd) uchar i； bit ack0； for(i=0；i8；i+) sda=(bit)(wd&0x80)； _nop_()； _nop_()； scl=1； delay4us()； scl=0； wd=1； delay4us()； sda=1； scl=1； delay4us()； ack0=!sda； scl=0； delay4us()； return ack0； uchar Recstring(uchar slave,uchar subaddr,uchar *buffer,uchar n) uchar i； start()； if(!sendbyte(slave) return 0； if(!sendbyte(subaddr) return 0； start()； if(!sendbyte(slave+1) return 0； for(i=0；in-1；i+) bufferi=recbyte()； ack()； buffern-1=recbyte()； noack()； stop()； return 1； uchar Sendstring(uchar slave,uchar subaddr,uchar *buffer,uchar n) uchar i； start()； if(!sendbyte(slave) return 0； if(!sendbyte(subaddr) return 0； for(i=0；in；i+) if(!sendbyte(bufferi) return 0； stop()； return 1； void clear_password() uchar i； for(i=0；i6；i+) Userpasswordi= ； for(i=0；i40x0F； switch(temp) case 1:keynum+=0；break； case 2:keynum+=4；break； case 4:keynum+=8；break； case 8:keynum+=12；break； break； delayms(600)； return keynum； void main() uchar temp,i=0,j=0,k=0,n； uchar IS_valid_user； beep=1； init()； init_lcd()； delayms(5)； aa=Sendstring(0xa0,1,table2,6)； delayms(5)； aa=Recstring(0xa0,1,buffer,6)； delayms(10)； P1=0x0f； while(1) 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 位以內(nèi) Userpasswordi=temp； DSY_BUFFERi=*； Display_String(DSY_BUFFER,0xc0)； i+； break； case 10: /按 A鍵開鎖 for(k=0；k6；k+) if(bufferk=(Userpasswordk+48) flag=1； else flag=0； if (flag=1) flag=0； i=0； led=0； /點亮 LED clear_password()； Display_String(OPEN OK! ,0xc0)； IS_valid_user = 1； j=0； else j+； led=1； /關(guān)閉 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鍵上鎖 led=1； clear_password()； Display_String(table,0x80)； Display_String(Lock OK! ,0xc0)； i=0； IS_valid_user=0； break； case 12: /按 C 鍵設(shè)置新密碼 /如果是合法用戶則提示輸入新密碼 if ( !IS_valid_user) i=0； Display_String(No rights ! ,0xc0)； delayms(1000)； Display_String(Your 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(Your Password.,0x80)； Display_String(Lock OK! ,0xc0)； else i = 0； init()； delayms(5)； for(k=0；k6；k+) Userpasswordk=Userpasswordk+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