Exluding ZMOD

Dependencies:   iAQ_Core Adafruit_SGP30_mbed mbed BME680

Committer:
mehrnaz
Date:
Thu Jul 25 11:17:46 2019 +0000
Revision:
3:3d51f8870e91
Parent:
2:ef98576cd67b
Child:
5:44f7dbc5c75d
final version of Handheld used for KST

Who changed what in which revision?

UserRevisionLine numberNew contents of line
christodoulos 0:d034cdad5b6d 1 #include "mbed.h"
mehrnaz 2:ef98576cd67b 2 #include "flow.h"
christodoulos 0:d034cdad5b6d 3
mehrnaz 2:ef98576cd67b 4 /////////////////////////
mehrnaz 3:3d51f8870e91 5 // In this version of the program developed for the Breath project, flow and CO2, as well as 8 channel sensors,
mehrnaz 2:ef98576cd67b 6 // are measured in a separate .h file called: "flow.h" which is included in the
mehrnaz 3:3d51f8870e91 7 // main code. So 10 sets of data is streamed using a serial connection (TTL cable or Bluetooth)
mehrnaz 3:3d51f8870e91 8 // without any intruption.
mehrnaz 2:ef98576cd67b 9 // This version is especially suitable to be used for KST.
mehrnaz 2:ef98576cd67b 10 // Also, a solenoid would be turned on and off based on calculating the standard deviation in CO2 profile.
mehrnaz 2:ef98576cd67b 11 //
mehrnaz 3:3d51f8870e91 12 // START POINT: calculates SD for 9 samples of CO2, if it's grater than 0.02 it enables the solenoid.
mehrnaz 3:3d51f8870e91 13 // END POINT: calculates SD for 9 samples of CO2, if it's grater thatn 0.05 it disables the solenoid.
mehrnaz 3:3d51f8870e91 14 //
mehrnaz 3:3d51f8870e91 15 // You can easily change the threshold of Standard deviation to detect plateau
mehrnaz 3:3d51f8870e91 16 //
mehrnaz 2:ef98576cd67b 17 // Generated by: Mehrnaz Javadipour
mehrnaz 2:ef98576cd67b 18 //////////////////////////
christodoulos 0:d034cdad5b6d 19
mehrnaz 3:3d51f8870e91 20 Serial ttl(PC_12,PD_2); //TTL cable TX,RX
mehrnaz 2:ef98576cd67b 21 DigitalOut sol(PC_5); //Solenoid: Digital Output
mehrnaz 3:3d51f8870e91 22 PwmOut led(PB_6);
mehrnaz 3:3d51f8870e91 23
mehrnaz 3:3d51f8870e91 24
mehrnaz 2:ef98576cd67b 25
mehrnaz 2:ef98576cd67b 26 int main()
christodoulos 0:d034cdad5b6d 27 {
mehrnaz 2:ef98576cd67b 28 ttl.baud(9600); //baudrate for the serial connection
mehrnaz 2:ef98576cd67b 29 flow(); //calling flow from flow.h
mehrnaz 2:ef98576cd67b 30 carbon(); //calling CO2 from flow.h
mehrnaz 3:3d51f8870e91 31 s1(); //calling 8 channels from flow.h
mehrnaz 3:3d51f8870e91 32 s2();
mehrnaz 3:3d51f8870e91 33 s3();
mehrnaz 3:3d51f8870e91 34 s4();
mehrnaz 3:3d51f8870e91 35 s5();
mehrnaz 3:3d51f8870e91 36 s6();
mehrnaz 3:3d51f8870e91 37 s7();
mehrnaz 3:3d51f8870e91 38 s8();
mehrnaz 3:3d51f8870e91 39 getTemp(); //calling Temperature from flow.h
mehrnaz 3:3d51f8870e91 40
mehrnaz 3:3d51f8870e91 41 //////////////////////////////
mehrnaz 3:3d51f8870e91 42 // I defined a flag for each section of specific functions, so by enabling the
mehrnaz 3:3d51f8870e91 43 // flag the section starts and by disabling the flag it finishes the section.
mehrnaz 3:3d51f8870e91 44 // at the end of the program, I reset the flags so it would be ready for the next loop.
mehrnaz 3:3d51f8870e91 45 /////////////////////////////
mehrnaz 3:3d51f8870e91 46
mehrnaz 3:3d51f8870e91 47 int bf=0; //FLAG for detecting base flow
mehrnaz 2:ef98576cd67b 48 int i=0;
mehrnaz 3:3d51f8870e91 49 float bfArray[4]; //sampling flow for finding the average base flow
mehrnaz 3:3d51f8870e91 50 float sf=0; //sum of flow samples for calculating base flow
mehrnaz 3:3d51f8870e91 51 float fv=0; //final value of base flow
mehrnaz 3:3d51f8870e91 52
mehrnaz 3:3d51f8870e91 53 int measurement_started=0; //FLAG for starting calculations after detecting breath
mehrnaz 3:3d51f8870e91 54
mehrnaz 3:3d51f8870e91 55 int solstart=0; //FLAG for starting calculations for detecting plateau
mehrnaz 3:3d51f8870e91 56 int m=0;
mehrnaz 3:3d51f8870e91 57 int myArray[9]; //sampling 9 values of CO2
mehrnaz 3:3d51f8870e91 58 unsigned int sum=0; //sum of 9 samples of CO2
mehrnaz 3:3d51f8870e91 59 int avg=0; //average of 9 samples of CO2
mehrnaz 3:3d51f8870e91 60 int difSum=0; //used for the Standard deviation algorithm
mehrnaz 3:3d51f8870e91 61 long double var=0.0; //used for the Standard deviation algorithm
mehrnaz 3:3d51f8870e91 62 float sigma=0.0; //final value for standar deviation
mehrnaz 3:3d51f8870e91 63 int flags=0; //FLAG for keep taking samples from CO2 profile when it's too early to detect plateau
mehrnaz 3:3d51f8870e91 64
mehrnaz 3:3d51f8870e91 65 int solend=0; //FLAG for ending calculations for detecting plateau
mehrnaz 3:3d51f8870e91 66 unsigned int sum2=0; //same as before; used for finding standard deviation
mehrnaz 2:ef98576cd67b 67 long double var2=0.0;
mehrnaz 2:ef98576cd67b 68 float sigma2=0.0;
mehrnaz 2:ef98576cd67b 69 int difSum2=0;
mehrnaz 3:3d51f8870e91 70 int avg2=0;
mehrnaz 3:3d51f8870e91 71 int flage=0; //FLAG for keep taking samples from CO2 profile when it's too early to finish plateau
mehrnaz 3:3d51f8870e91 72
mehrnaz 2:ef98576cd67b 73 int fin=0;
mehrnaz 2:ef98576cd67b 74
mehrnaz 3:3d51f8870e91 75
mehrnaz 2:ef98576cd67b 76
mehrnaz 2:ef98576cd67b 77 while(1)
mehrnaz 2:ef98576cd67b 78 {
mehrnaz 3:3d51f8870e91 79 led=1.00f; //an LED is fully turned on at the beginning, the brightness will be reduced when the plateau is detected.
mehrnaz 3:3d51f8870e91 80 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 3:3d51f8870e91 81
mehrnaz 3:3d51f8870e91 82 if (bf==0) //finding base flow before breath
mehrnaz 2:ef98576cd67b 83 {
mehrnaz 2:ef98576cd67b 84 for(i=0; i<4; i++)
mehrnaz 2:ef98576cd67b 85 {
mehrnaz 2:ef98576cd67b 86 bfArray[i]=flow();
mehrnaz 2:ef98576cd67b 87 sf+=bfArray[i];
mehrnaz 2:ef98576cd67b 88 }
mehrnaz 2:ef98576cd67b 89 fv=sf/4;
mehrnaz 2:ef98576cd67b 90 fv=fv+0.2;
mehrnaz 2:ef98576cd67b 91 //ttl.printf("set\n");
mehrnaz 2:ef98576cd67b 92 bf=1;
mehrnaz 2:ef98576cd67b 93 }
mehrnaz 2:ef98576cd67b 94
mehrnaz 3:3d51f8870e91 95 //Starts calculations when it detects breathing into the device:
mehrnaz 3:3d51f8870e91 96
mehrnaz 2:ef98576cd67b 97 if ((flow()>fv) and (measurement_started ==0))
mehrnaz 2:ef98576cd67b 98 {
mehrnaz 2:ef98576cd67b 99 measurement_started = 1;
mehrnaz 2:ef98576cd67b 100 }
mehrnaz 2:ef98576cd67b 101
mehrnaz 3:3d51f8870e91 102 //Starts detecting plateau:
mehrnaz 3:3d51f8870e91 103
mehrnaz 2:ef98576cd67b 104 if ((measurement_started == 1) and (solstart==0))
mehrnaz 2:ef98576cd67b 105 {
mehrnaz 3:3d51f8870e91 106 //Takes 9 samples of CO2:
mehrnaz 3:3d51f8870e91 107 //I have also included printing the values inside the loops so we don't loose any data during calculatins.
mehrnaz 2:ef98576cd67b 108 for(m=0;m<9;m++)
mehrnaz 2:ef98576cd67b 109 {
mehrnaz 3:3d51f8870e91 110 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 2:ef98576cd67b 111 myArray[m]=carbon();
mehrnaz 2:ef98576cd67b 112 }
mehrnaz 2:ef98576cd67b 113 while(flags==0)
mehrnaz 2:ef98576cd67b 114 {
mehrnaz 3:3d51f8870e91 115 //While "flags" is enabled, keeps calculating the standard deviation.
mehrnaz 2:ef98576cd67b 116 for(int m=0;m<9;m++)
mehrnaz 2:ef98576cd67b 117 {
mehrnaz 3:3d51f8870e91 118 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 2:ef98576cd67b 119 sum+=myArray[m];
mehrnaz 2:ef98576cd67b 120 }
mehrnaz 2:ef98576cd67b 121 avg=sum/9;
mehrnaz 2:ef98576cd67b 122 for(int m=0;m<9;m++)
mehrnaz 2:ef98576cd67b 123 {
mehrnaz 3:3d51f8870e91 124 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 2:ef98576cd67b 125 difSum+=(myArray[m]-avg)*(myArray[m]-avg); //Find sum of difference between value X and mean
mehrnaz 2:ef98576cd67b 126 }
mehrnaz 2:ef98576cd67b 127 var=difSum/9;
mehrnaz 2:ef98576cd67b 128 sigma=sqrt(var);
mehrnaz 2:ef98576cd67b 129 if (sigma<0.02)
mehrnaz 2:ef98576cd67b 130 {
mehrnaz 3:3d51f8870e91 131
mehrnaz 3:3d51f8870e91 132 //if SD is less than 0.02 it means that it is too early to start the plateau
mehrnaz 3:3d51f8870e91 133 //So we shift all but the first sample and define the new set of arrays:
mehrnaz 3:3d51f8870e91 134
mehrnaz 2:ef98576cd67b 135 for(int m=0;m<8;m++)
mehrnaz 2:ef98576cd67b 136 {
mehrnaz 3:3d51f8870e91 137 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 3:3d51f8870e91 138 myArray[m]=myArray[m+1]; //Shift all CO2 values to the left by 1 value
mehrnaz 2:ef98576cd67b 139 }
mehrnaz 3:3d51f8870e91 140 myArray[8]=carbon(); //assign a new value for the 9th sample
mehrnaz 3:3d51f8870e91 141 }
mehrnaz 3:3d51f8870e91 142 //The new set of arrays are now generated and is sent back to be used for preveious SD calculations.
mehrnaz 3:3d51f8870e91 143 //If sigma for the new set is still small, a newer set will be generated and replaced
mehrnaz 3:3d51f8870e91 144 //Otherwise, it's accepted and will turn on the solenoid:
mehrnaz 3:3d51f8870e91 145 else
mehrnaz 2:ef98576cd67b 146 {
mehrnaz 3:3d51f8870e91 147 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 3:3d51f8870e91 148 sol=1; //Solenoid is ON
mehrnaz 3:3d51f8870e91 149 led=0.50f; //The brightness is reduced to half during the plateau
mehrnaz 3:3d51f8870e91 150 flags=1; //breakes the while loop
mehrnaz 2:ef98576cd67b 151 }
mehrnaz 2:ef98576cd67b 152 }
mehrnaz 3:3d51f8870e91 153 solend=1; //prepares the next section for finishing the plateau
mehrnaz 2:ef98576cd67b 154 solstart =1;
mehrnaz 2:ef98576cd67b 155 }
mehrnaz 2:ef98576cd67b 156 if ((measurement_started == 1) and (solend==1))
mehrnaz 2:ef98576cd67b 157 {
mehrnaz 3:3d51f8870e91 158 // same process happens for finishing the plateau:
mehrnaz 2:ef98576cd67b 159
mehrnaz 2:ef98576cd67b 160 for(m=0;m<9;m++)
mehrnaz 2:ef98576cd67b 161 {
mehrnaz 3:3d51f8870e91 162 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 2:ef98576cd67b 163 myArray[m]=carbon();
mehrnaz 2:ef98576cd67b 164 }
mehrnaz 2:ef98576cd67b 165 while(flage==0)
mehrnaz 2:ef98576cd67b 166 {
mehrnaz 2:ef98576cd67b 167 for(int m=0;m<9;m++)
mehrnaz 2:ef98576cd67b 168 {
mehrnaz 3:3d51f8870e91 169 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 2:ef98576cd67b 170 sum2+=myArray[m];
mehrnaz 2:ef98576cd67b 171 }
mehrnaz 2:ef98576cd67b 172 avg2=sum2/9;
mehrnaz 2:ef98576cd67b 173 for(int m=0;m<9;m++)
mehrnaz 2:ef98576cd67b 174 {
mehrnaz 3:3d51f8870e91 175 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 3:3d51f8870e91 176 difSum2+=(myArray[m]-avg2)*(myArray[m]-avg2);
mehrnaz 2:ef98576cd67b 177 }
mehrnaz 2:ef98576cd67b 178 var2=difSum2/9;
mehrnaz 2:ef98576cd67b 179 sigma2=sqrt(var2);
mehrnaz 2:ef98576cd67b 180 if (sigma2<0.05)
mehrnaz 2:ef98576cd67b 181 {
mehrnaz 3:3d51f8870e91 182 // here we defined the end threshold to be 0.05, it can be changed later based on experiment results
mehrnaz 2:ef98576cd67b 183 for(int m=0;m<8;m++)
mehrnaz 2:ef98576cd67b 184 {
mehrnaz 3:3d51f8870e91 185 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 3:3d51f8870e91 186 myArray[m]=myArray[m+1];
mehrnaz 2:ef98576cd67b 187 }
mehrnaz 2:ef98576cd67b 188 myArray[8]=carbon();
mehrnaz 2:ef98576cd67b 189 }else
mehrnaz 2:ef98576cd67b 190 {
mehrnaz 3:3d51f8870e91 191 ttl.printf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f\n",getTemp(),flow(), carbon(),s1(),s2(),s3(),s4(),s5(),s6(),s7(),s8());
mehrnaz 3:3d51f8870e91 192 sol=0; //Solenoid is OFF
mehrnaz 3:3d51f8870e91 193 flage=1; //breakes the loop
mehrnaz 2:ef98576cd67b 194 }
mehrnaz 2:ef98576cd67b 195 }
mehrnaz 3:3d51f8870e91 196 solend =0; //end of this section
mehrnaz 3:3d51f8870e91 197 led=1.00f; //LED is back to full brightness
mehrnaz 3:3d51f8870e91 198 bf=0; //reset the detecting base flow flag
mehrnaz 3:3d51f8870e91 199 fin=1; //enables the next section flag
mehrnaz 2:ef98576cd67b 200 }
mehrnaz 2:ef98576cd67b 201 if((carbon()<10000) and (fin ==1))
mehrnaz 2:ef98576cd67b 202 {
mehrnaz 3:3d51f8870e91 203 //User has to wait for the CO2 level to drop less than 1% before testing again.
mehrnaz 3:3d51f8870e91 204 //Once it is less than 1%, all the flags and parameters used in calculations are reset
mehrnaz 2:ef98576cd67b 205 measurement_started =0;
mehrnaz 2:ef98576cd67b 206 solstart=0;
mehrnaz 2:ef98576cd67b 207 sum=0;
mehrnaz 2:ef98576cd67b 208 var=0.0;
mehrnaz 2:ef98576cd67b 209 sigma=0.0;
mehrnaz 2:ef98576cd67b 210 difSum=0;
mehrnaz 2:ef98576cd67b 211 sum2=0;
mehrnaz 2:ef98576cd67b 212 var2=0.0;
mehrnaz 2:ef98576cd67b 213 sigma2=0.0;
mehrnaz 2:ef98576cd67b 214 difSum2=0;
mehrnaz 2:ef98576cd67b 215 avg2=0;
mehrnaz 2:ef98576cd67b 216 avg=0;
mehrnaz 2:ef98576cd67b 217 flags=0;
mehrnaz 2:ef98576cd67b 218 flage=0;
mehrnaz 2:ef98576cd67b 219 fin=0;
mehrnaz 2:ef98576cd67b 220 }
mehrnaz 2:ef98576cd67b 221 }
mehrnaz 2:ef98576cd67b 222 }