红外线发射与接收源程序

红外线发射与接收源程序，做智能小车必备啊。。

红外线发射与接收一例：

include<p=16f877.inc>
;歌林电子制作实验室www.nbglin.com
;TEL：0574-88464538 email:nbglin@126.com
;------------------
STATUS equ 0X03
PORTA equ 0x05
PORTB equ 0x06
W equ 0x00
F equ 0x01
Z equ 0x02
C equ 0x00
;------------------
n55ks equ 0x0C ;
nchks equ 0x0D ;
avgIR equ 0x0E ;
nsamp equ 0x0F ;
tdetect equ 0x10 ;
;------------------------------------
org 0x000
goto start
org 0x004
start
movlw b'00000001'
tris PORTA ; RA0 红外输入
movlw b'00000000'
tris PORTB ;RB0 红外输出
; 2us in goto at end of loop
blip call doblip ; +6.248ms = 6.250ms total
call seeblip ; 6.250ms total
call seeblip ; 6.250ms total
call seeblip ; 6.250ms total
call seeblip ; 6.250ms total
call seeblip ; 6.250ms total
call seeblip ; 6.250ms total
call seeblip ; 6.250ms total
nop
nop
call doblip
call seeblip
call seeblip
call seeblip
call seeblip
call seeblip
call seeblip
call seeblip
goto blip ;
;============ 产生 55.5kHz锯形波(346*18us=6.228ms)======
doblip
movlw 0xFF
movwf n55ks
osc nop
call make55k ;RB0 红外输出
decfsz n55ks,F
goto osc
;--------------
morblip ;6253us DELAY
movlw 0x5B
movwf n55ks
oscmore call make55k ;RB0 红外输出
nop
decfsz n55ks,F
goto oscmore
;-------------
call delay8u
nop
nop
nop
nop
nop
bcf PORTB,2 ; RB2 LED指示
return
;---------------------------
make55k bsf PORTB,0 ;RB0 红外输出
call delay8u
bcf PORTB,0
return
delay8u nop
nop
nop
nop
return
;========= 6.250ms ===================
seeblip
clrf avgIR
movlw 0xF9
movwf nchks
chk call chkIR ;//
decfsz nchks,F
goto chk
movf avgIR,W ;
sublw 0X78
btfss STATUS,C
goto detectd
bcf PORTB,0 ;RB0 红外输出 OFF
goto chkdone
detectd bsf PORTB,0
nop
chkdone
call delay8u
nop
nop
nop
nop
return
;========================
chkIR
clrf nsamp
btfss PORTA,0
incf nsamp,F
btfss PORTA,0 ; RA0 红外输入
incf nsamp,F
btfss PORTA,0 ; RA0 红外输入计数值存到nsamp
incf nsamp,F
btfss PORTA,0
incf nsamp,F
btfss PORTA,0
incf nsamp,F
btfss PORTA,0 ;共六次 nsamp》5，avgIR增一
incf nsamp,F
nop
movf nsamp,W
sublw 0X04
btfss STATUS,C
incf avgIR,F
return
;============================
end

复制代码

文件到原文下载，原文出自：https://bbs.usoftchina.com/thread-208673-1-1.html

红外线发射与接收源程序相关推荐

红外线发射与接收电路图
由455KHZ的晶振CRY,反相器74HC04及电阻.电容构成的振荡器产生455KHZ的方波信号.经脉冲分频器74LS92,六分频成为75.83KHZ的脉冲信号.再经过D触发器构成的2分频/整形电 ...
stc89c52开发板遥控器解码红外线发射内置 eeprom 存储串口显示编码
单片机,大概三年前,就买了一本 <爱上单片机> 最后就学会,用面包板了,编程书上基本没讲. 看原理图,看时序图,看数据手册, 都没讲. 而且书上自带的代码写的很烂. 1,缩近控制不好 2, ...
microduino实现红外线发送与接收
一.目标:使用microduino套件实现红外线的发送与接收二.材料:(1)模块:Microduino Core/Core+ (核心板),Microduino-USBTTL(下载程序) (2)传感器 ...
Arduino-IRremote-红外遥控器,发射与接收
红外线接收示例本文使用的红外接收器为:HX1738,连接方法如下 /** IRrecvDemo* =====================功能说明=====================* 演示 ...
ESP32实现红外遥控红外发射与接收实现原理
文章目录一,原理 1.1 概括 1.2,时钟 1.3,认识 item 1.4,发射/接收器 1.5 电路原理图 1.5.1,发射电路 1.5.2 ,接收电路二,红外发射 2.1 整体的思路 2.2 ...
IR_SC2红外线发射模拟器
using System; using System.Windows.Forms; namespace IR_SC2红外线发射模拟器 { public partial class Form1 ...
图解红外遥控的发射和接收原理
在智能机器论坛上看一篇关于红外遥控的原理文章,感觉不错,特转一下以备查阅为了更直观地让大家理解红外遥控的原理,这篇文章用图片来帮你理解红外遥控的发射管原理和接收原理. 红外遥控的概述: 红外线的光谱 ...
红外线遥控c语言程序,红外线遥控解码接收程序-c语言讲解学习.pdf
红外线遥控解码接收程序 -C 语言 .txt 铁饭碗的真实含义不是在一个地方吃一辈子饭, 而是一辈子到哪儿都有饭吃.就算是一坨屎,也有遇见屎壳郎的那天.所以你大可不必为今天的自己有太多担忧.红外线 ...
红外接收器c语言软件,红外线遥控解码接收程序_C语言.doc
红外线遥控解码接收程序_C语言.doc (9页) 本资源提供全文预览,点击全文预览即可全文预览,如果喜欢文档就下载吧,查找使用更方便哦! 14.9 积分红外线遥控解码接收程序-C语言.txt铁饭碗 ...

红外线发射与接收源程序

红外线发射与接收源程序相关推荐

最新文章

热门文章