设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › arm心率计源代码
返回列表 发新帖
查看: 1497|回复: 1
打印 上一主题 下一主题
收起左侧

arm心率计源代码

[复制链接]
跳转到指定楼层
楼主
ID:504670 发表于 2019-4-4 11:16 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
心率计可以将连接到板子上的心率传感器数据采集下来并使用算法计算心率值，并通过串口传输到指定的终端设备。可以直接接USB-TLL模块传输到PC端或者通过蓝牙模块传输到手机端。

单片机源程序如下:
  1.    //******************************说明********************************/



  5. #include "stdio.h"
  6. #include "common.h"
  7. #include "heartRateProcess.h"
  8. #define false 0
  9. #define true 1
  10. #define FOSC 11059200L                //系统时钟
  11. #define BAUD 115200                                //波特率
  12. #define T0MS (65536-FOSC/12/500)                //500HZ in 12T MODE
  13. #define         BUFFER_SIZE 10

  15. #define ADC_POWER 0x80                        //ADC POWER CONTROL BIT
  16. #define ADC_FLAG 0x10                        //ADC COMPLETE FLAG
  17. #define ADC_START 0x08;                        //ADC START CONTROL BIT
  18. #define ADC_SPEEDLL 0x00                //540 CLOCKS
  19. #define ADC_SPEEDL 0x20                        //360 CLOCKS
  20. #define ADC_SPEEDH 0x40                        //180 CLOCKS
  21. #define ADC_SPEEDHH 0x60                //90 CLOCKS
  22. #define ADC_MASK 0x01

  24. #define BLUE_SHIFT (1U << 5)
  25. #define BLUE_ON (GPIOD_PCOR = BLUE_SHIFT)
  26. #define BLUE_OFF (GPIOD_PSOR = BLUE_SHIFT)
  27. #define BLUE_TOGGLE (GPIOD_PTOR = BLUE_SHIFT)



  31. unsigned int BPM;                   // 用于保存脉冲速率
  32. unsigned int Signal;                // 持有传入的原始数据
  33. unsigned int IBI = 600;             // 保持心跳之间的空隙，必须种子！
  34. unsigned char Pulse = false;     // 当脉冲波高时真，低为假
  35. int rate[10];                    // 数组来保存最后十IBI值
  36. unsigned long sampleCounter = 0;          // used to determine pulse timing用于确定脉冲定时
  37. unsigned long lastBeatTime = 0;           // used to find IBI
  38. int Peak =255;                      // used to find peak in pulse wave, seeded用来寻找峰值脉冲波，播种
  39. int Trough = 10;                     // used to find trough in pulse wave, seededsed中找到谷底脉搏波，播种
  40. int thresh = 60;                // used to find instant moment of heart beat, seeded查找心跳的瞬间
  41. int amp = 100;                   // used to hold amplitude of pulse waveform, seeded用于保存脉冲波形的振幅，接种
  42. unsigned char firstBeat = true;        // used to seed rate array so we startup with reasonable BPM用于种子率阵列，所以我们启动与合理的BPM
  43. unsigned char secondBeat = false;      // used to seed rate array so we startup with reasonable BPM用于种子率阵列，所以我们启动与合理的BPM


  46. // Timer 0中断子程序，每2MS中断一次，读取AD值，计算心率值
  47. //采样率500Hz
  48. unsigned char heartRateCalc(unsigned char buf,uint16* ratte)
  49. {                       
  50.   int N;
  51.   unsigned char i,j;

  53. unsigned char QS = false;                 // becomes true when 51 finds a beat.
  54. char cmd[100];
  55. uint16 len;

  57.         // keep a running total of the last 10 IBI values保持过去10 个心跳间隙值运行总数
  58.   unsigned int runningTotal = 0;                  // clear the runningTotal variable 清除正在运行的总变量  
  59.         j=0;
  60.         
  61.   Signal = buf;              // read the Pulse Sensor 读取脉搏传感器
  62.   sampleCounter += 2;                         // keep track of the time in mS with this variable追踪这个变量在毫秒级
  63.   N = sampleCounter - lastBeatTime;       // monitor the time since the last beat to avoid noise因为最后一次心跳监测时间可避免噪音
  64.   

  66.     //  找到脉搏波的波谷
  67.   if(Signal < thresh && N > (IBI/5)*3)
  68.   {       // 避免重脉噪声最后IBI等待4/5
  69.     if (Signal < Trough)
  70.         {                        // T is the trough；T是波谷
  71.       Trough = Signal;                         // 跟踪最低点的脉冲波
  72.     }
  73.   }

  75.   //  找到脉搏波的波峰

  77.   if(Signal > thresh && Signal > Peak)
  78.   {          // thresh condition helps avoid noise阈值条件有助于避免噪音
  79.     Peak = Signal;                             // P is the peak； P是峰
  80.   }                                        // keep track of highest point in pulse wave跟踪最高点的脉冲波


  83.   //  NOW IT'S TIME TO LOOK FOR THE HEART BEAT 现在是时候去寻找心跳
  84.   // signal surges up in value every time there is a pulse每次有一个脉冲信号涌起的价值
  85.   if (N > 250)
  86.   {                                   // avoid high frequency noise 避免了高频噪音
  87.     if ( (Signal > thresh) && (Pulse == false) && (N > (IBI)*0.6) )
  88.         {        
  89.       Pulse = true;                               // set the Pulse flag when we think there is a pulse当我们认为有脉冲时设置脉冲标志
  90.     //  blinkPin=0;               // turn on pin 13 打开LED引脚
  91.       IBI = sampleCounter - lastBeatTime;         // measure time between beats in mS
  92.       lastBeatTime = sampleCounter;               // keep track of time for next pulse


  95.       if(secondBeat)
  96.           {                        // if this is the second beat, if secondBeat == TRUE
  97.         secondBeat = false;                  // clear secondBeat flag清零第二拍标志
  98.       //  for(i=0; i<=9; i++)
  99.                         //        {             // seed the running total to get a realisitic BPM at startup在启动时获得真实BPM运行总数
  100.       //    rate[9] = IBI;                     
  101.       //  }
  102.       }


  105.       if(firstBeat)
  106.           {                         // if it's the first time we found a beat, if firstBeat == TRUE
  107.         firstBeat = false;                   // clear firstBeat flag 清零第一拍标志
  108.         secondBeat = true;                   // set the second beat flag设置第二拍标志
  109.       //  EA=1;                               // enable interrupts again再次启用中断
  110.       Pulse = false;
  111.         return QS;                              // IBI value is unreliable so discard itIBI值是不可靠的，所以将其丢弃
  112.       }   

  114.                 BLUE_ON;
  115. //程序运行到这里表示已经找到第二个节拍
  116.                         //存放节拍的数组依次往前移位，留下最后一个来装新得到的节拍周期
  117.       for(i=0; i<=8; i++)
  118.           {                // shift data in the rate array移动数组中的数据
  119.         rate[i]= rate[i+1];                  // and drop the oldest IBI value 并删除最旧的IBI值
  120.         runningTotal += rate[i];              // add up the 9 oldest IBI values将9个最古老的IBI值加起来
  121.       }

  123. //存放最新的节拍周期
  124.       rate[9] = IBI;                          // add the latest IBI to the rate array添加最新IBI的速度阵列
  125.       runningTotal += rate[9];                // add the latest IBI to runningTotal加上最新的IBI运行数
  126.       runningTotal /= 10;                     // average the last 10 IBI values 平均最近10个IBI值
  127.       BPM = 60000/runningTotal;               // how many beats can fit into a minute? that's BPM!有多少心跳可以放入一分钟？这是BPM的！
  128.             if(BPM>200)BPM=200;                        //限制BPM最高显示值
  129.             if(BPM<30)BPM=30;                                //限制BPM最低显示值
  130.       QS = true;                              // set Quantified Self flag 设置量化自我标志
  131.         len=sprintf(cmd,"Peak=%d,thresh=%d,Trough=%d,amp=%d,IBI=%d,N=%d,BPM=%d\r\n",Peak,thresh,Trough,amp,IBI,N,BPM);
  132. //        IntfWrite(0,cmd,len);
  133.       // QS FLAG IS NOT CLEARED INSIDE THIS ISR；  QS标志不会被清除这里面中断服务程序
  134.     }                       
  135.   }

  137. //检测下降
  138.   if (Signal < thresh && Pulse == true) // when the values are going down, the beat is over当值正在下降，节拍结束
  139.   {  
  140.           BLUE_OFF;// turn off pin 13 LED
  141.     Pulse = false;                         // reset the Pulse flag so we can do it again复位脉冲标志，所以我们可以再做一次
  142.     amp = Peak - Trough;                           // get amplitude of the pulse wave得到的脉搏波的振幅
  143.     thresh = amp/2 + Trough;                    // set thresh at 50% of the amplitude设定阈值的幅度的50％
  144.     Peak = thresh;                            // reset these for next time为下一次复位
  145.     Trough = thresh;
  146.         len=sprintf(cmd,"fall edge:Peak=%d,thresh=%d,Trough=%d,amp=%d,IBI=%d,N=%d,BPM=%d\r\n",Peak,thresh,Trough,amp,IBI,N,BPM);
  147. //        IntfWrite(0,cmd,len);
  148.   }

  150. //重新初始化
  151.   if (N > 2500)  // if 2.5 seconds go by without a beat 如果2.5秒去，没有一个节拍
  152.   {                        
  153.     thresh = 50;                          // set thresh default设置默认的阈值
  154.     Peak = 155;                               // set P default默认设置P
  155.     Trough = 10;                               // set T default默认设置T
  156.     lastBeatTime = sampleCounter;          // bring the lastBeatTime up to date     最后一拍的时间   
  157.     firstBeat = true;                      // set these to avoid noise
  158.     secondBeat = false;                    // when we get the heartbeat back
  159.     Pulse = false;
  160.   }


  163.   //EA=1;                                   // enable interrupts when youre done!允许中断时，大功告成！
  164.   *ratte=BPM;
  165.   return QS;
  166. }// end isr
  167. void filter(uint8* buf,unsigned char len)
  168. {

  170. static uint8 x0=50,x1=50;
  171. uint8 i,temp;
  172. uint8 k=1,throd=10;
  173. uint8 Buff[BUFFER_SIZE+2];
  174.          uint8 buffback[BUFFER_SIZE];
  175.         memcpy(Buff+2,buf,len);
  176. //for(i=0;i<len;len++)
  177. //        Buff[i+2]=buf[i];
  178. Buff[0]=x0;
  179. Buff[1]=x1;

  181. for(i=0;i<len;len++)
  182.         if(abs(Buff[i+1]-Buff[i])>throd)
  183.                 buffback[i]=(Buff[i+2]+Buff[i])/2;
  184.         else
  185.                 buffback[i]=Buff[i+1];
  186. x0=Buff[BUFFER_SIZE];
  187. x1=Buff[BUFFER_SIZE+1];



  191. }
复制代码

所有资料51hei提供下载:
HeartRateTestPrj.7z (428.99 KB, 下载次数: 9)



分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:1 发表于 2019-4-5 03:50 | 只看该作者
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表