|
給51黑電子的朋友們分享一個51單片機(jī)做的紅外通訊的proteus仿真,下面是原理圖:
0.png (34.03 KB, 下載次數(shù): 107)
下載附件
2016-9-27 12:29 上傳
0.png (47.44 KB, 下載次數(shù): 99)
下載附件
2016-9-27 12:29 上傳
單片機(jī)紅外通訊的所有資料下載:
紅外無線通信.zip
(146.29 KB, 下載次數(shù): 253)
2016-9-27 12:33 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
紅外發(fā)送程序:- #include <REG51.h>
- #include <intrins.h>
- #include "hongwaifashe.h"
- void hongwaifashe(void)
- {
- TMOD = 0x01; //T0 16位工作方式
- IR=1; //發(fā)射端口常態(tài)為高電平
- ZZ(setdata[0]);
- ZZ(setdata[1]);
- }
- void ZZ(uchar x)
- {
- TT0(1,m9); //高電平9mS
- TT0(0,m4_5); //低電平4.5mS
- /*┈ 發(fā)送4幀數(shù)據(jù) ┈*/
- Z0(SBM);
- Z0(~SBM);
- Z0(x);
- Z0(~x);
- /*┈┈ 結(jié)束碼 ┈┈*/
- TT0(1,m_56);
- TT0(0,m40);
- }/*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
- 函數(shù)功能:單幀發(fā)送程序
- 入口參數(shù):1幀數(shù)據(jù)
- ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
- void Z0(uchar temp)
- {
- uchar v;
- for (v=0;v<8;v++) //循環(huán)8次移位
- {
- TT0(1,m_56); //高電平0.65mS
- if(temp&0x01) TT0(0,m1_68); //發(fā)送最低位
- else TT0(0,m_56);
- temp >>= 1; //右移一位
- }
- }
- /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
- 函數(shù)功能:38KHz脈沖發(fā)射 + 延時程序
- 入口參數(shù):(是否發(fā)射脈沖,延時約 x (uS))
- ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
- void TT0(bit BT,uint x)
- {
- TH0 = x>>8; //輸入T0初始值
- TL0 = x;
- TF0=0; //清0
- TR0=1; //啟動定時器0
- if(BT == 0) while(!TF0); //BT=0時不發(fā)射38KHz脈沖只延時;BT=1發(fā)射38KHz脈沖且延時;
- else while(1) //38KHz脈沖,占空比5:26
- {
- IR = 0;
- if(TF0)break;
- if(TF0)break;
- IR = 1;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- if(TF0)break;
- }
- TR0=0; //關(guān)閉定時器0
- TF0=0; //標(biāo)志位溢出則清0
- IR =1; //脈沖停止后,發(fā)射端口常態(tài)為高電平
- }
復(fù)制代碼
紅外接收程序:
|
評分
-
查看全部評分
|