51单片机+ST188光电传感器心率脉搏检测程序+电路图

原文地址::http://www.51hei.com/bbs/dpj-156743-1.html

1、ST188----https://wenku.baidu.com/view/e31e9c956bec0975f465e258.html

使用时把右手食指指肚放在st188反射式红外传感器上，放置合适时会看到指示灯随心跳同时闪动，如果没有闪烁请适当调节手指压力，调节完后在测试过程中手指压力不要变，保持稳定，当指示灯有规律闪烁时表示信号正确。当单片机检测到大约第五次信号时开始显示这五次信号算出的平均心率。当超过大约1.5秒没有检测到信号，清除心率。
如果手指抖动或者不稳定会看到指示灯乱闪，这样测得的数据不准，在测试过程中保持稳定！

1：初始化液晶和定时器
2：检测外部中断，并记录中断时间间隔
3：当有超过5个符合要求的时间记录，算出5个时间的平均值和对应的60s的心率并显示
4：当超过1.5s没有检测到中断发生停止显示
2-3-4循环

电路原理图如下：

单片机源程序如下:

#include<reg52.h>
#define uint unsigned int
#define uchar unsigned char
sbit rs=P1^0; //数据与命令选择控制引脚
sbit rw=P1^1; //读与写选择控制引脚
sbit en=P1^2; //使能择控制引脚
sbit bf=P0^7; //忙标志位
sbit P32=P3^2;
unsigned char i=0,timecount=0,displayOK=0,rate=0,aa=0;
unsigned int time[6]={0};
/************ 延时函数 *****************/
void delay(uint z)
{
while(z--);
}
/************ 忙检测函数 *****************/
void jiance()
{
P0=0xff;
rs=0;rw=1;en=1;
while(bf); //如果BF==1表示液晶在忙
en=0;
}
/************ 写命令函数 *****************/
void write_com(uchar com)
{
jiance();
P0=com;
rs=0;rw=0;en=1;
delay(2);
en=0;
}
/************ 写数据函数 *****************/
void write_dat(uchar dat)
{
jiance();
P0=dat;
rs=1;rw=0;en=1;
delay(2);
en=0;
}
/************ 1602液晶初始化函数 *****************/
void init_lcd()
{
write_com(0x38); // 设置16*2显示，5*7点阵，8位数据接口
write_com(0x0c); // 开显示，不显示光标
write_com(0x06); // 地址加1，当写入数据的时候光标右移
write_com(0x01); //清屏
}
/******************************************************************/
/* 在指定位置写字符 */
/******************************************************************/
void LCD_write_char(unsigned char x,unsigned char y,unsigned char Data)
{
if (y == 0)
write_com(0x80 + x);
else
write_com(0xC0 + x);
write_dat(Data);
}
void DelayMs(unsigned int z)
{
unsigned int x;
for(;z>0;z--)
for(x=110;x>0;x--);
}
void main()
{
P32=1;
init_lcd();//lcd初始化
TCON=0x01;//设置外部中断0
EX0=1;
TMOD=0x01;//定时器0初始化
TH0=(65536-50000)/256;//实测每50ms中断的定时值
TL0=(65536-50000)%256;
ET0=1;//开定时器中断
//显示基本文字
LCD_write_char(3,0,'H');
LCD_write_char(4,0,'e');
LCD_write_char(5,0,'a');
LCD_write_char(6,0,'r');
LCD_write_char(7,0,'t');
LCD_write_char(8,0,' ');
LCD_write_char(9,0,'R');
LCD_write_char(10,0,'a');
LCD_write_char(11,0,'t');
LCD_write_char(12,0,'e');
LCD_write_char(8,1,'/');
LCD_write_char(9,1,'m');
LCD_write_char(10,1,'i');
LCD_write_char(11,1,'n');
TR0=0;//定时器停止
EA=1;//开总中断
while(1)
{
if(displayOK==1)
{
rate=60000/(time[1]/5+time[2]/5+time[3]/5+time[4]/5+time[5]/5);
LCD_write_char(5,1,rate/100+48);
LCD_write_char(6,1,(rate%100)/10+48);
LCD_write_char(7,1,rate%10+48);
}
DelayMs(300);
}
}
void ex0() interrupt 0
{
EX0=0;//暂时关外部中断
if(timecount<8) //当连续两次检测时间间隔小于8*50ms=400ms不处理
{
TR0=1;//开定时器
}
else
{
time[i]=timecount*50+TH0*0.256+TL0/1000;//算出间隔时间
TL0=(65536-50000)%256;//重新设置定时器
TH0=(65536-50000)/256;
timecount=0;//50ms计数清零
i++;
if(i==6)//记录到超过等于6次时间
{
i=1;//计数从1开始
displayOK=1; //测得5次开始显示
}
}
EX0=1;
}
void et0() interrupt 1
{
TL0=(65536-50000)%256;
TH0=(65536-50000)/256;
timecount++;//每50ms一次计数
if(timecount>25) //当超过25*50ms=1.25s没有检测到信号停止显示
{
i=0;//数据个数清零
timecount=0;//50ms计数清零
displayOK=0;//显示关
TR0=0;//定时器关
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
}
}

复制代码

所有资料51hei提供下载:
心率脉搏计源程序.rar (34.39 KB, 下载次数: 202)

51单片机+ST188光电传感器心率脉搏检测程序+电路图相关推荐

基于单片机的测量心率脉搏健康系统设计与
基于单片机的测量心率脉搏健康系统设计与摘要日常生活中许许多多的恶习例如熬夜.用餐不规律等,会给我们的身体带来很大的损伤,现在越来越多人们的身体指标只能达到亚健康,身体健康问题不容小觑.因此测量心率 ...
51单片机与LCD1602接口电路与程序
51单片机与LCD1602接口电路与程序一.工作方式:间接工作方式. 二.实现功能:显示"Hope the epidemic will pass soon". 三.仿真电路图: ...
基于51单片机数字电压表的设计仿真、程序、原理图(转发)
摘要数字电压表简称DVM,数字电压表基本原理是将输入的模拟电压信号转化为数字信号,再进行输出显示.而A/D转换器的作用是将连续变化的模拟信号量转化为离散的数字信号,器基本结构是由采样保持,量化,编 ...
51单片机8通道自动温度检测系统仿真+ Proteus仿真
51单片机8通道自动温度检测系统仿真+ Proteus仿真 Proteus仿真程序代码(汇编代码,格式为.asm) 导入方式: CLR P3.7 MAIN:MOV 38H,#00HMOV 39H,# ...
基于51单片机CO一氧化碳可燃气体浓度检测超限报警Proteus仿真
资料编号:160 下面是相关功能视频演示: 160-基于51单片机CO一氧化碳可燃气体浓度检测超限报警Proteus仿真(源码+仿真+全套资料) 功能介绍: 采用51单片机作为CPU,ADC083 ...
基于51单片机的公交车安全智能检测系统、基于51单片机的金属探测仪控制设计、基于单片机的智能电子密码锁系统设计、基于51单片机酒精浓度检测仪设计【资料转发分享】
630基于51单片机的公交车安全智能检测系统-设计资料本资料是基于单片机的公交车安全监测系统具有如下功能: 1.监测环境的温度,超标报警.可以设置上下限 2.监测是否有火灾以及有毒气体,超标报警, ...
基于51单片机的人体红外震动检测家庭防盗报警器
资料编号:129 下面是相关功能视频演示: 129-基于51单片机的人体红外震动检测家庭防盗报警器(源码+仿真+全套资料) 功能介绍: 采用51单片机作为主控,LCD1602显示当前的状态,采用按键 ...
c语言编程TLC2543AD采集,51单片机驱动12位AD转换TLC2543电路图+程序
51单片机驱动12位AD转换TLC2543电路图+程序 2015-06-18 16:51:15 来源:51hei void resultvolt() { volt=volt*5000.0/4334 ...
c语言T1中断程序编写步骤,用51单片机中断编写的4x4键盘程序
当前位置:单片机教程网 >> MCU设计实例 >> 浏览文章用51单片机中断编写的4x4键盘程序作者:未知来源:山涧一溪流点击数:- 更新时间:2014年06 ...

51单片机+ST188光电传感器心率脉搏检测程序+电路图

51单片机+ST188光电传感器心率脉搏检测程序+电路图相关推荐

最新文章

热门文章