Close

8. Calculation of the Korotkoff Sounds

A project log for Digital Blood Pressure Monitor

Application For Detecting Blood Pressure Using Korotkoff Sounds

guillermo-perez-guillenGuillermo Perez Guillen 05/29/2023 at 06:340 Comments

Detecting 10 Korotkoff sounds

Detecting 10 Korotkoff sounds

Here you can get a tutorial to send the data to Excel: https://github.com/gsampallo/serialToExcel

And you can download my excel file at this link: Korotkoff_sounds_excel

130 mmHg > 129 mmHg and 130 mmHg > 129 mmHg126 mmHg > 125 mmHg and 127 mmHg > 125 mmHg

123 mmHg > 122 mmHg and 124 mmHg > 122 mmHg

Flowchart

Flowchart

for I in 1 .. 130 loop
            var_a := UInt32(PressureArray(I));
            var_b := UInt32(PressureArray(I+1));
            var_c := UInt32(PressureArray(I+2));

            if var_b > var_a and var_c > var_a then

               Print (0, Integer (inc), var_b, " mmHg-korot");
               inc := inc + 25;
               delay until Clock + Milliseconds (1);

            else

               delay until Clock + Milliseconds (1);

            end if;

         end loop;

Discussions