单片机红外遥控器解码实验 C语言和汇编2个版本的程序都有

注：
每个EXP实验的文件夹下文件夹分别是P_ASM、P_EMULATOR_C，P_PROTEUS_C，P_EMULATOR_ASM。
P_PROTEUS_ASM        为PROTEUS汇编实例工程
P_PROTEUS_C        为PROTEUS C51仿真实例工程
P_EMULATOR_C        为硬件仿真器（可选配件）C51实例工程
P_EMULATOR_ASM        为硬件仿真器汇编实例工程
一般情况下P_PROTEUS_ASM，P_PROTEUS_C和P_EMULATOR_C和P_EMULATOR_ASM都支持ISP下载脱机运行

P_ISP_C，P_ISP_ASM为ISP下载脱机运行实例。比如看门狗实验，仿真器不支持，因为复位信号被仿真器接管，所以就只能做硬件脱机实验，通过ISP下载程序。

如果文件夹带有（缺省）说明暂时没有提供此程序，可根据需要再添加。
汇编和c的代码都有很全面.

c语言程序：

1. /*************************************************  
   
2. *文件名称： main.c
   
3. *作 者：   
   
4. *版 本：    V1.00
   
5. *说 明：    红外遥控器解码实验
   
6. *修改记录：  
   
7. --------------------------------------------------
   
8. *Descriptoon:
   
9. *接线说明：P32-红外接收,P25-RS,P26-RW,P27-EN,
   
10.            P00~P07-DB0~DB7                 
    
11. **************************************************/                        
    
12. 
    
13. #include <reg52.h>
    
14. 
    
15. #define uchar unsigned char
    
16. #define uint unsigned int
    
17. //char code SST516[3] _at_ 0x003b;
    
18. #define c(x)(x*110592/120000) //晶振11.0592
    
19. 
    
20. uchar Lcd_Buf[4];             //显示数据缓冲区         
    
21. unsigned char Ir_Buf[4];      //用于保存解码结果
    
22. sbit Ir_Pin=P3^2;             //红外线数据接口
    
23. sbit rs=P2^0;                     //LCD数据命令端
    
24. sbit rw=P2^1;                          //读写接口
    
25. sbit lcde=P2^2;                          //使能接口
    
26. uchar code table[]=" WWW#WINDWAY$CN ";//LCD显示数据
    
27. uchar code table1[]="Wait for IR in..";
    
28. uchar code table2[]="  IR DATA...";
    
29.                   
    
30.            unsigned char code Led_Tab[]={
    
31.         0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xf8,
    
32.         0x80,0x90,0x88,0x83,0xC6,0xA1,0x86,0x8E};   //共阳极数码显示码0-F
    
33. unsigned char code Led_Sel[]={0xf,0xf,0xb,0x7}; //数码管位选，屏蔽前两位
    
34. unsigned char Led_Buf[4]; //显示缓冲区
    
35. char Led_Index;           //定义位选         
    
36. unsigned char Ir_Buf[4];  //用于保存解码结果
    
37. 
    
38. sbit LCD_E = P2^7;
    
39. //========1MS延时====================================
    
40. void delay(uint z)
    
41. {
    
42.         uint x,y;
    
43.         for(x=z;x>0;x--)
    
44.                 for(y=113;y>0;y--);
    
45. }
    
46. //======LCD写命令=====
    
47. void write_com(uchar com)
    
48. {
    
49.         rs=0;
    
50.         lcde=0;
    
51.         P0=com;
    
52.         lcde=1;
    
53.         delay(1);//延时1MS跳过忙信号
    
54.         lcde=0;
    
55.         delay(1);
    
56. }
    
57. //======LCD写数据=====================================
    
58. void write_date(uchar date)
    
59. {
    
60.         rs=1;
    
61.         lcde=0;
    
62.         P0=date;
    
63.         lcde=1;
    
64.         delay(1);
    
65.         lcde=0;
    
66.         delay(1);
    
67. }
    
68. //=====初始化函数=====================================
    
69. void init()
    
70. {        
    
71.         uchar num;
    
72.         rw=0;                //允许LCD写
    
73.         lcde=0;
    
74.         write_com(0x38);//显示模式设置                                                         
    
75.         write_com(0x0c);//显示开及光标设置
    
76.         write_com(0x06);//显示光标移动设置
    
77.         write_com(0x01);//清屏
    
78.         write_com(0x80);//显示首地址
    
79.         for(num=0;num<15;num++)//显示第一行
    
80.         {
    
81.                 write_date(table[num]);
    
82.                 delay(1);
    
83.         }
    
84.         write_com(0x80+0x40);//显示第二行
    
85.         for(num=0;num<16;num++)
    
86.         {
    
87.                 write_date(table1[num]);
    
88.                 delay(1);
    
89.         }
    
90.         TMOD=0x10;                //设置定时器0、1工作模式为1
    
91. }
    
92. //=====显示解码========================================
    
93. void write_ir(uchar date)
    
94. {
    
95.         uchar tmp, num,ff;         
    
96. 
    
97.         if(ff==0)
    
98.         {
    
99.                 ff++;
    
100.                 write_com(0x01);
     
101.                 write_com(0x80);
     
102.                 for(num=0;num<12;num++)
     
103.                 {
     
104.                         write_date(table2[num]);
     
105.                         delay(1);
     
106.                 }                 
     
107.         }
     
108.         
     
109.         write_com(0xC0+6);//定位在第二行第六位
     
110.         tmp = date>>4;                        // 高四位         
     
111.         write_date(tmp > 9 ? 'A'+tmp-10 : '0'+tmp);
     
112.         write_com(0xC0+7);//定位第二行第七位           
     
113.         tmp = date&0x0F;                        // 低四位
     
114.         write_date(tmp > 9 ? 'A'+tmp-10 : '0'+tmp);         
     
115. 
     
116. }
     
117. //======================================================
     
118. //解码取回低电平
     
119. unsigned int Ir_Get_Low()
     
120. {
     
121.         TL1=0;
     
122.         TH1=0;
     
123.         TR1=1;
     
124.         while(!Ir_Pin && (TH1&0x80)==0);   //等待低电平到来              
     
125.         TR1=0;           
     
126.         return TH1*256+TL1;//提取低电平时间间隔时长
     
127. }
     
128. //======================================================
     
129. //解码取回高电平========================================
     
130. unsigned int Ir_Get_High()
     
131. {
     
132.         TL1=0;
     
133.         TH1=0;
     
134.         TR1=1;
     
135.         while(Ir_Pin && (TH1&0x80)==0);//等待高电平到来
     
136.         TR1=0;
     
137.         return TH1*256+TL1;//提取高电平时间间隔时长
     
138. }
     
139. //======================================================
     
140. //======================================================
     
141. 
     
142. void main()
     
143. {
     
144.         unsigned int temp;
     
145.         char i,j;
     
146.         init();        //初始化
     
147. //=====用do做循环，等待遥控按键=========================
     
148.         do{
     
149. restart:
     
150.                 while(Ir_Pin) ;//等待低电平
     
151. 
     
152.                 temp=Ir_Get_Low();//把低电平附给变量
     
153.                 if(temp<c(8500) || temp>c(9500)) continue;//引导脉冲低电平等待9000us
     
154.                 temp=Ir_Get_High();//把高电平附给变量
     
155.                 if(temp<c(4000) || temp>c(5000)) continue;//引导脉冲高电平等待4500us
     
156.                 //连续读出32个字节
     
157.                 for(i=0;i<4;i++) //4个字节
     
158.                 {
     
159.                         for(j=0;j<8;j++) //每个字节8位
     
160.                         {
     
161.                                 temp=Ir_Get_Low();
     
162.                                 if(temp<c(200) || temp>c(800)) goto restart;//等待560us跳过低电平
     
163.                                 temp=Ir_Get_High();
     
164.                                 if(temp<c(200) || temp>c(2000)) goto restart;//等待1000us跳过高电平
     
165.                                 Ir_Buf[i]>>=1;//把电平移进数组
     
166. 
     
167. 
     
168. …………限于本文篇幅 余下代码请从51黑下载附件…………

复制代码

汇编语言：

1. 
   
2. 
   
3. ;-----------------------------------------------
   
4.        IRCOM  EQU  20H       ;20H-23H IR使用
   
5.         X     EQU  26H       ;LCD 地址变量
   
6. 
   
7.        IRIN   EQU  P3.2
   
8. ;       BEEP   EQU  P3.7
   
9. ;       RELAY  EQU  P1.0
   
10.       
    
11.         RS    EQU  P2.0
    
12.         RW    EQU  P2.1
    
13.         EN    EQU  P2.2
    
14. ;------------------------------------------------
    
15.          ORG 0000H
    
16.          JMP  MAIN
    
17. ;------------------------------------------------
    
18.           ORG 0100H
    
19. MAIN:
    
20.           MOV   SP,#40H
    
21.           MOV   A,#00H
    
22.           MOV   R0,#20H
    
23. LOOP0:    MOV   @R0,A          ;20H-26H清零
    
24.           INC   R0
    
25.           CJNE  R0,#27H,LOOP0
    
26.           SETB  IRIN
    
27.           CALL  SET_LCD
    
28.           CALL  MENU1
    
29. LOOP1:
    
30.           CALL  IR_IN
    
31.           CALL  IR_SHOW
    
32. 
    
33. ;          MOV  A,22H
    
34. ;          CJNE  A,#40H,LOOP2    ;K17键按下
    
35. ;          CLR   RELAY           ;继电器吸合
    
36. ;LOOP2:    CJNE  A,#04H,LOOP3    ;K19键按下
    
37. ;          SETB  RELAY           ;继电器关闭
    
38. ;LOOP3:   
    
39.            JMP   LOOP1
    
40.          
    
41. ;-----------------------------------------------------
    
42. ;  LCD 初始化设置
    
43. ;-----------------------------------------------------
    
44. SET_LCD:
    
45.           CLR  EN
    
46.           CALL  INIT_LCD     ;初始化 LCD
    
47.           CALL  DELAY1
    
48.           MOV  DPTR,#INFO1   ;指针指到显示信息1
    
49.           MOV  A,#1          ;显示在第一行
    
50.           CALL  LCD_SHOW
    
51.           MOV  DPTR,#INFO2   ;指针指到显示信息2
    
52.           MOV  A,#2          ;显示在第二行
    
53.           CALL  LCD_SHOW
    
54.           RET
    
55. ;-----------------------------------------------------
    
56. INIT_LCD:                 ;8位I/O控制 LCD 接口初始化
    
57.           MOV  A,#38H     ;双列显示，字形5*7点阵
    
58.           CALL  WCOM
    
59.           CALL  DELAY1
    
60.           MOV  A,#38H     ;双列显示，字形5*7点阵
    
61.           CALL  WCOM
    
62.           CALL  DELAY1
    
63.           MOV  A,#38H     ;双列显示，字形5*7点阵
    
64.           CALL  WCOM
    
65.           CALL  DELAY1
    
66.           MOV  A,#0CH     ;开显示，关光标，
    
67.           CALL  WCOM
    
68.           CALL  DELAY1
    
69.           MOV  A,#01H     ;清除 LCD 显示屏
    
70.           CALL  WCOM
    
71.           CALL  DELAY1
    
72.           RET
    
73. ;----------------------------------------------------
    
74. LCD_SHOW:       ;在LCD的第一行或第二行显示信息字符
    
75. 
    
76.           CJNE  A,#1,LINE2  ;判断是否为第一行
    
77.   LINE1:  MOV  A,#80H       ;设置 LCD 的第一行地址
    
78.           CALL  WCOM        ;写入命令
    
79.           CALL  CLR_LINE    ;清除该行字符数据
    
80.           MOV  A,#80H       ;设置 LCD 的第一行地址
    
81.           CALL  WCOM        ;写入命令
    
82.           JMP  FILL
    
83. 
    
84.   LINE2:  MOV  A,#0C0H      ;设置 LCD 的第二行地址
    
85.           CALL  WCOM        ;写入命令
    
86.           CALL  CLR_LINE    ;清除该行字符数据
    
87.           MOV  A,#0C0H      ;设置 LCD 的第二行地址
    
88.           CALL  WCOM
    
89.   FILL:   CLR  A            ;填入字符
    
90.           MOVC  A,@A+DPTR   ;由消息区取出字符
    
91.           CJNE  A,#0,LC1    ;判断是否为结束码
    
92.           RET
    
93.   LC1:    CALL  WDATA       ;写入数据
    
94.           INC  DPTR         ;指针加1
    
95.           JMP  FILL         ;继续填入字符
    
96.           RET
    
97. ;---------------------------------------------------
    
98. CLR_LINE:                  ;清除该行 LCD 的字符
    
99.           MOV  R0,#24
    
100.    CL1:   MOV  A,#' '
     
101.           CALL  WDATA
     
102.           DJNZ  R0,CL1
     
103.           RET
     
104. ;----------------------------------------------------
     
105. MENU1:                      ;LCD 显示工作菜单信息
     
106.          MOV   DPTR,#MENU2
     
107.          MOV   A,#1         ;在第一行显示信息
     
108.          CALL  LCD_SHOW
     
109.          RET
     
110. MENU2:  DB  " REMOTE CONTROL ",0
     
111. ;-----------------------------------------------------
     
112. INFO1:  DB  "                ",0  ;LCD 第一行显示信息
     
113. INFO2:  DB  "  IR-CODE: --H  ",0  ;LCD 第二行显示信息
     
114. ;-----------------------------------------------------
     
115. 
     
116. ;-----------------------------------------------------
     
117. ; 写指令、数据使能子程序
     
118. ;-----------------------------------------------------
     
119. WCOM:
     
120.           MOV  P0,A        ;写指令使能
     
121.           CLR RS           ;RS=L,RW=L,D0-D7=指令码，E=高脉冲
     
122.           CLR RW
     
123.           SETB EN
     
124.           CALL  DELAY0
     
125.           CLR EN
     
126.           RET
     
127.                   
     
128. WDATA:
     
129.           MOV   P0,A      ;写数据使能
     
130.           SETB  RS        ;RS=H,RW=L,D0-D7=数据，E=高脉冲
     
131.           CLR   RW
     
132.           SETB  EN
     
133.           CALL  DELAY0
     
134.           CLR   EN
     
135.           RET
     
136. 
     
137. DELAY0:   MOV  R7,#250      ;延时500微秒
     
138.           DJNZ  R7,$
     
139.           RET
     
140. ;---------------------------------------------------
     
141. ;在 LCD 第二行显示字符
     
142. ;A=ASC DATA, B=LINE X POS
     
143. ;---------------------------------------------------
     
144. LCDP2:                    ;在LCD的第二行显示字符
     
145.          PUSH  ACC        ;
     
146.          MOV  A,B         ;设置显示地址
     
147.          ADD  A,#0C0H     ;设置LCD的第二行地址
     
148.          CALL  WCOM       ;写入命令
     
149.          POP  ACC         ;由堆栈取出A
     
150.          CALL  WDATA      ;写入数据
     
151.          RET
     
152. ;---------------------------------------------------
     
153. ; IR 译码子程序
     
154. ;---------------------------------------------------
     
155. IR_IN:              
     
156.           MOV   R0,#IRCOM
     
157. I1:      JNB  IRIN,I2       ;等待 IR 信号出现
     
158.           JMP  I1
     
159. I2:      MOV  R4,#20
     
160. I20:     CALL  DEL
     
161.           DJNZ  R4,I20
     
162.           JB  IRIN,I1        ;确认IR信号出现
     
163. I21:     JB  IRIN,I3        ;等 IR 变为高电平
     
164.           CALL  DEL
     
165.           JMP  I21
     
166. I3:      MOV  R3,#0         ;8位数清为0
     
167. LL:      JNB  IRIN,I4       ;等 IR 变为低电平
     
168.           CALL  DEL
     
169.           JMP  LL
     
170. I4:      JB  IRIN,I5        ;等 IR 变为高电平
     
171.           CALL  DEL
     
172.           JMP  I4
     
173. I5:      MOV  R2,#0         ;0.14ms 计数
     
174. L1:      CALL  DEL
     
175.           JB  IRIN, N1       ;等 IR 变为高电平
     
176.                              ;IR=0，检查R2中的计数值
     
177.           MOV  A,#8
     
178.           CLR  C
     
179.           SUBB  A,R2         ;判断高低位
     
180.                              ;IF C=0  BIT=0
     
181.           MOV  A,@R0
     
182.           RRC  A
     
183.           MOV  @R0,A         ;处理完一位
     
184.           INC  R3
     
185.           CJNE  R3,#8,LL     ;需处理完8位  
     
186.           MOV  R3,#0
     
187.           INC  R0
     
188.           CJNE  R0,#24H,LL   ;收集到4字节了
     
189.           JMP  OK
     
190. N1:      INC  R2
     
191.           CJNE  R2,#30,L1    ;0.14ms 计数过长则时间到自动离开
     
192. OK:      RET
     
193. ;--------------------------------------------------------------------
     
194. IR_SHOW:
     
195.           MOV A,22H
     
196.           CPL A                ;将22H取反后和23H比较
     
197.           CJNE A,23H,IR_SHOW1  ;如果不等表示接收数据发生错误,放弃。
     
198.           CALL   CONV
     
199. ;          CALL  BEEP_BL        ;蜂鸣器鸣响表示解码成功
     
200. IR_SHOW1: RET
     
201. ;--------------------------------------------------------------------
     
202. ;转换为 ASCII 码并显示
     
203. ;--------------------------------------------------------------------
     
204. CONV:
     
205.           MOV   X,#11        ;设置显示起始位置
     
206.           MOV   A,22H
     
207.           ANL   A,#0F0H      ;取出高四位二进制数
     
208.           SWAP  A            ;高四位与低四位互换
     
209.           PUSH  ACC          ;压入堆栈
     
210.           CLR   C            ;C=0
     
211.           SUBB  A,#0AH       ;减10
     
212.           POP   ACC          ;弹出堆栈
     
213.           JC    ASCII0       ;该数小于10，转ASCII0
     
214.           ADD   A,#07H       ;大于10的数加上37H
     
215. ASCII0:   ADD   A,#30H       ;小于10的数加上30H
     
216.           MOV   B,X
     
217.           CALL  LCDP2
     
218. 
     
219.           MOV   A,22H
     
220.           ANL   A,#0FH        ;取出低四位二进制数
     
221.           PUSH  ACC
     
222.           CLR   C
     
223.           SUBB  A,#0AH        ;减10
     
224.           POP   ACC
     
225.           JC    ASCII1        ;该数小于10，转ASCII0
     
226.           ADD   A,#07H        ;大于10的数加上37H
     
227. ASCII1:   ADD   A,#30H        ;小于10的数加上30H
     
228.           INC   X
     
229.           MOV   B,X
     
230.           CALL  LCDP2
     
231.           RET
     
232. ;--------------------------------------------------------
     
233. ;蜂鸣器响一声子程序
     
234. ;--------------------------------------------------------
     
235. BEEP_BL:
     
236.          MOV  R6,#100
     
237.   BL1:   CALL  DEX1
     
238. ;         CPL  BEEP
     
239.          DJNZ  R6,BL1
     
240.          MOV  R5,#25
     
241.          CALL  DELAY
     
242.          RET
     
243. DEX1:   MOV  R7,#180
     
244. DEX2:   NOP
     
245.          DJNZ  R7,DEX2
     
246.          RET
     
247. DELAY:                    ;延时R5×10MS
     
248.          MOV  R6,#50
     
249.   D1:    MOV  R7,#100
     
250.          DJNZ  R7,$
     
251.          DJNZ  R6,D1
     
252.          DJNZ  R5,DELAY
     
253. 
     
254. 
     
255. …………限于本文篇幅 余下代码请从51黑下载附件…………

复制代码

下载：
EXP19_红外遥控器解码实验.zip (70.27 KB, 下载次数: 53)

2017-5-5 11:15 上传

点击文件名下载附件
下载积分: 黑币 -5

新手看看程序