scott kelleher / Outdoor_UPAS_v1_2_Tboard

6 sharps, 2 ads hooked up

Dependencies:   ADS1115 BME280 CronoDot SDFileSystem mbed

Fork of Outdoor_UPAS_v1_2_Tboard by Volckens Group Sensors

main.cpp@35:e0bdd6389a75, 2016-04-27 (annotated)

Committer:
caseyquinn
Date:
Wed Apr 27 06:28:43 2016 +0000
Revision:
35:e0bdd6389a75
Parent:
34:da333abe3476
Child:
36:2e344db70d35
Flow control added back in and MS0001 and MS0003 calibrated.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
jelord 0:2cb2b2ea316f 1 #include "mbed.h"
jelord 2:88fcbfadec6a 2 #include "SDFileSystem.h"
jelord 2:88fcbfadec6a 3 #include "Adafruit_ADS1015.h"
jelord 2:88fcbfadec6a 4 #include "MCP40D17.h"
jelord 2:88fcbfadec6a 5 #include "STC3100.h"
jelord 2:88fcbfadec6a 6 #include "LSM303.h"
jelord 2:88fcbfadec6a 7 #include "BME280.h"
jelord 2:88fcbfadec6a 8 #include "SI1145.h"
jelord 2:88fcbfadec6a 9 #include "NCP5623BMUTBG.h"
jelord 2:88fcbfadec6a 10 #include "CronoDot.h"
jelord 2:88fcbfadec6a 11 #include "EEPROM.h"
caseyquinn 12:5b4f3245606a 12 #include "Calibration.h"
caseyquinn 12:5b4f3245606a 13 #include "MAX_M8.h"
caseyquinn 12:5b4f3245606a 14 #include "DRV8830.h"
caseyquinn 14:7cdb643da356 15
jelord 0:2cb2b2ea316f 16
caseyquinn 12:5b4f3245606a 17 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 18 //General Items
caseyquinn 12:5b4f3245606a 19 /////////////////////////////////////////////
caseyquinn 14:7cdb643da356 20 I2C i2c(PB_9, PB_8);//(D14, D15); SDA,SCL
caseyquinn 12:5b4f3245606a 21 Serial pc(USBTX, USBRX);
caseyquinn 18:41ef98db0423 22 DigitalOut pumps(PA_9, 0);//(D8, 0);
caseyquinn 12:5b4f3245606a 23 DigitalOut pbKill(PC_12, 1); // Digital input pin that conncect to the LTC2950 battery charger used to shutdown the UPAS
caseyquinn 13:455601f62aad 24 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
jelord 2:88fcbfadec6a 25 MCP40D17 DigPot(&i2c);
caseyquinn 12:5b4f3245606a 26 BME280 bmesensor(PB_9, PB_8);//(D14, D15);
caseyquinn 12:5b4f3245606a 27 NCP5623BMUTBG RGB_LED(PB_9, PB_8);//(D14, D15);
caseyquinn 17:3e6dda6e6335 28 CronoDot RTC_UPAS(PB_9, PB_8);//(D14, D15);
caseyquinn 12:5b4f3245606a 29 EEPROM E2PROM(PB_9, PB_8);//(D14, D15);
caseyquinn 12:5b4f3245606a 30 Calibration calibrations(1); //Default serial/calibration if there are no values for the selected option
caseyquinn 14:7cdb643da356 31
caseyquinn 12:5b4f3245606a 32
caseyquinn 12:5b4f3245606a 33 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 34 //RN4677 BT/BLE Module
caseyquinn 12:5b4f3245606a 35 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 36 Serial microChannel(PB_10, PB_11); // tx, rx
caseyquinn 4:5d004fd997d5 37 DigitalOut bleRTS(PB_14, 0);
caseyquinn 4:5d004fd997d5 38 DigitalOut bleCTS(PB_13, 0);
caseyquinn 12:5b4f3245606a 39 DigitalOut BT_IRST(PC_8, 0);
caseyquinn 12:5b4f3245606a 40 DigitalOut BT_SW(PA_12, 0);
caseyquinn 17:3e6dda6e6335 41
caseyquinn 13:455601f62aad 42
caseyquinn 12:5b4f3245606a 43 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 44 //Analog to Digital Converter
caseyquinn 12:5b4f3245606a 45 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 46 Adafruit_ADS1115 ads(&i2c);
caseyquinn 12:5b4f3245606a 47 //DigitalIn ADS_ALRT(PA_10); //Connected but currently unused. (ADS1115) http://www.ti.com/lit/ds/symlink/ads1115.pdf
caseyquinn 12:5b4f3245606a 48
caseyquinn 12:5b4f3245606a 49 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 50 //Battery Monitoring
caseyquinn 12:5b4f3245606a 51 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 52 STC3100 gasG(PB_9, PB_8);//(D14, D15); // http://www.st.com/web/en/resource/technical/document/datasheet/CD00219947.pdf
caseyquinn 28:42932d3b105d 53 InterruptIn bcs1(PC_9); //Charge complete if High. Connected but currently unused. (MCP73871) http://www.mouser.com/ds/2/268/22090a-52174.pdf
caseyquinn 28:42932d3b105d 54 InterruptIn 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 55
caseyquinn 12:5b4f3245606a 56 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 57 //Accelerometer and Magnometer
caseyquinn 12:5b4f3245606a 58 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 59 LSM303 movementsensor(PB_9, PB_8);//(D14, D15); // http://www.st.com/web/en/resource/technical/document/datasheet/DM00027543.pdf
caseyquinn 12:5b4f3245606a 60 //DigitalIn ACC_INT1(PC_7); //Connected but currently unused. (LSM303)
caseyquinn 12:5b4f3245606a 61 //DigitalIn ACC_INT2(PC_6); //Connected but currently unused. (LSM303)
caseyquinn 12:5b4f3245606a 62 //DigitalIn ACC_DRDY(PC_11); //Connected but currently unused. (LSM303)
jelord 0:2cb2b2ea316f 63
caseyquinn 12:5b4f3245606a 64 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 65 //UV and Visible Light Sensor
caseyquinn 12:5b4f3245606a 66 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 67 SI1145 lightsensor(PB_9, PB_8);//(D14, D15);
caseyquinn 12:5b4f3245606a 68 //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 69
caseyquinn 12:5b4f3245606a 70 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 71 //GPS
caseyquinn 12:5b4f3245606a 72 /////////////////////////////////////////////
caseyquinn 17:3e6dda6e6335 73 DigitalOut gpsEN(PB_15, 0);
caseyquinn 23:1ca41779b8ec 74 Max_M8 gps(PB_9, PB_8,(0x84));
caseyquinn 12:5b4f3245606a 75
caseyquinn 12:5b4f3245606a 76 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 77 //Hbridge Valve Control
caseyquinn 12:5b4f3245606a 78 /////////////////////////////////////////////
caseyquinn 23:1ca41779b8ec 79
caseyquinn 28:42932d3b105d 80
caseyquinn 28:42932d3b105d 81 DRV8830 schoolF1(PB_9, PB_8, 0xC4); //Work/School Filter
caseyquinn 28:42932d3b105d 82 DRV8830 homeF2(PB_9, PB_8, 0xCA); //Home Filter
caseyquinn 28:42932d3b105d 83 DRV8830 transitF3(PB_9, PB_8, 0xCC); //Transit Filter
caseyquinn 28:42932d3b105d 84 DRV8830 blankF4(PB_9, PB_8, 0xCE); //Blank Filter
caseyquinn 28:42932d3b105d 85 DigitalIn hb1_school(PA_6);
caseyquinn 28:42932d3b105d 86 DigitalIn hb2_home(PA_7);
caseyquinn 28:42932d3b105d 87 DigitalIn hb3_transit(PA_5);
caseyquinn 28:42932d3b105d 88 DigitalIn hb4_blank(PA_4);
caseyquinn 28:42932d3b105d 89
caseyquinn 23:1ca41779b8ec 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 28:42932d3b105d 96 DigitalIn sdCD(PA_11, PullUp);
caseyquinn 14:7cdb643da356 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 25:fbf7d44e7da4 111 bool ledOn = 0;
caseyquinn 25:fbf7d44e7da4 112
caseyquinn 4:5d004fd997d5 113 struct tm STtime;
caseyquinn 7:29b01d5812ee 114 char timestr[32];
jelord 3:122bfc998c4c 115
caseyquinn 9:8646fd501832 116 float press;
caseyquinn 9:8646fd501832 117 float temp;
caseyquinn 9:8646fd501832 118 float rh;
jelord 3:122bfc998c4c 119
caseyquinn 9:8646fd501832 120 int uv;
caseyquinn 9:8646fd501832 121 int vis;
caseyquinn 9:8646fd501832 122 int ir;
jelord 3:122bfc998c4c 123
caseyquinn 9:8646fd501832 124 float compass;
caseyquinn 9:8646fd501832 125 float accel_x;
caseyquinn 9:8646fd501832 126 float accel_y;
caseyquinn 9:8646fd501832 127 float accel_z;
caseyquinn 9:8646fd501832 128 float accel_comp;
caseyquinn 9:8646fd501832 129 float angle_x;
caseyquinn 9:8646fd501832 130 float angle_y;
caseyquinn 9:8646fd501832 131 float angle_z;
caseyquinn 9:8646fd501832 132 float mag_x;
caseyquinn 9:8646fd501832 133 float mag_y;
caseyquinn 9:8646fd501832 134 float mag_z;
jelord 3:122bfc998c4c 135
caseyquinn 9:8646fd501832 136 int vInReading;
caseyquinn 25:fbf7d44e7da4 137 int vInReadingLast;
caseyquinn 9:8646fd501832 138 int vBlowerReading;
caseyquinn 9:8646fd501832 139 int omronDiff;
caseyquinn 9:8646fd501832 140 float omronVolt; //V
caseyquinn 9:8646fd501832 141 int omronReading;
caseyquinn 9:8646fd501832 142 float atmoRho; //g/L
jelord 3:122bfc998c4c 143
caseyquinn 25:fbf7d44e7da4 144 int amps;
caseyquinn 25:fbf7d44e7da4 145 int bVolt;
caseyquinn 25:fbf7d44e7da4 146 int bFuel;
caseyquinn 25:fbf7d44e7da4 147 //bool pumpOn;
caseyquinn 9:8646fd501832 148 float massflow; //g/min
caseyquinn 9:8646fd501832 149 float volflow; //L/min
jelord 3:122bfc998c4c 150 float volflowSet = 1.0; //L/min
caseyquinn 14:7cdb643da356 151 int logInerval = 5;//seconds
jelord 3:122bfc998c4c 152 double secondsD = 0;
jelord 3:122bfc998c4c 153 double lastsecondD = 0;
caseyquinn 9:8646fd501832 154 float massflowSet;
jelord 3:122bfc998c4c 155 float deltaVflow = 0.0;
jelord 3:122bfc998c4c 156 float deltaMflow = 0.0;
caseyquinn 9:8646fd501832 157 float gainFlow;
caseyquinn 9:8646fd501832 158 float sampledVol; //L, total sampled volume
jelord 3:122bfc998c4c 159
caseyquinn 29:fd74725294d5 160 int digital_pot_setpoint = 30; //min = 0x7F, max = 0x00
caseyquinn 9:8646fd501832 161 int digital_pot_set;
caseyquinn 9:8646fd501832 162 int digital_pot_change;
jelord 3:122bfc998c4c 163 int digitalpotMax = 127;
caseyquinn 9:8646fd501832 164 int digitalpotMin = 10;
jelord 3:122bfc998c4c 165
caseyquinn 12:5b4f3245606a 166 int dutyUp;
caseyquinn 12:5b4f3245606a 167 int dutyDown;
caseyquinn 12:5b4f3245606a 168
caseyquinn 23:1ca41779b8ec 169 bool gpsFix;
caseyquinn 12:5b4f3245606a 170 uint8_t gpssatellites = 0;
caseyquinn 23:1ca41779b8ec 171 double gpsspeed = 0.0;
caseyquinn 28:42932d3b105d 172 double gpscourse = 0.0;
caseyquinn 23:1ca41779b8ec 173 double gpslatitude = 0.0;
caseyquinn 23:1ca41779b8ec 174 double gpslongitude = 0.0;
caseyquinn 23:1ca41779b8ec 175 float gpsaltitude = 0.0;
caseyquinn 12:5b4f3245606a 176
caseyquinn 26:6aa294d83af4 177 float home_lat = 40.00000; //40.580508;
caseyquinn 26:6aa294d83af4 178 float home_lon = -105.000000; //-105.081823;
caseyquinn 26:6aa294d83af4 179 float work_lat = 40.100000; //40.594062; //40.569136;
caseyquinn 26:6aa294d83af4 180 float work_lon = -105.100000; //-105.075683; //-105.081966;
caseyquinn 12:5b4f3245606a 181 int location = 0;
caseyquinn 12:5b4f3245606a 182
caseyquinn 12:5b4f3245606a 183 float homeDistance = 99999;
caseyquinn 12:5b4f3245606a 184 float workDistance = 99999;
caseyquinn 12:5b4f3245606a 185
jelord 3:122bfc998c4c 186 //*************************************************//
jelord 3:122bfc998c4c 187
jelord 2:88fcbfadec6a 188 void sendData();
caseyquinn 11:aa21628a9b15 189
caseyquinn 11:aa21628a9b15 190
caseyquinn 11:aa21628a9b15 191 void pc_recv(){
caseyquinn 11:aa21628a9b15 192 while(pc.readable()){
caseyquinn 11:aa21628a9b15 193 pc.getc();
caseyquinn 11:aa21628a9b15 194 }
caseyquinn 11:aa21628a9b15 195 }
caseyquinn 11:aa21628a9b15 196
jelord 0:2cb2b2ea316f 197 static uint8_t rx_buf[20];
jelord 0:2cb2b2ea316f 198 static uint8_t rx_len=0;
jelord 1:9fbb5b665068 199 static int haltBLE = 1;
jelord 1:9fbb5b665068 200 static int transmissionValue = 0;
jelord 2:88fcbfadec6a 201 uint8_t writeData[20] = {0,};
jelord 2:88fcbfadec6a 202 static uint8_t dataLength = 0;
jelord 3:122bfc998c4c 203 static int runReady = 0;
jelord 3:122bfc998c4c 204 static uint8_t startAndEndTime[12] = {0,};
caseyquinn 5:c3252e5d45ca 205
caseyquinn 9:8646fd501832 206 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 207 //BLE Functions
caseyquinn 9:8646fd501832 208 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 209
caseyquinn 9:8646fd501832 210 void uartMicro(){
caseyquinn 25:fbf7d44e7da4 211
jelord 3:122bfc998c4c 212 if(runReady!=1){
jelord 3:122bfc998c4c 213 haltBLE = 2;
jelord 3:122bfc998c4c 214 while(microChannel.readable()){
jelord 3:122bfc998c4c 215 rx_buf[rx_len++] = microChannel.getc();
jelord 2:88fcbfadec6a 216
jelord 3:122bfc998c4c 217 //Code block to verify what is being transmitted. To function correctly, all data must terminate with \0 or \n
jelord 3:122bfc998c4c 218 if(transmissionValue==0){
jelord 3:122bfc998c4c 219
caseyquinn 4:5d004fd997d5 220 if (rx_buf[0] == 0x01)transmissionValue = 1; //rtc
jelord 3:122bfc998c4c 221 else if(rx_buf[0] == 0x02)transmissionValue = 2; //sample start and end times
jelord 3:122bfc998c4c 222 else if(rx_buf[0] == 0x03)transmissionValue = 3; //sample name
jelord 3:122bfc998c4c 223 else if(rx_buf[0] == 0x04)transmissionValue = 4; //Send Data Check
jelord 3:122bfc998c4c 224
jelord 3:122bfc998c4c 225 else if(rx_buf[0] == 0x05)transmissionValue = 5; //log interval
jelord 3:122bfc998c4c 226 else if(rx_buf[0] == 0x06)transmissionValue = 6; //Flow Rate
jelord 3:122bfc998c4c 227 else if(rx_buf[0] == 0x07)transmissionValue = 7; //Serial Number
jelord 3:122bfc998c4c 228 else if(rx_buf[0] == 0x08)transmissionValue = 8; //Run Enable
caseyquinn 25:fbf7d44e7da4 229 else if(rx_buf[0] == 0x0A)transmissionValue = 10; //GPS Coordinates
jelord 33:03d0e7f5ef0a 230 else if(rx_buf[0] == 0x0B)transmissionValue = 11; //GPS Coordinates (Second Set)
caseyquinn 25:fbf7d44e7da4 231 //else if(rx_buf[0] == 0x30)RGB_LED.set_led(1,0,0);
jelord 3:122bfc998c4c 232 else transmissionValue = 100; //Not useful data
jelord 3:122bfc998c4c 233 }
jelord 3:122bfc998c4c 234
jelord 3:122bfc998c4c 235 if(rx_buf[rx_len-1]=='\0' || rx_buf[rx_len-1]=='\n' || rx_buf[rx_len-1] == 0xff){
jelord 3:122bfc998c4c 236 if((transmissionValue == 1 || transmissionValue == 2 || transmissionValue == 3 || transmissionValue == 4 || transmissionValue == 5 ||
caseyquinn 25:fbf7d44e7da4 237 transmissionValue == 6 || transmissionValue == 7 || transmissionValue ==10) && rx_buf[rx_len-1] != 0xff)
jelord 3:122bfc998c4c 238 {}else{
caseyquinn 21:bb10efc5bf57 239 if(transmissionValue == 4 ) sendData();
jelord 3:122bfc998c4c 240 if(transmissionValue == 8){
jelord 3:122bfc998c4c 241 runReady = 1;
jelord 3:122bfc998c4c 242 microChannel.attach(NULL,microChannel.RxIrq);
jelord 3:122bfc998c4c 243 }
jelord 3:122bfc998c4c 244 haltBLE = 1;
jelord 3:122bfc998c4c 245 transmissionValue = 0;
jelord 3:122bfc998c4c 246 dataLength = 0;
caseyquinn 25:fbf7d44e7da4 247 //if(fileWrite == 1){
caseyquinn 25:fbf7d44e7da4 248 //FILE *fp = fopen(gpsConfigFilename, "a");
caseyquinn 25:fbf7d44e7da4 249 //fprintf(fp,"HELLO");
caseyquinn 25:fbf7d44e7da4 250 //fclose(fp);
caseyquinn 25:fbf7d44e7da4 251 //free(fp);
caseyquinn 25:fbf7d44e7da4 252 //fileWrite=0;
caseyquinn 25:fbf7d44e7da4 253 //}
jelord 3:122bfc998c4c 254 }
jelord 2:88fcbfadec6a 255 }
jelord 1:9fbb5b665068 256 }
caseyquinn 12:5b4f3245606a 257
jelord 3:122bfc998c4c 258 if(haltBLE!=1){
jelord 2:88fcbfadec6a 259
jelord 3:122bfc998c4c 260 if((transmissionValue!=100) && (dataLength!= 0)) writeData[dataLength-1] = rx_buf[0];
jelord 3:122bfc998c4c 261
jelord 3:122bfc998c4c 262 if(transmissionValue ==100){
caseyquinn 10:06fbb1c9e3bd 263 pc.putc(rx_buf[0]);
jelord 2:88fcbfadec6a 264
jelord 3:122bfc998c4c 265 }else if(transmissionValue ==1){ //process and store RTC values
jelord 3:122bfc998c4c 266
caseyquinn 7:29b01d5812ee 267 //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 268 if(dataLength==6){
caseyquinn 17:3e6dda6e6335 269 RTC_UPAS.set_time(writeData[0],writeData[1],writeData[2],writeData[3],writeData[3],writeData[4],writeData[5]);//sets chronodot RTC
caseyquinn 12:5b4f3245606a 270 ///////////////////////
caseyquinn 7:29b01d5812ee 271 //sets ST RTC
caseyquinn 12:5b4f3245606a 272 //////////////////////
caseyquinn 7:29b01d5812ee 273 STtime.tm_sec = writeData[0]; // 0-59
caseyquinn 7:29b01d5812ee 274 STtime.tm_min = writeData[1]; // 0-59
caseyquinn 7:29b01d5812ee 275 STtime.tm_hour = writeData[2]; // 0-23
caseyquinn 7:29b01d5812ee 276 STtime.tm_mday = writeData[3]; // 1-31
caseyquinn 7:29b01d5812ee 277 STtime.tm_mon = writeData[4]-1; // 0-11
caseyquinn 7:29b01d5812ee 278 STtime.tm_year = 100+writeData[5]; // year since 1900 (116 = 2016)
caseyquinn 7:29b01d5812ee 279 time_t STseconds = mktime(&STtime);
caseyquinn 12:5b4f3245606a 280 set_time(STseconds); // Set RTC time
caseyquinn 7:29b01d5812ee 281 }
jelord 3:122bfc998c4c 282
caseyquinn 12:5b4f3245606a 283 }
caseyquinn 14:7cdb643da356 284 else if(transmissionValue ==2){ //process and store sample start/end
jelord 3:122bfc998c4c 285 if(dataLength ==12)E2PROM.write(0x00015, writeData, 12);
jelord 3:122bfc998c4c 286
jelord 3:122bfc998c4c 287 }else if(transmissionValue ==3){ //process and store sample name
jelord 3:122bfc998c4c 288 if(dataLength ==8)E2PROM.write(0x00001,writeData,8);
jelord 3:122bfc998c4c 289
jelord 3:122bfc998c4c 290 }else if(transmissionValue ==5){ //process and store Log Interval
jelord 3:122bfc998c4c 291 if(dataLength ==1)E2PROM.write(0x00014,writeData,1);
jelord 2:88fcbfadec6a 292
jelord 3:122bfc998c4c 293 }else if(transmissionValue ==6){ //process and store Flow Rate
jelord 3:122bfc998c4c 294 if(dataLength ==4)E2PROM.write(0x00010,writeData,4);
jelord 3:122bfc998c4c 295
jelord 3:122bfc998c4c 296 }else if(transmissionValue ==7){ //process and store Serial Number
jelord 3:122bfc998c4c 297 if(dataLength ==2)E2PROM.write(0x00034,writeData,2);
caseyquinn 25:fbf7d44e7da4 298 }else if (transmissionValue == 10){
caseyquinn 25:fbf7d44e7da4 299 if(dataLength == 16)E2PROM.write(0x00050,writeData,16);
jelord 33:03d0e7f5ef0a 300 }else if (transmissionValue == 11){
jelord 33:03d0e7f5ef0a 301 if(dataLength == 8)E2PROM.write(0x00060,writeData,8);
jelord 3:122bfc998c4c 302 }
caseyquinn 25:fbf7d44e7da4 303
jelord 3:122bfc998c4c 304 dataLength++;
jelord 1:9fbb5b665068 305 }
jelord 3:122bfc998c4c 306
jelord 3:122bfc998c4c 307 rx_len = 0;
jelord 3:122bfc998c4c 308 }else{
jelord 3:122bfc998c4c 309 while(microChannel.readable())
jelord 3:122bfc998c4c 310 uint8_t extract = microChannel.getc();
jelord 3:122bfc998c4c 311 }
jelord 2:88fcbfadec6a 312
caseyquinn 12:5b4f3245606a 313
jelord 2:88fcbfadec6a 314 }
caseyquinn 14:7cdb643da356 315
jelord 2:88fcbfadec6a 316 void sendData(){
jelord 2:88fcbfadec6a 317
caseyquinn 27:922f53fa649c 318 //First byte is designator for the App
caseyquinn 21:bb10efc5bf57 319 uint8_t sampleTimePassValues[13] = {0x01,0x00,0x00,0x0A,0x01,0x01,0x10,0x00,0x00,0x0A,0x01,0x01,0x10};
caseyquinn 21:bb10efc5bf57 320 uint8_t subjectLabelOriginal[9] = {0x02,0x52,0x45,0x53,0x45,0x54,0x5F,0x5F,0x5f};
caseyquinn 21:bb10efc5bf57 321 uint8_t dataLogOriginal[2] = {0x03,0x0A,};
caseyquinn 21:bb10efc5bf57 322 uint8_t flowRateOriginal[5] = {0x04,0x00,0x00,0x80,0x3F};
caseyquinn 29:fd74725294d5 323 uint8_t serialBytes[3] = {0x07,0x00,0x00};
caseyquinn 25:fbf7d44e7da4 324 uint8_t latLongSchoolOriginal[17] = {0x0A,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F};
jelord 33:03d0e7f5ef0a 325 uint8_t latLongHome2[9] = {0x0B,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F};
caseyquinn 25:fbf7d44e7da4 326 // Latitude School EEPROM = 0x50-0x53
caseyquinn 25:fbf7d44e7da4 327 // Longitude School EEPROM = 0x54-0x57
caseyquinn 25:fbf7d44e7da4 328 // Latitude Home EEPROM = 0x58-0x5B
caseyquinn 25:fbf7d44e7da4 329 // Longitude Home EEPROM = 0x5C-0x5F
caseyquinn 25:fbf7d44e7da4 330 uint8_t NEW_EEPROM_CHECK[1] = {0,}; //THIS IS USED TO ENSURE COOPERATION WITH MOBILE APPS
jelord 33:03d0e7f5ef0a 331 uint8_t TERMINATE_BYTE[1] = {0xff,}; //used for compatibility with android app
caseyquinn 25:fbf7d44e7da4 332
caseyquinn 25:fbf7d44e7da4 333 //NEW EEPROM Check bit = 0x75
caseyquinn 25:fbf7d44e7da4 334 E2PROM.read(0x00075,NEW_EEPROM_CHECK,1);
caseyquinn 25:fbf7d44e7da4 335
caseyquinn 25:fbf7d44e7da4 336 if(NEW_EEPROM_CHECK[0] == 0x0A){
caseyquinn 25:fbf7d44e7da4 337 E2PROM.read(0x00015, sampleTimePassValues+1, 12);
caseyquinn 25:fbf7d44e7da4 338 E2PROM.read(0x00001, subjectLabelOriginal+1,8);
caseyquinn 25:fbf7d44e7da4 339 E2PROM.read(0x00014,dataLogOriginal+1,1);
caseyquinn 25:fbf7d44e7da4 340 E2PROM.read(0x00010,flowRateOriginal+1,4);
caseyquinn 29:fd74725294d5 341 E2PROM.read(0x00034,serialBytes+1,2);
caseyquinn 25:fbf7d44e7da4 342 E2PROM.read(0x00050,latLongSchoolOriginal+1,16);
jelord 33:03d0e7f5ef0a 343 E2PROM.read(0x00060,latLongHome2+1,8);
caseyquinn 25:fbf7d44e7da4 344 }else{
caseyquinn 25:fbf7d44e7da4 345 NEW_EEPROM_CHECK[0] = 0x0A;
caseyquinn 25:fbf7d44e7da4 346 E2PROM.write(0x00075,NEW_EEPROM_CHECK,1);
caseyquinn 25:fbf7d44e7da4 347 E2PROM.write(0x00015, sampleTimePassValues+1, 12);
caseyquinn 25:fbf7d44e7da4 348 E2PROM.write(0x00001, subjectLabelOriginal+1,8);
caseyquinn 25:fbf7d44e7da4 349 E2PROM.write(0x00014,dataLogOriginal+1,1);
caseyquinn 25:fbf7d44e7da4 350 E2PROM.write(0x00010,flowRateOriginal+1,4);
caseyquinn 29:fd74725294d5 351 E2PROM.write(0x00034,serialBytes+1,2);
caseyquinn 25:fbf7d44e7da4 352 E2PROM.write(0x00050,latLongSchoolOriginal+1,16);
jelord 33:03d0e7f5ef0a 353 E2PROM.write(0x00060,latLongHome2+1,8);
caseyquinn 25:fbf7d44e7da4 354 }
caseyquinn 21:bb10efc5bf57 355
jelord 2:88fcbfadec6a 356
jelord 2:88fcbfadec6a 357 for(int i=0; i<13; i++){
jelord 2:88fcbfadec6a 358 microChannel.putc(sampleTimePassValues[i]);
jelord 2:88fcbfadec6a 359 }
jelord 33:03d0e7f5ef0a 360 wait(.15);
jelord 2:88fcbfadec6a 361
jelord 2:88fcbfadec6a 362 for(int i=0; i<9; i++){
jelord 2:88fcbfadec6a 363 microChannel.putc(subjectLabelOriginal[i]);
jelord 2:88fcbfadec6a 364 }
jelord 33:03d0e7f5ef0a 365 wait(.15);
jelord 2:88fcbfadec6a 366
jelord 2:88fcbfadec6a 367 for(int i=0; i<2; i++){
jelord 2:88fcbfadec6a 368 microChannel.putc(dataLogOriginal[i]);
jelord 2:88fcbfadec6a 369 }
jelord 33:03d0e7f5ef0a 370 wait(.15);
jelord 2:88fcbfadec6a 371
jelord 2:88fcbfadec6a 372 for(int i=0; i<5; i++){
jelord 2:88fcbfadec6a 373 microChannel.putc(flowRateOriginal[i]);
caseyquinn 25:fbf7d44e7da4 374 }
jelord 33:03d0e7f5ef0a 375 wait(.15);
caseyquinn 25:fbf7d44e7da4 376
caseyquinn 25:fbf7d44e7da4 377 for(int i=0;i<17;i++){
caseyquinn 25:fbf7d44e7da4 378 microChannel.putc(latLongSchoolOriginal[i]);
jelord 2:88fcbfadec6a 379 }
jelord 33:03d0e7f5ef0a 380 wait(.15);
jelord 33:03d0e7f5ef0a 381
jelord 33:03d0e7f5ef0a 382 for(int i=0;i<9;i++){
jelord 33:03d0e7f5ef0a 383 microChannel.putc(latLongHome2[i]);
jelord 33:03d0e7f5ef0a 384 }
jelord 33:03d0e7f5ef0a 385 wait(.15);
jelord 33:03d0e7f5ef0a 386 microChannel.putc(TERMINATE_BYTE[0]);
jelord 0:2cb2b2ea316f 387
jelord 2:88fcbfadec6a 388
caseyquinn 25:fbf7d44e7da4 389 }
caseyquinn 14:7cdb643da356 390
caseyquinn 12:5b4f3245606a 391 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 392 // GPS: Calculate distance from target location
caseyquinn 12:5b4f3245606a 393 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 394 double GPSdistanceCalc (float tlat, float tlon)
caseyquinn 12:5b4f3245606a 395 {
caseyquinn 12:5b4f3245606a 396
caseyquinn 12:5b4f3245606a 397 float tlatrad, flatrad;
caseyquinn 12:5b4f3245606a 398 float sdlong, cdlong;
caseyquinn 12:5b4f3245606a 399 float sflat, cflat;
caseyquinn 12:5b4f3245606a 400 float stlat, ctlat;
caseyquinn 12:5b4f3245606a 401 float delta, denom;
caseyquinn 12:5b4f3245606a 402
caseyquinn 12:5b4f3245606a 403 double distance;
caseyquinn 27:922f53fa649c 404 delta = (gpslongitude-tlon)*0.0174532925;
caseyquinn 12:5b4f3245606a 405 sdlong = sin(delta);
caseyquinn 12:5b4f3245606a 406 cdlong = cos(delta);
caseyquinn 27:922f53fa649c 407 flatrad = (gpslatitude)*0.0174532925;
caseyquinn 12:5b4f3245606a 408 tlatrad = (tlat)*0.0174532925;
caseyquinn 12:5b4f3245606a 409 sflat = sin(flatrad);
caseyquinn 12:5b4f3245606a 410 cflat = cos(flatrad);
caseyquinn 12:5b4f3245606a 411 stlat = sin(tlatrad);
caseyquinn 12:5b4f3245606a 412 ctlat = cos(tlatrad);
caseyquinn 12:5b4f3245606a 413 delta = (cflat * stlat) - (sflat * ctlat * cdlong);
caseyquinn 12:5b4f3245606a 414 delta = pow(delta,2);
caseyquinn 12:5b4f3245606a 415 delta += pow(ctlat * sdlong,2);
caseyquinn 12:5b4f3245606a 416 delta = sqrt(delta);
caseyquinn 12:5b4f3245606a 417 denom = (sflat * stlat) + (cflat * ctlat * cdlong);
caseyquinn 12:5b4f3245606a 418 delta = atan2(delta, denom);
caseyquinn 12:5b4f3245606a 419 distance = delta * 6372795;
caseyquinn 12:5b4f3245606a 420 return distance;
caseyquinn 12:5b4f3245606a 421 }
caseyquinn 12:5b4f3245606a 422
caseyquinn 5:c3252e5d45ca 423
caseyquinn 9:8646fd501832 424 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 425 //Shutdown Function
caseyquinn 9:8646fd501832 426 //////////////////////////////////////////////////////////////
jelord 3:122bfc998c4c 427 void check_stop() // this checks if it's time to stop and shutdown
jelord 3:122bfc998c4c 428 {
caseyquinn 9:8646fd501832 429 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 9:8646fd501832 430 //UPDATE THIS TO WORK WITH ST RTC INSTEAD
caseyquinn 9:8646fd501832 431 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 17:3e6dda6e6335 432
jelord 3:122bfc998c4c 433 if(RTC_UPAS.compare(startAndEndTime[6], startAndEndTime[7], startAndEndTime[8], startAndEndTime[9], startAndEndTime[10], startAndEndTime[11])) {
jelord 3:122bfc998c4c 434 pbKill = 0; // this is were we shut everything down
caseyquinn 4:5d004fd997d5 435 //pc.printf("If you're reading this something has gone very wrong.");
jelord 3:122bfc998c4c 436 }
caseyquinn 17:3e6dda6e6335 437
jelord 3:122bfc998c4c 438 }
caseyquinn 5:c3252e5d45ca 439
caseyquinn 9:8646fd501832 440 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 441 //SD Logging Function
caseyquinn 9:8646fd501832 442 //////////////////////////////////////////////////////////////
jelord 3:122bfc998c4c 443 void log_data()
jelord 3:122bfc998c4c 444 {
caseyquinn 28:42932d3b105d 445 //Get time and set RTC
caseyquinn 28:42932d3b105d 446 ///////////////////////////
caseyquinn 7:29b01d5812ee 447 time_t seconds = time(NULL);
caseyquinn 7:29b01d5812ee 448 strftime(timestr, 32, "%y%m%d%H%M%S", localtime(&seconds));
caseyquinn 17:3e6dda6e6335 449 RTC_UPAS.get_time();
caseyquinn 25:fbf7d44e7da4 450
caseyquinn 28:42932d3b105d 451 //Get Sensor Data except GPS
caseyquinn 28:42932d3b105d 452 ////////////////////////////
caseyquinn 7:29b01d5812ee 453 press = bmesensor.getPressure();
caseyquinn 7:29b01d5812ee 454 temp = bmesensor.getTemperature()-5.0;
caseyquinn 7:29b01d5812ee 455 rh = bmesensor.getHumidity();
caseyquinn 7:29b01d5812ee 456 uv = lightsensor.getUV();
caseyquinn 14:7cdb643da356 457 movementsensor.getACCEL();
caseyquinn 14:7cdb643da356 458 movementsensor.getCOMPASS();
caseyquinn 14:7cdb643da356 459 compass = movementsensor.getCOMPASS_HEADING();
caseyquinn 14:7cdb643da356 460 accel_x = movementsensor.AccelData.x;
caseyquinn 14:7cdb643da356 461 accel_y = movementsensor.AccelData.y;
caseyquinn 14:7cdb643da356 462 accel_z = movementsensor.AccelData.z;
caseyquinn 14:7cdb643da356 463 accel_comp = pow(accel_x,(float)2)+pow(accel_y,(float)2)+pow(accel_z,(float)2)-1.0;
caseyquinn 14:7cdb643da356 464 mag_x = movementsensor.MagData.x;
caseyquinn 14:7cdb643da356 465 mag_y = movementsensor.MagData.y;
caseyquinn 14:7cdb643da356 466 mag_z = movementsensor.MagData.z;
caseyquinn 25:fbf7d44e7da4 467 vInReadingLast = vInReading;
caseyquinn 25:fbf7d44e7da4 468 vInReading = ads.readADC_SingleEnded(1, 0xD583); // read channel 0
caseyquinn 25:fbf7d44e7da4 469 amps = gasG.getAmps();
caseyquinn 25:fbf7d44e7da4 470 bVolt = gasG.getVolts();
caseyquinn 25:fbf7d44e7da4 471 bFuel = gasG.getCharge();
caseyquinn 35:e0bdd6389a75 472
caseyquinn 28:42932d3b105d 473 //Check for fully charged battery
caseyquinn 28:42932d3b105d 474 if(bVolt > 1750 && amps > 8191) {
caseyquinn 28:42932d3b105d 475 RGB_LED.set_led(0,1,0);
caseyquinn 28:42932d3b105d 476 //Check for battery with ~2 hours left of runtime at 2lpm or if after 8pm to remind user to plug in sampler
caseyquinn 28:42932d3b105d 477 }else if(amps > 8191 && (RTC_UPAS.hour >=20 || bVolt < 1500)) {
caseyquinn 28:42932d3b105d 478 if(ledOn) {
caseyquinn 28:42932d3b105d 479 RGB_LED.set_led(0,0,0);
caseyquinn 28:42932d3b105d 480 ledOn = 0;
caseyquinn 28:42932d3b105d 481 }else {
caseyquinn 28:42932d3b105d 482 RGB_LED.set_led(1,0,0);
caseyquinn 28:42932d3b105d 483 ledOn = 1;
caseyquinn 28:42932d3b105d 484 }
caseyquinn 28:42932d3b105d 485 //No LED on when not low battery and not fully charged
caseyquinn 28:42932d3b105d 486 }else{
caseyquinn 28:42932d3b105d 487 RGB_LED.set_led(0,0,0);
caseyquinn 28:42932d3b105d 488 }
caseyquinn 28:42932d3b105d 489
caseyquinn 35:e0bdd6389a75 490
caseyquinn 28:42932d3b105d 491 // Get GPS Data
caseyquinn 28:42932d3b105d 492 //////////////////////////////
caseyquinn 28:42932d3b105d 493 //if(gpsEN ==1){
caseyquinn 28:42932d3b105d 494
caseyquinn 28:42932d3b105d 495 gpsFix = gps.read(1);
caseyquinn 28:42932d3b105d 496 gpsspeed = gps.speed;
caseyquinn 28:42932d3b105d 497 //gpscourse = gps.course;
caseyquinn 28:42932d3b105d 498 gpssatellites = gps.satellites;
caseyquinn 28:42932d3b105d 499 gpslatitude = gps.lat;
caseyquinn 28:42932d3b105d 500 gpslongitude = gps.lon;
caseyquinn 28:42932d3b105d 501 gpsaltitude = gps.altitude;
caseyquinn 28:42932d3b105d 502
caseyquinn 28:42932d3b105d 503 if(gpsFix){
caseyquinn 28:42932d3b105d 504 workDistance = GPSdistanceCalc (work_lat, work_lon);
caseyquinn 28:42932d3b105d 505 homeDistance = GPSdistanceCalc (home_lat, home_lon);
caseyquinn 29:fd74725294d5 506 RGB_LED.set_led(0,0,0);
caseyquinn 28:42932d3b105d 507
caseyquinn 28:42932d3b105d 508 if(workDistance < 50) {
caseyquinn 28:42932d3b105d 509 location = 1;
caseyquinn 28:42932d3b105d 510 //RGB_LED.set_led(0,1,1);
caseyquinn 28:42932d3b105d 511 }else if(homeDistance < 50) { // 25 or 30 m instead?
caseyquinn 28:42932d3b105d 512 location = 2;
caseyquinn 28:42932d3b105d 513 //RGB_LED.set_led(1,0,1);
caseyquinn 28:42932d3b105d 514 }else{
caseyquinn 28:42932d3b105d 515 location = 3;
caseyquinn 28:42932d3b105d 516 //RGB_LED.set_led(1,1,1);
caseyquinn 28:42932d3b105d 517 }
caseyquinn 28:42932d3b105d 518
caseyquinn 28:42932d3b105d 519 }else if(homeDistance == 99999 && workDistance == 99999){
caseyquinn 28:42932d3b105d 520 location = 0;
caseyquinn 28:42932d3b105d 521 RGB_LED.set_led(1,1,0);
caseyquinn 28:42932d3b105d 522 }
caseyquinn 28:42932d3b105d 523
caseyquinn 28:42932d3b105d 524 //}
caseyquinn 28:42932d3b105d 525
caseyquinn 28:42932d3b105d 526 //Check for 3.3V rail cut out and turn off pumps in this event
caseyquinn 28:42932d3b105d 527 if(vInReading > 5950 && amps > 8191) {
caseyquinn 35:e0bdd6389a75 528 pumps = 0;
caseyquinn 28:42932d3b105d 529 wait(1);
caseyquinn 28:42932d3b105d 530 //Turn pumps back on once the sampler is plugged in and charging after pumps shutoff and 3.3V rail drops out
caseyquinn 28:42932d3b105d 531 } else if(pumps == 0 && amps < 8191) {
caseyquinn 28:42932d3b105d 532
caseyquinn 28:42932d3b105d 533 // If pumps are plugged in the next morning assume the sampler is at school if after 8 if no GPSfix is available
caseyquinn 28:42932d3b105d 534 if(gpsFix == 0 && RTC_UPAS.hour>8){
caseyquinn 28:42932d3b105d 535 gpslatitude = work_lat; // specific to Rivendell Study. In case student forgets to plug in and teachers catch this. Assume if plugged in after 8 and no GPS signal will change to proper valve. Hopefully...
caseyquinn 28:42932d3b105d 536 gpslongitude = work_lon; // specific to Rivendell Study. In case student forgets to plug in and teachers catch this. Assume if plugged in after 8 and no GPS signal will change to proper valve. Hopefully...
caseyquinn 28:42932d3b105d 537 }
caseyquinn 28:42932d3b105d 538 //Adjust valves to ensure everything is in proper place before pumps restart
caseyquinn 28:42932d3b105d 539 /*
caseyquinn 28:42932d3b105d 540 schoolF1.getFault();
caseyquinn 28:42932d3b105d 541 homeF2.getFault();
caseyquinn 28:42932d3b105d 542 transitF3.getFault();
caseyquinn 28:42932d3b105d 543 blankF4.getFault();
caseyquinn 28:42932d3b105d 544
caseyquinn 28:42932d3b105d 545 schoolF1.drive(254); //closed = 253, open = 254
caseyquinn 28:42932d3b105d 546 homeF2.drive(253); //closed = 253, open = 254
caseyquinn 28:42932d3b105d 547 transitF3.drive(253); //closed = 253, open = 254
caseyquinn 28:42932d3b105d 548 blankF4.drive(253); //closed = 253, open = 254
caseyquinn 28:42932d3b105d 549 wait(1);
caseyquinn 28:42932d3b105d 550 schoolF1.stop();
caseyquinn 28:42932d3b105d 551 homeF2.stop();
caseyquinn 28:42932d3b105d 552 transitF3.stop();
caseyquinn 28:42932d3b105d 553 blankF4.stop();
caseyquinn 28:42932d3b105d 554 */
caseyquinn 28:42932d3b105d 555 //pumps = 1;
caseyquinn 28:42932d3b105d 556
caseyquinn 28:42932d3b105d 557 }
caseyquinn 28:42932d3b105d 558
caseyquinn 28:42932d3b105d 559
caseyquinn 14:7cdb643da356 560
caseyquinn 25:fbf7d44e7da4 561 if(pumps == 1){
caseyquinn 34:da333abe3476 562 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 563 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 25:fbf7d44e7da4 564
caseyquinn 25:fbf7d44e7da4 565 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 25:fbf7d44e7da4 566 massflow = calibrations.omronMFMin;
caseyquinn 25:fbf7d44e7da4 567 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 25:fbf7d44e7da4 568 massflow = calibrations.omronMFMax;
caseyquinn 25:fbf7d44e7da4 569 } else {
caseyquinn 25:fbf7d44e7da4 570 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 25:fbf7d44e7da4 571 }
caseyquinn 25:fbf7d44e7da4 572
caseyquinn 25:fbf7d44e7da4 573 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 25:fbf7d44e7da4 574 volflow = massflow/atmoRho;
caseyquinn 25:fbf7d44e7da4 575 sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow);
caseyquinn 25:fbf7d44e7da4 576 deltaVflow = volflow-volflowSet;
caseyquinn 25:fbf7d44e7da4 577 massflowSet = volflowSet*atmoRho;
caseyquinn 25:fbf7d44e7da4 578 deltaMflow = massflow-massflowSet;
caseyquinn 25:fbf7d44e7da4 579
caseyquinn 25:fbf7d44e7da4 580 vBlowerReading = ads.readADC_SingleEnded(2, 0xE783); // read channel 0
caseyquinn 25:fbf7d44e7da4 581 omronDiff = ads.readADC_Differential(0x8583); // differential channel 2-3
caseyquinn 14:7cdb643da356 582 }
caseyquinn 14:7cdb643da356 583
caseyquinn 27:922f53fa649c 584
caseyquinn 21:bb10efc5bf57 585
caseyquinn 7:29b01d5812ee 586 FILE *fp = fopen(filename, "a");
caseyquinn 21:bb10efc5bf57 587 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 588 fprintf(fp, "%s,", timestr);
caseyquinn 7:29b01d5812ee 589 fprintf(fp, "%1.3f,%1.3f,%2.2f,%4.2f,%2.1f,%1.3f,", omronVolt,massflow,temp,press,rh,atmoRho);
caseyquinn 7:29b01d5812ee 590 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 591 fprintf(fp, "%.1f,%.1f,%.1f,%.3f,%.3f,%.3f,%.1f,", angle_x,angle_y,angle_z,mag_x, mag_y, mag_z,compass);
caseyquinn 25:fbf7d44e7da4 592 fprintf(fp, "%d,%d,%d,%d,%d,%d," ,uv,omronReading, vInReading, vBlowerReading, omronDiff,amps);
caseyquinn 25:fbf7d44e7da4 593 fprintf(fp, "%d,%d,%d,%1.3f,%1.3f,", bVolt, bFuel,digital_pot_set, deltaMflow, deltaVflow);
caseyquinn 27:922f53fa649c 594 fprintf(fp, "%f,%f,%06d,%06d,", gpslatitude, gpslongitude, (long)gps.date, (long)gps.utc);
caseyquinn 28:42932d3b105d 595 //fprintf(fp, "%f,%d,%f,%f,%d,", gpsspeed, gpssatellites, gpscourse, gpsaltitude, gpsFix);
caseyquinn 28:42932d3b105d 596 fprintf(fp, "%f,%d,%f,%d,", gpsspeed, gpssatellites, gpsaltitude, gpsFix);
caseyquinn 27:922f53fa649c 597 fprintf(fp, "%f,%f,%d,%d\r\n", homeDistance, workDistance, location, pumps == 1); // test and add in speed, etc that Josh added in to match the adafruit GPS
caseyquinn 7:29b01d5812ee 598 fclose(fp);
caseyquinn 7:29b01d5812ee 599 free(fp);
caseyquinn 25:fbf7d44e7da4 600
caseyquinn 25:fbf7d44e7da4 601
caseyquinn 14:7cdb643da356 602
caseyquinn 12:5b4f3245606a 603
caseyquinn 25:fbf7d44e7da4 604
caseyquinn 12:5b4f3245606a 605
jelord 3:122bfc998c4c 606
jelord 3:122bfc998c4c 607 }
caseyquinn 8:c4a8f9b67cee 608
caseyquinn 9:8646fd501832 609 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 610 //Flow Control Function
caseyquinn 9:8646fd501832 611 //////////////////////////////////////////////////////////////
caseyquinn 8:c4a8f9b67cee 612 void flowControl()
caseyquinn 8:c4a8f9b67cee 613 {
caseyquinn 25:fbf7d44e7da4 614
caseyquinn 25:fbf7d44e7da4 615 //RGB_LED.set_led(0,1,0);
caseyquinn 34:da333abe3476 616 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 617 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 8:c4a8f9b67cee 618
caseyquinn 8:c4a8f9b67cee 619 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 8:c4a8f9b67cee 620 massflow = calibrations.omronMFMin;
caseyquinn 8:c4a8f9b67cee 621 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 8:c4a8f9b67cee 622 massflow = calibrations.omronMFMax;
caseyquinn 8:c4a8f9b67cee 623 } else {
caseyquinn 8:c4a8f9b67cee 624 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 625 }
caseyquinn 8:c4a8f9b67cee 626
caseyquinn 8:c4a8f9b67cee 627 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 628 volflow = massflow/atmoRho;
caseyquinn 8:c4a8f9b67cee 629 sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow);
caseyquinn 8:c4a8f9b67cee 630 deltaVflow = volflow-volflowSet;
caseyquinn 8:c4a8f9b67cee 631 massflowSet = volflowSet*atmoRho;
caseyquinn 8:c4a8f9b67cee 632 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 633
caseyquinn 8:c4a8f9b67cee 634 if(abs(deltaMflow)>.025) {
caseyquinn 8:c4a8f9b67cee 635 digital_pot_change = (int)(gainFlow*deltaMflow);
caseyquinn 8:c4a8f9b67cee 636
caseyquinn 8:c4a8f9b67cee 637
caseyquinn 12:5b4f3245606a 638 if(abs(digital_pot_change)>=10) {
caseyquinn 12:5b4f3245606a 639 digital_pot_set = (int)(digital_pot_set+ (int)(1*deltaMflow));
caseyquinn 25:fbf7d44e7da4 640 //RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 641 } else {
caseyquinn 8:c4a8f9b67cee 642 digital_pot_set = (digital_pot_set+ digital_pot_change);
caseyquinn 25:fbf7d44e7da4 643 //RGB_LED.set_led(1,1,0);
caseyquinn 8:c4a8f9b67cee 644 }
caseyquinn 8:c4a8f9b67cee 645
caseyquinn 12:5b4f3245606a 646 if(digital_pot_set>=digitalpotMax) {
caseyquinn 12:5b4f3245606a 647 digital_pot_set = digitalpotMax;
caseyquinn 25:fbf7d44e7da4 648 //RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 649 } else if(digital_pot_set<=digitalpotMin) {
caseyquinn 12:5b4f3245606a 650 digital_pot_set = digitalpotMin;
caseyquinn 25:fbf7d44e7da4 651 //RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 652 }
caseyquinn 8:c4a8f9b67cee 653
caseyquinn 8:c4a8f9b67cee 654 DigPot.writeRegister(digital_pot_set);
caseyquinn 12:5b4f3245606a 655
caseyquinn 8:c4a8f9b67cee 656 } else {
caseyquinn 25:fbf7d44e7da4 657 //RGB_LED.set_led(0,1,0);
caseyquinn 8:c4a8f9b67cee 658 }
caseyquinn 12:5b4f3245606a 659
caseyquinn 25:fbf7d44e7da4 660
caseyquinn 8:c4a8f9b67cee 661 }
caseyquinn 9:8646fd501832 662 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 663 //Main Function
caseyquinn 9:8646fd501832 664 //////////////////////////////////////////////////////////////
jelord 1:9fbb5b665068 665 int main(){
caseyquinn 27:922f53fa649c 666
caseyquinn 29:fd74725294d5 667
caseyquinn 23:1ca41779b8ec 668 RGB_LED.set_led(0,0,1);
caseyquinn 28:42932d3b105d 669
caseyquinn 29:fd74725294d5 670 /*
caseyquinn 27:922f53fa649c 671 while(1){
caseyquinn 27:922f53fa649c 672 if(sdCD == 0){
caseyquinn 27:922f53fa649c 673 RGB_LED.set_led(0,1,0);
caseyquinn 27:922f53fa649c 674 }else{
caseyquinn 27:922f53fa649c 675 RGB_LED.set_led(1,0,0);
caseyquinn 27:922f53fa649c 676 }
caseyquinn 27:922f53fa649c 677
caseyquinn 27:922f53fa649c 678 wait(10);
caseyquinn 27:922f53fa649c 679 }
caseyquinn 35:e0bdd6389a75 680
caseyquinn 13:455601f62aad 681
caseyquinn 28:42932d3b105d 682 schoolF1.getFault();
caseyquinn 28:42932d3b105d 683 homeF2.getFault();
caseyquinn 28:42932d3b105d 684 transitF3.getFault();
caseyquinn 28:42932d3b105d 685 blankF4.getFault();
caseyquinn 23:1ca41779b8ec 686
caseyquinn 30:aa6324845a84 687 schoolF1.drive(253); //closed = 253, open = 254
caseyquinn 28:42932d3b105d 688 homeF2.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 689 transitF3.drive(253); //closed = 253, open = 254
caseyquinn 28:42932d3b105d 690 blankF4.drive(253); //closed = 253, open = 254
caseyquinn 28:42932d3b105d 691
caseyquinn 28:42932d3b105d 692 wait(1);
caseyquinn 28:42932d3b105d 693 schoolF1.stop();
caseyquinn 28:42932d3b105d 694 homeF2.stop();
caseyquinn 28:42932d3b105d 695 transitF3.stop();
caseyquinn 28:42932d3b105d 696 blankF4.stop();
caseyquinn 35:e0bdd6389a75 697 */
caseyquinn 35:e0bdd6389a75 698
caseyquinn 35:e0bdd6389a75 699 schoolF1.getFault();
caseyquinn 35:e0bdd6389a75 700 homeF2.getFault();
caseyquinn 35:e0bdd6389a75 701 transitF3.getFault();
caseyquinn 35:e0bdd6389a75 702 blankF4.getFault();
caseyquinn 35:e0bdd6389a75 703
caseyquinn 35:e0bdd6389a75 704 schoolF1.drive(253); //closed = 253, open = 254
caseyquinn 35:e0bdd6389a75 705 homeF2.drive(254); //closed = 253, open = 254
caseyquinn 35:e0bdd6389a75 706 transitF3.drive(253); //closed = 253, open = 254
caseyquinn 35:e0bdd6389a75 707 blankF4.drive(253); //closed = 253, open = 254
caseyquinn 35:e0bdd6389a75 708
caseyquinn 35:e0bdd6389a75 709 wait(1);
caseyquinn 35:e0bdd6389a75 710 schoolF1.stop();
caseyquinn 35:e0bdd6389a75 711 homeF2.stop();
caseyquinn 35:e0bdd6389a75 712 transitF3.stop();
caseyquinn 35:e0bdd6389a75 713 blankF4.stop();
caseyquinn 30:aa6324845a84 714
caseyquinn 30:aa6324845a84 715
caseyquinn 23:1ca41779b8ec 716
caseyquinn 23:1ca41779b8ec 717 gpsEN = 1;
caseyquinn 23:1ca41779b8ec 718 wait(1);
caseyquinn 23:1ca41779b8ec 719 BT_SW = 1;
caseyquinn 23:1ca41779b8ec 720 wait(1);
caseyquinn 23:1ca41779b8ec 721 BT_IRST = 1;
caseyquinn 23:1ca41779b8ec 722 wait(1);
caseyquinn 23:1ca41779b8ec 723
caseyquinn 12:5b4f3245606a 724
caseyquinn 10:06fbb1c9e3bd 725 pc.baud(115200); // set what you want here depending on your terminal program speed
caseyquinn 10:06fbb1c9e3bd 726 pc.printf("\f\n\r-------------Startup-------------\n\r");
jelord 1:9fbb5b665068 727 wait(0.5);
caseyquinn 5:c3252e5d45ca 728
caseyquinn 29:fd74725294d5 729
caseyquinn 29:fd74725294d5 730
caseyquinn 29:fd74725294d5 731 uint8_t serialNumberAndType[6] = {0x50,0x53,}; //ex) PS0018 // 0x50,0x53 <- ASCII 80 + 83 (PS) //0x4d,0x53 <- ASCII 77 + 83 (MS)
caseyquinn 29:fd74725294d5 732 E2PROM.read(0x00034,serialNumberAndType+2,2);
caseyquinn 29:fd74725294d5 733
caseyquinn 29:fd74725294d5 734 int tempSerialNum = ((serialNumberAndType[2]-48)*10 + serialNumberAndType[3]-48);
caseyquinn 29:fd74725294d5 735 if(tempSerialNum < 18){
caseyquinn 29:fd74725294d5 736 serialNumberAndType[0] = 0x4D;
caseyquinn 29:fd74725294d5 737 }
caseyquinn 13:455601f62aad 738
jelord 3:122bfc998c4c 739 int serialNumDigits[4];
jelord 3:122bfc998c4c 740 serialNumDigits[0] = tempSerialNum / 1000 % 10;
jelord 3:122bfc998c4c 741 serialNumDigits[1] = tempSerialNum / 100 % 10;
jelord 3:122bfc998c4c 742 serialNumDigits[2] = tempSerialNum / 10 % 10;
jelord 3:122bfc998c4c 743 serialNumDigits[3] = tempSerialNum % 10;
jelord 3:122bfc998c4c 744
caseyquinn 29:fd74725294d5 745
jelord 3:122bfc998c4c 746 serialNumberAndType[2] = serialNumDigits[0]+48;
jelord 3:122bfc998c4c 747 serialNumberAndType[3] = serialNumDigits[1]+48;
jelord 3:122bfc998c4c 748 serialNumberAndType[4] = serialNumDigits[2]+48;
jelord 3:122bfc998c4c 749 serialNumberAndType[5] = serialNumDigits[3]+48;
caseyquinn 12:5b4f3245606a 750
caseyquinn 29:fd74725294d5 751 /*
caseyquinn 29:fd74725294d5 752 serialNumberAndType[2] = serialNumDigits[0];
caseyquinn 29:fd74725294d5 753 serialNumberAndType[3] = serialNumDigits[1];
caseyquinn 29:fd74725294d5 754 serialNumberAndType[4] = serialNumDigits[2];
caseyquinn 29:fd74725294d5 755 serialNumberAndType[5] = serialNumDigits[3];
caseyquinn 29:fd74725294d5 756 */
caseyquinn 29:fd74725294d5 757
caseyquinn 29:fd74725294d5 758 RGB_LED.set_led(0,1,0);
caseyquinn 13:455601f62aad 759
caseyquinn 10:06fbb1c9e3bd 760 pc.attach(pc_recv);
jelord 1:9fbb5b665068 761 microChannel.attach(uartMicro,microChannel.RxIrq);
jelord 3:122bfc998c4c 762 microChannel.baud(115200);
jelord 1:9fbb5b665068 763 microChannel.printf("$$$");
jelord 3:122bfc998c4c 764 wait(0.5);
jelord 3:122bfc998c4c 765 microChannel.printf("SN,");
jelord 3:122bfc998c4c 766 for(int i=0;i<6;i++)microChannel.putc(serialNumberAndType[i]);
jelord 3:122bfc998c4c 767 microChannel.printf("\r");
jelord 3:122bfc998c4c 768 wait(0.5);
jelord 1:9fbb5b665068 769 microChannel.printf("A\r");
jelord 3:122bfc998c4c 770 wait(0.5);
jelord 2:88fcbfadec6a 771 microChannel.printf("---\r");
jelord 3:122bfc998c4c 772 wait(0.5);
jelord 2:88fcbfadec6a 773
caseyquinn 18:41ef98db0423 774 RGB_LED.set_led(1,1,1);
jelord 3:122bfc998c4c 775 while(runReady!=1) {
jelord 3:122bfc998c4c 776 wait(1);
caseyquinn 26:6aa294d83af4 777 pc.printf("Waiting for BLE instruction\r\n");
jelord 3:122bfc998c4c 778
jelord 3:122bfc998c4c 779 }
jelord 3:122bfc998c4c 780
caseyquinn 14:7cdb643da356 781
jelord 3:122bfc998c4c 782 E2PROM.read(0x00015, startAndEndTime, 12); //Grab start and end times from EEPROM
jelord 3:122bfc998c4c 783 RGB_LED.set_led(0,1,0);
caseyquinn 14:7cdb643da356 784
caseyquinn 26:6aa294d83af4 785
caseyquinn 26:6aa294d83af4 786 //Pull MicroEnviornment Lat/Lons from EEPROM
caseyquinn 26:6aa294d83af4 787 // Latitude School EEPROM = 0x50-0x53
caseyquinn 26:6aa294d83af4 788 // Longitude School EEPROM = 0x54-0x57
caseyquinn 26:6aa294d83af4 789 // Latitude Home EEPROM = 0x58-0x5B
caseyquinn 26:6aa294d83af4 790 // Longitude Home EEPROM = 0x5C-0x5F
caseyquinn 26:6aa294d83af4 791
caseyquinn 26:6aa294d83af4 792 uint8_t workLat[4] = {0,};
caseyquinn 26:6aa294d83af4 793 E2PROM.read(0x00050,workLat,4);
caseyquinn 26:6aa294d83af4 794 E2PROM.byteToFloat(workLat, &work_lat);
caseyquinn 26:6aa294d83af4 795
caseyquinn 26:6aa294d83af4 796 uint8_t workLon[4] = {0,};
caseyquinn 26:6aa294d83af4 797 E2PROM.read(0x00054,workLon,4);
caseyquinn 26:6aa294d83af4 798 E2PROM.byteToFloat(workLon, &work_lon);
caseyquinn 26:6aa294d83af4 799
caseyquinn 26:6aa294d83af4 800 uint8_t homeLat[4] = {0,};
caseyquinn 26:6aa294d83af4 801 E2PROM.read(0x00058,homeLat,4);
caseyquinn 26:6aa294d83af4 802 E2PROM.byteToFloat(homeLat, &home_lat);
caseyquinn 26:6aa294d83af4 803
caseyquinn 26:6aa294d83af4 804 uint8_t homeLon[4] = {0,};
caseyquinn 26:6aa294d83af4 805 E2PROM.read(0x0005C,homeLon,4);
caseyquinn 26:6aa294d83af4 806 E2PROM.byteToFloat(homeLon, &home_lon);
caseyquinn 26:6aa294d83af4 807
caseyquinn 26:6aa294d83af4 808 pc.printf("%f,%f\r\n%f,%f\r\n", home_lat, home_lon, work_lat, work_lon);
caseyquinn 26:6aa294d83af4 809
caseyquinn 7:29b01d5812ee 810 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 7:29b01d5812ee 811 //UPDATE THIS TO WORK WITH ST RTC INSTEAD
caseyquinn 7:29b01d5812ee 812 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 14:7cdb643da356 813
caseyquinn 21:bb10efc5bf57 814 BT_SW = 0;
caseyquinn 21:bb10efc5bf57 815 wait(1);
caseyquinn 21:bb10efc5bf57 816 BT_IRST = 0;
caseyquinn 21:bb10efc5bf57 817 wait(1);
caseyquinn 21:bb10efc5bf57 818
jelord 3:122bfc998c4c 819 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 820 wait(0.5);
jelord 3:122bfc998c4c 821
jelord 3:122bfc998c4c 822 RTC_UPAS.get_time();
jelord 3:122bfc998c4c 823
jelord 3:122bfc998c4c 824 }
caseyquinn 14:7cdb643da356 825
caseyquinn 29:fd74725294d5 826 //Get the subject line information
caseyquinn 29:fd74725294d5 827 uint8_t subjectLabelOriginal[8] = {0,};
caseyquinn 29:fd74725294d5 828 E2PROM.read(0x00001, subjectLabelOriginal,8);
jelord 3:122bfc998c4c 829
jelord 3:122bfc998c4c 830 //Get the proper serial number
jelord 3:122bfc998c4c 831 uint8_t serialBytes[2] = {0,};
caseyquinn 29:fd74725294d5 832 E2PROM.read(0x00034,serialBytes,2);
caseyquinn 29:fd74725294d5 833 serial_num = (uint16_t)(((serialBytes[0]-48)*10 + serialBytes[1]-48));
caseyquinn 29:fd74725294d5 834
caseyquinn 29:fd74725294d5 835
caseyquinn 29:fd74725294d5 836 ////////////////////////////////////////////////////////////////////
caseyquinn 29:fd74725294d5 837 //Temporary fix for setting serial_num
caseyquinn 29:fd74725294d5 838 ////////////////////////////////////////////////////////////////////
caseyquinn 29:fd74725294d5 839 //uint8_t serialsubjectLabelOriginal[2] = {0,};
caseyquinn 29:fd74725294d5 840 //E2PROM.read(0x00001, serialsubjectLabelOriginal,2);
caseyquinn 29:fd74725294d5 841 //uint8_t newserialBytes[2] = {0,};
caseyquinn 29:fd74725294d5 842
caseyquinn 30:aa6324845a84 843 if(subjectLabelOriginal[2] == 126){
caseyquinn 29:fd74725294d5 844 E2PROM.write(0x00034,subjectLabelOriginal,2);
caseyquinn 29:fd74725294d5 845 serial_num = (uint16_t)(((subjectLabelOriginal[0]-48)*10 + subjectLabelOriginal[1]-48));
caseyquinn 29:fd74725294d5 846 }
caseyquinn 29:fd74725294d5 847
caseyquinn 29:fd74725294d5 848 //----------------------------------------------
jelord 3:122bfc998c4c 849 calibrations.initialize(serial_num);
caseyquinn 29:fd74725294d5 850 pc.printf("%d\r\n", serial_num);
caseyquinn 29:fd74725294d5 851 pc.printf("%f\r\n",calibrations.MF4);
caseyquinn 29:fd74725294d5 852 //----------------------------------------------
caseyquinn 29:fd74725294d5 853 ////////////////////////////////////////////////////////////////////
caseyquinn 29:fd74725294d5 854
jelord 3:122bfc998c4c 855
jelord 3:122bfc998c4c 856 uint8_t logByte[1] = {0,};
jelord 3:122bfc998c4c 857 E2PROM.read(0x00014,logByte,1);
jelord 3:122bfc998c4c 858 logInerval = logByte[0];
jelord 3:122bfc998c4c 859
jelord 3:122bfc998c4c 860 //Use the flow rate value stored in eeprom
jelord 3:122bfc998c4c 861 uint8_t flowRateBytes[4] = {0,};
jelord 3:122bfc998c4c 862 E2PROM.read(0x00010,flowRateBytes,4);
jelord 3:122bfc998c4c 863 E2PROM.byteToFloat(flowRateBytes, &volflowSet);
caseyquinn 29:fd74725294d5 864
caseyquinn 29:fd74725294d5 865
jelord 3:122bfc998c4c 866 if(volflowSet<=1.0) {
jelord 3:122bfc998c4c 867 gainFlow = 100;
jelord 3:122bfc998c4c 868 } else if(volflowSet>=2.0) {
jelord 3:122bfc998c4c 869 gainFlow = 25;
jelord 3:122bfc998c4c 870 } else {
jelord 3:122bfc998c4c 871 gainFlow = 25;
jelord 0:2cb2b2ea316f 872 }
caseyquinn 17:3e6dda6e6335 873
jelord 3:122bfc998c4c 874 RGB_LED.set_led(1,0,0);
jelord 3:122bfc998c4c 875 press = bmesensor.getPressure();
jelord 3:122bfc998c4c 876 temp = bmesensor.getTemperature();
jelord 3:122bfc998c4c 877 rh = bmesensor.getHumidity();
jelord 3:122bfc998c4c 878
jelord 3:122bfc998c4c 879 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 880 massflowSet = volflowSet*atmoRho;
jelord 3:122bfc998c4c 881
jelord 3:122bfc998c4c 882 DigPot.writeRegister(digital_pot_setpoint);
jelord 3:122bfc998c4c 883 wait(1);
caseyquinn 28:42932d3b105d 884 pumps = 1;
caseyquinn 25:fbf7d44e7da4 885 //pumpOn = 1;
jelord 3:122bfc998c4c 886
caseyquinn 35:e0bdd6389a75 887
caseyquinn 29:fd74725294d5 888 if(volflowSet<=1.0) {
caseyquinn 29:fd74725294d5 889 gainFlow = 100;
caseyquinn 29:fd74725294d5 890 } else if(volflowSet>=2.0) {
caseyquinn 29:fd74725294d5 891 gainFlow = 25;
caseyquinn 29:fd74725294d5 892 } else {
caseyquinn 29:fd74725294d5 893 gainFlow = 25;
caseyquinn 29:fd74725294d5 894 }
caseyquinn 29:fd74725294d5 895
caseyquinn 29:fd74725294d5 896 RGB_LED.set_led(1,0,0);
caseyquinn 29:fd74725294d5 897 press = bmesensor.getPressure();
caseyquinn 29:fd74725294d5 898 temp = bmesensor.getTemperature();
caseyquinn 29:fd74725294d5 899 rh = bmesensor.getHumidity();
caseyquinn 29:fd74725294d5 900
caseyquinn 29:fd74725294d5 901 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 29:fd74725294d5 902 massflowSet = volflowSet*atmoRho;
caseyquinn 29:fd74725294d5 903
caseyquinn 29:fd74725294d5 904 //Digtal pot tf from file: UPAS v2 OSU-PrimaryFlowData FullSet 2015-05-29 CQ mods.xlsx
caseyquinn 29:fd74725294d5 905 digital_pot_setpoint = (int)floor(calibrations.DP4*pow(massflowSet,4)+calibrations.DP3*pow(massflowSet,3)+calibrations.DP2*pow(massflowSet,2)+calibrations.DP1*massflowSet+calibrations.DP0); //min = 0x7F, max = 0x00
caseyquinn 29:fd74725294d5 906
caseyquinn 29:fd74725294d5 907 if(digital_pot_setpoint>=digitalpotMax) {
caseyquinn 29:fd74725294d5 908 digital_pot_setpoint = digitalpotMax;
caseyquinn 29:fd74725294d5 909 } else if(digital_pot_setpoint<=digitalpotMin) {
caseyquinn 29:fd74725294d5 910 digital_pot_setpoint = digitalpotMin;
caseyquinn 29:fd74725294d5 911 }
caseyquinn 29:fd74725294d5 912
caseyquinn 29:fd74725294d5 913 pc.printf("%d\r\n", digital_pot_setpoint);
caseyquinn 29:fd74725294d5 914 DigPot.writeRegister(digital_pot_setpoint);
caseyquinn 29:fd74725294d5 915 wait(1);
caseyquinn 35:e0bdd6389a75 916 pumps = 1;
caseyquinn 35:e0bdd6389a75 917
caseyquinn 29:fd74725294d5 918
caseyquinn 12:5b4f3245606a 919
caseyquinn 13:455601f62aad 920
caseyquinn 12:5b4f3245606a 921
caseyquinn 21:bb10efc5bf57 922 time_t seconds = time(NULL);
caseyquinn 4:5d004fd997d5 923 strftime(timestr, 32, "%y-%m-%d-%H=%M=%S", localtime(&seconds));
caseyquinn 29:fd74725294d5 924 if(tempSerialNum < 18){
caseyquinn 29:fd74725294d5 925 sprintf(filename, "/sd/MS%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 29:fd74725294d5 926
caseyquinn 29:fd74725294d5 927 }
caseyquinn 29:fd74725294d5 928 else{
caseyquinn 29:fd74725294d5 929 sprintf(filename, "/sd/PS%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 29:fd74725294d5 930 }
caseyquinn 22:baa5a077d908 931 //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]);
caseyquinn 25:fbf7d44e7da4 932 //sprintf(filename, "/sd/UPAS_TboardtestLog_%s.txt", timestr);
jelord 3:122bfc998c4c 933 FILE *fp = fopen(filename, "w");
jelord 3:122bfc998c4c 934 fclose(fp);
jelord 3:122bfc998c4c 935
caseyquinn 25:fbf7d44e7da4 936
caseyquinn 34:da333abe3476 937 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 938 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 12:5b4f3245606a 939 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 12:5b4f3245606a 940 massflow = calibrations.omronMFMin;
caseyquinn 12:5b4f3245606a 941 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 12:5b4f3245606a 942 massflow = calibrations.omronMFMax;
caseyquinn 12:5b4f3245606a 943 } else {
caseyquinn 12:5b4f3245606a 944 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 945 }
caseyquinn 12:5b4f3245606a 946 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 947 digital_pot_set = digital_pot_setpoint;
caseyquinn 12:5b4f3245606a 948 wait(5);
caseyquinn 12:5b4f3245606a 949
caseyquinn 12:5b4f3245606a 950 //---------------------------------------------------------------------------------------------//
caseyquinn 12:5b4f3245606a 951 //Sets the flow withen +-1.5% of the desired flow rate based on mass flow
caseyquinn 35:e0bdd6389a75 952
caseyquinn 12:5b4f3245606a 953 while(abs(deltaMflow)>.025) {
caseyquinn 12:5b4f3245606a 954
caseyquinn 34:da333abe3476 955 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 956 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 12:5b4f3245606a 957 //Mass Flow tf from file: UPAS v2 OSU-PrimaryFlowData FullSet 2015-05-29 CQ mods.xlsx
caseyquinn 12:5b4f3245606a 958 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 12:5b4f3245606a 959 massflow = calibrations.omronMFMin;
caseyquinn 12:5b4f3245606a 960 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 12:5b4f3245606a 961 massflow = calibrations.omronMFMax;
caseyquinn 12:5b4f3245606a 962 } else {
caseyquinn 12:5b4f3245606a 963 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 964 }
caseyquinn 12:5b4f3245606a 965
caseyquinn 12:5b4f3245606a 966 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 967 volflow = massflow/atmoRho;
caseyquinn 12:5b4f3245606a 968 massflowSet = volflowSet*atmoRho;
caseyquinn 12:5b4f3245606a 969 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 970
caseyquinn 12:5b4f3245606a 971 digital_pot_set = (int)(digital_pot_set+(int)((gainFlow*deltaMflow)));
caseyquinn 12:5b4f3245606a 972 if(digital_pot_set>=digitalpotMax) {
caseyquinn 12:5b4f3245606a 973 digital_pot_set = digitalpotMax;
caseyquinn 12:5b4f3245606a 974 } else if(digital_pot_set<=digitalpotMin) {
caseyquinn 12:5b4f3245606a 975 digital_pot_set = digitalpotMin;
caseyquinn 12:5b4f3245606a 976 }
caseyquinn 12:5b4f3245606a 977
caseyquinn 12:5b4f3245606a 978 wait(2);
caseyquinn 12:5b4f3245606a 979 DigPot.writeRegister(digital_pot_set);
caseyquinn 12:5b4f3245606a 980 pc.printf("%d,\r\n", digital_pot_set);
caseyquinn 12:5b4f3245606a 981 wait(1);
caseyquinn 12:5b4f3245606a 982
caseyquinn 12:5b4f3245606a 983
caseyquinn 12:5b4f3245606a 984 }
caseyquinn 25:fbf7d44e7da4 985
caseyquinn 35:e0bdd6389a75 986
caseyquinn 29:fd74725294d5 987
jelord 3:122bfc998c4c 988 sampledVol = 0.0;
jelord 3:122bfc998c4c 989 RGB_LED.set_led(0,1,0);
caseyquinn 25:fbf7d44e7da4 990 wait(1);
caseyquinn 25:fbf7d44e7da4 991 RGB_LED.set_led(0,0,0);
caseyquinn 14:7cdb643da356 992
caseyquinn 18:41ef98db0423 993 stop.attach(&check_stop, 9); // check if we should shut down every 9 number seconds, starting after the start.
caseyquinn 14:7cdb643da356 994 logg.attach(&log_data, logInerval);
caseyquinn 35:e0bdd6389a75 995 flowCtl.attach(&flowControl, 3);
caseyquinn 30:aa6324845a84 996
caseyquinn 35:e0bdd6389a75 997
caseyquinn 35:e0bdd6389a75 998
caseyquinn 30:aa6324845a84 999
caseyquinn 29:fd74725294d5 1000 /*
caseyquinn 29:fd74725294d5 1001 wait(60);
caseyquinn 29:fd74725294d5 1002
caseyquinn 29:fd74725294d5 1003 schoolF1.getFault();
caseyquinn 29:fd74725294d5 1004 homeF2.getFault();
caseyquinn 29:fd74725294d5 1005 transitF3.getFault();
caseyquinn 29:fd74725294d5 1006 blankF4.getFault();
caseyquinn 29:fd74725294d5 1007
caseyquinn 29:fd74725294d5 1008 schoolF1.drive(254); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1009 homeF2.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1010 transitF3.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1011 blankF4.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1012
caseyquinn 29:fd74725294d5 1013 wait(1);
caseyquinn 29:fd74725294d5 1014 schoolF1.stop();
caseyquinn 29:fd74725294d5 1015 homeF2.stop();
caseyquinn 29:fd74725294d5 1016 transitF3.stop();
caseyquinn 29:fd74725294d5 1017 blankF4.stop();
caseyquinn 7:29b01d5812ee 1018
jelord 3:122bfc998c4c 1019
caseyquinn 29:fd74725294d5 1020 wait(60);
caseyquinn 29:fd74725294d5 1021
caseyquinn 29:fd74725294d5 1022 schoolF1.getFault();
caseyquinn 29:fd74725294d5 1023 homeF2.getFault();
caseyquinn 29:fd74725294d5 1024 transitF3.getFault();
caseyquinn 29:fd74725294d5 1025 blankF4.getFault();
caseyquinn 29:fd74725294d5 1026
caseyquinn 29:fd74725294d5 1027 schoolF1.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1028 homeF2.drive(254); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1029 transitF3.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1030 blankF4.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1031
caseyquinn 29:fd74725294d5 1032 wait(1);
caseyquinn 29:fd74725294d5 1033 schoolF1.stop();
caseyquinn 29:fd74725294d5 1034 homeF2.stop();
caseyquinn 29:fd74725294d5 1035 transitF3.stop();
caseyquinn 29:fd74725294d5 1036 blankF4.stop();
caseyquinn 29:fd74725294d5 1037
caseyquinn 29:fd74725294d5 1038 wait(60);
caseyquinn 29:fd74725294d5 1039
caseyquinn 29:fd74725294d5 1040 schoolF1.getFault();
caseyquinn 29:fd74725294d5 1041 homeF2.getFault();
caseyquinn 29:fd74725294d5 1042 transitF3.getFault();
caseyquinn 29:fd74725294d5 1043 blankF4.getFault();
caseyquinn 29:fd74725294d5 1044
caseyquinn 29:fd74725294d5 1045 schoolF1.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1046 homeF2.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1047 transitF3.drive(254); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1048 blankF4.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1049
caseyquinn 29:fd74725294d5 1050 wait(1);
caseyquinn 29:fd74725294d5 1051 schoolF1.stop();
caseyquinn 29:fd74725294d5 1052 homeF2.stop();
caseyquinn 29:fd74725294d5 1053 transitF3.stop();
caseyquinn 29:fd74725294d5 1054 blankF4.stop();
caseyquinn 29:fd74725294d5 1055
caseyquinn 29:fd74725294d5 1056 wait(60);
caseyquinn 29:fd74725294d5 1057
caseyquinn 29:fd74725294d5 1058 schoolF1.getFault();
caseyquinn 29:fd74725294d5 1059 homeF2.getFault();
caseyquinn 29:fd74725294d5 1060 transitF3.getFault();
caseyquinn 29:fd74725294d5 1061 blankF4.getFault();
caseyquinn 29:fd74725294d5 1062
caseyquinn 29:fd74725294d5 1063 schoolF1.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1064 homeF2.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1065 transitF3.drive(253); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1066 blankF4.drive(254); //closed = 253, open = 254
caseyquinn 29:fd74725294d5 1067
caseyquinn 29:fd74725294d5 1068 wait(1);
caseyquinn 29:fd74725294d5 1069 schoolF1.stop();
caseyquinn 29:fd74725294d5 1070 homeF2.stop();
caseyquinn 29:fd74725294d5 1071 transitF3.stop();
caseyquinn 29:fd74725294d5 1072 blankF4.stop();
caseyquinn 29:fd74725294d5 1073 */
caseyquinn 29:fd74725294d5 1074
jelord 3:122bfc998c4c 1075 //** end of initalization **//
jelord 3:122bfc998c4c 1076 //---------------------------------------------------------------------------------------------//
jelord 3:122bfc998c4c 1077 //---------------------------------------------------------------------------------------------//
jelord 3:122bfc998c4c 1078 // Main Control Loop
jelord 3:122bfc998c4c 1079
caseyquinn 7:29b01d5812ee 1080 while (1) {
caseyquinn 7:29b01d5812ee 1081 // Do other things...
caseyquinn 14:7cdb643da356 1082 /*
caseyquinn 18:41ef98db0423 1083 pumps = 1;
caseyquinn 13:455601f62aad 1084 wait(5);
caseyquinn 18:41ef98db0423 1085 pumps = 0;
caseyquinn 13:455601f62aad 1086 wait(5);
caseyquinn 14:7cdb643da356 1087 */
caseyquinn 7:29b01d5812ee 1088 }
caseyquinn 7:29b01d5812ee 1089
caseyquinn 8:c4a8f9b67cee 1090
caseyquinn 4:5d004fd997d5 1091
jelord 3:122bfc998c4c 1092
jelord 0:2cb2b2ea316f 1093 }