Christian Dupaty / Mbed 2 deprecated MAXREFDES117_STM32

Arduino version , update and tested on NUCLEO-L073RZ

Dependencies:   mbed

Oximeter and pulse sensor, based on the Beer-Lambert gas absorption law

MAXREFDES117 ( MAX30102 ) from MAXIM, based on MAXIM library for Arduino

adaptation C.Dupaty 07-2017

Tested on STM32 NUCLEO-F411RE and NUCLEO-L073RZ

https://os.mbed.com/media/uploads/cdupaty/max30102.jpg

main.cpp@5:029e1bc6ca6c, 2021-06-09 (annotated)

Committer:
cdupaty
Date:
Wed Jun 09 11:42:09 2021 +0000
Revision:
5:029e1bc6ca6c
Parent:
4:5273ab1085ab 
Arduino version update for STM32 NUCLEO-L073RZ

Who changed what in which revision?

UserRevisionLine numberNew contents of line
MaximGordon 0:346a7fa07998 1 /** \file main.cpp ******************************************************
MaximGordon 0:346a7fa07998 2 *
MaximGordon 0:346a7fa07998 3 * Project: MAXREFDES117#
MaximGordon 0:346a7fa07998 4 * Filename: main.cpp
MaximGordon 0:346a7fa07998 5 * Description: This module contains the Main application for the MAXREFDES117 example program.
MaximGordon 0:346a7fa07998 6 *
MaximGordon 0:346a7fa07998 7 *
MaximGordon 0:346a7fa07998 8 * --------------------------------------------------------------------
MaximGordon 0:346a7fa07998 9 *
MaximGordon 0:346a7fa07998 10 * This code follows the following naming conventions:
MaximGordon 0:346a7fa07998 11 *
MaximGordon 4:5273ab1085ab 12 * char ch_pmod_value
MaximGordon 4:5273ab1085ab 13 * char (array) s_pmod_s_string[16]
MaximGordon 4:5273ab1085ab 14 * float f_pmod_value
MaximGordon 4:5273ab1085ab 15 * int32_t n_pmod_value
MaximGordon 4:5273ab1085ab 16 * int32_t (array) an_pmod_value[16]
MaximGordon 4:5273ab1085ab 17 * int16_t w_pmod_value
MaximGordon 4:5273ab1085ab 18 * int16_t (array) aw_pmod_value[16]
MaximGordon 4:5273ab1085ab 19 * uint16_t uw_pmod_value
MaximGordon 4:5273ab1085ab 20 * uint16_t (array) auw_pmod_value[16]
MaximGordon 4:5273ab1085ab 21 * uint8_t uch_pmod_value
MaximGordon 4:5273ab1085ab 22 * uint8_t (array) auch_pmod_buffer[16]
MaximGordon 4:5273ab1085ab 23 * uint32_t un_pmod_value
MaximGordon 4:5273ab1085ab 24 * int32_t * pn_pmod_value
MaximGordon 0:346a7fa07998 25 *
MaximGordon 0:346a7fa07998 26 * ------------------------------------------------------------------------- */
MaximGordon 0:346a7fa07998 27 /*******************************************************************************
MaximGordon 4:5273ab1085ab 28 * Copyright (C) 2016 Maxim Integrated Products, Inc., All Rights Reserved.
MaximGordon 0:346a7fa07998 29 *
MaximGordon 0:346a7fa07998 30 * Permission is hereby granted, free of charge, to any person obtaining a
MaximGordon 0:346a7fa07998 31 * copy of this software and associated documentation files (the "Software"),
MaximGordon 0:346a7fa07998 32 * to deal in the Software without restriction, including without limitation
MaximGordon 0:346a7fa07998 33 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
MaximGordon 0:346a7fa07998 34 * and/or sell copies of the Software, and to permit persons to whom the
MaximGordon 0:346a7fa07998 35 * Software is furnished to do so, subject to the following conditions:
MaximGordon 0:346a7fa07998 36 *
MaximGordon 0:346a7fa07998 37 * The above copyright notice and this permission notice shall be included
MaximGordon 0:346a7fa07998 38 * in all copies or substantial portions of the Software.
MaximGordon 0:346a7fa07998 39 *
MaximGordon 0:346a7fa07998 40 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
MaximGordon 0:346a7fa07998 41 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
MaximGordon 0:346a7fa07998 42 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
MaximGordon 0:346a7fa07998 43 * IN NO EVENT SHALL MAXIM INTEGRATED BE LIABLE FOR ANY CLAIM, DAMAGES
MaximGordon 0:346a7fa07998 44 * OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
MaximGordon 0:346a7fa07998 45 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
MaximGordon 0:346a7fa07998 46 * OTHER DEALINGS IN THE SOFTWARE.
MaximGordon 0:346a7fa07998 47 *
MaximGordon 0:346a7fa07998 48 * Except as contained in this notice, the name of Maxim Integrated
MaximGordon 0:346a7fa07998 49 * Products, Inc. shall not be used except as stated in the Maxim Integrated
MaximGordon 0:346a7fa07998 50 * Products, Inc. Branding Policy.
MaximGordon 0:346a7fa07998 51 *
MaximGordon 0:346a7fa07998 52 * The mere transfer of this software does not imply any licenses
MaximGordon 0:346a7fa07998 53 * of trade secrets, proprietary technology, copyrights, patents,
MaximGordon 0:346a7fa07998 54 * trademarks, maskwork rights, or any other form of intellectual
MaximGordon 0:346a7fa07998 55 * property whatsoever. Maxim Integrated Products, Inc. retains all
MaximGordon 0:346a7fa07998 56 * ownership rights.
MaximGordon 0:346a7fa07998 57 *******************************************************************************
MaximGordon 0:346a7fa07998 58 */
MaximGordon 0:346a7fa07998 59 /*!\mainpage Main Page
MaximGordon 0:346a7fa07998 60 *
MaximGordon 0:346a7fa07998 61 * \section intro_sec Introduction
MaximGordon 0:346a7fa07998 62 *
MaximGordon 0:346a7fa07998 63 * This is the code documentation for the MAXREFDES117# subsystem reference design.
MaximGordon 4:5273ab1085ab 64 *
MaximGordon 4:5273ab1085ab 65 * The Files page contains the File List page and the Globals page.
MaximGordon 4:5273ab1085ab 66 *
MaximGordon 4:5273ab1085ab 67 * The Globals page contains the Functions, Variables, and Macros sub-pages.
MaximGordon 0:346a7fa07998 68 *
MaximGordon 0:346a7fa07998 69 * \image html MAXREFDES117_Block_Diagram.png "MAXREFDES117# System Block Diagram"
MaximGordon 4:5273ab1085ab 70 *
MaximGordon 0:346a7fa07998 71 * \image html MAXREFDES117_firmware_Flowchart.png "MAXREFDES117# Firmware Flowchart"
MaximGordon 0:346a7fa07998 72 *
MaximGordon 0:346a7fa07998 73 */
cdupaty 5:029e1bc6ca6c 74
cdupaty 5:029e1bc6ca6c 75 // STM32 NUCLEAO-F411RE adaptation C.Dupaty 07-2017
cdupaty 5:029e1bc6ca6c 76
MaximGordon 0:346a7fa07998 77 #include "mbed.h"
MaximGordon 0:346a7fa07998 78 #include "algorithm.h"
MaximGordon 0:346a7fa07998 79 #include "MAX30102.h"
MaximGordon 0:346a7fa07998 80
MaximGordon 0:346a7fa07998 81 #define MAX_BRIGHTNESS 255
MaximGordon 0:346a7fa07998 82
MaximGordon 3:7c0fb55eb3ff 83 uint32_t aun_ir_buffer[500]; //IR LED sensor data
MaximGordon 0:346a7fa07998 84 int32_t n_ir_buffer_length; //data length
MaximGordon 3:7c0fb55eb3ff 85 uint32_t aun_red_buffer[500]; //Red LED sensor data
MaximGordon 0:346a7fa07998 86 int32_t n_sp02; //SPO2 value
MaximGordon 0:346a7fa07998 87 int8_t ch_spo2_valid; //indicator to show if the SP02 calculation is valid
MaximGordon 0:346a7fa07998 88 int32_t n_heart_rate; //heart rate value
MaximGordon 0:346a7fa07998 89 int8_t ch_hr_valid; //indicator to show if the heart rate calculation is valid
MaximGordon 0:346a7fa07998 90 uint8_t uch_dummy;
MaximGordon 0:346a7fa07998 91
MaximGordon 0:346a7fa07998 92 Serial pc(USBTX, USBRX); //initializes the serial port
cdupaty 5:029e1bc6ca6c 93
cdupaty 5:029e1bc6ca6c 94 // STM32 version
cdupaty 5:029e1bc6ca6c 95
cdupaty 5:029e1bc6ca6c 96 PwmOut led(LED1); //initializes the pwm output that connects to the on board LED
cdupaty 5:029e1bc6ca6c 97 DigitalIn INT(PA_0); //pin PA_0 connects to the interrupt output pin of the MAX30102
cdupaty 5:029e1bc6ca6c 98 // interrupt not use here, polling !
cdupaty 5:029e1bc6ca6c 99 void touche(void)
cdupaty 5:029e1bc6ca6c 100 {
cdupaty 5:029e1bc6ca6c 101 //wait until the user presses a key
cdupaty 5:029e1bc6ca6c 102 while(pc.readable()==0)
cdupaty 5:029e1bc6ca6c 103 {
cdupaty 5:029e1bc6ca6c 104 pc.printf("Press any key to continue\n\r");
cdupaty 5:029e1bc6ca6c 105 wait(1);
cdupaty 5:029e1bc6ca6c 106 }
cdupaty 5:029e1bc6ca6c 107 uch_dummy=getchar();
cdupaty 5:029e1bc6ca6c 108 }
MaximGordon 0:346a7fa07998 109
MaximGordon 0:346a7fa07998 110 // the setup routine runs once when you press reset:
MaximGordon 0:346a7fa07998 111 int main() {
MaximGordon 0:346a7fa07998 112 uint32_t un_min, un_max, un_prev_data; //variables to calculate the on-board LED brightness that reflects the heartbeats
MaximGordon 0:346a7fa07998 113 int i;
MaximGordon 0:346a7fa07998 114 int32_t n_brightness;
MaximGordon 0:346a7fa07998 115 float f_temp;
cdupaty 5:029e1bc6ca6c 116 float pulse;
MaximGordon 0:346a7fa07998 117
MaximGordon 0:346a7fa07998 118 maxim_max30102_reset(); //resets the MAX30102
MaximGordon 0:346a7fa07998 119 // initialize serial communication at 115200 bits per second:
MaximGordon 0:346a7fa07998 120 pc.baud(115200);
MaximGordon 0:346a7fa07998 121 pc.format(8,SerialBase::None,1);
cdupaty 5:029e1bc6ca6c 122 pc.printf("\x1B[2J"); //clear terminal program screen
cdupaty 5:029e1bc6ca6c 123 pc.printf("-------- TEST MAXREFDES117# -----------\n\r");
cdupaty 5:029e1bc6ca6c 124 pc.printf("----- Version STM32-NUCLEO -----------\n\r");
cdupaty 5:029e1bc6ca6c 125 pc.printf("---------------------------------------\n\r");
MaximGordon 0:346a7fa07998 126 wait(1);
cdupaty 5:029e1bc6ca6c 127 touche();
MaximGordon 0:346a7fa07998 128 //read and clear status register
MaximGordon 0:346a7fa07998 129 maxim_max30102_read_reg(0,&uch_dummy);
MaximGordon 0:346a7fa07998 130 maxim_max30102_init(); //initializes the MAX30102
MaximGordon 0:346a7fa07998 131 n_brightness=0;
MaximGordon 0:346a7fa07998 132 un_min=0x3FFFF;
MaximGordon 0:346a7fa07998 133 un_max=0;
MaximGordon 0:346a7fa07998 134
MaximGordon 0:346a7fa07998 135 n_ir_buffer_length=500; //buffer length of 100 stores 5 seconds of samples running at 100sps
MaximGordon 0:346a7fa07998 136
MaximGordon 0:346a7fa07998 137 //read the first 500 samples, and determine the signal range
MaximGordon 0:346a7fa07998 138 for(i=0;i<n_ir_buffer_length;i++)
MaximGordon 0:346a7fa07998 139 {
MaximGordon 0:346a7fa07998 140 while(INT.read()==1); //wait until the interrupt pin asserts
MaximGordon 0:346a7fa07998 141
MaximGordon 3:7c0fb55eb3ff 142 maxim_max30102_read_fifo((aun_red_buffer+i), (aun_ir_buffer+i)); //read from MAX30102 FIFO
MaximGordon 0:346a7fa07998 143
MaximGordon 3:7c0fb55eb3ff 144 if(un_min>aun_red_buffer[i])
MaximGordon 3:7c0fb55eb3ff 145 un_min=aun_red_buffer[i]; //update signal min
MaximGordon 3:7c0fb55eb3ff 146 if(un_max<aun_red_buffer[i])
MaximGordon 3:7c0fb55eb3ff 147 un_max=aun_red_buffer[i]; //update signal max
MaximGordon 0:346a7fa07998 148 pc.printf("red=");
MaximGordon 3:7c0fb55eb3ff 149 pc.printf("%i", aun_red_buffer[i]);
MaximGordon 0:346a7fa07998 150 pc.printf(", ir=");
MaximGordon 3:7c0fb55eb3ff 151 pc.printf("%i\n\r", aun_ir_buffer[i]);
MaximGordon 0:346a7fa07998 152 }
MaximGordon 3:7c0fb55eb3ff 153 un_prev_data=aun_red_buffer[i];
MaximGordon 0:346a7fa07998 154
MaximGordon 0:346a7fa07998 155
MaximGordon 0:346a7fa07998 156 //calculate heart rate and SpO2 after first 500 samples (first 5 seconds of samples)
MaximGordon 4:5273ab1085ab 157 maxim_heart_rate_and_oxygen_saturation(aun_ir_buffer, n_ir_buffer_length, aun_red_buffer, &n_sp02, &ch_spo2_valid, &n_heart_rate, &ch_hr_valid);
MaximGordon 0:346a7fa07998 158
MaximGordon 0:346a7fa07998 159 //Continuously taking samples from MAX30102. Heart rate and SpO2 are calculated every 1 second
MaximGordon 0:346a7fa07998 160 while(1)
MaximGordon 0:346a7fa07998 161 {
MaximGordon 0:346a7fa07998 162 i=0;
MaximGordon 0:346a7fa07998 163 un_min=0x3FFFF;
MaximGordon 0:346a7fa07998 164 un_max=0;
MaximGordon 0:346a7fa07998 165
MaximGordon 0:346a7fa07998 166 //dumping the first 100 sets of samples in the memory and shift the last 400 sets of samples to the top
MaximGordon 0:346a7fa07998 167 for(i=100;i<500;i++)
MaximGordon 0:346a7fa07998 168 {
MaximGordon 3:7c0fb55eb3ff 169 aun_red_buffer[i-100]=aun_red_buffer[i];
MaximGordon 3:7c0fb55eb3ff 170 aun_ir_buffer[i-100]=aun_ir_buffer[i];
MaximGordon 0:346a7fa07998 171
MaximGordon 0:346a7fa07998 172 //update the signal min and max
MaximGordon 3:7c0fb55eb3ff 173 if(un_min>aun_red_buffer[i])
MaximGordon 3:7c0fb55eb3ff 174 un_min=aun_red_buffer[i];
MaximGordon 3:7c0fb55eb3ff 175 if(un_max<aun_red_buffer[i])
MaximGordon 3:7c0fb55eb3ff 176 un_max=aun_red_buffer[i];
MaximGordon 0:346a7fa07998 177 }
MaximGordon 0:346a7fa07998 178
MaximGordon 0:346a7fa07998 179 //take 100 sets of samples before calculating the heart rate.
MaximGordon 0:346a7fa07998 180 for(i=400;i<500;i++)
MaximGordon 0:346a7fa07998 181 {
MaximGordon 3:7c0fb55eb3ff 182 un_prev_data=aun_red_buffer[i-1];
MaximGordon 0:346a7fa07998 183 while(INT.read()==1);
MaximGordon 3:7c0fb55eb3ff 184 maxim_max30102_read_fifo((aun_red_buffer+i), (aun_ir_buffer+i));
MaximGordon 0:346a7fa07998 185
MaximGordon 3:7c0fb55eb3ff 186 if(aun_red_buffer[i]>un_prev_data)
MaximGordon 0:346a7fa07998 187 {
MaximGordon 3:7c0fb55eb3ff 188 f_temp=aun_red_buffer[i]-un_prev_data;
MaximGordon 0:346a7fa07998 189 f_temp/=(un_max-un_min);
MaximGordon 0:346a7fa07998 190 f_temp*=MAX_BRIGHTNESS;
MaximGordon 0:346a7fa07998 191 n_brightness-=(int)f_temp;
MaximGordon 0:346a7fa07998 192 if(n_brightness<0)
MaximGordon 0:346a7fa07998 193 n_brightness=0;
MaximGordon 0:346a7fa07998 194 }
MaximGordon 0:346a7fa07998 195 else
MaximGordon 0:346a7fa07998 196 {
MaximGordon 3:7c0fb55eb3ff 197 f_temp=un_prev_data-aun_red_buffer[i];
MaximGordon 0:346a7fa07998 198 f_temp/=(un_max-un_min);
MaximGordon 0:346a7fa07998 199 f_temp*=MAX_BRIGHTNESS;
MaximGordon 0:346a7fa07998 200 n_brightness+=(int)f_temp;
MaximGordon 0:346a7fa07998 201 if(n_brightness>MAX_BRIGHTNESS)
MaximGordon 0:346a7fa07998 202 n_brightness=MAX_BRIGHTNESS;
MaximGordon 0:346a7fa07998 203 }
cdupaty 5:029e1bc6ca6c 204
cdupaty 5:029e1bc6ca6c 205 pulse=1-(float)n_brightness/256;
cdupaty 5:029e1bc6ca6c 206 led.write(pulse);
cdupaty 5:029e1bc6ca6c 207
cdupaty 5:029e1bc6ca6c 208 //send samples and calculation result to terminal program through UART
cdupaty 5:029e1bc6ca6c 209 pc.printf("red=%i\t", aun_red_buffer[i]);
cdupaty 5:029e1bc6ca6c 210 pc.printf("ir=%i\t", aun_ir_buffer[i]);
cdupaty 5:029e1bc6ca6c 211 pc.printf("HR=%i\t", n_heart_rate);
cdupaty 5:029e1bc6ca6c 212 pc.printf("HROK=%i\t", ch_hr_valid);
cdupaty 5:029e1bc6ca6c 213 pc.printf("SpO2=%i\t", n_sp02);
cdupaty 5:029e1bc6ca6c 214 pc.printf("SPO2OK=%i\n\r", ch_spo2_valid);
MaximGordon 0:346a7fa07998 215 }
MaximGordon 4:5273ab1085ab 216 maxim_heart_rate_and_oxygen_saturation(aun_ir_buffer, n_ir_buffer_length, aun_red_buffer, &n_sp02, &ch_spo2_valid, &n_heart_rate, &ch_hr_valid);
cdupaty 5:029e1bc6ca6c 217 // touche();
MaximGordon 0:346a7fa07998 218 }
MaximGordon 0:346a7fa07998 219 }
MaximGordon 0:346a7fa07998 220