;紅外線遙控讀碼機,用本實例配合本站套件可讀出任何6121或6122(CD6121/CD6122/SC6121/SC6122)及
其兼容芯片的紅外線遙控器的用戶碼、鍵碼。
;本例是一個紅外線遙控接收解碼程序,程序中數(shù)碼管顯示用的是定時器中斷法的動態(tài)掃描
;動態(tài)顯示二位數(shù)碼管的方法，中斷法，我們以3MS中斷一次從而交換兩位數(shù)碼管輪流點亮。
;對準實驗板紅外線接收頭輕按要測定的遙控器的待測按鍵一次，此時實驗板的兩位數(shù)碼管將顯示該鍵的鍵碼，
;(顯示為16進制的),輕觸實驗板的S2此時顯示器切換為顯示當前遙控器用戶碼的低8位, 再次輕觸實驗板的S2此
時顯示器切換為顯示當前遙控器用戶碼的高8位,
;再一次輕觸實驗板的S2此時顯示又回到顯示當前鍵的鍵碼，用按鍵S2可反復循環(huán)顯示用戶碼低8位、高8位、鍵碼。
;注意:所有的顯示均為16進制,'A'顯示為'A','B'顯示為'b','C'顯示為'c','D'顯示為'd','E'顯示為'E','
F'顯示為'F'.
;注意6121的遙控器發(fā)射碼依次為:同步頭(引導碼)+32位數(shù)據(jù)碼(用戶碼低8位+用戶碼高8位+鍵碼+鍵碼的反碼)
;引導碼是由9MS的高電平加4.5MS的低電平構成,我們接收到的剛好反相為9MS的低電平加4.5MS的高電平.
;數(shù)據(jù)碼'0'是由560US的高電平加560US的低電平構成,接收時反相為560US的低電平加560US的高電平構成.
;數(shù)據(jù)碼'1'是由560US的高電平加1.69MS的高電平構成,接收時反相為560US的低電平加1.69MS的高電平構成.
;程序文件名：“ST-RMT.ASM"
;燒寫時應注意:配置位已經(jīng)在程序中寫明，加載HEX文件時會自動加載，燒寫時不用再手動設置配置位。
;實驗時請注意套件跳線選擇；
;*******************************************************************
LIST P=16F84A,R=DEC ;定義器件為16F84，默認數(shù)制為十進制
;-------------------------------------------------------
__CONFIG B'11111111110001';_CP_OFF&_WDT_OFF&_PWRITE_ON&_XT_OSC
;沒有代碼保護
;看門狗關閉
;上電廷時器開啟
;振蕩器模式為XT
;-------------------------------------------------------------
RTCC EQU 01H ;定義定時器0地址
PC EQU 02H ;定義程序計數(shù)器低字節(jié)寄存器地址
STATUS EQU 03H ;定義狀態(tài)寄存器地址
PORTA EQU 05H ;定義RA口數(shù)據(jù)寄存器地址
PORTB EQU 06H ;定義RB口數(shù)據(jù)寄存器地址
INTCON EQU 0BH ;定義中斷控制寄存器
OPTION_REG EQU 81H ;
TRISA EQU 85H ;定義RA口方向控制寄存器
TRISB EQU 86H ;定義RB口方向控制寄存器
;-----------------------STATUS
C EQU 0 ;定義進位標志位位地址
Z EQU 2 ;定義0標志位位地址
RP0 EQU 5 ;寄存器體選
;-------------------------INTCON
T0IF EQU 2 ;定時器0溢出中斷標志位
T0IE EQU 5 ;定時器0溢出中斷允許/禁止
GIE EQU 7 ;總中斷允許/禁止
;-------------------------
RMT EQU 4 ;遙控接收輸入腳位地址（RA。4）
;-------------------------
BITIN EQU 7 ;遙控接收數(shù)據(jù)位位標志
;-------------------------
CNT0 EQU 20H ;用戶臨時寄存器1
CNT1 EQU 21H ;用戶臨時寄存器2
CNT2 EQU 22H ;用戶臨時寄存器3
CNT3 EQU 23H ;用戶臨時寄存器4
TABADD EQU 24H ;數(shù)碼管顯示碼取碼用寄存器
FLAGS EQU 25H ;顯示位選標志位
DISPBUF_H EQU 26H ;顯示器高位
DISPBUF_L EQU 27H ;顯示器低位
W_TEMP EQU 2BH ;W現(xiàn)場保護寄存器
STATUS_TEMP EQU 2CH ;STATUS現(xiàn)場保護寄存器
CSR0 EQU 2DH ;遙控鍵碼反碼寄存器
CSR1 EQU 2EH ;遙控器鍵碼寄存器
CSR2 EQU 2FH ;遙控器用戶碼高8位寄存器
CSR3 EQU 30H ;遙控器用戶碼低8位寄存器
FLAGS2 EQU 31H ;臨時寄存器
CSR0A EQU 32H ;遙控接收32位數(shù)據(jù)暫存寄存器
CSR1A EQU 33H ;遙控接收32位數(shù)據(jù)暫存寄存器
CSR2A EQU 34H ;遙控接收32位數(shù)據(jù)暫存寄存器
CSR3A EQU 35H ;遙控接收32位數(shù)據(jù)暫存寄存器
COUNTER EQU 36H ;按鍵計數(shù)寄存器
;--------------------
ORG 0000H
GOTO MAIN
ORG 0004H
GOTO TMR0SERV ;定時器中斷,掃描數(shù)碼管
ORG 0008H
;-------------------------------------------------
CONVERT
MOVWF PC ;將W寄存器內的7段顯示碼地址放入PC
TABLE ;PC執(zhí)行新地址指令， 跳到相對的地址執(zhí)行?
RETLW 081H ;0 ;RETLW指令，將七段顯示碼存入W后返回
RETLW 0E7H ;1
RETLW 092H ;2
RETLW 0A2H ;3
RETLW 0E4H ;4
RETLW 0A8H ;5
RETLW 088H ;6
RETLW 0E3H ;7
RETLW 080H ;8
RETLW 0A0H ;9
RETLW 0C0H ;A
RETLW 08CH ;b
RETLW 09EH ;c
RETLW 086H ;d
RETLW 098H ;E
RETLW 0D8H ;F
;----- -----------------------------------------------
TMR0SERV
MOVWF W_TEMP ;現(xiàn)場保護
SWAPF STATUS,W ;用SWAPF才不會影響標志位
MOVWF STATUS_TEMP ;將W和STATUS存入各保護寄存器
MOVLW 0FFH
MOVWF PORTB ;先熄滅所有數(shù)碼管以免閃爍
BSF PORTA,1
BSF PORTA,2
MOVLW TABLE
MOVWF TABADD ;將轉換表的首地址存入TABADD
MOVFW DISPBUF_L ;計數(shù)值(W)與轉換表的起始地址相加
BTFSS FLAGS,1
MOVFW DISPBUF_H
ADDWF TABADD,W
CALL CONVERT ;存入W后調用轉換表子程序
MOVWF PORTB ;送RB口顯示
BTFSS FLAGS,1 ;根據(jù)標志位選擇是點亮那一個數(shù)碼管
BCF PORTA,1
BTFSC FLAGS,1
BCF PORTA,2
COMF FLAGS,1
MOVLW 155 ;送定時器初值
MOVWF RTCC
BCF INTCON,T0IF ;清定時器0溢出中斷標志位
SWAPF STATUS_TEMP,W ;恢復中斷前STATUS，W的值
MOVWF STATUS
SWAPF W_TEMP,F
SWAPF W_TEMP,W ;（用SWAPF才不會影響STATUS的值）
RETFIE
;------------------------------------------------
MAIN
CLRF PORTA
CLRF PORTB ;初始化IO口
BSF STATUS,RP0 ;設置寄存器體1
MOVLW 0F8H ;將RMT設置為輸入,S2輸入其它IO口設置為輸出
MOVWF TRISA
MOVLW 00H ;
MOVWF TRISB
MOVLW 84H
MOVWF OPTION_REG ;預分頻器分配給定時器0，分頻比1:32;
BCF STATUS,RP0 ;恢復寄存器體0
MOVLW 155
MOVWF RTCC ;定時器送初值(255-155)*32US=3.2MS,每3.2MS一次中斷
MOVLW 0FFH ;先讓數(shù)碼管全部不顯示
MOVWF PORTB
CLRF DISPBUF_L ;數(shù)碼管先顯示00
CLRF DISPBUF_H
CLRF COUNTER ;按鍵計數(shù)送初值
BCF INTCON,T0IF
BSF INTCON,T0IE ;定時器0溢出中斷允許
BSF INTCON,GIE ;總中斷允許
;--------------------------------------------------
LOOP
BTFSS PORTA,3 ;是否按下S9
GOTO KEY ;跳轉鍵處理
BTFSS PORTA,RMT ;是否有遙控器按下
GOTO RCV ;跳轉遙控接收程序
GOTO LOOP ;反復檢測
;--------------------------------------------------
KEY
CLRF CNT0 ;消除鍵抖動
MOVLW 100
MOVWF CNT1
KEY_A
BTFSC PORTA,3
INCF CNT0,1
BTFSS PORTA,3
CLRF CNT0
BTFSC CNT0,3
GOTO LOOP
DECFSZ CNT1,1
GOTO KEY_A
INCF COUNTER,1 ;按鍵計數(shù)加一
MOVFW COUNTER
MOVWF CNT1
DECFSZ CNT1,1 ;是否是第一次按下按鍵
GOTO KEY_B ;不是則轉
SWAPF CSR3,W ;用戶碼低8位 高低位交換，先處理高位
ANDLW 0FH ;屏蔽掉高位
MOVWF DISPBUF_H ;存入寄存器
MOVFW CSR3 ;用戶碼低8位 低位處理
ANDLW 0FH ;屏蔽掉高位
MOVWF DISPBUF_L ;存入寄存器
GOTO KEY_END
KEY_B
DECFSZ CNT1,1 ;第二次按下按鍵否
GOTO KEY_C ;不是第二次按下按鍵則是第三次轉相應程序
SWAPF CSR2,W ;顯示值高低位交換，先處理高位
ANDLW 0FH ;屏蔽掉高位
MOVWF DISPBUF_H ;存入寄存器
MOVFW CSR2 ;顯示值低位處理
ANDLW 0FH ;屏蔽掉高位
MOVWF DISPBUF_L ;存入寄存器
GOTO KEY_END
KEY_C
CLRF COUNTER ;該次循環(huán)結束，按鍵計數(shù)送初值
SWAPF CSR1,W ;鍵碼值高低位交換，先處理高位
ANDLW 0FH ;屏蔽掉高位
MOVWF DISPBUF_H ;存入寄存器
MOVFW CSR1 ;鍵碼值低位處理
ANDLW 0FH ;屏蔽掉高位
MOVWF DISPBUF_L ;存入寄存器
KEY_END
BTFSS PORTA,3 ;等待鍵釋放
GOTO $-1
GOTO LOOP
;--------------------------------------------------
RCV
BTFSC PORTA,RMT
GOTO LOOP ;是干擾退出
MOVLW 4
MOVWF CNT1 ;4*256*10us
CLRF CNT2
CLRF CNT0
RCV1 ;先檢測引導碼的9MS低電平
GOTO
.png)
2.png)
