LPC900系列单片机UART和CCU模块实现红外通信程序

LPC900系列单片机UART和CCU模块实现红外通信程序

$INCLUDE(REG932.INC)

;变量定义
BEEPBITP2.7
KEY1BITP0.1

FEBITSCON.7
PLEENBITTCR20.7
RCV_BUFDATA30H;接收缓冲区首地址（30H~3FH）
BRGR1_DATADATA09H;波特率设为2400bit/s
BRGR0_DATADATA0B4H

ORG0000H
AJMPMAIN

;主程序开始
ORG0100H
MAIN:
MOVSP,#60H
MOVP0M1,#00H;P0,P1口设置为准双向
MOVP0M2,#00H
MOVP1M1,#00H
MOVP1M2,#00H
MOVP2M1,#0C0H;P2.6,P2.7设置为开漏
MOVP2M2,#0C0H
ACALLCCU_INIT;CCU模块初始化,用以产生38KHz调制信号
ACALLUART_INIT
MAIN_L1:
JBKEY1,$
ACALLSEND_DATA;发送16字节数据
MOVR7,#01H
ACALLDELAY
ACALLRCV_DATA;接收16字节数据
ACALLCOMPARE;比较接收到的数据和发送的数据
JZMAIN_L2
CLRBEEP;如果正确则蜂鸣器短响一声
MOVR7,#01H
ACALLDELAY
SETBBEEP
AJMPMAIN_L1
MAIN_L2:
CLRBEEP;如果错误则蜂鸣器长响一声
MOVR7,#05H
ACALLDELAY
SETBBEEP
AJMPMAIN_L1

;********************************************
;名称:SEND_DATA
;功能:通过UART连续发送16字节数据(0~15)
;入口参数：无
;出口参数：无
;注意:此程序采用查询方式发送。
;********************************************
SEND_DATA:
MOVR7,#10H
CLRTI
CLRA
SEND_DL1:
MOVSBUF,A
JNBTI,$;等待一字节发送完毕
CLRTI
INCA
DJNZR7,SEND_DL1
RET

;********************************************************************
;名称:RCV_DATA
;功能:通过UART连续接收16字节数据
;入口参数:RCV_BUF--用于接收数据的缓冲区首地址
;出口参数:接收到的16字节数据位于接收缓冲区
;注意:此程序采用查询方式进行接收。由于采取半双工通信，所以接收
;数据之前要打开接收允许，接收完毕之后要关闭接收允许。
;********************************************************************
RCV_DATA:
MOVR7,#10H
MOVR0,#RCV_BUF
SETBREN;串行接收允许
CLRFE
CLRRI
RCV_DL1:
JNBRI,$;等待接收一字节
CLRRI
MOVA,SBUF
MOV@R0,A
INCR0
DJNZR7,RCV_DL1
CLRREN;串行接收禁止
RET

;*********************************************
;名称:COMPARE
;功能:比较缓冲区中的内容是否为0~15
;入口参数:RCV_BUF--需要比较的缓冲区首地址
;出口参数:ACC--比较正确则返回1,否则返回0。
;*********************************************
COMPARE:
MOVR7,#10H
MOVR0,#RCV_BUF
MOVR1,#00H
CLRA
COMP_L1:
MOVA,@R0
CJNEA,01H,COMP_RTN;ACC与R1（01H）比较
INCR0
INCR1
DJNZR7,COMP_L1
MOVA,#01H;比较结果正确，返回01H
RET
COMP_RTN:
CLRA;比较结果错误，返回00H
RET

;**********************************************************************
;名称:CCU_INIT
;功能:CCU模块初始化,使OCA(P2.7)输出38KHz,50%占空比的PWM波,
;作为红外线的载波
;使用6MHz晶振时,CCU频率=((6000000/2)/6)*32=16MHz
;定时器重装值=CCU频率/红外线载频=16000000/38000=421=01A5H
;**********************************************************************
CCU_INIT:
MOVTOR2H,#01H;定时器重装值
MOVTOR2L,#0A5H
MOVOCRAH,#00H;(OCRAH:OCRAL)=(TOR2H:TOR2L)/2,PWM的占空比为50%
MOVOCRAL,#0D2H
MOVTCR21,#85H;PLL预分频为5+1
MOVCCCRA,#01H;非反相的PWM
MOVTCR20,#00H
SETBPLEEN
NOP
JNBPLEEN,$;等待锁相环（PLL）稳定
ORLTCR20,#03H;启动定时器,对称PWM模式
RET

;***************************************
;名称:UART_INIT
;功能:UART初始化,波特率2400bit/s
;***************************************
UART_INIT:
MOVPCON,#00H
MOVSSTAT,#00H;双缓冲禁止,中断禁止,采用查询方式发送和接收
MOVSCON,#40H;串口模式1,接收禁止
ORLPCON,#40H;SMOD0=1,SCON的位7作为FE
MOVBRGCON,#00H
MOVBRGR1,#BRGR1_DATA
MOVBRGR0,#BRGR0_DATA
MOVBRGCON,#03H;启动UART的波特率发生器
RET

;*****************************************************
;名称:DELAY
;功能:延时(R7*0.1)秒(振荡器为6MHz)
;入口参数：R7--延时时间
;出口参数：无
;注意：如果入口参数R7等于0，则不延时而直接返回。
;*****************************************************
DELAY:
MOVA,R7
JZDELAY_RTN
DELAY_L1:
MOVR6,#0C8H;延时0.1S
DELAY_L2:
MOVR5,#0FAH
DELAY_L3:
NOP
NOP
NOP
NOP
DJNZR5,DELAY_L3
DJNZR6,DELAY_L2
DJNZR7,DELAY_L1
DELAY_RTN:
RET
END