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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › STM32/8 › MAX30102+stm32测心率血氧源码
返回列表 发新帖
查看: 19987|回复: 20
打印 上一主题 下一主题
收起左侧

MAX30102+stm32测心率血氧源码

  [复制链接]
跳转到指定楼层
楼主
ID:309165 发表于 2018-4-16 12:55 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
MAX30102+stm32测心率血氧

只留下MAX30102、main、I2C、算法、四个文件就行，在I2C中改一下IO


单片机源程序如下:
  1. /** \file max30102.cpp ******************************************************
  2. *
  3. * Project: MAXREFDES117#
  4. * Filename: max30102.cpp
  5. * Description: This module is an embedded controller driver for the MAX30102
  6. *
  7. * Revision History:
  8. *\n 1-18-2016 Rev 01.00 GL Initial release.
  9. *\n
  10. */

  12. #include "max30102.h"
  13. #include "myiic.h"

  15. #define max30102_WR_address 0xAE
  16. bool maxim_max30102_write_reg(uint8_t uch_addr, uint8_t uch_data)
  17. /**
  18. * \brief        Write a value to a MAX30102 register
  19. * \par          Details
  20. *               This function writes a value to a MAX30102 register
  21. *
  22. * \param[in]    uch_addr    - register address
  23. * \param[in]    uch_data    - register data
  24. *
  25. * \retval       true on success
  26. */
  27. {
  28.     /* 第1步：发起I2C总线启动信号 */
  29.     i2c_Start();

  31.     /* 第2步：发起控制字节，高7bit是地址，bit0是读写控制位，0表示写，1表示读 */
  32.     i2c_SendByte(max30102_WR_address | I2C_WR);        /* 此处是写指令 */

  34.     /* 第3步：发送ACK */
  35.     if (i2c_WaitAck() != 0)
  36.     {
  37.         goto cmd_fail;        /* EEPROM器件无应答 */
  38.     }

  40.     /* 第4步：发送字节地址 */
  41.     i2c_SendByte(uch_addr);
  42.     if (i2c_WaitAck() != 0)
  43.     {
  44.         goto cmd_fail;        /* EEPROM器件无应答 */
  45.     }

  47.     /* 第5步：开始写入数据 */
  48.     i2c_SendByte(uch_data);

  50.     /* 第6步：发送ACK */
  51.     if (i2c_WaitAck() != 0)
  52.     {
  53.         goto cmd_fail;        /* EEPROM器件无应答 */
  54.     }

  56.     /* 发送I2C总线停止信号 */
  57.     i2c_Stop();
  58.     return true;        /* 执行成功 */

  60. cmd_fail: /* 命令执行失败后，切记发送停止信号，避免影响I2C总线上其他设备 */
  61.     /* 发送I2C总线停止信号 */
  62.     i2c_Stop();
  63.     return false;
  64. }

  66. bool maxim_max30102_read_reg(uint8_t uch_addr, uint8_t *puch_data)
  67. /**
  68. * \brief        Read a MAX30102 register
  69. * \par          Details
  70. *               This function reads a MAX30102 register
  71. *
  72. * \param[in]    uch_addr    - register address
  73. * \param[out]   puch_data    - pointer that stores the register data
  74. *
  75. * \retval       true on success
  76. */
  77. {
  78.     /* 第1步：发起I2C总线启动信号 */
  79.     i2c_Start();

  81.     /* 第2步：发起控制字节，高7bit是地址，bit0是读写控制位，0表示写，1表示读 */
  82.     i2c_SendByte(max30102_WR_address | I2C_WR);        /* 此处是写指令 */

  84.     /* 第3步：发送ACK */
  85.     if (i2c_WaitAck() != 0)
  86.     {
  87.         goto cmd_fail;        /* EEPROM器件无应答 */
  88.     }

  90.     /* 第4步：发送字节地址， */
  91.     i2c_SendByte((uint8_t)uch_addr);
  92.     if (i2c_WaitAck() != 0)
  93.     {
  94.         goto cmd_fail;        /* EEPROM器件无应答 */
  95.     }


  98.     /* 第6步：重新启动I2C总线。下面开始读取数据 */
  99.     i2c_Start();

  101.     /* 第7步：发起控制字节，高7bit是地址，bit0是读写控制位，0表示写，1表示读 */
  102.     i2c_SendByte(max30102_WR_address | I2C_RD);        /* 此处是读指令 */

  104.     /* 第8步：发送ACK */
  105.     if (i2c_WaitAck() != 0)
  106.     {
  107.         goto cmd_fail;        /* EEPROM器件无应答 */
  108.     }

  110.     /* 第9步：读取数据 */
  111.     {
  112.         *puch_data = i2c_ReadByte();        /* 读1个字节 */

  114.         i2c_NAck();        /* 最后1个字节读完后，CPU产生NACK信号(驱动SDA = 1) */
  115.     }
  116.     /* 发送I2C总线停止信号 */
  117.     i2c_Stop();
  118.     return true;        /* 执行成功 返回data值 */

  120. cmd_fail: /* 命令执行失败后，切记发送停止信号，避免影响I2C总线上其他设备 */
  121.     /* 发送I2C总线停止信号 */
  122.     i2c_Stop();
  123.     return false;
  124. }

  126. bool maxim_max30102_init(void)
  127. /**
  128. * \brief        Initialize the MAX30102
  129. * \par          Details
  130. *               This function initializes the MAX30102
  131. *
  132. * \param        None
  133. *
  134. * \retval       true on success
  135. */
  136. {
  137.     if(!maxim_max30102_write_reg(REG_INTR_ENABLE_1, 0xc0)) // INTR setting
  138.         return false;
  139.     if(!maxim_max30102_write_reg(REG_INTR_ENABLE_2, 0x00))
  140.         return false;
  141.     if(!maxim_max30102_write_reg(REG_FIFO_WR_PTR, 0x00)) //FIFO_WR_PTR[4:0]
  142.         return false;
  143.     if(!maxim_max30102_write_reg(REG_OVF_COUNTER, 0x00)) //OVF_COUNTER[4:0]
  144.         return false;
  145.     if(!maxim_max30102_write_reg(REG_FIFO_RD_PTR, 0x00)) //FIFO_RD_PTR[4:0]
  146.         return false;
  147.     if(!maxim_max30102_write_reg(REG_FIFO_CONFIG, 0x6f)) //sample avg = 8, fifo rollover=false, fifo almost full = 17
  148.         return false;
  149.     if(!maxim_max30102_write_reg(REG_MODE_CONFIG, 0x03))  //0x02 for Red only, 0x03 for SpO2 mode 0x07 multimode LED
  150.         return false;
  151.     if(!maxim_max30102_write_reg(REG_SPO2_CONFIG, 0x2F)) // SPO2_ADC range = 4096nA, SPO2 sample rate (400 Hz), LED pulseWidth (411uS)
  152.         return false;

  154.     if(!maxim_max30102_write_reg(REG_LED1_PA, 0x17))  //Choose value for ~ 4.5mA for LED1
  155.         return false;
  156.     if(!maxim_max30102_write_reg(REG_LED2_PA, 0x17))  // Choose value for ~ 4.5mA for LED2
  157.         return false;
  158.     if(!maxim_max30102_write_reg(REG_PILOT_PA, 0x7f))  // Choose value for ~ 25mA for Pilot LED
  159.         return false;
  160.     return true;
  161. }

  163. bool maxim_max30102_read_fifo(uint32_t *pun_red_led, uint32_t *pun_ir_led)

  165. /**
  166. * \brief        Read a set of samples from the MAX30102 FIFO register
  167. * \par          Details
  168. *               This function reads a set of samples from the MAX30102 FIFO register
  169. *
  170. * \param[out]   *pun_red_led   - pointer that stores the red LED reading data
  171. * \param[out]   *pun_ir_led    - pointer that stores the IR LED reading data
  172. *
  173. * \retval       true on success
  174. */
  175. {
  176.     uint32_t un_temp;
  177.     uint8_t uch_temp;
  178.     *pun_ir_led = 0;
  179.     *pun_red_led = 0;
  180.     maxim_max30102_read_reg(REG_INTR_STATUS_1, &uch_temp);
  181.     maxim_max30102_read_reg(REG_INTR_STATUS_2, &uch_temp);



  185.     /* 第1步：发起I2C总线启动信号 */
  186.     i2c_Start();

  188.     /* 第2步：发起控制字节，高7bit是地址，bit0是读写控制位，0表示写，1表示读 */
  189.     i2c_SendByte(max30102_WR_address | I2C_WR);        /* 此处是写指令 */

  191.     /* 第3步：发送ACK */
  192.     if (i2c_WaitAck() != 0)
  193.     {
  194.         printf("read fifo failed");
  195.         goto cmd_fail;        /* EEPROM器件无应答 */
  196.     }

  198.     /* 第4步：发送字节地址， */
  199.     i2c_SendByte((uint8_t)REG_FIFO_DATA);
  200.     if (i2c_WaitAck() != 0)
  201.     {
  202.         goto cmd_fail;        /* EEPROM器件无应答 */
  203.     }


  206.     /* 第6步：重新启动I2C总线。下面开始读取数据 */
  207.     i2c_Start();

  209.     /* 第7步：发起控制字节，高7bit是地址，bit0是读写控制位，0表示写，1表示读 */
  210.     i2c_SendByte(max30102_WR_address | I2C_RD);        /* 此处是读指令 */

  212.     /* 第8步：发送ACK */
  213.     if (i2c_WaitAck() != 0)
  214.     {
  215.         goto cmd_fail;        /* EEPROM器件无应答 */
  216.     }

  218.     un_temp = i2c_ReadByte();
  219.     i2c_Ack();
  220.     un_temp <<= 16;
  221.     *pun_red_led += un_temp;
  222.     un_temp = i2c_ReadByte();
  223.     i2c_Ack();
  224.     un_temp <<= 8;
  225.     *pun_red_led += un_temp;
  226.     un_temp = i2c_ReadByte();
  227.     i2c_Ack();
  228.     *pun_red_led += un_temp;

  230.     un_temp = i2c_ReadByte();
  231.     i2c_Ack();
  232.     un_temp <<= 16;
  233.     *pun_ir_led += un_temp;
  234.     un_temp = i2c_ReadByte();
  235.     i2c_Ack();
  236.     un_temp <<= 8;
  237.     *pun_ir_led += un_temp;
  238.     un_temp = i2c_ReadByte();
  239.     i2c_Ack();
  240.     *pun_ir_led += un_temp;
  241. ……………………

  243. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
stm32 max30102上传整数型数据.zip (366.15 KB, 下载次数: 820)


评分

参与人数 2黑币 +51 收起 理由
if巴黎不缺氧 + 1 共享资料的黑币奖励！
admin + 50 共享资料的黑币奖励！

查看全部评分

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

使用道具 举报

沙发
ID:313983 发表于 2018-5-10 21:23 | 只看该作者
全是导航车？，用导航车的文件改的吗？
回复

使用道具 举报

板凳
ID:404915 发表于 2018-10-11 21:02 | 只看该作者
感谢楼主分享
回复

使用道具 举报

地板
ID:400629 发表于 2018-10-11 22:10 来自手机 | 只看该作者
好东西！
回复

使用道具 举报

5#
ID:460004 发表于 2019-1-2 13:52 | 只看该作者
课程设计需要
回复

使用道具 举报

6#
ID:302106 发表于 2019-2-18 10:23 | 只看该作者
感谢分享~~~
回复

使用道具 举报

7#
ID:289148 发表于 2019-3-1 17:31 | 只看该作者
我想问一下，在algorithm.c中an_x[k]引发#68整数转换引发符号更改的的警告是否会对程序有影响
回复

使用道具 举报

8#
ID:116773 发表于 2019-3-1 21:27 | 只看该作者
正需要这方面的资料，但我的芯片型号不一样，不知道有参考作用么。
回复

使用道具 举报

9#
ID:482998 发表于 2019-3-1 22:25 | 只看该作者
谢谢，学习一下
回复

使用道具 举报

10#
ID:357051 发表于 2019-3-15 10:04 | 只看该作者
哈哈，导航车改编，学习学习
回复

使用道具 举报

11#
ID:479101 发表于 2019-4-18 09:53 | 只看该作者
为什么Spo2全是-999，好奇怪
回复

使用道具 举报

12#
ID:229016 发表于 2019-5-16 12:27 | 只看该作者
Abc_zh 发表于 2019-4-18 09:53
为什么Spo2全是-999，好奇怪

请问你解决这个问题了ma?
回复

使用道具 举报

13#
ID:229016 发表于 2019-5-16 14:21 | 只看该作者
Abc_zh 发表于 2019-4-18 09:53
为什么Spo2全是-999，好奇怪

解决了吗？
回复

使用道具 举报

14#
ID:564698 发表于 2019-6-17 15:52 | 只看该作者
学习一下
回复

使用道具 举报

15#
ID:472280 发表于 2019-8-15 16:27 | 只看该作者
根本用不了，这个算法不知道怎么回事，一直弄不对
回复

使用道具 举报

16#
ID:472280 发表于 2019-8-15 16:34 | 只看该作者
有稳定的值但是算法后出来是不行的red=107909, ir=94091
回复

使用道具 举报

17#
ID:397287 发表于 2019-11-11 14:49 | 只看该作者
有元器件清单和原理图吗
回复

使用道具 举报

18#
ID:589541 发表于 2020-3-21 20:40 | 只看该作者
下载一次扣一次吗？谢谢楼主共享
回复

使用道具 举报

19#
ID:185372 发表于 2020-4-15 16:25 | 只看该作者
这个支持，我这里只有c
回复

使用道具 举报

20#
ID:185372 发表于 2020-4-15 16:26 | 只看该作者
坚决支持，我这里只有c++,晕乎着呢。
回复

使用道具 举报

21#
ID:725664 发表于 2020-5-29 16:10 | 只看该作者
很好，谢谢
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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