當前位置:首頁 > 單片機 > 單片機
[導讀] 多機紅外通信發(fā)送端程序#include"reg932.h"#defineucharunsignedcharsbitKEY1=P0^0;//定義KEY1sbitKEY2=P0^1;//定義KEY2sbitInfr=P0^3;//定義紅外輸出端口//--------------------------------------voi

多機紅外通信發(fā)送端程序

#include"reg932.h"
#defineucharunsignedchar

sbitKEY1=P0^0;//定義KEY1


sbitKEY2=P0^1;//定義KEY2

sbitInfr=P0^3;//定義紅外輸出端口
//--------------------------------------
voidCCU_Init();//CCU初始化
voidKeyISR_Init();//鍵盤中斷初始化
voidReadKey();//判斷按鍵
voidPower_Down();//完全掉電

voidStartDevICe01();//啟動設備1(燈)
voidStartDevice02();//啟動設備2(門/窗)
voidSendHead();//發(fā)送幀頭
voidSendData(ucharData);//發(fā)送數(shù)據(jù)

voiddelay400us();//延時400us
voiddelayms(uchari);//ms級延時
//--------------------------------------
voidKEY_ISR()interrupt7{
EA=0;//關中斷

PCONA=0x00;//功能模塊上電
CCU_Init();//CCU模塊初始化

delayms(10);//延時10ms
ReadKey();//判斷按鍵

KBCON=0x00;//清鍵盤中斷標志
delayms(50);//延時50ms
EA=1;//開中斷
}

//--------------------------------------
main()
{
P0M1=0x00;//設置P0口為準雙向
P0M2=0x00;
P2M1=0x40;//設置P26為開漏
P2M2=0x40;
CCU_Init();//CCU初始化
KeyISR_Init();//鍵盤初始化
while(1)
{
Power_Down();//完全掉電
}
}
//--------------------------------------
//功能:進入掉電模式
//--------------------------------------
voidPower_Down()
{
PCONA=0xFF;//外部功能模塊掉電
PCON=0x03;//進入掉電模式
}
//-------------------------------------------------------------
//功能:CCU模塊初始化,使OCA(P2.7)輸出38KHz,50%占空比的PWM波,
//使用內部RC振蕩器時:CCU頻率=((7375000/2)/6)*32=9.833MHz
//定時器重裝值=CCU頻率/紅外線載頻=9833333/38000=258.772=0x102
//-------------------------------------------------------------
voidCCU_Init()
{

TOR2H=0x02;//定時器重裝值
TOR2L=0x05;
OCRAH=0x01;//(OCRAH:OCRAL)=(TOR2H:TOR2L)/2,PWM的占空比為50%
OCRAL=0x02;
TCR21=0x85;//PLL預分頻為5+1
CCCRA=1;//非反相的PWM在比較匹配時置位,在CCU定時器向下溢出時清0

PLLEN=1;//啟動PLL
OCA=1;
while(PLLEN==0);
TCR20=0x82;//設置輸出模式,非反相PWM

}
//--------------------------------------
//功能:鍵盤中斷初始化
//--------------------------------------
voidKeyISR_Init()
{
KBMASK=0x03;//設置P01->P00為中斷源
KBCON=0x00;//清除鍵盤中斷標志
EKBI=1;//鍵盤中斷允許
EA=1;//開中斷
}
//--------------------------------------
//功能:鍵盤判斷
//--------------------------------------
voidReadKey()
{
delayms(12);//延時去抖動

if(KEY1==0)//等待KEY1按下
{
while(KEY1==0);//等待KEY1為1
StartDevice01();//啟動設備1(燈)
}
elseif(KEY2==0)//等待KEY2按下
{
while(KEY2==0);//等待KEY2為1
StartDevice02();//啟動設備2(門/窗)
}
}

//--------------------------------------
//功能:啟動設備1(門/窗)
//--------------------------------------
voidStartDevice01()
{
SendHead();//發(fā)送幀頭
SendData(1);//發(fā)送數(shù)據(jù)“1”,
}
//--------------------------------------
//功能:啟動設備2(門/窗)
//--------------------------------------
voidStartDevice02()
{
SendHead();//發(fā)送幀頭
SendData(2);//發(fā)送數(shù)據(jù)“2”,
}
//--------------------------------------
//功能:發(fā)送幀頭
//--------------------------------------
voidSendHead()
{
Infr=0;//將Infr拉為低電平
delayms(50);
Infr=1;//將Infr拉為高電平
delayms(10);

Infr=0;//將Infr拉為低電平
delayms(1);
Infr=1;//將Infr拉為高電平
delayms(1);
Infr=0;//將Infr拉為低電平
delayms(1);
}
//--------------------------------------
//功能:發(fā)送數(shù)據(jù),從高位到低位依次發(fā)送8個位
//入口參數(shù):要發(fā)送的數(shù)據(jù)
//--------------------------------------
voidSendData(ucharData)
{
ucharTemp;
uchari=8;
while(i>0)
{
Temp=Data&0x80;//取欲發(fā)送數(shù)的最高位
if(Temp==0x80)//對最高位進行判斷.
{
Infr=1;//為1則將Infr拉高
}
else
{
Infr=0;//為0,則將Infr拉低
}

i--;
Data=Data<<1;//循環(huán)移位
delay400us();//延時
}
}
//--------------------------------------
//在內部RC作用的情況下,延時1000.9us
//--------------------------------------
voiddelayms(uchari)
{
intj;
while(i>0)
{
for(j=0;j<670;j++);
i--;
}
}
//---------------------------------------
//在內部RC作用的情況下,延時401us;
//---------------------------------------
voiddelay400us()
{
inti;
for(i=0;i<283;i++);
}//---------------------------------------

本站聲明: 本文章由作者或相關機構授權發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內容真實性等。需要轉載請聯(lián)系該專欄作者,如若文章內容侵犯您的權益,請及時聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或將催生出更大的獨角獸公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉型技術解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術公司SODA.Auto推出其旗艦產品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

關鍵字: 汽車 人工智能 智能驅動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務能7×24不間斷運行,同時企業(yè)卻面臨越來越多業(yè)務中斷的風險,如企業(yè)系統(tǒng)復雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務連續(xù)性,提升韌性,成...

關鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產業(yè)博覽會開幕式在貴陽舉行,華為董事、質量流程IT總裁陶景文發(fā)表了演講。

關鍵字: 華為 12nm EDA 半導體

8月28日消息,在2024中國國際大數(shù)據(jù)產業(yè)博覽會上,華為常務董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權最終是由生態(tài)的繁榮決定的。

關鍵字: 華為 12nm 手機 衛(wèi)星通信

要點: 有效應對環(huán)境變化,經(jīng)營業(yè)績穩(wěn)中有升 落實提質增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務引領增長 以科技創(chuàng)新為引領,提升企業(yè)核心競爭力 堅持高質量發(fā)展策略,塑強核心競爭優(yōu)勢...

關鍵字: 通信 BSP 電信運營商 數(shù)字經(jīng)濟

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術學會聯(lián)合牽頭組建的NVI技術創(chuàng)新聯(lián)盟在BIRTV2024超高清全產業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術創(chuàng)新聯(lián)...

關鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關鍵字: BSP 信息技術
關閉
關閉