标题:
单片机红外解码(汇编程序)
[打印本页]
作者:
azurels
时间:
2016-4-15 17:22
标题:
单片机红外解码(汇编程序)
红外的汇编程序
ORG 0000H
LJMP MAIN
ORG 30H
MAIN:
JNB P3.0,IR
LJMP MAIN
IR:
MOV R6,#10
IR_SB:
ACALL DELAY882
JB P3.0/IR_ERROR
DJNZ R6,IR_SB
JNB P3.0,$
ACALL DELAY2400
JNB P3.0,IR_Rp
ACALL DELAY2400
MOV R1,#1AH
MOV R2,#4
IR-4BYTE:
MOV R3,#8
IR_8BIT:
JNB P3.2,#
LCALL DELAY882
MOV c,P3.2
JNC IR_8BIT_0
LCALL DELAY1000
IR_8BIT_0:
MOV A,@R1
RRC A
MOV @R1,A
DJNZ R3,IR_8BIT
INC R1
DJNZ R2,IR_4BYTE
JMP IR_GOTO
IR_Rp:
JMP IR_GOTO
IR_ERROR:
LJMP MAIN
IR_GOTO:
MOV A,1CH
CPL A
CJNE A,1DH,IR_ERROR
MOV P1,1DH
CLR P2.4
LCALL DELAY2400
LCALL DELAY2400
LCALL DELAY2400
SETB P2.4
MOV 1AH,#00H
MOV 1BH,#00H
MOV 1CH,#00H
MOV 1DH,#00H
LJMP MAIN
DELAY882:
MOV R7,#202
DELAY882_A:
NOP
NOP
DJNZ R7,DELAY882_A
RET
DELAY1000:
MOV R7,#229
DELAY1000_A:
NOP
NOP
DJNZ R7,DELAY1000_A
RET
DELAY2400:
MOV R7,#245
DELAY2400_A:
NOP
NOP
NOP
NOP
NOP
NOP
NOP
DJNZ R7,DELAY2400_A
RET
END
复制代码
红外.zip
2016-4-15 17:21 上传
点击文件名下载附件
下载积分: 黑币 -5
532 Bytes, 下载次数: 18, 下载积分: 黑币 -5
作者:
xiejunli
时间:
2020-6-2 20:59
有几行指令是错的,汇编不了
作者:
湖南孵化
时间:
2020-6-12 09:44
汇编的简单直接,我喜欢
作者:
lxa0
时间:
2022-8-5 11:49
本帖最后由 lxa0 于 2022-8-5 11:52 编辑
这个代码有缺陷:
当代码中含有led动态扫描时,
led会出现闪烁。
作者:
dyx811
时间:
2022-8-5 14:25
楼主可否有c语言程序呢、?
作者:
shwljj1987
时间:
2022-8-26 08:40
总感觉用汇编挺牛逼的。
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1