单片机实验开发板测试程序详解

　　ORG 0000H

　　AJMP MAIN;转入主程序

　　ORG 0003H;外部中断P3.2脚INT0入口地址

　　AJMP INT;转入外部中断服务子程序（红外遥控解码程序）

　　;以下为主程序进行CPU中断方式设置

　　MAIN:LCALL YS3;等待硬件上电稳定

　　SETB EA;打开CPU总中断请求

　　SETB IT0;设定INT0的触发方式为脉冲负边沿触发

　　SETB EX0;打开INT0中断请求

　　MOV SCON，#50H;设置成串口1方式

　　MOV TMOD，#20H;波特率发生器T1工作在模式2上

　　MOV PCON，#80H;波特率翻倍为2400x2=4800BPS

　　MOV TH1，#0F3H;预置初值（按照波特率2400BPS预置初值）

　　MOV TL1，#0F3H;预置初值（按照波特率2400BPS预置初值）

　　SETB TR1;启动定时器T1

　　;以上完成串口通讯初始化设置

　　START:MOV P1，#01111111B

　　LCALL DELAY

　　MOV P1，#10111111B

　　LCALL DELAY

　　MOV P1，#11011111B

　　LCALL DELAY

　　MOV P1，#11101111B

　　LCALL DELAY

　　MOV P1，#11110111B

　　LCALL DELAY

　　MOV P1，#11111011B

　　LCALL DELAY

　　MOV P1，#11111101B

　　LCALL DELAY

　　MOV P1，#11111110B;P1口的LED循环由下往上点亮一次，延时约250毫秒

　　LCALL DELAY

　　MOV P2，#11011111B;蜂鸣器鸣响一声

　　LCALL DELAY

　　MOV P2，#11101111B;继电器J1吸合一次

　　LCALL DELAY

　　MOV P2，#11110111B;继电器J2吸合一次

　　LCALL DELAY

　　MOV P0，#0FFH

　　MOV P2，#01111111B;数码管个位显示8

　　LCALL DELAY

　　MOV P0，#0FFH

　　MOV P2，#10111111B;数码管十位显示8

　　LCALL DELAY

　　AJMP START;反复循环

　　;以下为进入P3.2脚外部中断子程序，也就是解码程序

　　INT： CLR EA;暂时关闭CPU的所有中断请求
MOV R6，#10

　　SB： ACALL YS1;调用882微秒延时子程序

　　JB P3.2，EXIT;延时882微秒后判断P3.2脚是否出现高电平如果有就退出解码程序

　　DJNZ R6， SB;重复10次，目的是检测在8820微秒内如果出现高电平就退出解码程序

　　;以上完成对遥控信号的9000微秒的初始低电平信号的识别。

　　JNB P3.2， $;等待高电平避开9毫秒低电平引导脉冲

　　ACALL YS2;延时4.74毫秒避开4.5毫秒的结果码

　　MOV R7，#26;忽略前26位系统识别码

　　JJJJA:JNB P3.2，$;等待地址码第一位的高电平信号

　　LCALL YS1;高电平开始后用882微秒的时间尺去判断信号此时的高低电平状态

　　MOV C，P3.2;将P3.2引脚此时的电平状态0或1存入C中

　　JNC UUUA;如果为0就跳转到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 P1，1AH;将按键的键值通过P1口的8个LED显示出来！

　　MOV A，1AH;将红外遥控器具体按键的键值发送到串口去

　　MOV SBUF，A;通过串口在电脑屏幕上显示出来

　　CLR P2.5;蜂鸣器鸣响嘀嘀嘀的声音，表示解码成功

　　LCALL YS2

　　LCALL YS2

　　LCALL YS2

　　SETB P2.5;蜂鸣器停止

　　EXIT： SETB EA ;允许中断

　　RETI ;退出解码子程序

　　YS1： MOV R4，#20 ;（占用R4/R5）延时子程序1，精确延时882微秒

　　D1： MOV R5，#20

　　DJNZ R5，$

　　DJNZ R4，D1

　　RET

　　YS2： MOV R4，#10 ;（占用R4/R5）延时子程序2，精确延时4740微秒

　　D2： MOV R5，#235

　　DJNZ R5，$

　　DJNZ R4，D2

　　RET

　　YS3： MOV R4，#2;（占用R4/R5）延时程序3，精确延时1000微秒

　　D3:MOV R5，#248

　　DJNZ R5，$

　　DJNZ R4，D3

　　RET

　　DELAY:MOV R1，#08H;（占用R1/R2/R3）延时子程序，12M晶振延时约250毫秒

　　L3： MOV R2 ，#0FAH

　　L1： MOV R3 ，#0FAH

　　L2： DJNZ R3 ，L2

　　DJNZ R2 ，L1

　　DJNZ R1 ，L3

　　RET

　　END