51單片機8X8鍵盤，紅外線收發，串口收發，1602顯示按鍵源程序+仿真圖

ID:417092 · 發表于 2019-4-20 01:33

3個89C52
8x8鍵盤
U3單片機檢測8X8鍵盤，對按鍵紅外線編碼發出。
U2單片機接收，U3單片機發出的紅外信號，解碼后由串口發出。
U1接收U2單片機發出的串口數據。

單片機源程序如下:

#include <STC89C5xRC.h>
#define uchar unsigned char
#define uint unsigned int
bit overflag, datafinish; //開始接收數據，數據處理完畢
bit Updata = 0;
uchar times; //定時器T0溢出次數
uchar orders[33]; //接收輸入的代碼序列(times組成的33字節級數)
uchar IRCODE[4]; //地址碼，地址反碼，數據碼，數據反碼
void initial() //初始化
{
SCON=0X50; //設置為工作方式1
TMOD=0X21; //設置計數器工作方式2
PCON=0X80; //波特率加倍
TH0=0xfe; //晶振頻率為12MHz
TL0=0x0c; //T0定時間隔為0.5ms
TH1=0XF3; //計數器初始值設置，注意波特率是4800的
TL1=0XF3;
TR1=1; //打開計數器
IT0=1; //外部中斷INT1下降沿觸發
EX0=1; //允許外部中斷INT1
ET0=1; //允許定時器T0中斷
TR0=1; //啟動定時器T0
EA=1; //打開總中斷
}
/*******************************************************************************
* 函數名 :UsartInit()
* 函數功能 :設置串口
* 輸入 : 無
* 輸出 : 無
*******************************************************************************/
void UsartInit()
{
SCON=0X50; //設置為工作方式1
TMOD=0X20; //設置計數器工作方式2
PCON=0X80; //波特率加倍
TH1=0XF3; //計數器初始值設置，注意波特率是4800的
TL1=0XF3;
TR1=1; //打開計數器
}
void time0() interrupt 1 //T0中斷，每0.5ms計數一次
{
TH0=0xfe; //重新載入定時參數
TL0=0x0c;
times++; //計算每位的寬度
}
void infrared()interrupt 0 //外部中斷，接收一個數據位
{ //每接收到一個下降沿，中斷發生一次
static bit startflag; //定義“開始接收”標志
static uchar i;
if(startflag) //開始接收標志
{
if(times<32 && times>=16)
i=0; //記下引導碼長度（正常為9ms）
orders[i]=times; //記錄一個數據位的長度
times=0; //下次中斷發生重新計數
i++; //數組指針指向下個存儲單元
if(i==33) //如果記滿了32字節數據和引導碼
{
overflag=1; //建立“已記滿”標志
i=0; //數組指針指向開頭
}
}
else //如果尚未開始接收數據
{
startflag=1; //建立“開始接收”標志
times=0;
}
}
void process() //把接收33字節序列信息轉換成地址和數據代碼
{
uchar i,j,k=1; //指向33字節數組，跳過引導段計數
for(i=0;i<4;i++) //處理四組數據
{
for(j=1;j<=8;j++) //處理一組數據8字節
{
IRCODE[i]>>=1; //先假定當前位為“0”
if(orders[k]>3)
IRCODE[i]|=0x80; //大于1.5ms為“1”
k++;
}
}
datafinish=1;
}
void main()
{
uchar i;
initial(); //初始化
while(1) //等待中斷發生
{
if(Updata ==1)
{
Updata = 0;
for(i=0;i<4;i++)
{
SBUF=IRCODE[i]; //將接收到的數據放入到發送寄存器
while(!TI); //等待發送數據完成
TI=0; //清除發送完成標志位
}
}
if(overflag) //數據接收完畢
{
process(); //處理數據，完成標志datafinish
overflag=0;
}
if(datafinish)
{
datafinish=0;
Updata = 1;
}
}
}
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………