紅外通信接線圖:
接線圖.jpg (930.19 KB, 下載次數: 31)
下載附件
2018-8-29 19:54 上傳
單片機源程序如下:
- /**************************************************************************************
- * 紅外通信實驗 *
- 實現現象: 具體接線操作請參考視頻
- 下載程序后,數碼管顯示紅外遙控鍵值數據
- 注意事項: 紅外遙控模塊的短接片J1短接,
- 紅外遙控器內的電池絕緣片一定要抽掉
- ***************************************************************************************/
- #include "reg52.h" //此文件中定義了單片機的一些特殊功能寄存器
-
- typedef unsigned int u16; //對數據類型進行聲明定義
- typedef unsigned char u8;
- sbit LSA=P2^2;
- sbit LSB=P2^3;
- sbit LSC=P2^4;
- sbit IRIN=P3^2;
- u8 IrValue[6];
- u8 Time;
- u8 DisplayData[8];
- u8 code smgduan[17]={
- 0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
- 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0X76};
- //0、1、2、3、4、5、6、7、8、9、A、b、C、d、E、F、H的顯示碼
- /*******************************************************************************
- * 函 數 名 : delay
- * 函數功能 : 延時函數,i=1時,大約延時10us
- *******************************************************************************/
- void delay(u16 i)
- {
- while(i--);
- }
- /*******************************************************************************
- * 函數名 :DigDisplay()
- * 函數功能 :數碼管顯示函數
- * 輸入 : 無
- * 輸出 : 無
- *******************************************************************************/
- void DigDisplay()
- {
- u8 i;
- for(i=0;i<3;i++)
- {
- switch(i) //位選,選擇點亮的數碼管,
- {
- case(0):
- LSA=0;LSB=0;LSC=0; break;//顯示第0位
- case(1):
- LSA=1;LSB=0;LSC=0; break;//顯示第1位
- case(2):
- LSA=0;LSB=1;LSC=0; break;//顯示第2位
- }
- P0=DisplayData[i];//發送數據
- delay(100); //間隔一段時間掃描
- P0=0x00;//消隱
- }
- }
- /*******************************************************************************
- * 函數名 : IrInit()
- * 函數功能 : 初始化紅外線接收
- * 輸入 : 無
- * 輸出 : 無
- *******************************************************************************/
- void IrInit()
- {
- IT0=1;//下降沿觸發
- EX0=1;//打開中斷0允許
- EA=1; //打開總中斷
- IRIN=1;//初始化端口
- }
- /*******************************************************************************
- * 函 數 名 : main
- * 函數功能 : 主函數
- * 輸 入 : 無
- * 輸 出 : 無
- *******************************************************************************/
- void main()
- {
- IrInit();
- while(1)
- {
- DisplayData[0] = smgduan[IrValue[2]/16];
- DisplayData[1] = smgduan[IrValue[2]%16];
- DisplayData[2] = smgduan[16];
- DigDisplay();
- }
- }
- /*******************************************************************************
- * 函數名 : ReadIr()
- * 函數功能 : 讀取紅外數值的中斷函數
- * 輸入 : 無
- * 輸出 : 無
- *******************************************************************************/
- void ReadIr() interrupt 0
- {
- u8 j,k;
- u16 err;
- Time=0;
- delay(700); //7ms
- if(IRIN==0) //確認是否真的接收到正確的信號
- {
-
- err=1000; //1000*10us=10ms,超過說明接收到錯誤的信號
- /*當兩個條件都為真是循環,如果有一個條件為假的時候跳出循環,免得程序出錯的時
- 侯,程序死在這里*/
- while((IRIN==0)&&(err>0)) //等待前面9ms的低電平過去
- {
- delay(1);
- err--;
- }
- if(IRIN==1) //如果正確等到9ms低電平
- {
- err=500;
- while((IRIN==1)&&(err>0)) //等待4.5ms的起始高電平過去
- {
- delay(1);
- err--;
- }
- for(k=0;k<4;k++) //共有4組數據
- {
- for(j=0;j<8;j++) //接收一組數據
- {
- err=60;
- while((IRIN==0)&&(err>0))//等待信號前面的560us低電平過去
- {
- delay(1);
- err--;
- }
- err=500;
- while((IRIN==1)&&(err>0)) //計算高電平的時間長度。
- {
- delay(10); //0.1ms
- Time++;
- err--;
- if(Time>30)
- {
- return;
- }
- }
- IrValue[k]>>=1; //k表示第幾組數據
- if(Time>=8) //如果高電平出現大于565us,那么是1
- {
- IrValue[k]|=0x80;
- }
- Time=0; //用完時間要重新賦值
- }
- }
- }
- if(IrValue[2]!=~IrValue[3])
- {
- return;
- }
- }
- }
復制代碼
所有資料51hei提供下載:
程序.rar
(21.71 KB, 下載次數: 12)
2018-8-29 19:55 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|