RRC A
MOV CODE4,A
DJNZ TIME1_REMOT,EXIT_REMOT
MOV TIME1_REMOT,#32;判断是否接收完32位,
MOV R0,CODE1
MOV R1,CODE2
MOV R2,CODE3
MOV R3,CODE4
AJMP BIJIAO ;此处设置断点,R0--按键反码
;R1---按键码
;R2---用户反码
;R3---用户码
;---------------用户码判断-------------------------
BIJIAO:
; MOV A,CODE4
; CJNE A,#10H,EXIT_REMOT
; MOV A,CODE3
; CJNE A,#0EFH,EXIT_REMOT
;---------------按键码判断-----------------------
MOV A,CODE2
CPL A
XRL A,CODE1
JNZ EXIT_REMOT
ACALL FENLI
AJMP EXIT_REMOT1
;--------------将按键码转换为标准的码值-----------
OK_REMOT:
MOV TIME3_REMOT,#15 ;按键数:15个按键
MOV R4 DPTR,#TAB_REMOT ;指针指向按键码值表
OK_REMOT1:
MOV A,TIME3_REMOT ;将码值表第一个数与CODE2比较
MOVC A,@A+DPTR
XRL A,CODE2
JZ OK_REMOT2 ;相同，已经找到，跳转出口
DJNZ TIME3_REMOT,OK_REMOT1;不同,未找到,取下一个按键码值比较,直到相同为止
AJMP EXIT_REMOT1 ;已经找完码值表,未找到匹配数据，退出
;-------------
OK_REMOT2:
MOV R4,TIME3_REMOT ;将标准码值存入R4
AJMP EXIT_REMOT
;--------------------按键码值表------------------------
TAB_REMOT:
DB 0H
;SETB
;ST.BY-INPUT-REST
DB 04H,02H,06H
;
;FR- MAST+ FR+
DB 0EH,07H,00H
; ;SUB- MUTE SUB+
DB 10H,0FH,12H
; ;CEN- MAST+ CEN+
DB 13H,03H,0AH
; ;SUR- SET75 SUR+
DB 11H,08H,01H
;---------------解码中断退出程序--------------------
EXIT_REMOT1: ;异常退出
MOV TIME1_REMOT,#32
EXIT_REMOT: ;正常退出
MOV TH0,#0 ;重设定时器0
MOV TL0,#0
SETB EA
SETB TR0 ;开中断
; SETB EX0
CLR IE0 ;清外中断标志,避免反复中断
POP DPL
POP DPH
POP PSW
POP ACC ;出栈
SETB P1.7
RETI
;=========================红外解码中断程序完毕====================
;=========================定时中断程序============================
;============================================================
;以下为定时器中断程序
;功能:每120MS清除遥控用户码缓存
;入口函数:
;出口函数:
;============================================================
TIME0:
CLR EA
MOV TH0,#0
MOV TL0,#0
MOV CODE1,#0
MOV CODE2,#0
MOV CODE3,#0
MOV CODE4,#0
SETB EA
RETI
;==============================================================
;=======================以下为数码管显示数分离子程序================
; ;功能:将遥控器的用户码,用户反码，按键码,的十位与个位分离
;入口函数:R3--用户码,R2--用户反码,R1---按键码
;出口函数:D1-用户码十位,D2--用户个位,D3--用户反码十位,D4---用户反码个位,
; ;D5---按键码十位,D6---按键码个位
;----------------------------------------------------------
FENLI:
MOV A,R3 ;分离用户反码
MOV B,#16
DIV AB
MOV D1,A
MOV D2,B
MOV A,R2 ;分离用户码
MOV B,#16
DIV AB
MOV D3,A
MOV D4,B
MOV A,R1 ;分离按键码
MOV B,#16
DIV AB
MOV D5,A
MOV D6,B
RET
;-----------分离完毕-------------------------
;===================以下为数码管显示子程序=======================
;入口函数:D1---D6
;--------------------------------------------------------------
DIG:
MOV DPTR,#TAB_DIG ;显示用户反码十位
MOV A,D1
MOVC A,@A+DPTR
MOV P2,#0FFH
MOV P0,A
CLR DIG1
ACALL YS2MS
MOV DPTR,#TAB_DIG ;显示用户反码个位
MOV A,D2
MOVC A,@A+DPTR
MOV P2,#0FFH
MOV P0,A
CLR DIG2
ACALL YS2MS
MOV DPTR,#TAB_DIG ;显示用户码十位
MOV A,D3
MOVC A,@A+DPTR
MOV P2,#0FFH
MOV P0,A
CLR DIG3
ACALL YS2MS
MOV DPTR,#TAB_DIG ;显示用户码个位
MOV A,D4
MOVC A,@A+DPTR
MOV P2,#0FFH
MOV P0,A
CLR DIG4
ACALL YS2MS
MOV DPTR,#TAB_DIG ;显示按键码十位
MOV A,D5 MOVC A,@A+DPTR MOV P2,#0FFH MOV P0,A CLR DIG5 ACALL YS2MS MOV DPTR,#TAB_DIG ;显示按键码个位 MOV A,D6
MOVC A,@A+DPTR
MOV P2,#0FFH
MOV P0,A
CLR DIG6
ACALL YS2MS
;---------------------------显示完毕-----------------------------------
RET
;------------------------------数码管段码表------------------------------------
TAB_DIG: ;0 1 2 3 4 5 6 7 8 9 A B C D E F 全亮 消隐
DB 5H,0B7H,51H,31H,0A3H,29H,9H,37H,1H,21H,3H,89H,4DH,4DH,49H,4BH,0h,0ffh
;------------------------------延时-------------------------------------------
YS2MS:
MOV R7,#15
DEL1:MOV R6,#100
DJNZ R6,$
DJNZ R7,DEL1
RET
END
上一页 [1] [2]
本文关键字：单片机 程序 51单片机，单片机-工控设备 - 51单片机
