ORG 0000H

　　AJMP MAIN;轉(zhuǎn)入主程序

　　ORG 0003H;外部中斷P3.2腳INT0入口地址

　　AJMP INT;轉(zhuǎn)入外部中斷服務(wù)子程序（紅外遙控解碼程序）

　　;以下為主程序進(jìn)行CPU中斷方式設(shè)置

　　MAIN:LCALL YS3;等待硬件上電穩(wěn)定

　　SETB EA;打開(kāi)CPU總中斷請(qǐng)求

　　SETB IT0;設(shè)定INT0的觸發(fā)方式為脈沖負(fù)邊沿觸發(fā)

　　SETB EX0;打開(kāi)INT0中斷請(qǐng)求

　　MOV SCON，#50H;設(shè)置成串口1方式

　　MOV TMOD，#20H;波特率發(fā)生器T1工作在模式2上

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

　　MOV TH1，#0F3H;預(yù)置初值（按照波特率2400BPS預(yù)置初值）

　　MOV TL1，#0F3H;預(yù)置初值（按照波特率2400BPS預(yù)置初值）

　　SETB TR1;啟動(dòng)定時(shí)器T1

　　;以上完成串口通訊初始化設(shè)置

　　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循環(huán)由下往上點(diǎn)亮一次，延時(shí)約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;數(shù)碼管個(gè)位顯示8

　　LCALL DELAY

　　MOV P0，#0FFH

　　MOV P2，#10111111B;數(shù)碼管十位顯示8

　　LCALL DELAY

　　AJMP START;反復(fù)循環(huán)

　　;以下為進(jìn)入P3.2腳外部中斷子程序，也就是解碼程序

　　INT： CLR EA;暫時(shí)關(guān)閉CPU的所有中斷請(qǐng)求
MOV R6，#10

　　SB： ACALL YS1;調(diào)用882微秒延時(shí)子程序

　　JB P3.2，EXIT;延時(shí)882微秒后判斷P3.2腳是否出現(xiàn)高電平如果有就退出解碼程序

　　DJNZ R6， SB;重復(fù)10次，目的是檢測(cè)在8820微秒內(nèi)如果出現(xiàn)高電平就退出解碼程序

　　;以上完成對(duì)遙控信號(hào)的9000微秒的初始低電平信號(hào)的識(shí)別。

　　JNB P3.2， $;等待高電平避開(kāi)9毫秒低電平引導(dǎo)脈沖

　　ACALL YS2;延時(shí)4.74毫秒避開(kāi)4.5毫秒的結(jié)果碼

　　MOV R7，#26;忽略前26位系統(tǒng)識(shí)別碼

　　JJJJA:JNB P3.2，$;等待地址碼第一位的高電平信號(hào)

　　LCALL YS1;高電平開(kāi)始后用882微秒的時(shí)間尺去判斷信號(hào)此時(shí)的高低電平狀態(tài)

　　MOV C，P3.2;將P3.2引腳此時(shí)的電平狀態(tài)0或1存入C中

　　JNC UUUA;如果為0就跳轉(zhuǎn)到UUUA

　　LCALL YS3;檢測(cè)到高電平1的話(huà)延時(shí)1毫秒等待脈沖高電平結(jié)束

　　UUUA： DJNZ R7，JJJJA

　　MOV R1，#1AH ;設(shè)定1AH為起始RAM區(qū)

　　MOV R2，#2;接收從1AH到1BH的2個(gè)內(nèi)存，用于存放操作碼和操作反碼

　　PP： MOV R3，#8;每組數(shù)據(jù)為8位

　　JJJJ： JNB P3.2，$;等待地址碼第一位的高電平信號(hào)

　　LCALL YS1;高電平開(kāi)始后用882微秒的時(shí)間尺去判斷信號(hào)此時(shí)的高低電平狀態(tài)

　　MOV C，P3.2;將P3.2引腳此時(shí)的電平狀態(tài)0或1存入C中

　　JNC UUU;如果為0就跳轉(zhuǎn)到UUU

　　LCALL YS3;檢測(cè)到高電平1的話(huà)延時(shí)1毫秒等待脈沖高電平結(jié)束

　　UUU： MOV A，@R1;將R1中地址的給A

　　RRC A;將C中的值0或1移入A中的最低位

　　MOV @R1，A;將A中的數(shù)暫時(shí)存放在R1數(shù)值的內(nèi)存中

　　DJNZ R3，JJJJ;接收滿(mǎn)8位換一個(gè)內(nèi)存

　　INC R1;對(duì)R1中的值加1，換下一個(gè)RAM

　　DJNZ R2，PP ;接收完8位數(shù)據(jù)碼和8位數(shù)據(jù)反碼，存放在1AH/1BH中

　　MOV A，1AH

　　CPL A;對(duì)1AH取反后和1BH比較

　　CJNE A，1BH，EXIT;如果不等表示接收數(shù)據(jù)發(fā)生錯(cuò)誤，放棄

　　MOV P1，1AH;將按鍵的鍵值通過(guò)P1口的8個(gè)LED顯示出來(lái)！

　　MOV A，1AH;將紅外遙控器具體按鍵的鍵值發(fā)送到串口去

　　MOV SBUF，A;通過(guò)串口在電腦屏幕上顯示出來(lái)

　　CLR P2.5;蜂鳴器鳴響嘀嘀嘀的聲音，表示解碼成功

　　LCALL YS2

　　LCALL YS2

　　LCALL YS2

　　SETB P2.5;蜂鳴器停止

　　EXIT： SETB EA ;允許中斷

　　RETI ;退出解碼子程序

　　YS1： MOV R4，#20 ;（占用R4/R5）延時(shí)子程序1，精確延時(shí)882微秒

　　D1： MOV R5，#20

　　DJNZ R5，$

　　DJNZ R4，D1

　　RET

　　YS2： MOV R4，#10 ;（占用R4/R5）延時(shí)子程序2，精確延時(shí)4740微秒

　　D2： MOV R5，#235

　　DJNZ R5，$

　　DJNZ R4，D2

　　RET

　　YS3： MOV R4，#2;（占用R4/R5）延時(shí)程序3，精確延時(shí)1000微秒

　　D3:MOV R5，#248

　　DJNZ R5，$

　　DJNZ R4，D3

　　RET

　　DELAY:MOV R1，#08H;（占用R1/R2/R3）延時(shí)子程序，12M晶振延時(shí)約250毫秒

　　L3： MOV R2 ，#0FAH

　　L1： MOV R3 ，#0FAH

　　L2： DJNZ R3 ，L2

　　DJNZ R2 ，L1

　　DJNZ R1 ，L3

　　RET

　　END