;紅外解碼程序
;晶體:11.0592M
;日期:2005-10-14
;功能:將6122發(fā)射IC發(fā)射的紅外碼解碼，儲存在CODE1--CODE4中,并用6個數(shù)碼管顯示用戶碼,用戶反碼，按鍵碼
;======================================================================================
ORG 0000H
AJMP MAIN
ORG 0003H
AJMP REMOT
ORG 000BH
AJMP TIME0
;------------------------------------------------------
IR BIT P3.2

CODE1 EQU 30H ;遙控用戶碼
CODE2 EQU 31H ;遙控用戶反碼
CODE3 EQU 32H ;按鍵碼
CODE4 EQU 33H ;按鍵反碼

TIME1_REMOT EQU 34H ;每次接收的碼BIT數(shù)
TIME2_REMOT EQU 35H ;允許重碼次數(shù)
TIME3_REMOT EQU 36H ;按鍵數(shù)目存放
;---------------------------------------------------------

DIG1 BIT P2.1;第一位數(shù)碼管選通
DIG2 BIT P2.5;第二位數(shù)碼管選通
DIG3 BIT P2.0;第三位數(shù)碼管選通
DIG4 BIT P2.4;第四位數(shù)碼管選通
DIG5 BIT P2.6;第五位數(shù)碼管選通
DIG6 BIT P2.3;第六位數(shù)碼管選通

;----------------------------------------
D1 EQU 40H
D2 EQU 41H
D3 EQU 42H
D4 EQU 43H
D5 EQU 44H
D6 EQU 45H

ORG 0030H
;=============================初始化===============================

MAIN:
SETB EA ;開總中斷
MOV TMOD,#1H ;定時器0工作于方式1

SETB ET0 ;啟動定時器0
SETB TR0

MOV TH0,#0 ;預(yù)置數(shù)0
MOV TL0,#0

SETB EX0 ;開外中斷0
SETB IT0

MOV TIME1_REMOT,#32;接收的碼一共32BIT:4*8

CLR P1.0
MOV D1,#10H
MOV D2,#10H
MOV D3,#10H
MOV D4,#10H
MOV D5,#10H
MOV D6,#10H
;============================初始化完畢============================

;=============================主程序==============================
LOOP:
; ACALL FENLI
ACALL DIG
AJMP LOOP
;=============================主程序完畢==========================

;=============================紅外解碼中斷程序=========================
;=============================================
;以下為紅外中斷解碼程序
;接收頭引腳P3.2
;按鍵反碼: CODE1
;按鍵碼:CODE2
;用戶反碼: CODE3
;用戶碼:CODE4
;接收碼的BIT數(shù):TIME1_REMOT
;重碼次數(shù):TIME3_REMOT;
;入口函數(shù):
;出口函數(shù):R0---按鍵反碼 R1----按鍵碼 R2---用戶反碼 R3----用戶碼 R4---按鍵標準鍵值
;=============================================
REMOT:
CLR EA ;關(guān)總中斷
PUSH ACC
PUSH PSW
PUSH DPH
PUSH DPL

CLR P1.7
;-----------------判斷定時器運行時間是否大于12.288MS-----------------
MOV A,TH0 ;讀入此時TH0,判斷是否大于設(shè)定的數(shù)
CLR C ;清除C避免誤判
SUBB A,#2CH ;11.0592-2C 12M-30 6M-18 4M-10 24M-60
JC REMOT1 ;小于12.220往下判斷
AJMP EXIT_REMOT1 ;大于2BFF*1.085=12.220MS則退出

;-----------------判斷定時器運行時間是否小于0.768MS------------------
REMOT1:
MOV A,TH0
CLR C
SUBB A,#23H ;11.0592-2 12M-3 6M*-1 4M-1 24M-6
JNC REMOT2
AJMP EXIT_REMOT ;小于0.768作誤碼,退出
;------------------判斷定時器運行時間是否小于2MS---------------------
REMOT2:
MOV A,TH0
CLR C
SUBB A,#7H ;11.0592-7 12M-7 6M-3 4M-2 24M-0FH
JC REMOT4
AJMP REMOT3 ;小于2MS,做數(shù)據(jù):"0:處理
;-----------------判斷定時器運行時間是否小于11.5MS-------------------
REMOT3:
MOV A,TH0
CLR C
SUBB A,#29H ;11.0592-29 12M-2C 6M-16 4M-0EH 24M-59
JC REMOT5 ;小于11.5MS,做數(shù)據(jù)"1"處理
AJMP REMOT6 ;否則作重碼處理
;----------------數(shù)據(jù)"0"----------------------
REMOT4:
CLR C
AJMP REMOT7
;----------------數(shù)據(jù)"1"--------------------
REMOT5:
SETB C
AJMP REMOT7
;----------------重碼------------------------
REMOT6:
DJNZ TIME3_REMOT,EXIT_REMOT
MOV TIME3_REMOT,#2
AJMP EXIT_REMOT1

;---------------儲存數(shù)據(jù)--------------------
REMOT7:
MOV A,CODE1
RRC A
MOV CODE1,A
MOV A,CODE2
RRC A
MOV CODE2,A
MOV A,CODE3
RRC A
MOV CODE3,A
MOV A,CODE4
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 ;此處設(shè)置斷點,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
;--------------將按鍵碼轉(zhuǎn)換為標準的碼值-----------
OK_REMOT:
MOV TIME3_REMOT,#15 ;按鍵數(shù):15個按鍵
MOV R4 DPTR,#TAB_REMOT ;指針指向按鍵碼值表
OK_REMOT1:
MOV A,TIME3_REMOT ;將碼值表第一個數(shù)與CODE2比較
MOVC A,@A+DPTR
XRL A,CODE2
JZ OK_REMOT2 ;相同，已經(jīng)找到，跳轉(zhuǎn)出口
DJNZ TIME3_REMOT,OK_REMOT1;不同,未找到,取下一個按鍵碼值比較,直到相同為止
AJMP EXIT_REMOT1 ;已經(jīng)找完碼值表,未找到匹配數(shù)據(jù)，退出
;-------------
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 ;重設(shè)定時器0
MOV TL0,#0
SETB EA
SETB TR0 ;開中斷
; SETB EX0

CLR IE0 ;清外中斷標志,避免反復(fù)中斷
POP DPL
POP DPH
POP PSW
POP ACC ;出棧
SETB P1.7
RETI

;=========================紅外解碼中斷程序完畢====================
;=========================定時中斷程序============================
;============================================================
;以下為定時器中斷程序
;功能:每120MS清除遙控用戶碼緩存
;入口函數(shù):
;出口函數(shù):
;============================================================
TIME0:
CLR EA
MOV TH0,#0
MOV TL0,#0
MOV CODE1,#0
MOV CODE2,#0
MOV CODE3,#0
MOV CODE4,#0
SETB EA
RETI
;==============================================================
;=======================以下為數(shù)碼管顯示數(shù)分離子程序================

; ;功能:將遙控器的用戶碼,用戶反碼，按鍵碼,的十位與個位分離
;入口函數(shù):R3--用戶碼,R2--用戶反碼,R1---按鍵碼
;出口函數(shù):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
;-----------分離完畢-------------------------
;===================以下為數(shù)碼管顯示子程序=======================
;入口函數(shù):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
;------------------------------數(shù)碼管段碼表------------------------------------
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]