|
/**********************************************************************
* 文件: UART_IR_Master.C
* 開發(fā): WWW.ZLGMCU.COM
* 日期: 2004.03.04
* 功能: 利用LPC900系列單片機(jī)的UART和CCU模塊實(shí)現(xiàn)紅外通信。
* 此程序?yàn)橹鳈C(jī)程序,先發(fā)送16字節(jié)數(shù)據(jù)給從機(jī),從機(jī)再把接收到的
* 數(shù)據(jù)返回給主機(jī),如果返回正確,則蜂鳴器短響一聲，否則長(zhǎng)響一聲。
************************************************************************/
#include "reg932.h"
#include "intrins.h" #define uchar unsigned char // 變量定義
sbit BEEP=P2^7;
sbit KEY1=P0^0; const uchar data BRGR1_DATA=9; //波特率設(shè)為2400bit/s
const uchar data BRGR0_DATA=0xb4; //函數(shù)聲明
void CCU_Ini();
void UART_Ini();
void SendData();
void RcvData(uchar *pbuf);
bit Compare(uchar *pbuf);
void Delay(uchar k); //主程序開始
void main()
{
uchar RcvBuf[16]; //接收數(shù)據(jù)用緩沖區(qū)
P0M1=P0M2=0;
P1M1=P1M2=0; //P0,P1口設(shè)置為準(zhǔn)雙向
P2M1=P2M2=0xc0; //P2.6,P2.7設(shè)置為開漏
CCU_Ini(); //CCU模塊初始化,用以產(chǎn)生38KHz調(diào)制信號(hào)
UART_Ini();
while(1)
{
while(KEY1);
SendData(); //發(fā)送16字節(jié)數(shù)據(jù)
Delay(1);
RcvData(RcvBuf); //接收16字節(jié)數(shù)據(jù)
if(Compare(RcvBuf)==1) //比較接收到的數(shù)據(jù)和發(fā)送的數(shù)據(jù)
{
BEEP=0; //如果正確則蜂鳴器短響一聲
Delay(1);
BEEP=1;
}
else
{
BEEP=0; //如果錯(cuò)誤則蜂鳴器長(zhǎng)響一聲
Delay(5);
BEEP=1;
}
}
} /*********************************************
* 名稱: SendData()
* 功能: 通過UART連續(xù)發(fā)送16字節(jié)數(shù)據(jù)(0~15)
* 入口參數(shù)：無
* 出口參數(shù)：無
* 注意: 此程序采用查詢方式發(fā)送。
**********************************************/
void SendData()
{
uchar i;
TI=0;
for(i=0;i<16;i++)
{
SBUF=i;
while(!TI);
TI=0;
}
} /********************************************************************
* 名稱: RcvData()
* 功能: 通過UART連續(xù)接收16字節(jié)數(shù)據(jù)
* 入口參數(shù): pbuf--用于接收數(shù)據(jù)的緩沖區(qū)首地址
* 出口參數(shù): 接收到的16字節(jié)數(shù)據(jù)位于接收緩沖區(qū)
* 注意: 此程序采用查詢方式進(jìn)行接收。由于采取半雙工通信，所以接收
* 數(shù)據(jù)之前要打開接收允許，接收完畢之后要關(guān)閉接收允許。
*********************************************************************/
void RcvData(uchar *pbuf)
{
uchar i;
REN=1;
FE=0;
RI=0;
for(i=0;i<16;i++)
{
while(!RI);
RI=0;
pbuf[i]=SBUF;
}
REN=0;
} /******************************************
* 名稱: Compare()
* 功能: 比較緩沖區(qū)中的內(nèi)容是否為0~15
* 入口參數(shù): pbuf--需要比較的緩沖區(qū)首地址
* 出口參數(shù): 比較正確則返回1,否則返回0。
******************************************/
bit Compare(uchar *pbuf)
{
uchar i;
for(i=0;i<16;i++)
{
if(pbuf[i]!=i)
{
return(0);
}
}
return(1);
} /*********************************************************************
* 名稱: CCU_Ini()
* 功能: CCU模塊初始化,使OCA(P2.7)輸出38KHz,50%占空比的PWM波,
* 作為紅外線的載波
* 使用6MHz晶振時(shí),CCU頻率=((6000000/2)/6)*32=16MHz
* 定時(shí)器重裝值=CCU頻率/紅外線載頻=16000000/38000=421=0x1a5
**********************************************************************/
void CCU_Ini()
{
TOR2H=0x01; //定時(shí)器重裝值
TOR2L=0xa5;
OCRAH=0x00; //(OCRAH:OCRAL)=(TOR2H:TOR2L)/2,PWM的占空比為50%
OCRAL=0xd2;
TCR21=0x85; //PLL預(yù)分頻為5+1
CCCRA=1; //非反相的PWM， TCR20=0;
PLEEN=1;
while(!PLEEN);
TCR20|=3; //啟動(dòng)定時(shí)器,非對(duì)稱PWM模式
} /***************************************
* 名稱: UART_Ini()
* 功能: UART初始化,波特率2400bit/s
****************************************/
void UART_Ini()
{
PCON=0;
SSTAT=0; //雙緩沖禁止,中斷禁止,采用查詢方式發(fā)送和接收
SCON=0x40; //串口模式1,接收禁止
PCON|=0x40; //SMOD0=1,SCON的位7作為FE
BRGCON=0;
BRGR1=BRGR1_DATA;
BRGR0=BRGR0_DATA;
BRGCON=3; //啟動(dòng)UART的波特率發(fā)生器
} /*****************************************************
* 名稱: Delay()
* 功能: 延時(shí)0.1*k秒(振蕩器為6MHz)
* 入口參數(shù)：ｋ--延時(shí)時(shí)間
* 出口參數(shù)：無
* 注意： 如果入口參數(shù)ｋ等于0，則不延時(shí)而直接返回。
******************************************************/
void Delay(uchar k)
{
uchar i,j;
if(k==0)
{
return;
}
for(;k;k--)
{
for(j=200;j;j--) //延時(shí)0.1S
{
for(i=250;i;i--)
{
_nop_();
_nop_();
_nop_();
_nop_();
}
}
}
}
|
66821730(技術(shù)支持)
