標(biāo)題:
基于C51單片機的密碼鎖代碼
[打印本頁]
作者:
LLLBBB
時間:
2017-6-1 22:49
標(biāo)題:
基于C51單片機的密碼鎖代碼
分享一個密碼鎖的小程序
0.png
(75.86 KB, 下載次數(shù): 133)
下載附件
2017-6-2 00:31 上傳
單片機源代碼如下:
#include<reg51.h> // 包含51單片機寄存器定義的頭文件
unsigned char ID; //儲存流水燈的流動速度
sbit S1=P1^4; //位定義S1為P1.4
/**************************************************************
函數(shù)功能:延時子程序
**************************************************************/
void delay(void) //因為僅對一個按鍵掃描,所以延時時間較長約200ms
{
unsigned char i,j;
for(i=0;i<200;i++)
for(j=0;j<100;j++)
;
}
/**************************************************************
函數(shù)功能:主函數(shù)
**************************************************************/
void main(void)
{
TMOD=0x02; //使用定時器T0的模式2
EA=1; //開總中斷
ET0=1; //定時器T0中斷允許
TR0=1; //定時器T0開始運行
TH0=256-200; //定時器T0賦初值,每200微妙來1次中斷請求
TL0=256-200;
ID=0;
while(1)
{
switch(ID)
{
case 0: P3=0xfe;
break;
case 1: P3=0xfd;
break;
case 2: P3=0xfb;
break;
case 3: P3=0xf7;
break;
}
}
}
/**************************************************************
函數(shù)功能:定時器T0的中斷服務(wù)子程序,進行鍵盤掃描
**************************************************************/
void intersev(void) interrupt 1 using 1
{
TR0=0; //關(guān)閉定時器T0
P1=0xff;
if(S1==0) //如果是按鍵S1按下
{
delay(); //延時20ms,軟件消抖
if(S1==0) //如果是按鍵S1按下
ID=ID+1;
}
if(ID==4)
ID=0;
TR0=1; //啟動定時器T0
}
#include<reg51.h> //包含51單片機寄存器定義的頭文件
sbit P14=P1^4; //將P14位定義為P1.4引腳
sbit P15=P1^5; //將P15位定義為P1.5引腳
sbit P16=P1^6; //將P16位定義為P1.6引腳
sbit P17=P1^7; //將P17位定義為P1.7引腳
sbit sound=P3^7; //將sound位定義為P3.7
unsigned char keyval; //儲存按鍵值
/**************************************************************
函數(shù)功能:延時輸出音頻
**************************************************************/
void delay(void)
{
unsigned char i;
for(i=0;i<200;i++)
;
}
/**************************************************************
函數(shù)功能:軟件延時子程序
**************************************************************/
void delay20ms(void)
{
unsigned char i,j;
for(i=0;i<100;i++)
for(j=0;j<60;j++)
;
}
/**************************************************************
函數(shù)功能:主函數(shù)
**************************************************************/
void main(void)
{
unsigned char D[ ]={0,8,0,8,7,4,11}; //設(shè)定密碼
EA=1; //開總中斷
ET0=1; //定時器T0中斷允許
TMOD=0x01; //使用定時器T0的模式1
TH0=(65536-500)/256; //定時器T0的高8位賦初值
TL0=(65536-500)%256; //定時器T0的高8位賦初值
TR0=1; //啟動定時器T0
keyval=0xff; //按鍵值初始化
while(keyval!=D[0]) //第一位密碼輸入不正確,等待
;
while(keyval!=D[1]) //第二位密碼輸入不正確,等待
;
while(keyval!=D[2]) //第三位密碼輸入不正確,等待
;
while(keyval!=D[3]) //第四位密碼輸入不正確,等待
;
while(keyval!=D[4]) //第五位密碼輸入不正確,等待
;
while(keyval!=D[5]) //第六位密碼輸入不正確,等待
;
while(keyval!=D[6]) //沒有輸入"OK",等待
;
P3=0xfe; //P3.0引腳輸出低電平,點亮LED
}
/**************************************************************
函數(shù)功能:定時器0的中斷服務(wù)子程序,進行鍵盤掃描,判斷鍵位
**************************************************************/
void time0_interserve(void) interrupt 1 using 1 //定時器T0的中斷編號為1,使用第一組寄存器
{
unsigned char i;
TR0=0; //關(guān)閉定時器T0
P1=0xf0; //所有行線置為低電平"0",所有列線置為高電平"1"
if((P1&0xf0)!=0xf0) //列線中有一位為低電平"0",說明有鍵按下
delay20ms(); //延時一段時間、軟件消抖
if((P1&0xf0)!=0xf0) //確實有鍵按下
{
P1=0xfe; //第一行置為低電平"0"(P1.0輸出低電平"0")
if(P14==0) //如果檢測到接P1.4引腳的列線為低電平"0"
keyval=1; //可判斷是S1鍵被按下
if(P15==0) //如果檢測到接P1.5引腳的列線為低電平"0"
keyval=2; //可判斷是S2鍵被按下
if(P16==0) //如果檢測到接P1.6引腳的列線為低電平"0"
keyval=3; //可判斷是S3鍵被按下
if(P17==0) //如果檢測到接P1.7引腳的列線為低電平"0"
keyval=4; //可判斷是S4鍵被按下
P1=0xfd; //第二行置為低電平"0"(P1.1輸出低電平"0")
if(P14==0) //如果檢測到接P1.4引腳的列線為低電平"0"
keyval=5; //可判斷是S5鍵被按下
if(P15==0) //如果檢測到接P1.5引腳的列線為低電平"0"
keyval=6; //可判斷是S6鍵被按下
if(P16==0) //如果檢測到接P1.6引腳的列線為低電平"0"
keyval=7; //可判斷是S7鍵被按下
if(P17==0) //如果檢測到接P1.7引腳的列線為低電平"0"
keyval=8; //可判斷是S8鍵被按下
P1=0xfb; //第三行置為低電平"0"(P1.2輸出低電平"0")
if(P14==0) //如果檢測到接P1.4引腳的列線為低電平"0"
keyval=9; //可判斷是S9鍵被按下
if(P15==0) //如果檢測到接P1.5引腳的列線為低電平"0"
keyval=0; //可判斷是S10鍵被按下
if(P16==0) //如果檢測到接P1.6引腳的列線為低電平"0"
keyval=11; //可判斷是S11鍵被按下
if(P17==0) //如果檢測到接P1.7引腳的列線為低電平"0"
keyval=12; //可判斷是S12鍵被按下
P1=0xf7; //第四行置為低電平"0"(P1.3輸出低電平"0")
……………………
…………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼
所有資料51hei提供下載:
密碼鎖.rar
(9.75 KB, 下載次數(shù): 18)
2017-6-1 22:48 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
作者:
蔣舉
時間:
2018-6-6 13:15
怎么沒有
作者:
蔣舉
時間:
2018-6-6 13:16
什么情況?我點下載附件了,結(jié)果什么都沒下載下來,還扣了我的積分
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1