remote.lst

单片机与遥控器的通信、红外编码及接收信号处理

A51 MACRO ASSEMBLER  REMOTE                                                               11/17/2006 11:08:36 PAGE     1


MACRO ASSEMBLER A51 V7.07
OBJECT MODULE PLACED IN remote.OBJ
ASSEMBLER INVOKED BY: E:\Program Files\C51\BIN\A51.EXE remote.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

                       1     
0000                   2     ORG 0000H 
0000 0105              3     AJMP MAIN;转入主程序
0003                   4     ORG 0003H ;外部中断P3.2脚INT0入口地址 
0003 0110              5     AJMP INT ;转入外部中断服务子程序（解码程序）
                       6     ;以下为主程序进行CPU中断方式设置
0005 D2AF              7     MAIN:SETB EA ;打开CPU总中断请求
0007 D288              8     SETB IT0 ;设定INT0的触发方式为脉冲负边沿触发
0009 D2A8              9     SETB EX0 ;打开INT0中断请求
                      10     ;以下对单片机的所有引脚进行初始化，全部设置成高电平
000B 759000           11     MOV P1,#00000000B
000E 010E             12     AJMP $
                      13     
                      14     ;以下为进入P3.2脚外部中断子程序，也就是解码程序
0010 C2AF             15     INT: CLR EA ;暂时关闭CPU的所有中断请求
                      16     
0012 7E0A             17     MOV R6,#10
0014 1167             18     SB: ACALL YS1;调用882微秒延时子程序
0016 20B24B           19     JB P3.2,EXIT;延时882微秒后判断P3.2脚是否出现高电平如果有就退出解码程序
0019 DEF9             20     DJNZ R6, SB;重复10次，目的是检测在8820微秒内如果出现高电平就退出解码程序 
                      21     ;以上完成对遥控信号的9000微秒的初始低电平信号的识别。
001B 30B2FD           22     JNB P3.2, $ ;等待高电平避开9毫秒低电平引导脉冲
001E 1170             23     ACALL YS2 ;延时4.74毫秒避开4.5毫秒的结果码
                      24     
0020 7F1A             25     MOV R7,#26;忽略前26位系统识别码 
                      26     
0022 30B2FD           27     JJJJA:JNB P3.2,$;等待地址码第一位的高电平信号
0025 120067           28     LCALL YS1;高电平开始后用882微秒的时间尺去判断信号此时的高低电平状态
0028 A2B2             29     MOV C,P3.2;将P3.2引脚此时的电平状态0或1存入C中
002A 5003             30     JNC UUUA;如果为0就跳转到UUUA
002C 120079           31     LCALL YS3;检测到高电平1的话延时1毫秒等待脉冲高电平结束
002F DFF1             32     UUUA: DJNZ R7,JJJJA
                      33     
0031 791A             34     MOV R1,#1AH ;设定1AH为起始RAM区
0033 7A02             35     MOV R2,#2;接收从1AH到1BH的2个内存,用于存放操作码和操作反码 
0035 7B08             36     PP: MOV R3,#8;每组数据为8位 
                      37     
0037 30B2FD           38     JJJJ: JNB P3.2,$;等待地址码第一位的高电平信号
003A 120067           39     LCALL YS1;高电平开始后用882微秒的时间尺去判断信号此时的高低电平状态
003D A2B2             40     MOV C,P3.2;将P3.2引脚此时的电平状态0或1存入C中
003F 5003             41     JNC UUU;如果为0就跳转到UUU
0041 120079           42     LCALL YS3;检测到高电平1的话延时1毫秒等待脉冲高电平结束
0044 E7               43     UUU: MOV A,@R1;将R1中地址的给A
0045 13               44     RRC A;将C中的值0或1移入A中的最低位
0046 F7               45     MOV @R1,A;将A中的数暂时存放在R1数值的内存中
0047 DBEE             46     DJNZ R3,JJJJ;接收满8位换一个内存
0049 09               47     INC R1;对R1中的值加1，换下一个RAM
004A DAE9             48     DJNZ R2,PP ;接收完8位数据码和8位数据反码，存放在1AH/1BH中
004C B290             49     cpl P1.0
004E E51A             50     MOV A,1AH
0050 F4               51     CPL A;对1AH取反后和1BH比较
0051 B51B10           52     CJNE A,1BH,EXIT;如果不等表示接收数据发生错误,放弃
                      53     
0054 851A90           54     MOV P1,1AH;将按键的键值通过P1口的8个LED显示出来!
0057 C2A5             55     CLR P2.5;蜂鸣器鸣响－嘀嘀嘀－的声音，表示解码成功
0059 120070           56     LCALL YS2
005C 120070           57     LCALL YS2
005F 120070           58     LCALL YS2
A51 MACRO ASSEMBLER  REMOTE                                                               11/17/2006 11:08:36 PAGE     2

0062 D2A5             59     SETB P2.5;蜂鸣器停止
0064 D2AF             60     EXIT: SETB EA ;允许中断
0066 32               61     RETI ;退出解码子程序
                      62     
0067 7C14             63     YS1: MOV R4,#20 ;延时子程序1，精确延时882微秒
0069 7D14             64     D1: MOV R5,#20
006B DDFE             65     DJNZ R5,$
006D DCFA             66     DJNZ R4,D1 
006F 22               67     RET
0070 7C0A             68     YS2: MOV R4,#10 ;延时子程序2，精确延时4740微秒
0072 7DEB             69     D2: MOV R5,#235
0074 DDFE             70     DJNZ R5,$
0076 DCFA             71     DJNZ R4,D2 
0078 22               72     RET
0079 7C02             73     YS3: MOV R4,#2;延时程序3，精确延时1000微秒
007B 7DF8             74     D3:MOV R5,#248
007D DDFE             75     DJNZ R5,$
007F DCFA             76     DJNZ R4,D3
0081 22               77     RET
                      78     END
                             
A51 MACRO ASSEMBLER  REMOTE                                                               11/17/2006 11:08:36 PAGE     3

SYMBOL TABLE LISTING
------ ----- -------


N A M E             T Y P E  V A L U E   ATTRIBUTES

D1 . . . . . . . .  C ADDR   0069H   A   
D2 . . . . . . . .  C ADDR   0072H   A   
D3 . . . . . . . .  C ADDR   007BH   A   
EA . . . . . . . .  B ADDR   00A8H.7 A   
EX0. . . . . . . .  B ADDR   00A8H.0 A   
EXIT . . . . . . .  C ADDR   0064H   A   
INT. . . . . . . .  C ADDR   0010H   A   
IT0. . . . . . . .  B ADDR   0088H.0 A   
JJJJ . . . . . . .  C ADDR   0037H   A   
JJJJA. . . . . . .  C ADDR   0022H   A   
MAIN . . . . . . .  C ADDR   0005H   A   
P1 . . . . . . . .  D ADDR   0090H   A   
P2 . . . . . . . .  D ADDR   00A0H   A   
P3 . . . . . . . .  D ADDR   00B0H   A   
PP . . . . . . . .  C ADDR   0035H   A   
SB . . . . . . . .  C ADDR   0014H   A   
UUU. . . . . . . .  C ADDR   0044H   A   
UUUA . . . . . . .  C ADDR   002FH   A   
YS1. . . . . . . .  C ADDR   0067H   A   
YS2. . . . . . . .  C ADDR   0070H   A   
YS3. . . . . . . .  C ADDR   0079H   A   


REGISTER BANK(S) USED: 0 


ASSEMBLY COMPLETE.  0 WARNING(S), 0 ERROR(S)