|
簡易密碼鎖設(shè)計(jì),bug比較多
屏幕截圖 2023-04-26 181359.png (55.12 KB, 下載次數(shù): 37)
下載附件
2023-4-26 18:14 上傳
單片機(jī)源程序如下:- /************************************************************** *
- 功能:通過軟件程序設(shè)置密碼,初始密碼為123456,當(dāng)按鍵按下之后 *
- 再按下確認(rèn)鍵,如果密碼正確,則綠燈亮,舵機(jī)旋轉(zhuǎn)90度,如果*
- 密碼錯(cuò)誤,紅燈亮,短暫延時(shí)后,數(shù)碼管清零,紅燈滅,重新輸*
- 入密碼。 *
- *//************************************************************/
- /****************************************************************/
-
- #include <reg51.h>
- #define uchar unsigned char
- #define uint unsigned int
- sbit P2_0 = P2^0;
- sbit P2_1 = P2^1;
- sbit P2_2 = P2^2;
- sbit P2_3 = P2^3;
- sbit P2_4 = P2^4;
- sbit P2_5 = P2^5;
- sbit P2_6 = P2^6;
- sbit P3_6 = P3^6;
- sbit LED_G = P3^0;
- sbit LED_R = P3^1;
- sbit beep = P3^7;
- uint tab[16]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};
- uchar h,l,s,o,zhengque,m = 0,v = 1,w = 0,n = 1,keyval_0 ,keyval_1,keyval_2,keyval_3,
- keyval_4,keyval_5,keyval_6,keyval_7,keyval_8,keyval_9,keyval_10,keyval_11,keyval_12,
- keyval_13,keyval_14,keyval_15,keyval,temp = 0x01;
- void delay(uint z)
- {
- uint x , y;
- for(x = z ; x > 0 ; x--)
- for(y = 114 ; y > 0 ; y--);
- }
- //有參延時(shí)
-
- void key_scan1()
- {
-
- P1=0x0f;//檢測是哪一行有按鍵按下;
- if(P1!=0x0f)
- {
- delay(10);
- if(P1!=0x0f)
- {
- beep = ~beep;
- P1=0x0f;
- switch(P1)
- {
- case(0x0e):h=1;break;
- case(0x0d):h=2;break;
- case(0x0b):h=3;break;
- case(0x07):h=4;break;
- }
- }
- P1=0xf0;//檢測是哪一列有按鍵按下
- switch(P1)
- {
- case(0xe0):l=1;break;
- case(0xd0):l=2;break;
- case(0xb0):l=3;break;
- case(0x70):l=4;break;
- }
- while(P1!=0xf0);//當(dāng)按鍵復(fù)位時(shí)
-
- w++;
- beep = ~beep;
-
- //按一次第一個(gè)數(shù)碼管顯示,按兩次前兩個(gè)數(shù)碼管顯示......
- }
-
- }
- void shuru()
- {
- P2 = 0Xc0;
- //P0 = 0XBF;
-
- while(v)
- {
-
- key_scan1();
- s = 5*h + l;//行列進(jìn)行線性運(yùn)算,通過判斷s的值來判斷對(duì)應(yīng)按鍵
- switch(s)
- {
- case(9):keyval = 0;keyval_0 = 0;break;
- case(8):keyval = 1;keyval_1 = 1;break;
- case(7):keyval = 2;keyval_2 = 2;break;
- case(6):keyval = 3;keyval_3 = 3;break;
- case(14):keyval = 4;keyval_4 = 4;break;
- case(13):keyval = 5;keyval_5 = 5;break;
- case(12):keyval = 6;keyval_6 = 6;break;
- case(11):keyval = 7;keyval_7 = 7;break;
- case(19):keyval = 8;keyval_8 = 8;break;
- case(18):keyval = 9;keyval_9 = 9;break;
- case(17):keyval = 10;keyval_10 = 10;break;
- case(16):keyval = 11;keyval_11 = 11;break;
- case(24):keyval = 12;keyval_12 = 12;break;
- case(23):keyval = 13;keyval_13 = 13;break;
- case(22):keyval = 14;keyval_14 = 14;break;
- case(21):keyval = 15;keyval_15 = 15;break;
- }
-
- switch(w)
- {
- case 1: P2_0 = 1;P0 = tab[keyval];delay(100);P2_0 = 0;break;
- case 2: P2_1 = 1;P0 = tab[keyval];delay(100);P2_1 = 0;break;
- case 3: P2_2 = 1;P0 = tab[keyval];delay(100);P2_2 = 0;break;
- case 4: P2_3 = 1;P0 = tab[keyval];delay(100);P2_3 = 0;break;
- case 5: P2_4 = 1;P0 = tab[keyval];delay(100);P2_4 = 0;break;
- case 6: P2_5 = 1;P0 = tab[keyval];delay(100);P2_5 = 0;break;
- }
- if(P2_6 == 0)
- delay(10);
- if(P2_6 == 0)
- v = 0;
-
- } //依次輸入密碼
- }
- void main()
- {
- beep = 0;
- shuru();
- zhengque = ((keyval_1==1)&(keyval_2==2)&(keyval_3==3)&(keyval_4==4)&(keyval_5==5)&(keyval_6==6));//設(shè)置的密碼
- if(P2_6 == 0)
- {
- delay(10);
- if(P2_6 == 0) //確認(rèn)鍵按下時(shí),判斷密碼是否正確
- {
- if(zhengque)
- {
- LED_G = 0;
- delay(1000);
- LED_G = 1;
- EA = 1;
- IT0 = 1;
- TMOD = 0X01;
- TH0 = (60536%256);
- TL0 = (60536/256);
- while(n)
- {
- P3_6 = 0;
- }
- }
- else
- {
- for(o = 0 ; o < 10 ; o++)
- {
- LED_R = 0;
- beep = ~beep;
- delay(300);
- LED_R = 1;
-
-
- }
- }
- }
- }
- }
-
- void timer0() interrupt 1 //定時(shí)器0控制舵機(jī)的PWM
- {
- TH0 = (60536%256);
- TL0 = (60536/256);
- m++;
- if(m == 5)
- {
- P3_6 = 1;
- m = 0;
- n = 0;
- }
- }
- /*****************************************************************/
復(fù)制代碼
Keil代碼與Proteus仿真下載:
1.zip
(116.53 KB, 下載次數(shù): 10)
2023-4-26 18:14 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
|
評(píng)分
-
查看全部評(píng)分
|