POC Breath using SMD commercial sensors
Dependencies: iAQ_Core Adafruit_SGP30_mbed mbed BME680
flow.h@5:646a7e58989e, 2020-01-23 (annotated)
- Committer:
- christodoulos
- Date:
- Thu Jan 23 15:24:41 2020 +0000
- Revision:
- 5:646a7e58989e
- Parent:
- 4:54dc2a95c130
- Child:
- 6:f6faf142e5fc
23rd Jan
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
mehrnaz | 2:ef98576cd67b | 1 | #include "mbed.h" |
mehrnaz | 2:ef98576cd67b | 2 | |
mehrnaz | 3:3d51f8870e91 | 3 | // First the inputs and pins are defined |
mehrnaz | 3:3d51f8870e91 | 4 | |
christodoulos | 5:646a7e58989e | 5 | AnalogIn flowIn(PA_1);//PA0 on schematic but PA1 on PCB |
mehrnaz | 3:3d51f8870e91 | 6 | Serial co2(PC_10,PC_11); |
mehrnaz | 3:3d51f8870e91 | 7 | AnalogIn sensor1(PC_0); |
mehrnaz | 3:3d51f8870e91 | 8 | AnalogIn sensor2(PC_1); |
mehrnaz | 3:3d51f8870e91 | 9 | AnalogIn sensor3(PC_2); |
mehrnaz | 3:3d51f8870e91 | 10 | AnalogIn sensor4(PC_3); |
christodoulos | 5:646a7e58989e | 11 | AnalogIn sensor5(PA_4); //Also 2612 |
christodoulos | 5:646a7e58989e | 12 | AnalogIn sensor6(PA_5); //Also 2610 |
christodoulos | 5:646a7e58989e | 13 | AnalogIn sensor7(PA_6); //Also 2620 |
christodoulos | 5:646a7e58989e | 14 | AnalogIn sensor8(PA_7); //Also 2602 |
christodoulos | 5:646a7e58989e | 15 | AnalogIn temp(PA_0);//PA1 on schematic but PA0 on PCB |
mehrnaz | 2:ef98576cd67b | 16 | |
mehrnaz | 3:3d51f8870e91 | 17 | ///////////////////// FLOW LOOP ///////////////////////// |
mehrnaz | 2:ef98576cd67b | 18 | float finalflow; |
mehrnaz | 2:ef98576cd67b | 19 | float flowVal1; |
mehrnaz | 2:ef98576cd67b | 20 | float flowVal2; |
mehrnaz | 2:ef98576cd67b | 21 | float P1; |
mehrnaz | 2:ef98576cd67b | 22 | int flag=0; |
mehrnaz | 2:ef98576cd67b | 23 | int o=0; |
mehrnaz | 2:ef98576cd67b | 24 | float bpArray[10]; |
christodoulos | 5:646a7e58989e | 25 | float fp; |
christodoulos | 5:646a7e58989e | 26 | float sp; |
mehrnaz | 2:ef98576cd67b | 27 | float FPressure; |
christodoulos | 5:646a7e58989e | 28 | |
mehrnaz | 2:ef98576cd67b | 29 | float flow() |
mehrnaz | 2:ef98576cd67b | 30 | { |
mehrnaz | 2:ef98576cd67b | 31 | while(1) |
mehrnaz | 2:ef98576cd67b | 32 | { |
mehrnaz | 2:ef98576cd67b | 33 | wait(0.01); |
mehrnaz | 2:ef98576cd67b | 34 | flowVal1=3.3*flowIn; //Logic level 3.3 |
mehrnaz | 2:ef98576cd67b | 35 | flowVal2 = 1.5*flowVal1; //5v |
mehrnaz | 3:3d51f8870e91 | 36 | P1 =(125*flowVal2)-62.5; //Pressure |
mehrnaz | 3:3d51f8870e91 | 37 | //making the value of pressure positive inside the SQRT function: |
mehrnaz | 2:ef98576cd67b | 38 | if(flag==0) |
mehrnaz | 2:ef98576cd67b | 39 | { |
mehrnaz | 2:ef98576cd67b | 40 | finalflow=0; |
mehrnaz | 2:ef98576cd67b | 41 | bpArray[o]=P1; |
mehrnaz | 2:ef98576cd67b | 42 | sp+=bpArray[o]; |
mehrnaz | 2:ef98576cd67b | 43 | o=o+1; |
christodoulos | 5:646a7e58989e | 44 | if (o==9) |
mehrnaz | 2:ef98576cd67b | 45 | { |
mehrnaz | 2:ef98576cd67b | 46 | fp=sp/10; |
mehrnaz | 2:ef98576cd67b | 47 | flag=1; |
mehrnaz | 2:ef98576cd67b | 48 | } |
mehrnaz | 2:ef98576cd67b | 49 | } |
mehrnaz | 2:ef98576cd67b | 50 | if (flag==1) |
mehrnaz | 2:ef98576cd67b | 51 | { |
christodoulos | 5:646a7e58989e | 52 | FPressure=P1-fp; |
mehrnaz | 4:54dc2a95c130 | 53 | finalflow=(0.24*sqrt(FPressure)); //flow in litter per second |
christodoulos | 5:646a7e58989e | 54 | if(isnan(finalflow)==true){ |
christodoulos | 5:646a7e58989e | 55 | return 0; |
christodoulos | 5:646a7e58989e | 56 | } |
christodoulos | 5:646a7e58989e | 57 | else{ |
christodoulos | 5:646a7e58989e | 58 | return finalflow; |
christodoulos | 5:646a7e58989e | 59 | } |
mehrnaz | 2:ef98576cd67b | 60 | } |
mehrnaz | 2:ef98576cd67b | 61 | } |
mehrnaz | 2:ef98576cd67b | 62 | } |
mehrnaz | 2:ef98576cd67b | 63 | |
mehrnaz | 3:3d51f8870e91 | 64 | ///////////////////// CO2 LOOP ///////////////////////// |
mehrnaz | 3:3d51f8870e91 | 65 | int value; |
mehrnaz | 2:ef98576cd67b | 66 | float carbon() |
mehrnaz | 2:ef98576cd67b | 67 | { |
mehrnaz | 2:ef98576cd67b | 68 | bool allow = false; |
mehrnaz | 2:ef98576cd67b | 69 | char c; |
mehrnaz | 2:ef98576cd67b | 70 | char co2_measure[5]; |
mehrnaz | 2:ef98576cd67b | 71 | int count=0; |
mehrnaz | 2:ef98576cd67b | 72 | |
mehrnaz | 2:ef98576cd67b | 73 | while(1) |
mehrnaz | 2:ef98576cd67b | 74 | { |
mehrnaz | 2:ef98576cd67b | 75 | c = co2.getc(); |
mehrnaz | 3:3d51f8870e91 | 76 | //based on the user manual PDF for the CO2 sensor, the value starts with "Z" |
mehrnaz | 3:3d51f8870e91 | 77 | //and we need to extract the right number of CO2 value |
mehrnaz | 2:ef98576cd67b | 78 | if(c=='Z') { |
mehrnaz | 2:ef98576cd67b | 79 | allow = true; |
mehrnaz | 2:ef98576cd67b | 80 | } |
mehrnaz | 2:ef98576cd67b | 81 | |
mehrnaz | 2:ef98576cd67b | 82 | if(allow) { |
mehrnaz | 2:ef98576cd67b | 83 | if(c>=48 && c<=57) { |
mehrnaz | 2:ef98576cd67b | 84 | co2_measure[count]=c; |
mehrnaz | 2:ef98576cd67b | 85 | count++; |
mehrnaz | 2:ef98576cd67b | 86 | } |
mehrnaz | 2:ef98576cd67b | 87 | |
mehrnaz | 3:3d51f8870e91 | 88 | if(count>=6) { |
mehrnaz | 2:ef98576cd67b | 89 | value = ((co2_measure[0]-'0')*100000+co2_measure[1]-'0')*10000+(co2_measure[2]-'0')*1000+(co2_measure[3]-'0')*100; |
mehrnaz | 2:ef98576cd67b | 90 | float CAR; |
mehrnaz | 2:ef98576cd67b | 91 | CAR=(float)value/10000; |
mehrnaz | 2:ef98576cd67b | 92 | count=0; |
mehrnaz | 2:ef98576cd67b | 93 | allow=false; |
mehrnaz | 2:ef98576cd67b | 94 | return CAR; |
mehrnaz | 2:ef98576cd67b | 95 | } |
mehrnaz | 2:ef98576cd67b | 96 | } |
mehrnaz | 2:ef98576cd67b | 97 | } |
mehrnaz | 2:ef98576cd67b | 98 | } |
mehrnaz | 2:ef98576cd67b | 99 | |
mehrnaz | 3:3d51f8870e91 | 100 | ///////////////////// TEMPERATURE LOOP ///////////////////////// |
mehrnaz | 3:3d51f8870e91 | 101 | |
mehrnaz | 3:3d51f8870e91 | 102 | float t2Cel; |
mehrnaz | 3:3d51f8870e91 | 103 | |
mehrnaz | 3:3d51f8870e91 | 104 | float getTemp() |
mehrnaz | 3:3d51f8870e91 | 105 | { |
mehrnaz | 3:3d51f8870e91 | 106 | while(1) { |
christodoulos | 5:646a7e58989e | 107 | float B = 3380.00; //Define thermistor constant |
christodoulos | 5:646a7e58989e | 108 | float rRef=10000.00; // Define reference resistance |
christodoulos | 5:646a7e58989e | 109 | float r1=10000.00; // Define thermistor resistance at 25 C |
christodoulos | 5:646a7e58989e | 110 | float t1=25.00+273.00; // Define thermistor initial temperature s 25C in Kelvin |
mehrnaz | 3:3d51f8870e91 | 111 | float x = temp.read(); //Measure input voltage at pin A0 in bits |
mehrnaz | 3:3d51f8870e91 | 112 | float v = 3.3*x; //Convert bits into voltage |
christodoulos | 5:646a7e58989e | 113 | float r2 = (5*rRef/v)-rRef; //Convert voltage into thermistor resistance |
mehrnaz | 3:3d51f8870e91 | 114 | float t2 = (B*t1)/(B-t1*log(r1/r2)); //Convert thermistor resistance into temperature in Kelvin (log means natural logarithm ln) |
christodoulos | 5:646a7e58989e | 115 | t2Cel = t2-273.00; //Convert temperature from Kelvin to Celcius |
mehrnaz | 3:3d51f8870e91 | 116 | return t2Cel; |
mehrnaz | 3:3d51f8870e91 | 117 | // printf("Temp: %f\n", t2Cel); |
mehrnaz | 3:3d51f8870e91 | 118 | } |
mehrnaz | 3:3d51f8870e91 | 119 | } |
mehrnaz | 3:3d51f8870e91 | 120 | |
mehrnaz | 3:3d51f8870e91 | 121 | ///////////////////// 8-CHANNEL SENSOR LOOP ///////////////////////// |
mehrnaz | 3:3d51f8870e91 | 122 | |
christodoulos | 5:646a7e58989e | 123 | int c2612() |
christodoulos | 5:646a7e58989e | 124 | { |
christodoulos | 5:646a7e58989e | 125 | float sen5; |
christodoulos | 5:646a7e58989e | 126 | while(1){ |
christodoulos | 5:646a7e58989e | 127 | sen5=1000*((5/sensor5*3.3)-1); |
christodoulos | 5:646a7e58989e | 128 | return (int)sen5; |
christodoulos | 5:646a7e58989e | 129 | } |
christodoulos | 5:646a7e58989e | 130 | } |
christodoulos | 5:646a7e58989e | 131 | |
christodoulos | 5:646a7e58989e | 132 | int c2610() |
christodoulos | 5:646a7e58989e | 133 | { |
christodoulos | 5:646a7e58989e | 134 | float sen6; |
christodoulos | 5:646a7e58989e | 135 | while(1){ |
christodoulos | 5:646a7e58989e | 136 | sen6=1000*((5/sensor6*3.3)-1); |
christodoulos | 5:646a7e58989e | 137 | return (int)sen6; |
christodoulos | 5:646a7e58989e | 138 | } |
christodoulos | 5:646a7e58989e | 139 | } |
christodoulos | 5:646a7e58989e | 140 | |
christodoulos | 5:646a7e58989e | 141 | int c2620() |
mehrnaz | 3:3d51f8870e91 | 142 | { |
christodoulos | 5:646a7e58989e | 143 | float sen7; |
christodoulos | 5:646a7e58989e | 144 | while(1){ |
christodoulos | 5:646a7e58989e | 145 | sen7=1000*((5/sensor7*3.3)-1); |
christodoulos | 5:646a7e58989e | 146 | return (int)sen7; |
christodoulos | 5:646a7e58989e | 147 | } |
christodoulos | 5:646a7e58989e | 148 | } |
christodoulos | 5:646a7e58989e | 149 | |
christodoulos | 5:646a7e58989e | 150 | int c2602() |
christodoulos | 5:646a7e58989e | 151 | { |
christodoulos | 5:646a7e58989e | 152 | float sen8; |
mehrnaz | 3:3d51f8870e91 | 153 | while(1){ |
christodoulos | 5:646a7e58989e | 154 | sen8=1000*((5/sensor8*3.3)-1); |
christodoulos | 5:646a7e58989e | 155 | return (int)sen8; |
christodoulos | 5:646a7e58989e | 156 | } |
christodoulos | 5:646a7e58989e | 157 | } |
christodoulos | 5:646a7e58989e | 158 | |
christodoulos | 5:646a7e58989e | 159 | int s1() |
christodoulos | 5:646a7e58989e | 160 | { |
christodoulos | 5:646a7e58989e | 161 | int sen1; |
christodoulos | 5:646a7e58989e | 162 | while(1){ |
christodoulos | 5:646a7e58989e | 163 | sen1=((5E6)/(sensor1*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 164 | return sen1; |
mehrnaz | 3:3d51f8870e91 | 165 | } |
mehrnaz | 3:3d51f8870e91 | 166 | } |
christodoulos | 5:646a7e58989e | 167 | int s2() |
mehrnaz | 3:3d51f8870e91 | 168 | { |
christodoulos | 5:646a7e58989e | 169 | int sen2; |
mehrnaz | 3:3d51f8870e91 | 170 | while(1){ |
christodoulos | 5:646a7e58989e | 171 | sen2=((5E6)/(sensor2*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 172 | return sen2; |
mehrnaz | 3:3d51f8870e91 | 173 | } |
mehrnaz | 3:3d51f8870e91 | 174 | } |
christodoulos | 5:646a7e58989e | 175 | int s3() |
mehrnaz | 3:3d51f8870e91 | 176 | { |
christodoulos | 5:646a7e58989e | 177 | int sen3; |
mehrnaz | 3:3d51f8870e91 | 178 | while(1){ |
christodoulos | 5:646a7e58989e | 179 | sen3=((5E6)/(sensor3*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 180 | return sen3; |
mehrnaz | 3:3d51f8870e91 | 181 | } |
mehrnaz | 3:3d51f8870e91 | 182 | } |
christodoulos | 5:646a7e58989e | 183 | int s4() |
mehrnaz | 3:3d51f8870e91 | 184 | { |
christodoulos | 5:646a7e58989e | 185 | int sen4; |
mehrnaz | 3:3d51f8870e91 | 186 | while(1){ |
christodoulos | 5:646a7e58989e | 187 | sen4=((5E6)/(sensor4*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 188 | return sen4; |
mehrnaz | 3:3d51f8870e91 | 189 | } |
mehrnaz | 3:3d51f8870e91 | 190 | } |
christodoulos | 5:646a7e58989e | 191 | int s5() |
mehrnaz | 3:3d51f8870e91 | 192 | { |
christodoulos | 5:646a7e58989e | 193 | int sen5; |
mehrnaz | 3:3d51f8870e91 | 194 | while(1){ |
christodoulos | 5:646a7e58989e | 195 | sen5=((5E6)/(sensor5*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 196 | return sen5; |
mehrnaz | 3:3d51f8870e91 | 197 | } |
mehrnaz | 3:3d51f8870e91 | 198 | } |
christodoulos | 5:646a7e58989e | 199 | int s6() |
mehrnaz | 3:3d51f8870e91 | 200 | { |
christodoulos | 5:646a7e58989e | 201 | int sen6; |
mehrnaz | 3:3d51f8870e91 | 202 | while(1){ |
christodoulos | 5:646a7e58989e | 203 | sen6=((5E6)/(sensor6*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 204 | return sen6; |
mehrnaz | 3:3d51f8870e91 | 205 | } |
mehrnaz | 3:3d51f8870e91 | 206 | } |
christodoulos | 5:646a7e58989e | 207 | int s7() |
mehrnaz | 3:3d51f8870e91 | 208 | { |
christodoulos | 5:646a7e58989e | 209 | int sen7; |
mehrnaz | 3:3d51f8870e91 | 210 | while(1){ |
christodoulos | 5:646a7e58989e | 211 | sen7=((5E6)/(sensor7*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 212 | return sen7; |
mehrnaz | 3:3d51f8870e91 | 213 | } |
mehrnaz | 3:3d51f8870e91 | 214 | } |
christodoulos | 5:646a7e58989e | 215 | int s8() |
mehrnaz | 3:3d51f8870e91 | 216 | { |
christodoulos | 5:646a7e58989e | 217 | int sen8; |
mehrnaz | 3:3d51f8870e91 | 218 | while(1){ |
christodoulos | 5:646a7e58989e | 219 | sen8=((5E6)/(sensor8*3.3))-(5E6); |
mehrnaz | 3:3d51f8870e91 | 220 | return sen8; |
mehrnaz | 3:3d51f8870e91 | 221 | } |
mehrnaz | 3:3d51f8870e91 | 222 | } |