电子发烧友App
在智能电视、网络机顶盒（电视盒子）上，常见的主流遥控器无外乎“红外线”、“蓝牙”两种遥控方式。“蓝牙”遥控器因其“无需对准”、“可以绕弯控制”、“控制距离远”等特点近年来越来越受到厂商的重视以及消费者的青睐，然而尽管如此，仍然有大量用户坚持使用红外线遥控，原因就是现阶段很多蓝牙遥控器存在诸多缺陷及问题，影响用户日常使用操作。
很详细的红外学习型遥控器，储存在24c64中的汇编子程序，在你自己的设计中只要修改一下IO调用它就可以了，是本人的工程验证能学习市面常用的绝大部分红外线遥控器
用的是stc89c52单片机，下面是汇编代码：
;**********************************
;---------------------AT24C64 CODE-------------------------
;==========================================================
SETB SDA
NOP
NOP
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
CLR SDA
NOP
NOP
NOP
NOP
CLR SCK
RET
;==========================================================
ICSTOP： ;I2C 结束
CLR SDA
NOP
NOP
NOP
NOP
CLR SCK
NOP
NOP
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
SETB SDA
RET
;==========================================================
ICACK： ;I2C 应答
CLR SDA
NOP
NOP
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
CLR SCK
RET
;==========================================================
NOACK： ;I2C 无应答
SETB SDA
NOP
NOP
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
CLR SCK
RET
;==========================================================
ICREADBIT： ;I2C 读取一位
SETB SDA
NOP
NOP
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
MOV C，SDA
CLR SCK
RET
;----------------------------------------------------------
ICREADACK：
MOV R7，#200
SETB SDA
NOP
NOP
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
READACKS：
JNB SDA，ACKEND
DJNZ R7，READACKS
SETB C
CLR SCK
RET
ACKEND：
CLR C
CLR SCK
RET
;==========================================================
ICREADBYTE： ;I2C 读取一个字节
MOV R7，#8
READLOOP：
LCALL ICREADBIT
RLC A
DJNZ R7，READLOOP
MOV R7，A
RET
;==========================================================
ICWRITEBIT： ;I2C 写一位
MOV SDA，C
NOP
NOP
NOP
NOP
SETB SCK
NOP
NOP
NOP
NOP
CLR SCK
RET
;==========================================================
ICWRITEBYTE： ;I2C 写一个字节
MOV A，R7
MOV R7，#8
WRITELOOP：
RLC A
LCALL ICWRITEBIT
DJNZ R7，WRITELOOP
RET
;==========================================================
READAT：
MOV A，R7 ;计算I2C地址
MOV B，#208 ;144
MUL AB
MOV R2，B
MOV R3，A
LCALL ICSTART ;I2C 数据读入缓冲区
MOV R7，#0A0H ;R2R3 I2C地址
LCALL ICWRITEBYTE ;R0 缓冲区地址
LCALL ICREADACK ;R1 数据个数
JNC RACKEND
RET
;
RACKEND：
MOV A，R2
MOV R7，A
LCALL ICWRITEBYTE
LCALL ICREADACK
MOV A，R3
MOV R7，A
LCALL ICWRITEBYTE
LCALL ICREADACK
LCALL ICSTART
MOV R7，#0A1H
LCALL ICWRITEBYTE
LCALL ICREADACK
MOV R0，#LRDBUF
MOV R1，#208 ;144
READDATAS：
LCALL ICREADBYTE
LCALL ICACK
MOV @R0，A
INC R0
DJNZ R1，READDATAS
LCALL NOACK
LCALL ICSTOP
RET
;==========================================================
WRITEAT： ;缓冲区数据写入 I2C
MOV A，R7 ;计算I2C地址
MOV B，#208 ;;144
MUL AB
MOV R2，B
MOV R3，A
MOV R5，#13 ;9 13*16=208
MOV R0，#LRDBUF
ICWRITENEXT：
LCALL ICSTART
MOV R7，#0A0H
LCALL ICWRITEBYTE
LCALL ICREADACK
JNC WACKEND
;
;
WACKEND：
MOV A，R2
MOV R7，A
LCALL ICWRITEBYTE
LCALL ICREADACK
MOV A，R3
MOV R7，A
LCALL ICWRITEBYTE
LCALL ICREADACK
MOV R1，#16
WRITEDATAS：
MOV A，@R0
INC R0
MOV R7，A
LCALL ICWRITEBYTE
LCALL ICREADACK
DJNZ R1，WRITEDATAS
LCALL ICSTOP
MOV R7，#250
DELAY_D：
MOV R6，#20
DJNZ R6，$
DJNZ R7，DELAY_D
MOV A，R3
ADD A，#16
MOV R3，A
MOV A，R2
ADDC A，#0
MOV R2，A
DJNZ R5，ICWRITENEXT
RET
;*****************************************************************
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
LRDREAD：
;红外代码读取
MOV R0，#LRDBUF ;代码缓冲区清零
MOV R1，#208 ;144
CLR A
CLRLRDBUF：
MOV @R0，A
INC R0
DJNZ R1，CLRLRDBUF
MOV R0，#LRDBUF
SETB LRDR
LRDTEST：
SETB TR2
SETB ES ;红外代码起始检测
JB RI，LLOOP ;这里是检测有键按下时。。。。。。
CLR TR2
JNB LRDR，READSTART
JB HWXX，LRDTEST ;红外学习标志位
LJMP LLLOOP
LLOOP： ;
CLR RI
MOV A，SBUF
MOV R0，#250
MOV R1，#250
LP4： JB RI，LP3
DJNZ R0，LP4
DJNZ R1，LP4
LJMP LRDTEST
LP3： CLR RI
CLR ES
MOV A，SBUF
MOV A，#00H
LP2：
CLR HONGWAI ;红外按钮标志位
CLR P3.3
CLR HWXX
MOV SBUF，#37H
JNB TI，$
CLR TI
DEC SP
DEC SP
LJMP LOOP
LLLOOP： RET
;--------------------------------------
READSTART：
CLR EA
;SETB P0.6
MOV TH1，#0
MOV TL1，#12
SETB LRDR
;--------------------------------------
READLOOP_S：
SETB TR1
CLR TF1
TEST_LRDR：
MOV A，TH1
JB TF1，LRDOVER
JNB LRDR，TEST_LRDR
CLR TR1 ;
［1］ ［2］
工商网监
评论