红外巡线是如何实现的

红外巡线是如何实现的,第1张

红外巡线传感器 有一个红外发射管和一个红外接收管,

当地面为黑色 吸收所有光, 所以接受管不会导通

当地面为白色,反射所有光,所以接收管导通

具体型号有TCRT500,红外巡线:利用红外测温仪对电力线故障点进行巡检。电力线出现接触不良故障时,故障点通常伴有温度升高现象。红外测温仪可以远距离测量线路上每一处的温度,发现故障点。其原理是,温度高的故障点会发出较高能级的红外辐射,这一红外辐射被测温仪光学系统聚焦后由红外探测芯片测出,在与环境温度进行比较后可以确定故障位置和严重程度。

火焰传感器:用于探测有无火焰存在的传感器。火焰传感器根据探测的距离远近而不同。对于森林防火这样大范围的的火焰探测,仍是利用特殊的红外光敏管,当区域出现明显高于环境温度的红外源点时,表明该点出现明火;对于非常近距离火焰的探测(比如用于自动燃烧设备),则是利用火焰区电阻值低、无火焰区电阻高的特点进行检测。

通过红外线反射原理,当人体的手或身体的某一部分在红外线区域内,红外线发射管发出的红外线反射到红外线接收管,通过集成线路内的微电脑处理后的信号发送给脉冲电磁阀,电磁阀接受信号后按指定的指令打开阀芯来控制头出水;

当人体的手或身体离开红外线感应范围,电磁阀没有接受信号,电磁阀阀芯则通过内部的d簧进行复位来控制的关水。

扩展资料

红外线

在光谱中波长自0.76至400微米的一段称为红外线,红外线是不可见光线。所有高于绝对零度(-273.15℃)的物质都可以产生红外线。现代物理学称之为热射线。医用红外线可分为两类:近红外线与远红外线。

近红外线或称短波红外线,波长0.76~1.5微米,穿入人体组织较深,约5~10毫米;远红外线或称长波红外线,波长1.5~400微米,多被表层皮肤吸收,穿透组织深度小于2毫米。

参考资料来源:百度百科-红外线感应器

/********************************************************************************

* 描述: *

* lcd1602显示 遥控键值读取器 *

* lcd1602显示 遥控器接p3.2 *

* 喇叭接p1.5 继电器接p1.4*

* 17(40h)键按下,继电器吸合。19(04h)键按下,继电器关闭。 *

* 连接方法:使用红外功能时 J1跳线短接 *

********************************************************************************/

#include <reg51.h>

#include <intrins.h>

#define uchar unsigned char

#define uint unsigned int

#define delayNOP(){_nop_()_nop_()_nop_()_nop_()}

void delay(uchar x) //x*0.14MS

void delay1(int ms)

void beep()

sbit IRIN = P3^2//红外接收器数据线

sbit BEEP = P1^5//蜂鸣器驱动线

sbit RELAY= P1^4//继电器驱动线

uchar IRCOM[9]

sbit LCD_RS = P2^6

sbit LCD_RW = P2^5

sbit LCD_EN = P2^7

uchar code cdis1[ ] = {" Red Control "}

uchar code cdis2[ ] = {"IR-CODE: ----H "}

/*******************************************************************/

/* */

/*检查LCD忙状态*/

/*lcd_busy为1时,忙,等待。lcd-busy为0时,闲,可写指令与数据。 */

/* */

/*******************************************************************/

bit lcd_busy()

{

bit result

LCD_RS = 0

LCD_RW = 1

LCD_EN = 1

delayNOP()

result = (bit)(P0&0x80)

LCD_EN = 0

return(result)

}

/*******************************************************************/

/* */

/*写指令数据到LCD */

/*RS=L,RW=L,E=高脉冲,D0-D7=指令码。 */

/* */

/*******************************************************************/

void lcd_wcmd(uchar cmd)

{

while(lcd_busy())

LCD_RS = 0

LCD_RW = 0

LCD_EN = 0

_nop_()

_nop_()

P0 = cmd

delayNOP()

LCD_EN = 1

delayNOP()

LCD_EN = 0

}

/*******************************************************************/

/* */

/*写显示数据到LCD */

/*RS=H,RW=L,E=高脉冲,D0-D7=数据。 */

/* */

/*******************************************************************/

void lcd_wdat(uchar dat)

{

while(lcd_busy())

LCD_RS = 1

LCD_RW = 0

LCD_EN = 0

P0 = dat

delayNOP()

LCD_EN = 1

delayNOP()

LCD_EN = 0

}

/*******************************************************************/

/* */

/* LCD初始化设定 */

/* */

/*******************************************************************/

void lcd_init()

{

delay1(15)

lcd_wcmd(0x38) //16*2显示,5*7点阵,8位数据

delay1(5)

lcd_wcmd(0x38)

delay1(5)

lcd_wcmd(0x38)

delay1(5)

lcd_wcmd(0x0c) //显示开,关光标

delay1(5)

lcd_wcmd(0x06) //移动光标

delay1(5)

lcd_wcmd(0x01) //清除LCD的显示内容

delay1(5)

}

/*******************************************************************/

/* */

/* 设定显示位置 */

/* */

/*******************************************************************/

void lcd_pos(uchar pos)

{

lcd_wcmd(pos | 0x80) //数据指针=80+地址变量

}

/*******************************************************************/

main()

{

uchar m

IE = 0x81//允许总中断中断,使能 INT0 外部中断

TCON = 0x01 //触发方式为脉冲负边沿触发

IRIN=1 //I/O口初始化

BEEP=1

RELAY=1

delay1(10)//延时

lcd_init() //初始化LCD

lcd_pos(0) //设置显示位置为第一行的第1个字符

m = 0

while(cdis1[m] != '\0')

{ //显示字符

lcd_wdat(cdis1[m])

m++

}

lcd_pos(0x40)//设置显示位置为第二行第1个字符

m = 0

while(cdis2[m] != '\0')

{

lcd_wdat(cdis2[m]) //显示字符

m++

}

while(1)

} //end main

/**********************************************************/

void IR_IN() interrupt 0 using 0

{

unsigned char j,k,N=0

EX0 = 0

delay(15)

if (IRIN==1)

{ EX0 =1

return

}

//确认IR信号出现

while (!IRIN)//等IR变为高电平,跳过9ms的前导低电平信号。

{delay(1)}

for (j=0j<4j++) //收集四组数据

{

for (k=0k<8k++)//每组数据有8位

{

while (IRIN)//等 IR 变为低电平,跳过4.5ms的前导高电平信号。

{delay(1)}

while (!IRIN) //等 IR 变为高电平

{delay(1)}

while (IRIN) //计算IR高电平时长

{

delay(1)

N++

if (N>=30)

{ EX0=1

return} //0.14ms计数过长自动离开。

}//高电平计数完毕

IRCOM[j]=IRCOM[j] >>1 //数据最高位补“0”

if (N>=8) {IRCOM[j] = IRCOM[j] | 0x80} //数据最高位补“1”

N=0

}//end for k

}//end for j

if (IRCOM[2]!=~IRCOM[3])

{ EX0=1

return}

IRCOM[5]=IRCOM[2]/16//取键码的低四位

IRCOM[6]=IRCOM[2]%16 //右移4次,高四位变为低四位

IRCOM[7]=IRCOM[1]/16//取键码的低四位

IRCOM[8]=IRCOM[1]/16 //右移4次,高四位变为低四位

/*if(IRCOM[5]>9)

{ IRCOM[5]=IRCOM[5]+0x37}

else

IRCOM[5]=IRCOM[5]+0x30

if(IRCOM[6]>9)

{ IRCOM[6]=IRCOM[6]+0x37}

else

IRCOM[6]=IRCOM[6]+0x30

if(IRCOM[7]>9)

{ IRCOM[7]=IRCOM[7]+0x37}

else

IRCOM[7]=IRCOM[7]+0x30

if(IRCOM[8]>9)

{ IRCOM[8]=IRCOM[8]+0x37}

else

IRCOM[8]=IRCOM[8]+0x30*/

lcd_pos(0x4b)

lcd_wdat(IRCOM[6]) //第一位数显示

lcd_pos(0x4c)

lcd_wdat(IRCOM[5]) //第二位数显示

lcd_pos(0x49)

lcd_wdat(IRCOM[8]) //第一位数显示

lcd_pos(0x4a)

lcd_wdat(IRCOM[7]) //第二位数显示

beep()

EX0 = 1

}

/**********************************************************/

void beep()

{

unsigned char i

for (i=0i<100i++)

{

delay(4)

BEEP=!BEEP//BEEP取反

}

BEEP=1 //关闭蜂鸣器

}

/**********************************************************/

void delay(unsigned char x)//x*0.14MS

{

unsigned char i

while(x--)

{

for (i = 0i<13i++) {}

}

}

/**********************************************************/

void delay1(int ms)

{

unsigned char y

while(ms--)

{

for(y = 0y<250y++)

{

_nop_()

_nop_()

_nop_()

_nop_()

}

}

}

这个应该是可以运行的


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/yw/12034044.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-20
下一篇 2023-05-20

发表评论

登录后才能评论

评论列表(0条)

保存