attempt to fix posible power issues with the sharp
Dependencies: ADS1115 BME280 CronoDot SDFileSystem mbed
Fork of Outdoor_UPAS_v1_2_Tboard by
main.cpp@13:455601f62aad, 2016-03-22 (annotated)
- Committer:
- caseyquinn
- Date:
- Tue Mar 22 14:56:35 2016 +0000
- Revision:
- 13:455601f62aad
- Parent:
- 12:5b4f3245606a
- Child:
- 14:7cdb643da356
Basic code for initial flashing of the Tboards. Code is also saved as a text file: UPASv1_Tboard_NUCLEO_L152RE_barebones_noi2c_20160321.txt.
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
jelord | 0:2cb2b2ea316f | 1 | #include "mbed.h" |
caseyquinn | 12:5b4f3245606a | 2 | |
caseyquinn | 12:5b4f3245606a | 3 | /* |
jelord | 2:88fcbfadec6a | 4 | #include "SDFileSystem.h" |
jelord | 2:88fcbfadec6a | 5 | #include "Adafruit_ADS1015.h" |
jelord | 2:88fcbfadec6a | 6 | #include "MCP40D17.h" |
jelord | 2:88fcbfadec6a | 7 | #include "STC3100.h" |
jelord | 2:88fcbfadec6a | 8 | #include "LSM303.h" |
jelord | 2:88fcbfadec6a | 9 | #include "BME280.h" |
jelord | 2:88fcbfadec6a | 10 | #include "SI1145.h" |
jelord | 2:88fcbfadec6a | 11 | #include "NCP5623BMUTBG.h" |
jelord | 2:88fcbfadec6a | 12 | #include "CronoDot.h" |
jelord | 2:88fcbfadec6a | 13 | #include "EEPROM.h" |
caseyquinn | 12:5b4f3245606a | 14 | #include "Calibration.h" |
caseyquinn | 12:5b4f3245606a | 15 | #include "MAX_M8.h" |
caseyquinn | 12:5b4f3245606a | 16 | #include "DRV8830.h" |
caseyquinn | 12:5b4f3245606a | 17 | */ |
jelord | 0:2cb2b2ea316f | 18 | |
caseyquinn | 12:5b4f3245606a | 19 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 20 | //General Items |
caseyquinn | 12:5b4f3245606a | 21 | ///////////////////////////////////////////// |
caseyquinn | 13:455601f62aad | 22 | //I2C i2c(PB_9, PB_8);//(D14, D15); SDA,SCL |
caseyquinn | 12:5b4f3245606a | 23 | Serial pc(USBTX, USBRX); |
caseyquinn | 12:5b4f3245606a | 24 | DigitalOut blower(PA_9, 0);//(D8, 0); |
caseyquinn | 12:5b4f3245606a | 25 | DigitalOut pbKill(PC_12, 1); // Digital input pin that conncect to the LTC2950 battery charger used to shutdown the UPAS |
caseyquinn | 13:455601f62aad | 26 | DigitalIn nINT(PA_15); //Connected but currently unused is a digital ouput pin from LTC2950 battery charger. http://cds.linear.com/docs/en/datasheet/295012fd.pdf |
caseyquinn | 12:5b4f3245606a | 27 | /* |
jelord | 2:88fcbfadec6a | 28 | MCP40D17 DigPot(&i2c); |
caseyquinn | 12:5b4f3245606a | 29 | BME280 bmesensor(PB_9, PB_8);//(D14, D15); |
caseyquinn | 12:5b4f3245606a | 30 | NCP5623BMUTBG RGB_LED(PB_9, PB_8);//(D14, D15); |
caseyquinn | 12:5b4f3245606a | 31 | CronoDot RTC_UPAS(PB_9, PB_8);//(D14, D15); |
caseyquinn | 12:5b4f3245606a | 32 | EEPROM E2PROM(PB_9, PB_8);//(D14, D15); |
caseyquinn | 12:5b4f3245606a | 33 | Calibration calibrations(1); //Default serial/calibration if there are no values for the selected option |
caseyquinn | 12:5b4f3245606a | 34 | */ |
caseyquinn | 12:5b4f3245606a | 35 | |
caseyquinn | 12:5b4f3245606a | 36 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 37 | //RN4677 BT/BLE Module |
caseyquinn | 12:5b4f3245606a | 38 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 39 | Serial microChannel(PB_10, PB_11); // tx, rx |
caseyquinn | 4:5d004fd997d5 | 40 | DigitalOut bleRTS(PB_14, 0); |
caseyquinn | 4:5d004fd997d5 | 41 | DigitalOut bleCTS(PB_13, 0); |
caseyquinn | 13:455601f62aad | 42 | /* |
caseyquinn | 12:5b4f3245606a | 43 | DigitalOut BT_IRST(PC_8, 0); |
caseyquinn | 12:5b4f3245606a | 44 | DigitalOut BT_SW(PA_12, 0); |
caseyquinn | 12:5b4f3245606a | 45 | |
caseyquinn | 13:455601f62aad | 46 | |
caseyquinn | 12:5b4f3245606a | 47 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 48 | //Analog to Digital Converter |
caseyquinn | 12:5b4f3245606a | 49 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 50 | Adafruit_ADS1115 ads(&i2c); |
caseyquinn | 12:5b4f3245606a | 51 | //DigitalIn ADS_ALRT(PA_10); //Connected but currently unused. (ADS1115) http://www.ti.com/lit/ds/symlink/ads1115.pdf |
caseyquinn | 12:5b4f3245606a | 52 | |
caseyquinn | 12:5b4f3245606a | 53 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 54 | //Battery Monitoring |
caseyquinn | 12:5b4f3245606a | 55 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 56 | STC3100 gasG(PB_9, PB_8);//(D14, D15); // http://www.st.com/web/en/resource/technical/document/datasheet/CD00219947.pdf |
caseyquinn | 12:5b4f3245606a | 57 | DigitalIn bcs1(PC_9); //Charge complete if High. Connected but currently unused. (MCP73871) http://www.mouser.com/ds/2/268/22090a-52174.pdf |
caseyquinn | 12:5b4f3245606a | 58 | DigitalIn bcs2(PA_8); //Batt charging if High. Connected but currently unused. (MCP73871) http://www.mouser.com/ds/2/268/22090a-52174.pdf |
caseyquinn | 12:5b4f3245606a | 59 | |
caseyquinn | 12:5b4f3245606a | 60 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 61 | //Accelerometer and Magnometer |
caseyquinn | 12:5b4f3245606a | 62 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 63 | LSM303 movementsensor(PB_9, PB_8);//(D14, D15); // http://www.st.com/web/en/resource/technical/document/datasheet/DM00027543.pdf |
caseyquinn | 12:5b4f3245606a | 64 | //DigitalIn ACC_INT1(PC_7); //Connected but currently unused. (LSM303) |
caseyquinn | 12:5b4f3245606a | 65 | //DigitalIn ACC_INT2(PC_6); //Connected but currently unused. (LSM303) |
caseyquinn | 12:5b4f3245606a | 66 | //DigitalIn ACC_DRDY(PC_11); //Connected but currently unused. (LSM303) |
jelord | 0:2cb2b2ea316f | 67 | |
caseyquinn | 12:5b4f3245606a | 68 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 69 | //UV and Visible Light Sensor |
caseyquinn | 12:5b4f3245606a | 70 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 71 | SI1145 lightsensor(PB_9, PB_8);//(D14, D15); |
caseyquinn | 12:5b4f3245606a | 72 | //DigitalIn UV_INT(PD_2); //Connected but currently unused nor configured (interupt). (SI1145) https://www.silabs.com/Support%20Documents/TechnicalDocs/Si1145-46-47.pdf |
caseyquinn | 9:8646fd501832 | 73 | |
caseyquinn | 12:5b4f3245606a | 74 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 75 | //GPS |
caseyquinn | 12:5b4f3245606a | 76 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 77 | Max_M8 gps(PB_9, PB_8,(66<<1)); // this must be defnined in the int main (? Not sure if this is true) |
caseyquinn | 12:5b4f3245606a | 78 | |
caseyquinn | 12:5b4f3245606a | 79 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 80 | //Hbridge Valve Control |
caseyquinn | 12:5b4f3245606a | 81 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 82 | DRV8830 motor1(PB_9, PB_8, 0xC4); |
caseyquinn | 12:5b4f3245606a | 83 | DRV8830 motor2(PB_9, PB_8, 0xCA); |
caseyquinn | 12:5b4f3245606a | 84 | DRV8830 motor3(PB_9, PB_8, 0xCC); |
caseyquinn | 12:5b4f3245606a | 85 | DRV8830 motor4(PB_9, PB_8, 0xCE); |
caseyquinn | 12:5b4f3245606a | 86 | DigitalIn hb_fault1(PA_6); |
caseyquinn | 12:5b4f3245606a | 87 | DigitalIn hb_fault2(PA_7); |
caseyquinn | 12:5b4f3245606a | 88 | DigitalIn hb_fault3(PA_5); |
caseyquinn | 12:5b4f3245606a | 89 | DigitalIn hb_fault4(PA_4); |
caseyquinn | 12:5b4f3245606a | 90 | |
caseyquinn | 12:5b4f3245606a | 91 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 92 | //SD Card |
caseyquinn | 12:5b4f3245606a | 93 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 94 | char filename[] = "/sd/XXXX0000LOG000000000000---------------.txt"; |
caseyquinn | 12:5b4f3245606a | 95 | SDFileSystem sd(PB_5, PB_4, PB_3, PB_6, "sd");//(D4, D5, D3, D10, "sd"); // (MOSI, MISO, SCK, SEL) |
caseyquinn | 12:5b4f3245606a | 96 | DigitalIn sdCD(PA_11); |
caseyquinn | 12:5b4f3245606a | 97 | */ |
caseyquinn | 12:5b4f3245606a | 98 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 99 | //Callbacks |
caseyquinn | 12:5b4f3245606a | 100 | ///////////////////////////////////////////// |
caseyquinn | 9:8646fd501832 | 101 | Ticker stop; //This is the stop callback object |
caseyquinn | 8:c4a8f9b67cee | 102 | Ticker logg; //This is the logging callback object |
caseyquinn | 9:8646fd501832 | 103 | Ticker flowCtl; //This is the control loop callback object |
jelord | 3:122bfc998c4c | 104 | |
caseyquinn | 12:5b4f3245606a | 105 | ///////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 106 | //Varible Definitions |
caseyquinn | 12:5b4f3245606a | 107 | ///////////////////////////////////////////// |
jelord | 3:122bfc998c4c | 108 | uint16_t serial_num = 1; // Default serial/calibration number |
jelord | 3:122bfc998c4c | 109 | int RunReady =0; |
jelord | 3:122bfc998c4c | 110 | |
caseyquinn | 4:5d004fd997d5 | 111 | struct tm STtime; |
caseyquinn | 7:29b01d5812ee | 112 | char timestr[32]; |
jelord | 3:122bfc998c4c | 113 | |
caseyquinn | 9:8646fd501832 | 114 | float press; |
caseyquinn | 9:8646fd501832 | 115 | float temp; |
caseyquinn | 9:8646fd501832 | 116 | float rh; |
jelord | 3:122bfc998c4c | 117 | |
caseyquinn | 9:8646fd501832 | 118 | int uv; |
caseyquinn | 9:8646fd501832 | 119 | int vis; |
caseyquinn | 9:8646fd501832 | 120 | int ir; |
jelord | 3:122bfc998c4c | 121 | |
caseyquinn | 9:8646fd501832 | 122 | float compass; |
caseyquinn | 9:8646fd501832 | 123 | float accel_x; |
caseyquinn | 9:8646fd501832 | 124 | float accel_y; |
caseyquinn | 9:8646fd501832 | 125 | float accel_z; |
caseyquinn | 9:8646fd501832 | 126 | float accel_comp; |
caseyquinn | 9:8646fd501832 | 127 | float angle_x; |
caseyquinn | 9:8646fd501832 | 128 | float angle_y; |
caseyquinn | 9:8646fd501832 | 129 | float angle_z; |
caseyquinn | 9:8646fd501832 | 130 | float mag_x; |
caseyquinn | 9:8646fd501832 | 131 | float mag_y; |
caseyquinn | 9:8646fd501832 | 132 | float mag_z; |
jelord | 3:122bfc998c4c | 133 | |
caseyquinn | 9:8646fd501832 | 134 | int vInReading; |
caseyquinn | 9:8646fd501832 | 135 | int vBlowerReading; |
caseyquinn | 9:8646fd501832 | 136 | int omronDiff; |
caseyquinn | 9:8646fd501832 | 137 | float omronVolt; //V |
caseyquinn | 9:8646fd501832 | 138 | int omronReading; |
caseyquinn | 9:8646fd501832 | 139 | float atmoRho; //g/L |
jelord | 3:122bfc998c4c | 140 | |
caseyquinn | 9:8646fd501832 | 141 | float massflow; //g/min |
caseyquinn | 9:8646fd501832 | 142 | float volflow; //L/min |
jelord | 3:122bfc998c4c | 143 | float volflowSet = 1.0; //L/min |
jelord | 3:122bfc998c4c | 144 | int logInerval = 10; //seconds |
jelord | 3:122bfc998c4c | 145 | double secondsD = 0; |
jelord | 3:122bfc998c4c | 146 | double lastsecondD = 0; |
caseyquinn | 9:8646fd501832 | 147 | float massflowSet; |
jelord | 3:122bfc998c4c | 148 | float deltaVflow = 0.0; |
jelord | 3:122bfc998c4c | 149 | float deltaMflow = 0.0; |
caseyquinn | 9:8646fd501832 | 150 | float gainFlow; |
caseyquinn | 9:8646fd501832 | 151 | float sampledVol; //L, total sampled volume |
jelord | 3:122bfc998c4c | 152 | |
caseyquinn | 9:8646fd501832 | 153 | int digital_pot_setpoint; //min = 0x7F, max = 0x00 |
caseyquinn | 9:8646fd501832 | 154 | int digital_pot_set; |
caseyquinn | 9:8646fd501832 | 155 | int digital_pot_change; |
jelord | 3:122bfc998c4c | 156 | int digitalpotMax = 127; |
caseyquinn | 9:8646fd501832 | 157 | int digitalpotMin = 10; |
jelord | 3:122bfc998c4c | 158 | |
caseyquinn | 12:5b4f3245606a | 159 | int dutyUp; |
caseyquinn | 12:5b4f3245606a | 160 | int dutyDown; |
caseyquinn | 12:5b4f3245606a | 161 | |
caseyquinn | 12:5b4f3245606a | 162 | float flat = 0; |
caseyquinn | 12:5b4f3245606a | 163 | float flon = 0; |
jelord | 3:122bfc998c4c | 164 | |
caseyquinn | 12:5b4f3245606a | 165 | uint8_t gpssatellites = 0; |
caseyquinn | 12:5b4f3245606a | 166 | double gpsspeed = 0.0; |
caseyquinn | 12:5b4f3245606a | 167 | double gpslatitude = 0.0; |
caseyquinn | 12:5b4f3245606a | 168 | double gpslongitude = 0.0; |
caseyquinn | 12:5b4f3245606a | 169 | float gpsaltitude = 0.0; |
caseyquinn | 12:5b4f3245606a | 170 | char gpslat = 'W'; |
caseyquinn | 12:5b4f3245606a | 171 | char gpslon = 'N'; |
caseyquinn | 12:5b4f3245606a | 172 | |
caseyquinn | 12:5b4f3245606a | 173 | |
caseyquinn | 12:5b4f3245606a | 174 | float home_lat = 40.580508; |
caseyquinn | 12:5b4f3245606a | 175 | float home_lon = -105.081823; |
caseyquinn | 12:5b4f3245606a | 176 | float work_lat = 40.594062; //40.569136; |
caseyquinn | 12:5b4f3245606a | 177 | float work_lon = -105.075683; //-105.081966; |
caseyquinn | 12:5b4f3245606a | 178 | int location = 0; |
caseyquinn | 12:5b4f3245606a | 179 | |
caseyquinn | 12:5b4f3245606a | 180 | float homeDistance = 99999; |
caseyquinn | 12:5b4f3245606a | 181 | float workDistance = 99999; |
caseyquinn | 12:5b4f3245606a | 182 | |
jelord | 3:122bfc998c4c | 183 | //*************************************************// |
jelord | 3:122bfc998c4c | 184 | |
jelord | 2:88fcbfadec6a | 185 | void sendData(); |
caseyquinn | 11:aa21628a9b15 | 186 | |
caseyquinn | 11:aa21628a9b15 | 187 | |
caseyquinn | 11:aa21628a9b15 | 188 | void pc_recv(){ |
caseyquinn | 11:aa21628a9b15 | 189 | while(pc.readable()){ |
caseyquinn | 11:aa21628a9b15 | 190 | pc.getc(); |
caseyquinn | 11:aa21628a9b15 | 191 | } |
caseyquinn | 11:aa21628a9b15 | 192 | } |
caseyquinn | 11:aa21628a9b15 | 193 | |
jelord | 0:2cb2b2ea316f | 194 | static uint8_t rx_buf[20]; |
jelord | 0:2cb2b2ea316f | 195 | static uint8_t rx_len=0; |
jelord | 1:9fbb5b665068 | 196 | static int haltBLE = 1; |
jelord | 1:9fbb5b665068 | 197 | static int transmissionValue = 0; |
jelord | 2:88fcbfadec6a | 198 | uint8_t writeData[20] = {0,}; |
jelord | 2:88fcbfadec6a | 199 | static uint8_t dataLength = 0; |
jelord | 3:122bfc998c4c | 200 | static int runReady = 0; |
jelord | 3:122bfc998c4c | 201 | static uint8_t startAndEndTime[12] = {0,}; |
caseyquinn | 5:c3252e5d45ca | 202 | |
caseyquinn | 9:8646fd501832 | 203 | ////////////////////////////////////////////////////////////// |
caseyquinn | 9:8646fd501832 | 204 | //BLE Functions |
caseyquinn | 9:8646fd501832 | 205 | ////////////////////////////////////////////////////////////// |
caseyquinn | 9:8646fd501832 | 206 | |
caseyquinn | 9:8646fd501832 | 207 | void uartMicro(){ |
jelord | 3:122bfc998c4c | 208 | if(runReady!=1){ |
jelord | 3:122bfc998c4c | 209 | haltBLE = 2; |
jelord | 3:122bfc998c4c | 210 | while(microChannel.readable()){ |
jelord | 3:122bfc998c4c | 211 | rx_buf[rx_len++] = microChannel.getc(); |
jelord | 2:88fcbfadec6a | 212 | |
jelord | 3:122bfc998c4c | 213 | //Code block to verify what is being transmitted. To function correctly, all data must terminate with \0 or \n |
jelord | 3:122bfc998c4c | 214 | if(transmissionValue==0){ |
jelord | 3:122bfc998c4c | 215 | |
caseyquinn | 4:5d004fd997d5 | 216 | if (rx_buf[0] == 0x01)transmissionValue = 1; //rtc |
jelord | 3:122bfc998c4c | 217 | else if(rx_buf[0] == 0x02)transmissionValue = 2; //sample start and end times |
jelord | 3:122bfc998c4c | 218 | else if(rx_buf[0] == 0x03)transmissionValue = 3; //sample name |
jelord | 3:122bfc998c4c | 219 | else if(rx_buf[0] == 0x04)transmissionValue = 4; //Send Data Check |
jelord | 3:122bfc998c4c | 220 | |
jelord | 3:122bfc998c4c | 221 | else if(rx_buf[0] == 0x05)transmissionValue = 5; //log interval |
jelord | 3:122bfc998c4c | 222 | else if(rx_buf[0] == 0x06)transmissionValue = 6; //Flow Rate |
jelord | 3:122bfc998c4c | 223 | else if(rx_buf[0] == 0x07)transmissionValue = 7; //Serial Number |
jelord | 3:122bfc998c4c | 224 | else if(rx_buf[0] == 0x08)transmissionValue = 8; //Run Enable |
jelord | 3:122bfc998c4c | 225 | else transmissionValue = 100; //Not useful data |
jelord | 3:122bfc998c4c | 226 | } |
jelord | 3:122bfc998c4c | 227 | |
jelord | 3:122bfc998c4c | 228 | if(rx_buf[rx_len-1]=='\0' || rx_buf[rx_len-1]=='\n' || rx_buf[rx_len-1] == 0xff){ |
jelord | 3:122bfc998c4c | 229 | if((transmissionValue == 1 || transmissionValue == 2 || transmissionValue == 3 || transmissionValue == 4 || transmissionValue == 5 || |
jelord | 3:122bfc998c4c | 230 | transmissionValue == 6 || transmissionValue == 7) && rx_buf[rx_len-1] != 0xff) |
jelord | 3:122bfc998c4c | 231 | {}else{ |
caseyquinn | 12:5b4f3245606a | 232 | //if(transmissionValue == 4 ) sendData(); |
jelord | 3:122bfc998c4c | 233 | if(transmissionValue == 8){ |
jelord | 3:122bfc998c4c | 234 | runReady = 1; |
jelord | 3:122bfc998c4c | 235 | microChannel.attach(NULL,microChannel.RxIrq); |
jelord | 3:122bfc998c4c | 236 | } |
jelord | 3:122bfc998c4c | 237 | haltBLE = 1; |
jelord | 3:122bfc998c4c | 238 | transmissionValue = 0; |
jelord | 3:122bfc998c4c | 239 | dataLength = 0; |
jelord | 2:88fcbfadec6a | 240 | |
jelord | 3:122bfc998c4c | 241 | } |
jelord | 2:88fcbfadec6a | 242 | } |
jelord | 1:9fbb5b665068 | 243 | } |
caseyquinn | 12:5b4f3245606a | 244 | |
jelord | 3:122bfc998c4c | 245 | if(haltBLE!=1){ |
jelord | 2:88fcbfadec6a | 246 | |
jelord | 3:122bfc998c4c | 247 | if((transmissionValue!=100) && (dataLength!= 0)) writeData[dataLength-1] = rx_buf[0]; |
jelord | 3:122bfc998c4c | 248 | |
jelord | 3:122bfc998c4c | 249 | if(transmissionValue ==100){ |
caseyquinn | 10:06fbb1c9e3bd | 250 | pc.putc(rx_buf[0]); |
jelord | 2:88fcbfadec6a | 251 | |
jelord | 3:122bfc998c4c | 252 | }else if(transmissionValue ==1){ //process and store RTC values |
jelord | 3:122bfc998c4c | 253 | |
caseyquinn | 7:29b01d5812ee | 254 | //if(dataLength==6)RTC_UPAS.set_time(writeData[0],writeData[1],writeData[2],writeData[3],writeData[3],writeData[4],writeData[5]);//sets chronodot RTC |
caseyquinn | 7:29b01d5812ee | 255 | if(dataLength==6){ |
caseyquinn | 12:5b4f3245606a | 256 | //RTC_UPAS.set_time(writeData[0],writeData[1],writeData[2],writeData[3],writeData[3],writeData[4],writeData[5]);//sets chronodot RTC |
caseyquinn | 12:5b4f3245606a | 257 | /////////////////////// |
caseyquinn | 7:29b01d5812ee | 258 | //sets ST RTC |
caseyquinn | 12:5b4f3245606a | 259 | ////////////////////// |
caseyquinn | 7:29b01d5812ee | 260 | STtime.tm_sec = writeData[0]; // 0-59 |
caseyquinn | 7:29b01d5812ee | 261 | STtime.tm_min = writeData[1]; // 0-59 |
caseyquinn | 7:29b01d5812ee | 262 | STtime.tm_hour = writeData[2]; // 0-23 |
caseyquinn | 7:29b01d5812ee | 263 | STtime.tm_mday = writeData[3]; // 1-31 |
caseyquinn | 7:29b01d5812ee | 264 | STtime.tm_mon = writeData[4]-1; // 0-11 |
caseyquinn | 7:29b01d5812ee | 265 | STtime.tm_year = 100+writeData[5]; // year since 1900 (116 = 2016) |
caseyquinn | 7:29b01d5812ee | 266 | time_t STseconds = mktime(&STtime); |
caseyquinn | 12:5b4f3245606a | 267 | set_time(STseconds); // Set RTC time |
caseyquinn | 7:29b01d5812ee | 268 | } |
jelord | 3:122bfc998c4c | 269 | |
caseyquinn | 12:5b4f3245606a | 270 | } |
caseyquinn | 12:5b4f3245606a | 271 | /*else if(transmissionValue ==2){ //process and store sample start/end |
jelord | 3:122bfc998c4c | 272 | if(dataLength ==12)E2PROM.write(0x00015, writeData, 12); |
jelord | 3:122bfc998c4c | 273 | |
jelord | 3:122bfc998c4c | 274 | }else if(transmissionValue ==3){ //process and store sample name |
jelord | 3:122bfc998c4c | 275 | if(dataLength ==8)E2PROM.write(0x00001,writeData,8); |
jelord | 3:122bfc998c4c | 276 | |
jelord | 3:122bfc998c4c | 277 | }else if(transmissionValue ==5){ //process and store Log Interval |
jelord | 3:122bfc998c4c | 278 | if(dataLength ==1)E2PROM.write(0x00014,writeData,1); |
jelord | 2:88fcbfadec6a | 279 | |
jelord | 3:122bfc998c4c | 280 | }else if(transmissionValue ==6){ //process and store Flow Rate |
jelord | 3:122bfc998c4c | 281 | if(dataLength ==4)E2PROM.write(0x00010,writeData,4); |
jelord | 3:122bfc998c4c | 282 | |
jelord | 3:122bfc998c4c | 283 | }else if(transmissionValue ==7){ //process and store Serial Number |
jelord | 3:122bfc998c4c | 284 | if(dataLength ==2)E2PROM.write(0x00034,writeData,2); |
jelord | 3:122bfc998c4c | 285 | } |
caseyquinn | 12:5b4f3245606a | 286 | */ |
jelord | 3:122bfc998c4c | 287 | dataLength++; |
jelord | 1:9fbb5b665068 | 288 | } |
jelord | 3:122bfc998c4c | 289 | |
jelord | 3:122bfc998c4c | 290 | rx_len = 0; |
jelord | 3:122bfc998c4c | 291 | }else{ |
jelord | 3:122bfc998c4c | 292 | while(microChannel.readable()) |
jelord | 3:122bfc998c4c | 293 | uint8_t extract = microChannel.getc(); |
jelord | 3:122bfc998c4c | 294 | } |
jelord | 2:88fcbfadec6a | 295 | |
caseyquinn | 12:5b4f3245606a | 296 | |
jelord | 2:88fcbfadec6a | 297 | } |
caseyquinn | 12:5b4f3245606a | 298 | /* |
jelord | 2:88fcbfadec6a | 299 | void sendData(){ |
jelord | 2:88fcbfadec6a | 300 | |
jelord | 2:88fcbfadec6a | 301 | uint8_t sampleTimePassValues[13] = {0x01,}; |
jelord | 2:88fcbfadec6a | 302 | uint8_t subjectLabelOriginal[9] = {0x02,}; |
jelord | 2:88fcbfadec6a | 303 | uint8_t dataLogOriginal[2] = {0x03,}; |
jelord | 2:88fcbfadec6a | 304 | uint8_t flowRateOriginal[5] = {0x04,}; |
jelord | 2:88fcbfadec6a | 305 | //uint8_t presetRunModeCheck[1] = {0,}; Commented and currently unused to prevent mem issues |
jelord | 2:88fcbfadec6a | 306 | E2PROM.read(0x00015, sampleTimePassValues+1, 12); |
jelord | 2:88fcbfadec6a | 307 | E2PROM.read(0x00001, subjectLabelOriginal+1,8); |
jelord | 2:88fcbfadec6a | 308 | E2PROM.read(0x00014,dataLogOriginal+1,1); |
jelord | 2:88fcbfadec6a | 309 | E2PROM.read(0x00010,flowRateOriginal+1,4); |
jelord | 2:88fcbfadec6a | 310 | |
jelord | 2:88fcbfadec6a | 311 | for(int i=0; i<13; i++){ |
jelord | 2:88fcbfadec6a | 312 | microChannel.putc(sampleTimePassValues[i]); |
jelord | 2:88fcbfadec6a | 313 | } |
jelord | 2:88fcbfadec6a | 314 | wait(.25); |
jelord | 2:88fcbfadec6a | 315 | |
jelord | 2:88fcbfadec6a | 316 | for(int i=0; i<9; i++){ |
jelord | 2:88fcbfadec6a | 317 | microChannel.putc(subjectLabelOriginal[i]); |
jelord | 2:88fcbfadec6a | 318 | } |
jelord | 2:88fcbfadec6a | 319 | wait(.25); |
jelord | 2:88fcbfadec6a | 320 | |
jelord | 2:88fcbfadec6a | 321 | for(int i=0; i<2; i++){ |
jelord | 2:88fcbfadec6a | 322 | microChannel.putc(dataLogOriginal[i]); |
jelord | 2:88fcbfadec6a | 323 | } |
jelord | 2:88fcbfadec6a | 324 | wait(.25); |
jelord | 2:88fcbfadec6a | 325 | |
jelord | 2:88fcbfadec6a | 326 | for(int i=0; i<5; i++){ |
jelord | 2:88fcbfadec6a | 327 | microChannel.putc(flowRateOriginal[i]); |
jelord | 2:88fcbfadec6a | 328 | } |
jelord | 0:2cb2b2ea316f | 329 | |
jelord | 2:88fcbfadec6a | 330 | |
jelord | 2:88fcbfadec6a | 331 | } |
caseyquinn | 12:5b4f3245606a | 332 | */ |
caseyquinn | 12:5b4f3245606a | 333 | ////////////////////////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 334 | // GPS: Degree-minute format to decimal-degrees |
caseyquinn | 12:5b4f3245606a | 335 | ////////////////////////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 336 | double convertDegMinToDecDeg (float degMin) |
caseyquinn | 12:5b4f3245606a | 337 | { |
caseyquinn | 12:5b4f3245606a | 338 | double min = 0.0; |
caseyquinn | 12:5b4f3245606a | 339 | double decDeg = 0.0; |
caseyquinn | 12:5b4f3245606a | 340 | |
caseyquinn | 12:5b4f3245606a | 341 | //get the minutes, fmod() requires double |
caseyquinn | 12:5b4f3245606a | 342 | min = fmod((double)degMin, 100.0); |
caseyquinn | 12:5b4f3245606a | 343 | |
caseyquinn | 12:5b4f3245606a | 344 | //rebuild coordinates in decimal degrees |
caseyquinn | 12:5b4f3245606a | 345 | degMin = (int) ( degMin / 100 ); |
caseyquinn | 12:5b4f3245606a | 346 | decDeg = degMin + ( min / 60 ); |
caseyquinn | 12:5b4f3245606a | 347 | |
caseyquinn | 12:5b4f3245606a | 348 | return decDeg; |
caseyquinn | 12:5b4f3245606a | 349 | } |
caseyquinn | 12:5b4f3245606a | 350 | |
caseyquinn | 12:5b4f3245606a | 351 | ////////////////////////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 352 | // GPS: Calculate distance from target location |
caseyquinn | 12:5b4f3245606a | 353 | ////////////////////////////////////////////////////////////// |
caseyquinn | 12:5b4f3245606a | 354 | double GPSdistanceCalc (float tlat, float tlon) |
caseyquinn | 12:5b4f3245606a | 355 | { |
caseyquinn | 12:5b4f3245606a | 356 | |
caseyquinn | 12:5b4f3245606a | 357 | |
caseyquinn | 12:5b4f3245606a | 358 | |
caseyquinn | 12:5b4f3245606a | 359 | float tlatrad, flatrad; |
caseyquinn | 12:5b4f3245606a | 360 | float sdlong, cdlong; |
caseyquinn | 12:5b4f3245606a | 361 | float sflat, cflat; |
caseyquinn | 12:5b4f3245606a | 362 | float stlat, ctlat; |
caseyquinn | 12:5b4f3245606a | 363 | float delta, denom; |
caseyquinn | 12:5b4f3245606a | 364 | |
caseyquinn | 12:5b4f3245606a | 365 | double distance; |
caseyquinn | 12:5b4f3245606a | 366 | delta = (flon-tlon)*0.0174532925; |
caseyquinn | 12:5b4f3245606a | 367 | sdlong = sin(delta); |
caseyquinn | 12:5b4f3245606a | 368 | cdlong = cos(delta); |
caseyquinn | 12:5b4f3245606a | 369 | flatrad = (flat)*0.0174532925; |
caseyquinn | 12:5b4f3245606a | 370 | tlatrad = (tlat)*0.0174532925; |
caseyquinn | 12:5b4f3245606a | 371 | sflat = sin(flatrad); |
caseyquinn | 12:5b4f3245606a | 372 | cflat = cos(flatrad); |
caseyquinn | 12:5b4f3245606a | 373 | stlat = sin(tlatrad); |
caseyquinn | 12:5b4f3245606a | 374 | ctlat = cos(tlatrad); |
caseyquinn | 12:5b4f3245606a | 375 | delta = (cflat * stlat) - (sflat * ctlat * cdlong); |
caseyquinn | 12:5b4f3245606a | 376 | delta = pow(delta,2); |
caseyquinn | 12:5b4f3245606a | 377 | delta += pow(ctlat * sdlong,2); |
caseyquinn | 12:5b4f3245606a | 378 | delta = sqrt(delta); |
caseyquinn | 12:5b4f3245606a | 379 | denom = (sflat * stlat) + (cflat * ctlat * cdlong); |
caseyquinn | 12:5b4f3245606a | 380 | delta = atan2(delta, denom); |
caseyquinn | 12:5b4f3245606a | 381 | distance = delta * 6372795; |
caseyquinn | 12:5b4f3245606a | 382 | return distance; |
caseyquinn | 12:5b4f3245606a | 383 | } |
caseyquinn | 12:5b4f3245606a | 384 | |
caseyquinn | 5:c3252e5d45ca | 385 | |
caseyquinn | 9:8646fd501832 | 386 | ////////////////////////////////////////////////////////////// |
caseyquinn | 9:8646fd501832 | 387 | //Shutdown Function |
caseyquinn | 9:8646fd501832 | 388 | ////////////////////////////////////////////////////////////// |
jelord | 3:122bfc998c4c | 389 | void check_stop() // this checks if it's time to stop and shutdown |
jelord | 3:122bfc998c4c | 390 | { |
caseyquinn | 9:8646fd501832 | 391 | //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
caseyquinn | 9:8646fd501832 | 392 | //UPDATE THIS TO WORK WITH ST RTC INSTEAD |
caseyquinn | 9:8646fd501832 | 393 | //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
caseyquinn | 12:5b4f3245606a | 394 | /* |
jelord | 3:122bfc998c4c | 395 | if(RTC_UPAS.compare(startAndEndTime[6], startAndEndTime[7], startAndEndTime[8], startAndEndTime[9], startAndEndTime[10], startAndEndTime[11])) { |
jelord | 3:122bfc998c4c | 396 | pbKill = 0; // this is were we shut everything down |
caseyquinn | 4:5d004fd997d5 | 397 | //pc.printf("If you're reading this something has gone very wrong."); |
jelord | 3:122bfc998c4c | 398 | } |
caseyquinn | 12:5b4f3245606a | 399 | */ |
jelord | 3:122bfc998c4c | 400 | } |
caseyquinn | 5:c3252e5d45ca | 401 | |
caseyquinn | 9:8646fd501832 | 402 | ////////////////////////////////////////////////////////////// |
caseyquinn | 9:8646fd501832 | 403 | //SD Logging Function |
caseyquinn | 9:8646fd501832 | 404 | ////////////////////////////////////////////////////////////// |
jelord | 3:122bfc998c4c | 405 | void log_data() |
jelord | 3:122bfc998c4c | 406 | { |
caseyquinn | 13:455601f62aad | 407 | /* |
caseyquinn | 12:5b4f3245606a | 408 | //RGB_LED.set_led(1,1,0); |
caseyquinn | 7:29b01d5812ee | 409 | |
caseyquinn | 7:29b01d5812ee | 410 | time_t seconds = time(NULL); |
caseyquinn | 7:29b01d5812ee | 411 | strftime(timestr, 32, "%y%m%d%H%M%S", localtime(&seconds)); |
caseyquinn | 13:455601f62aad | 412 | |
caseyquinn | 9:8646fd501832 | 413 | RTC_UPAS.get_time(); |
caseyquinn | 7:29b01d5812ee | 414 | press = bmesensor.getPressure(); |
caseyquinn | 7:29b01d5812ee | 415 | temp = bmesensor.getTemperature()-5.0; |
caseyquinn | 7:29b01d5812ee | 416 | rh = bmesensor.getHumidity(); |
caseyquinn | 7:29b01d5812ee | 417 | uv = lightsensor.getUV(); |
caseyquinn | 7:29b01d5812ee | 418 | |
caseyquinn | 12:5b4f3245606a | 419 | gps.read(1); |
caseyquinn | 12:5b4f3245606a | 420 | |
caseyquinn | 12:5b4f3245606a | 421 | gpsspeed = gps.speed; |
caseyquinn | 12:5b4f3245606a | 422 | gpssatellites = gps.satellites; |
caseyquinn | 12:5b4f3245606a | 423 | gpslatitude = gps.lat; |
caseyquinn | 12:5b4f3245606a | 424 | // gpslat = 'N'; //gps.lat; need to fix this (if statement?) |
caseyquinn | 12:5b4f3245606a | 425 | gpslongitude = gps.lon; |
caseyquinn | 12:5b4f3245606a | 426 | // gpslon = 'W'; //gps.lon; need to fix this (if statement?) |
caseyquinn | 12:5b4f3245606a | 427 | gpsaltitude = gps.altitude; |
caseyquinn | 12:5b4f3245606a | 428 | |
caseyquinn | 12:5b4f3245606a | 429 | if (abs(gpslatitude) > 0 && abs(gpslongitude) > 0) { |
caseyquinn | 12:5b4f3245606a | 430 | |
caseyquinn | 12:5b4f3245606a | 431 | if(gpslat == 'S') |
caseyquinn | 12:5b4f3245606a | 432 | { |
caseyquinn | 12:5b4f3245606a | 433 | flat = convertDegMinToDecDeg (gpslatitude) * -1; |
caseyquinn | 12:5b4f3245606a | 434 | } |
caseyquinn | 12:5b4f3245606a | 435 | else |
caseyquinn | 12:5b4f3245606a | 436 | { |
caseyquinn | 12:5b4f3245606a | 437 | flat = convertDegMinToDecDeg (gpslatitude); |
caseyquinn | 12:5b4f3245606a | 438 | } |
caseyquinn | 12:5b4f3245606a | 439 | |
caseyquinn | 12:5b4f3245606a | 440 | if(gpslon == 'W') |
caseyquinn | 12:5b4f3245606a | 441 | { |
caseyquinn | 12:5b4f3245606a | 442 | flon = convertDegMinToDecDeg (gpslongitude) * -1; |
caseyquinn | 12:5b4f3245606a | 443 | } |
caseyquinn | 12:5b4f3245606a | 444 | else |
caseyquinn | 12:5b4f3245606a | 445 | { |
caseyquinn | 12:5b4f3245606a | 446 | flon = convertDegMinToDecDeg (gpslongitude); |
caseyquinn | 12:5b4f3245606a | 447 | } |
caseyquinn | 12:5b4f3245606a | 448 | |
caseyquinn | 12:5b4f3245606a | 449 | workDistance = GPSdistanceCalc (work_lat, work_lon); |
caseyquinn | 12:5b4f3245606a | 450 | homeDistance = GPSdistanceCalc (home_lat, home_lon); |
caseyquinn | 12:5b4f3245606a | 451 | } |
caseyquinn | 12:5b4f3245606a | 452 | |
caseyquinn | 12:5b4f3245606a | 453 | if (homeDistance == 99999 && workDistance == 99999) { |
caseyquinn | 12:5b4f3245606a | 454 | // digitalWrite (work_yellow_led, HIGH); |
caseyquinn | 12:5b4f3245606a | 455 | // digitalWrite (home_green_led, HIGH); |
caseyquinn | 12:5b4f3245606a | 456 | // digitalWrite (travel_red_led, HIGH); |
caseyquinn | 12:5b4f3245606a | 457 | location = 0; |
caseyquinn | 12:5b4f3245606a | 458 | } |
caseyquinn | 12:5b4f3245606a | 459 | |
caseyquinn | 12:5b4f3245606a | 460 | else if (workDistance < 30) { |
caseyquinn | 12:5b4f3245606a | 461 | // digitalWrite (work_yellow_led, HIGH); |
caseyquinn | 12:5b4f3245606a | 462 | // digitalWrite (home_green_led, LOW); |
caseyquinn | 12:5b4f3245606a | 463 | // digitalWrite (travel_red_led, LOW); |
caseyquinn | 12:5b4f3245606a | 464 | location = 1; |
caseyquinn | 12:5b4f3245606a | 465 | } |
caseyquinn | 12:5b4f3245606a | 466 | |
caseyquinn | 12:5b4f3245606a | 467 | else if (homeDistance < 20) { |
caseyquinn | 12:5b4f3245606a | 468 | // digitalWrite (work_yellow_led, LOW); |
caseyquinn | 12:5b4f3245606a | 469 | // digitalWrite (home_green_led, HIGH); |
caseyquinn | 12:5b4f3245606a | 470 | // digitalWrite (travel_red_led, LOW); |
caseyquinn | 12:5b4f3245606a | 471 | location = 2; |
caseyquinn | 12:5b4f3245606a | 472 | } |
caseyquinn | 12:5b4f3245606a | 473 | |
caseyquinn | 12:5b4f3245606a | 474 | else { |
caseyquinn | 12:5b4f3245606a | 475 | // digitalWrite (work_yellow_led, LOW); |
caseyquinn | 12:5b4f3245606a | 476 | // digitalWrite (home_green_led, LOW); |
caseyquinn | 12:5b4f3245606a | 477 | // digitalWrite (travel_red_led, HIGH); |
caseyquinn | 12:5b4f3245606a | 478 | location = 3; |
caseyquinn | 12:5b4f3245606a | 479 | } |
caseyquinn | 12:5b4f3245606a | 480 | |
caseyquinn | 12:5b4f3245606a | 481 | |
caseyquinn | 7:29b01d5812ee | 482 | FILE *fp = fopen(filename, "a"); |
caseyquinn | 9:8646fd501832 | 483 | fprintf(fp, "%02d,%02d,%02d,%02d,%02d,%02d,",RTC_UPAS.year, RTC_UPAS.month,RTC_UPAS.date,RTC_UPAS.hour,RTC_UPAS.minutes,RTC_UPAS.seconds); |
caseyquinn | 7:29b01d5812ee | 484 | fprintf(fp, "%s,", timestr); |
caseyquinn | 7:29b01d5812ee | 485 | fprintf(fp, "%1.3f,%1.3f,%2.2f,%4.2f,%2.1f,%1.3f,", omronVolt,massflow,temp,press,rh,atmoRho); |
caseyquinn | 7:29b01d5812ee | 486 | fprintf(fp, "%1.3f,%5.1f,%1.1f,%1.1f,%1.1f,%1.1f,", volflow, sampledVol, accel_x, accel_y, accel_z, accel_comp); |
caseyquinn | 7:29b01d5812ee | 487 | fprintf(fp, "%.1f,%.1f,%.1f,%.3f,%.3f,%.3f,%.1f,", angle_x,angle_y,angle_z,mag_x, mag_y, mag_z,compass); |
caseyquinn | 7:29b01d5812ee | 488 | fprintf(fp, "%d,%d,%d,%d,%d,%d," ,uv,omronReading, vInReading, vBlowerReading, omronDiff,gasG.getAmps()); |
caseyquinn | 12:5b4f3245606a | 489 | fprintf(fp, "%d,%d,%d,%1.3f,%1.3f,", gasG.getVolts(), gasG.getCharge(),digital_pot_set, deltaMflow, deltaVflow); |
caseyquinn | 12:5b4f3245606a | 490 | fprintf(fp, "%.4f,%.4f,%06d,%06d,%f,%d,%f,\r\n", gps.lat, gps.lon, (long)gps.date, (long)gps.utc, gpsspeed, gpssatellites, gpsaltitude); // test and add in speed, etc that Josh added in to match the adafruit GPS |
caseyquinn | 7:29b01d5812ee | 491 | fclose(fp); |
caseyquinn | 7:29b01d5812ee | 492 | free(fp); |
caseyquinn | 7:29b01d5812ee | 493 | RGB_LED.set_led(1,0,0); |
caseyquinn | 12:5b4f3245606a | 494 | */ |
caseyquinn | 12:5b4f3245606a | 495 | |
caseyquinn | 12:5b4f3245606a | 496 | pc.printf("%s,", timestr); |
caseyquinn | 12:5b4f3245606a | 497 | |
jelord | 3:122bfc998c4c | 498 | |
jelord | 3:122bfc998c4c | 499 | } |
caseyquinn | 8:c4a8f9b67cee | 500 | |
caseyquinn | 9:8646fd501832 | 501 | ////////////////////////////////////////////////////////////// |
caseyquinn | 9:8646fd501832 | 502 | //Flow Control Function |
caseyquinn | 9:8646fd501832 | 503 | ////////////////////////////////////////////////////////////// |
caseyquinn | 8:c4a8f9b67cee | 504 | void flowControl() |
caseyquinn | 8:c4a8f9b67cee | 505 | { |
caseyquinn | 12:5b4f3245606a | 506 | /* |
caseyquinn | 8:c4a8f9b67cee | 507 | RGB_LED.set_led(0,1,0); |
caseyquinn | 8:c4a8f9b67cee | 508 | omronReading = ads.readADC_SingleEnded(0, 0xC583); // read channel 0 PGA = 2 : Full Scale Range = 2.048V |
caseyquinn | 8:c4a8f9b67cee | 509 | omronVolt = (omronReading*4.096)/(32768*2); |
caseyquinn | 8:c4a8f9b67cee | 510 | |
caseyquinn | 8:c4a8f9b67cee | 511 | if(omronVolt<=calibrations.omronVMin) { |
caseyquinn | 8:c4a8f9b67cee | 512 | massflow = calibrations.omronMFMin; |
caseyquinn | 8:c4a8f9b67cee | 513 | } else if(omronVolt>=calibrations.omronVMax) { |
caseyquinn | 8:c4a8f9b67cee | 514 | massflow = calibrations.omronMFMax; |
caseyquinn | 8:c4a8f9b67cee | 515 | } else { |
caseyquinn | 8:c4a8f9b67cee | 516 | massflow = calibrations.MF4*pow(omronVolt,(float)4)+calibrations.MF3*pow(omronVolt,(float)3)+calibrations.MF2*pow(omronVolt,(float)2)+calibrations.MF1*omronVolt+calibrations.MF0; |
caseyquinn | 8:c4a8f9b67cee | 517 | } |
caseyquinn | 8:c4a8f9b67cee | 518 | |
caseyquinn | 8:c4a8f9b67cee | 519 | atmoRho = ((press-((6.1078*pow((float)10,(float)((7.5*temp)/(237.3+temp))))*(rh/100)))*100)/(287.0531*(temp+273.15))+((6.1078*pow((float)10,(float)((7.5*temp)/(237.3+temp))))*(rh/100)*100)/(461.4964*(temp+273.15)); |
caseyquinn | 8:c4a8f9b67cee | 520 | volflow = massflow/atmoRho; |
caseyquinn | 8:c4a8f9b67cee | 521 | sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow); |
caseyquinn | 8:c4a8f9b67cee | 522 | deltaVflow = volflow-volflowSet; |
caseyquinn | 8:c4a8f9b67cee | 523 | massflowSet = volflowSet*atmoRho; |
caseyquinn | 8:c4a8f9b67cee | 524 | deltaMflow = massflow-massflowSet; |
caseyquinn | 12:5b4f3245606a | 525 | |
caseyquinn | 8:c4a8f9b67cee | 526 | if(abs(deltaMflow)>.025) { |
caseyquinn | 8:c4a8f9b67cee | 527 | digital_pot_change = (int)(gainFlow*deltaMflow); |
caseyquinn | 8:c4a8f9b67cee | 528 | |
caseyquinn | 8:c4a8f9b67cee | 529 | |
caseyquinn | 12:5b4f3245606a | 530 | if(abs(digital_pot_change)>=10) { |
caseyquinn | 12:5b4f3245606a | 531 | digital_pot_set = (int)(digital_pot_set+ (int)(1*deltaMflow)); |
caseyquinn | 12:5b4f3245606a | 532 | RGB_LED.set_led(1,0,0); |
caseyquinn | 12:5b4f3245606a | 533 | } else { |
caseyquinn | 8:c4a8f9b67cee | 534 | digital_pot_set = (digital_pot_set+ digital_pot_change); |
caseyquinn | 12:5b4f3245606a | 535 | RGB_LED.set_led(1,1,0); |
caseyquinn | 8:c4a8f9b67cee | 536 | } |
caseyquinn | 8:c4a8f9b67cee | 537 | |
caseyquinn | 12:5b4f3245606a | 538 | if(digital_pot_set>=digitalpotMax) { |
caseyquinn | 12:5b4f3245606a | 539 | digital_pot_set = digitalpotMax; |
caseyquinn | 12:5b4f3245606a | 540 | RGB_LED.set_led(1,0,0); |
caseyquinn | 12:5b4f3245606a | 541 | } else if(digital_pot_set<=digitalpotMin) { |
caseyquinn | 12:5b4f3245606a | 542 | digital_pot_set = digitalpotMin; |
caseyquinn | 12:5b4f3245606a | 543 | RGB_LED.set_led(1,0,0); |
caseyquinn | 12:5b4f3245606a | 544 | } |
caseyquinn | 8:c4a8f9b67cee | 545 | |
caseyquinn | 8:c4a8f9b67cee | 546 | DigPot.writeRegister(digital_pot_set); |
caseyquinn | 12:5b4f3245606a | 547 | |
caseyquinn | 8:c4a8f9b67cee | 548 | } else { |
caseyquinn | 12:5b4f3245606a | 549 | RGB_LED.set_led(0,1,0); |
caseyquinn | 8:c4a8f9b67cee | 550 | } |
caseyquinn | 12:5b4f3245606a | 551 | |
caseyquinn | 12:5b4f3245606a | 552 | */ |
caseyquinn | 8:c4a8f9b67cee | 553 | } |
caseyquinn | 9:8646fd501832 | 554 | ////////////////////////////////////////////////////////////// |
caseyquinn | 9:8646fd501832 | 555 | //Main Function |
caseyquinn | 9:8646fd501832 | 556 | ////////////////////////////////////////////////////////////// |
jelord | 1:9fbb5b665068 | 557 | int main(){ |
caseyquinn | 7:29b01d5812ee | 558 | |
caseyquinn | 12:5b4f3245606a | 559 | /* |
caseyquinn | 12:5b4f3245606a | 560 | motor1.drive(254); //closed = 253, open = 254 |
caseyquinn | 12:5b4f3245606a | 561 | motor2.drive(253); //closed = 253, open = 254 |
caseyquinn | 12:5b4f3245606a | 562 | motor3.drive(253); //closed = 253, open = 254 |
caseyquinn | 12:5b4f3245606a | 563 | motor4.drive(253); //closed = 253, open = 254 |
caseyquinn | 12:5b4f3245606a | 564 | |
caseyquinn | 12:5b4f3245606a | 565 | wait(1); |
caseyquinn | 12:5b4f3245606a | 566 | motor1.stop(); |
caseyquinn | 12:5b4f3245606a | 567 | motor2.stop(); |
caseyquinn | 12:5b4f3245606a | 568 | motor3.stop(); |
caseyquinn | 12:5b4f3245606a | 569 | motor4.stop(); |
caseyquinn | 13:455601f62aad | 570 | |
caseyquinn | 12:5b4f3245606a | 571 | |
caseyquinn | 10:06fbb1c9e3bd | 572 | pc.baud(115200); // set what you want here depending on your terminal program speed |
caseyquinn | 10:06fbb1c9e3bd | 573 | pc.printf("\f\n\r-------------Startup-------------\n\r"); |
jelord | 1:9fbb5b665068 | 574 | wait(0.5); |
caseyquinn | 5:c3252e5d45ca | 575 | |
caseyquinn | 12:5b4f3245606a | 576 | |
jelord | 3:122bfc998c4c | 577 | uint8_t serialNumberAndType[6] = {0x50,0x53}; |
caseyquinn | 13:455601f62aad | 578 | |
jelord | 3:122bfc998c4c | 579 | E2PROM.read(0x00034,serialNumberAndType+2,2); |
caseyquinn | 4:5d004fd997d5 | 580 | |
jelord | 3:122bfc998c4c | 581 | int tempSerialNum = serialNumberAndType[2]+serialNumberAndType[3]; |
jelord | 3:122bfc998c4c | 582 | int serialNumDigits[4]; |
jelord | 3:122bfc998c4c | 583 | serialNumDigits[0] = tempSerialNum / 1000 % 10; |
jelord | 3:122bfc998c4c | 584 | serialNumDigits[1] = tempSerialNum / 100 % 10; |
jelord | 3:122bfc998c4c | 585 | serialNumDigits[2] = tempSerialNum / 10 % 10; |
jelord | 3:122bfc998c4c | 586 | serialNumDigits[3] = tempSerialNum % 10; |
jelord | 3:122bfc998c4c | 587 | |
jelord | 3:122bfc998c4c | 588 | serialNumberAndType[2] = serialNumDigits[0]+48; |
jelord | 3:122bfc998c4c | 589 | serialNumberAndType[3] = serialNumDigits[1]+48; |
jelord | 3:122bfc998c4c | 590 | serialNumberAndType[4] = serialNumDigits[2]+48; |
jelord | 3:122bfc998c4c | 591 | serialNumberAndType[5] = serialNumDigits[3]+48; |
caseyquinn | 12:5b4f3245606a | 592 | |
caseyquinn | 5:c3252e5d45ca | 593 | RGB_LED.set_led(0,1,0); |
caseyquinn | 13:455601f62aad | 594 | |
caseyquinn | 10:06fbb1c9e3bd | 595 | pc.attach(pc_recv); |
jelord | 1:9fbb5b665068 | 596 | microChannel.attach(uartMicro,microChannel.RxIrq); |
jelord | 3:122bfc998c4c | 597 | microChannel.baud(115200); |
jelord | 1:9fbb5b665068 | 598 | microChannel.printf("$$$"); |
jelord | 3:122bfc998c4c | 599 | wait(0.5); |
jelord | 3:122bfc998c4c | 600 | microChannel.printf("SN,"); |
jelord | 3:122bfc998c4c | 601 | for(int i=0;i<6;i++)microChannel.putc(serialNumberAndType[i]); |
jelord | 3:122bfc998c4c | 602 | microChannel.printf("\r"); |
jelord | 3:122bfc998c4c | 603 | wait(0.5); |
jelord | 1:9fbb5b665068 | 604 | microChannel.printf("A\r"); |
jelord | 3:122bfc998c4c | 605 | wait(0.5); |
jelord | 2:88fcbfadec6a | 606 | microChannel.printf("---\r"); |
jelord | 3:122bfc998c4c | 607 | wait(0.5); |
jelord | 2:88fcbfadec6a | 608 | |
caseyquinn | 12:5b4f3245606a | 609 | //RGB_LED.set_led(1,1,1); |
jelord | 3:122bfc998c4c | 610 | while(runReady!=1) { |
jelord | 3:122bfc998c4c | 611 | wait(1); |
caseyquinn | 11:aa21628a9b15 | 612 | pc.printf("Waiting for BLE instruction"); |
jelord | 3:122bfc998c4c | 613 | |
jelord | 3:122bfc998c4c | 614 | } |
jelord | 3:122bfc998c4c | 615 | |
caseyquinn | 12:5b4f3245606a | 616 | /* |
jelord | 3:122bfc998c4c | 617 | E2PROM.read(0x00015, startAndEndTime, 12); //Grab start and end times from EEPROM |
jelord | 3:122bfc998c4c | 618 | RGB_LED.set_led(0,1,0); |
caseyquinn | 12:5b4f3245606a | 619 | */ |
caseyquinn | 7:29b01d5812ee | 620 | //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
caseyquinn | 7:29b01d5812ee | 621 | //UPDATE THIS TO WORK WITH ST RTC INSTEAD |
caseyquinn | 7:29b01d5812ee | 622 | //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
caseyquinn | 12:5b4f3245606a | 623 | /* |
jelord | 3:122bfc998c4c | 624 | while(!RTC_UPAS.compare(startAndEndTime[0], startAndEndTime[1], startAndEndTime[2], startAndEndTime[3], startAndEndTime[4], startAndEndTime[5])) { // this while waits for the start time by looping until the start time |
jelord | 3:122bfc998c4c | 625 | wait(0.5); |
jelord | 3:122bfc998c4c | 626 | |
jelord | 3:122bfc998c4c | 627 | RTC_UPAS.get_time(); |
jelord | 3:122bfc998c4c | 628 | |
jelord | 3:122bfc998c4c | 629 | } |
caseyquinn | 12:5b4f3245606a | 630 | */ |
caseyquinn | 12:5b4f3245606a | 631 | /* |
jelord | 3:122bfc998c4c | 632 | |
jelord | 3:122bfc998c4c | 633 | //Get the proper serial number |
jelord | 3:122bfc998c4c | 634 | uint8_t serialBytes[2] = {0,}; |
jelord | 3:122bfc998c4c | 635 | E2PROM.read(0x00034, serialBytes,2); |
jelord | 3:122bfc998c4c | 636 | serial_num = ((uint16_t)serialBytes[1] << 8) | serialBytes[0]; |
jelord | 3:122bfc998c4c | 637 | calibrations.initialize(serial_num); |
jelord | 3:122bfc998c4c | 638 | |
jelord | 3:122bfc998c4c | 639 | uint8_t logByte[1] = {0,}; |
jelord | 3:122bfc998c4c | 640 | E2PROM.read(0x00014,logByte,1); |
jelord | 3:122bfc998c4c | 641 | logInerval = logByte[0]; |
jelord | 3:122bfc998c4c | 642 | |
jelord | 3:122bfc998c4c | 643 | //Use the flow rate value stored in eeprom |
jelord | 3:122bfc998c4c | 644 | uint8_t flowRateBytes[4] = {0,}; |
jelord | 3:122bfc998c4c | 645 | E2PROM.read(0x00010,flowRateBytes,4); |
jelord | 3:122bfc998c4c | 646 | E2PROM.byteToFloat(flowRateBytes, &volflowSet); |
jelord | 3:122bfc998c4c | 647 | |
jelord | 3:122bfc998c4c | 648 | if(volflowSet<=1.0) { |
jelord | 3:122bfc998c4c | 649 | gainFlow = 100; |
jelord | 3:122bfc998c4c | 650 | } else if(volflowSet>=2.0) { |
jelord | 3:122bfc998c4c | 651 | gainFlow = 25; |
jelord | 3:122bfc998c4c | 652 | } else { |
jelord | 3:122bfc998c4c | 653 | gainFlow = 25; |
jelord | 0:2cb2b2ea316f | 654 | } |
jelord | 3:122bfc998c4c | 655 | |
jelord | 3:122bfc998c4c | 656 | RGB_LED.set_led(1,0,0); |
jelord | 3:122bfc998c4c | 657 | press = bmesensor.getPressure(); |
jelord | 3:122bfc998c4c | 658 | temp = bmesensor.getTemperature(); |
jelord | 3:122bfc998c4c | 659 | rh = bmesensor.getHumidity(); |
jelord | 3:122bfc998c4c | 660 | |
jelord | 3:122bfc998c4c | 661 | atmoRho = ((press-((6.1078*pow((float)10,(float)((7.5*temp)/(237.3+temp))))*(rh/100)))*100)/(287.0531*(temp+273.15))+((6.1078*pow((float)10,(float)((7.5*temp)/(237.3+temp))))*(rh/100)*100)/(461.4964*(temp+273.15)); |
jelord | 3:122bfc998c4c | 662 | massflowSet = volflowSet*atmoRho; |
jelord | 3:122bfc998c4c | 663 | |
jelord | 3:122bfc998c4c | 664 | DigPot.writeRegister(digital_pot_setpoint); |
jelord | 3:122bfc998c4c | 665 | wait(1); |
caseyquinn | 12:5b4f3245606a | 666 | blower = 1; |
jelord | 3:122bfc998c4c | 667 | |
jelord | 3:122bfc998c4c | 668 | uint8_t subjectLabelOriginal[8] = {0,}; |
caseyquinn | 4:5d004fd997d5 | 669 | E2PROM.read(0x00001, subjectLabelOriginal,8); |
caseyquinn | 12:5b4f3245606a | 670 | |
caseyquinn | 13:455601f62aad | 671 | |
caseyquinn | 12:5b4f3245606a | 672 | |
caseyquinn | 4:5d004fd997d5 | 673 | time_t seconds = time(NULL); |
caseyquinn | 4:5d004fd997d5 | 674 | strftime(timestr, 32, "%y-%m-%d-%H=%M=%S", localtime(&seconds)); |
caseyquinn | 13:455601f62aad | 675 | |
caseyquinn | 9:8646fd501832 | 676 | //sprintf(filename, "/sd/UPAS%04dLOG_%02d-%02d-%02d_%02d=%02d=%02d_%c%c%c%c%c%c%c%c.txt",serial_num,RTC_UPAS.year,RTC_UPAS.month,RTC_UPAS.date,RTC_UPAS.hour,RTC_UPAS.minutes,RTC_UPAS.seconds,subjectLabelOriginal[0],subjectLabelOriginal[1],subjectLabelOriginal[2],subjectLabelOriginal[3],subjectLabelOriginal[4],subjectLabelOriginal[5],subjectLabelOriginal[6],subjectLabelOriginal[7]); |
caseyquinn | 12:5b4f3245606a | 677 | sprintf(filename, "/sd/UPAS_TboardtestLog_%s_%c%c%c%c%c%c%c%c.txt", timestr,subjectLabelOriginal[0],subjectLabelOriginal[1],subjectLabelOriginal[2],subjectLabelOriginal[3],subjectLabelOriginal[4],subjectLabelOriginal[5],subjectLabelOriginal[6],subjectLabelOriginal[7]); |
jelord | 3:122bfc998c4c | 678 | FILE *fp = fopen(filename, "w"); |
jelord | 3:122bfc998c4c | 679 | fclose(fp); |
jelord | 3:122bfc998c4c | 680 | |
jelord | 3:122bfc998c4c | 681 | |
caseyquinn | 12:5b4f3245606a | 682 | omronReading = ads.readADC_SingleEnded(0, 0xC583); // read channel 0 PGA = 2 : Full Scale Range = 2.048V |
caseyquinn | 12:5b4f3245606a | 683 | omronVolt = (omronReading*4.096)/(32768*2); |
caseyquinn | 12:5b4f3245606a | 684 | if(omronVolt<=calibrations.omronVMin) { |
caseyquinn | 12:5b4f3245606a | 685 | massflow = calibrations.omronMFMin; |
caseyquinn | 12:5b4f3245606a | 686 | } else if(omronVolt>=calibrations.omronVMax) { |
caseyquinn | 12:5b4f3245606a | 687 | massflow = calibrations.omronMFMax; |
caseyquinn | 12:5b4f3245606a | 688 | } else { |
caseyquinn | 12:5b4f3245606a | 689 | massflow = calibrations.MF4*pow(omronVolt,(float)4)+calibrations.MF3*pow(omronVolt,(float)3)+calibrations.MF2*pow(omronVolt,(float)2)+calibrations.MF1*omronVolt+calibrations.MF0; |
caseyquinn | 12:5b4f3245606a | 690 | } |
caseyquinn | 12:5b4f3245606a | 691 | deltaMflow = massflow-massflowSet; |
caseyquinn | 12:5b4f3245606a | 692 | digital_pot_set = digital_pot_setpoint; |
caseyquinn | 12:5b4f3245606a | 693 | wait(5); |
caseyquinn | 12:5b4f3245606a | 694 | |
caseyquinn | 12:5b4f3245606a | 695 | //---------------------------------------------------------------------------------------------// |
caseyquinn | 12:5b4f3245606a | 696 | //Sets the flow withen +-1.5% of the desired flow rate based on mass flow |
caseyquinn | 12:5b4f3245606a | 697 | |
caseyquinn | 12:5b4f3245606a | 698 | while(abs(deltaMflow)>.025) { |
caseyquinn | 12:5b4f3245606a | 699 | |
caseyquinn | 12:5b4f3245606a | 700 | omronReading = ads.readADC_SingleEnded(0, 0xC583); // read channel 0 PGA = 2 : Full Scale Range = 2.048V |
caseyquinn | 12:5b4f3245606a | 701 | omronVolt = (omronReading*4.096)/(32768*2); |
caseyquinn | 12:5b4f3245606a | 702 | //Mass Flow tf from file: UPAS v2 OSU-PrimaryFlowData FullSet 2015-05-29 CQ mods.xlsx |
caseyquinn | 12:5b4f3245606a | 703 | if(omronVolt<=calibrations.omronVMin) { |
caseyquinn | 12:5b4f3245606a | 704 | massflow = calibrations.omronMFMin; |
caseyquinn | 12:5b4f3245606a | 705 | } else if(omronVolt>=calibrations.omronVMax) { |
caseyquinn | 12:5b4f3245606a | 706 | massflow = calibrations.omronMFMax; |
caseyquinn | 12:5b4f3245606a | 707 | } else { |
caseyquinn | 12:5b4f3245606a | 708 | massflow = calibrations.MF4*pow(omronVolt,(float)4)+calibrations.MF3*pow(omronVolt,(float)3)+calibrations.MF2*pow(omronVolt,(float)2)+calibrations.MF1*omronVolt+calibrations.MF0; |
caseyquinn | 12:5b4f3245606a | 709 | } |
caseyquinn | 12:5b4f3245606a | 710 | |
caseyquinn | 12:5b4f3245606a | 711 | atmoRho = ((press-((6.1078*pow((float)10,(float)((7.5*temp)/(237.3+temp))))*(rh/100)))*100)/(287.0531*(temp+273.15))+((6.1078*pow((float)10,(float)((7.5*temp)/(237.3+temp))))*(rh/100)*100)/(461.4964*(temp+273.15)); |
caseyquinn | 12:5b4f3245606a | 712 | volflow = massflow/atmoRho; |
caseyquinn | 12:5b4f3245606a | 713 | massflowSet = volflowSet*atmoRho; |
caseyquinn | 12:5b4f3245606a | 714 | deltaMflow = massflow-massflowSet; |
caseyquinn | 12:5b4f3245606a | 715 | |
caseyquinn | 12:5b4f3245606a | 716 | digital_pot_set = (int)(digital_pot_set+(int)((gainFlow*deltaMflow))); |
caseyquinn | 12:5b4f3245606a | 717 | if(digital_pot_set>=digitalpotMax) { |
caseyquinn | 12:5b4f3245606a | 718 | digital_pot_set = digitalpotMax; |
caseyquinn | 12:5b4f3245606a | 719 | } else if(digital_pot_set<=digitalpotMin) { |
caseyquinn | 12:5b4f3245606a | 720 | digital_pot_set = digitalpotMin; |
caseyquinn | 12:5b4f3245606a | 721 | } |
caseyquinn | 12:5b4f3245606a | 722 | |
caseyquinn | 12:5b4f3245606a | 723 | wait(2); |
caseyquinn | 12:5b4f3245606a | 724 | DigPot.writeRegister(digital_pot_set); |
caseyquinn | 12:5b4f3245606a | 725 | pc.printf("%d,\r\n", digital_pot_set); |
caseyquinn | 12:5b4f3245606a | 726 | wait(1); |
caseyquinn | 12:5b4f3245606a | 727 | |
caseyquinn | 12:5b4f3245606a | 728 | |
caseyquinn | 12:5b4f3245606a | 729 | } |
caseyquinn | 12:5b4f3245606a | 730 | |
jelord | 3:122bfc998c4c | 731 | sampledVol = 0.0; |
jelord | 3:122bfc998c4c | 732 | RGB_LED.set_led(0,1,0); |
caseyquinn | 12:5b4f3245606a | 733 | */ |
caseyquinn | 12:5b4f3245606a | 734 | // stop.attach(&check_stop, 9); // check if we should shut down every 9 number seconds, starting after the start. |
caseyquinn | 13:455601f62aad | 735 | // logg.attach(&log_data, logInerval); |
caseyquinn | 12:5b4f3245606a | 736 | //flowCtl.attach(&flowControl, 1); |
caseyquinn | 7:29b01d5812ee | 737 | |
jelord | 3:122bfc998c4c | 738 | |
jelord | 3:122bfc998c4c | 739 | //** end of initalization **// |
jelord | 3:122bfc998c4c | 740 | //---------------------------------------------------------------------------------------------// |
jelord | 3:122bfc998c4c | 741 | //---------------------------------------------------------------------------------------------// |
jelord | 3:122bfc998c4c | 742 | // Main Control Loop |
jelord | 3:122bfc998c4c | 743 | |
caseyquinn | 7:29b01d5812ee | 744 | while (1) { |
caseyquinn | 7:29b01d5812ee | 745 | // Do other things... |
caseyquinn | 13:455601f62aad | 746 | blower = 1; |
caseyquinn | 13:455601f62aad | 747 | wait(5); |
caseyquinn | 13:455601f62aad | 748 | blower = 0; |
caseyquinn | 13:455601f62aad | 749 | wait(5); |
caseyquinn | 7:29b01d5812ee | 750 | } |
caseyquinn | 7:29b01d5812ee | 751 | |
caseyquinn | 8:c4a8f9b67cee | 752 | |
caseyquinn | 4:5d004fd997d5 | 753 | |
jelord | 3:122bfc998c4c | 754 | |
jelord | 0:2cb2b2ea316f | 755 | } |