sp0604_实验13_红外遥控器技术.asm

基于AT89S52的红外接收及串口通信C程序编写

 //|******************************************|
//|      AT89S52,fosc=22.1184MHz             |
//|      Author: Sun An-Qing                 |
//|      Date:   2005/11/22                  |
//|      www.supermcu.com                    |
//|      [e-mail]                   |
//|      版权所有，供学习使用，请勿商业用途  |
//|******************************************|

//|******************************************|
//|      SP_Lab_013:红外遥控器               |
//|                 (ASM)                    |
//|******************************************|

//|******************************************|
//|红外遥控器信号通过P3.2口接收，由INT0的中断|
//|完成信号接收与处理，定时器T0产生精确定时，|
//|通过P3.7口给出红外遥控器解码成功提示信号。|
//|******************************************|

			ORG 0000H
			AJMP MAIN			
			ORG 0003H   ;外部中断P3.2脚INT0入口地址
			AJMP INTT0  ;转入外部中断服务子程序（解码程序）			
			ORG 0030H
MAIN: 		SETB EA
	        SETB IT0
	        SETB EX0	
	        AJMP $
;******************以下为进入P3.2脚外部中断子程序，也就是解码程序*******************

INTT0: 		CLR EA ;暂时关闭CPU的所有中断请求

			MOV R6,#5
SB: 		ACALL YS1      ;调用882微秒延时子程序
    		JB P3.2,EXIT   ;延时882微秒后判断P3.2脚是否出现高电平如果有就退出解码程序
    		DJNZ R6, SB    ;重复 5 次，目的是检测在 4410 微秒内如果出现高电平就退出解码程序

;---------------以上完成对遥控信号引导码的 4500 微秒的初始低电平信号的识别!!!!!

			JNB P3.2, $    ;等待高电平避开 4.5 毫秒低电平引导脉冲
			ACALL YS2      ;延时4.74毫秒避开 4.5 毫秒的结果码
;---------------以上是对引导码的 4500 微秒高电平的初始识别!!!!!
;-------------------------------------------------------------------------
			MOV R7,#16    ;忽略前16位系统识别码 (即地址码)

JJJJA:		JNB P3.2,$   ;等待地址码第一位的高电平信号
      		LCALL YS1    ;高电平开始后用882微秒的时间延时去判断信号此时的高低电平状态
      		;MOV C,P3.2   ;将P3.2引脚此时的电平状态 0或1 存入C中
      		;JNC UUUA     ;如果为0就跳转到UUUA
      		JNB P3.2,UUUA
      		LCALL YS3    ;检测到高电平1的话延时1毫秒等待脉冲高电平结束
UUUA: 		DJNZ R7,JJJJA
;--------------------------------------------------------------------------

			MOV R1,#1AH   ;设定1AH为起始RAM区
			MOV R2,#2     ;接收从1AH到1BH的2个内存,用于存放操作码 (即数据码) 和操作反码
PP: 		MOV R3,#8 ;每组数据为8位

JJJJ: 		JNB P3.2,$   ;等待 数据码 第一位的高电平信号
      		LCALL YS1    ;高电平开始后用882微秒的时间尺去判断信号此时的高低电平状态
      		MOV C,P3.2   ;将P3.2引脚此时的电平状态0或1存入C中
      		JNC UUU      ;如果为0就跳转到UUU
      		LCALL YS3    ;检测到高电平1的话延时1毫秒等待脉冲高电平结束

UUU: 		MOV A,@R1   ;将R1中地址的给A
     		RRC A       ;将C中的值0或1移入A中的最低位
     		MOV @R1,A   ;将A中的数暂时存放在R1数值的内存中
     		DJNZ R3,JJJJ   ;接收满8位换一个内存
     		INC R1    ;对R1中的值加1，换下一个RAM
     		DJNZ R2,PP   ;接收完8位数据码和8位数据反码，存放在1AH/1BH中

			MOV A,1AH
			CPL A   ;对1AH取反后和1BH比较
			CJNE A,1BH,EXIT   ;如果不等表示接收数据发生错误,放弃
;---------------------------------------------------------------------

			MOV A,1AH
			CPL A
			MOV P0,A  ;将按键的键值通过P1口的8个LED显示出来!
			CLR P3.7    ;蜂鸣器鸣响－嘀嘀嘀－的声音，表示解码成功
			LCALL YS2
			LCALL YS2
			LCALL YS2
			SETB P3.7   ;蜂鸣器停止

EXIT: 		SETB EA ;允许中断
      		RETI ;退出解码子程序

;-------------------------延时子程序---------------------------------
YS1: 		MOV R4,#8 ;延时子程序1，精确延时882微秒
D1: 		MOV R5,#49
    		DJNZ R5,$
    		DJNZ R4,D1
    		RET

YS2: 		MOV R4,#10 ;延时子程序2，精确延时4740微秒
D2: 		MOV R5,#217
    		DJNZ R5,$
    		DJNZ R4,D2
    		RET

YS3: 		MOV R4,#2;延时程序3，精确延时1000微秒
D3:			MOV R5,#227
   			DJNZ R5,$
   			DJNZ R4,D3
   			RET

			END