scott kelleher / Outdoor_UPAS_sharp_octet

all working version 2.0

Dependencies:   ADS1115 BME280 CronoDot SDFileSystem mbed

Fork of Outdoor_UPAS_v1_2_powerfunction by scott kelleher

main.cpp@56:49387b72460e, 2016-05-20 (annotated)

Committer:
caseyquinn
Date:
Fri May 20 15:36:07 2016 +0000
Revision:
56:49387b72460e
Parent:
55:2fb27f1ddff5
Child:
57:1695e252298d
First publish for outdoor UPAS fork

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 43:05aa1fb68946 14 //#include "DRV8830.h"
jelord 39:f1ebecfb32ca 15 #include "Tb_SD_Reader.h"
caseyquinn 52:95949e34b1f6 16 #include <vector>
caseyquinn 52:95949e34b1f6 17 #include <string>
caseyquinn 14:7cdb643da356 18
caseyquinn 56:49387b72460e 19 //Edit for fork
caseyquinn 12:5b4f3245606a 20 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 21 //General Items
caseyquinn 12:5b4f3245606a 22 /////////////////////////////////////////////
caseyquinn 14:7cdb643da356 23 I2C i2c(PB_9, PB_8);//(D14, D15); SDA,SCL
caseyquinn 12:5b4f3245606a 24 Serial pc(USBTX, USBRX);
caseyquinn 18:41ef98db0423 25 DigitalOut pumps(PA_9, 0);//(D8, 0);
caseyquinn 12:5b4f3245606a 26 DigitalOut pbKill(PC_12, 1); // Digital input pin that conncect to the LTC2950 battery charger used to shutdown the UPAS
caseyquinn 13:455601f62aad 27 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 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 17:3e6dda6e6335 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 14:7cdb643da356 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 12:5b4f3245606a 42 DigitalOut BT_IRST(PC_8, 0);
caseyquinn 12:5b4f3245606a 43 DigitalOut BT_SW(PA_12, 0);
caseyquinn 17:3e6dda6e6335 44
caseyquinn 13:455601f62aad 45
caseyquinn 12:5b4f3245606a 46 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 47 //Analog to Digital Converter
caseyquinn 12:5b4f3245606a 48 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 49 Adafruit_ADS1115 ads(&i2c);
caseyquinn 12:5b4f3245606a 50 //DigitalIn ADS_ALRT(PA_10); //Connected but currently unused. (ADS1115) http://www.ti.com/lit/ds/symlink/ads1115.pdf
caseyquinn 12:5b4f3245606a 51
caseyquinn 12:5b4f3245606a 52 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 53 //Battery Monitoring
caseyquinn 12:5b4f3245606a 54 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 55 STC3100 gasG(PB_9, PB_8);//(D14, D15); // http://www.st.com/web/en/resource/technical/document/datasheet/CD00219947.pdf
caseyquinn 28:42932d3b105d 56 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 57 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 58
caseyquinn 12:5b4f3245606a 59 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 60 //Accelerometer and Magnometer
caseyquinn 12:5b4f3245606a 61 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 62 LSM303 movementsensor(PB_9, PB_8);//(D14, D15); // http://www.st.com/web/en/resource/technical/document/datasheet/DM00027543.pdf
caseyquinn 12:5b4f3245606a 63 //DigitalIn ACC_INT1(PC_7); //Connected but currently unused. (LSM303)
caseyquinn 12:5b4f3245606a 64 //DigitalIn ACC_INT2(PC_6); //Connected but currently unused. (LSM303)
caseyquinn 12:5b4f3245606a 65 //DigitalIn ACC_DRDY(PC_11); //Connected but currently unused. (LSM303)
jelord 0:2cb2b2ea316f 66
caseyquinn 12:5b4f3245606a 67 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 68 //UV and Visible Light Sensor
caseyquinn 12:5b4f3245606a 69 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 70 SI1145 lightsensor(PB_9, PB_8);//(D14, D15);
caseyquinn 12:5b4f3245606a 71 //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 72
caseyquinn 12:5b4f3245606a 73 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 74 //GPS
caseyquinn 12:5b4f3245606a 75 /////////////////////////////////////////////
caseyquinn 17:3e6dda6e6335 76 DigitalOut gpsEN(PB_15, 0);
caseyquinn 23:1ca41779b8ec 77 Max_M8 gps(PB_9, PB_8,(0x84));
caseyquinn 12:5b4f3245606a 78
caseyquinn 43:05aa1fb68946 79 /*
caseyquinn 12:5b4f3245606a 80 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 81 //Hbridge Valve Control
caseyquinn 12:5b4f3245606a 82 /////////////////////////////////////////////
caseyquinn 36:2e344db70d35 83 DRV8830 schoolF1(PB_9, PB_8, 0xC4); //Work/School Filter A HB1
caseyquinn 36:2e344db70d35 84 DRV8830 homeF2(PB_9, PB_8, 0xCA); //Home Filter B HB2
caseyquinn 36:2e344db70d35 85 DRV8830 transitF3(PB_9, PB_8, 0xCC); //Transit Filter C HB3
caseyquinn 36:2e344db70d35 86 DRV8830 blankF4(PB_9, PB_8, 0xCE); //Blank Filter D HB4
caseyquinn 28:42932d3b105d 87 DigitalIn hb1_school(PA_6);
caseyquinn 28:42932d3b105d 88 DigitalIn hb2_home(PA_7);
caseyquinn 28:42932d3b105d 89 DigitalIn hb3_transit(PA_5);
caseyquinn 28:42932d3b105d 90 DigitalIn hb4_blank(PA_4);
caseyquinn 43:05aa1fb68946 91 */
caseyquinn 23:1ca41779b8ec 92
caseyquinn 12:5b4f3245606a 93 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 94 //SD Card
caseyquinn 12:5b4f3245606a 95 /////////////////////////////////////////////
caseyquinn 52:95949e34b1f6 96 char filename[] = "/sd/MS000LOG_000000_000000_000000_000000_---------------_xxx.txt";
caseyquinn 12:5b4f3245606a 97 SDFileSystem sd(PB_5, PB_4, PB_3, PB_6, "sd");//(D4, D5, D3, D10, "sd"); // (MOSI, MISO, SCK, SEL)
jelord 39:f1ebecfb32ca 98 Tb_SD_Reader sdReader;
caseyquinn 28:42932d3b105d 99 DigitalIn sdCD(PA_11, PullUp);
caseyquinn 52:95949e34b1f6 100
caseyquinn 14:7cdb643da356 101
caseyquinn 12:5b4f3245606a 102 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 103 //Callbacks
caseyquinn 12:5b4f3245606a 104 /////////////////////////////////////////////
caseyquinn 9:8646fd501832 105 Ticker stop; //This is the stop callback object
caseyquinn 8:c4a8f9b67cee 106 Ticker logg; //This is the logging callback object
caseyquinn 9:8646fd501832 107 Ticker flowCtl; //This is the control loop callback object
jelord 3:122bfc998c4c 108
caseyquinn 12:5b4f3245606a 109 /////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 110 //Varible Definitions
caseyquinn 12:5b4f3245606a 111 /////////////////////////////////////////////
jelord 3:122bfc998c4c 112 uint16_t serial_num = 1; // Default serial/calibration number
jelord 3:122bfc998c4c 113 int RunReady =0;
jelord 3:122bfc998c4c 114
caseyquinn 25:fbf7d44e7da4 115 bool ledOn = 0;
caseyquinn 25:fbf7d44e7da4 116
caseyquinn 4:5d004fd997d5 117 struct tm STtime;
caseyquinn 7:29b01d5812ee 118 char timestr[32];
caseyquinn 43:05aa1fb68946 119 char yrstr[4];
caseyquinn 43:05aa1fb68946 120 char mostr[4];
caseyquinn 43:05aa1fb68946 121 char daystr[4];
caseyquinn 43:05aa1fb68946 122 char hrstr[4];
caseyquinn 43:05aa1fb68946 123 char minstr[4];
caseyquinn 43:05aa1fb68946 124 char secstr[4];
caseyquinn 43:05aa1fb68946 125
caseyquinn 43:05aa1fb68946 126 int stYr, stMo, stDay, stHr, stMin, stSec;
jelord 3:122bfc998c4c 127
caseyquinn 36:2e344db70d35 128
caseyquinn 9:8646fd501832 129 float press;
caseyquinn 9:8646fd501832 130 float temp;
caseyquinn 9:8646fd501832 131 float rh;
jelord 3:122bfc998c4c 132
caseyquinn 9:8646fd501832 133 int uv;
caseyquinn 9:8646fd501832 134 int vis;
caseyquinn 9:8646fd501832 135 int ir;
jelord 3:122bfc998c4c 136
caseyquinn 9:8646fd501832 137 float compass;
caseyquinn 9:8646fd501832 138 float accel_x;
caseyquinn 9:8646fd501832 139 float accel_y;
caseyquinn 9:8646fd501832 140 float accel_z;
caseyquinn 9:8646fd501832 141 float accel_comp;
caseyquinn 9:8646fd501832 142 float angle_x;
caseyquinn 9:8646fd501832 143 float angle_y;
caseyquinn 9:8646fd501832 144 float angle_z;
caseyquinn 9:8646fd501832 145 float mag_x;
caseyquinn 9:8646fd501832 146 float mag_y;
caseyquinn 9:8646fd501832 147 float mag_z;
jelord 3:122bfc998c4c 148
caseyquinn 9:8646fd501832 149 int vInReading;
caseyquinn 25:fbf7d44e7da4 150 int vInReadingLast;
caseyquinn 9:8646fd501832 151 int vBlowerReading;
caseyquinn 9:8646fd501832 152 int omronDiff;
caseyquinn 9:8646fd501832 153 float omronVolt; //V
caseyquinn 9:8646fd501832 154 int omronReading;
caseyquinn 9:8646fd501832 155 float atmoRho; //g/L
jelord 3:122bfc998c4c 156
caseyquinn 25:fbf7d44e7da4 157 int amps;
caseyquinn 25:fbf7d44e7da4 158 int bVolt;
caseyquinn 25:fbf7d44e7da4 159 int bFuel;
caseyquinn 25:fbf7d44e7da4 160 //bool pumpOn;
caseyquinn 9:8646fd501832 161 float massflow; //g/min
caseyquinn 9:8646fd501832 162 float volflow; //L/min
jelord 3:122bfc998c4c 163 float volflowSet = 1.0; //L/min
caseyquinn 14:7cdb643da356 164 int logInerval = 5;//seconds
jelord 3:122bfc998c4c 165 double secondsD = 0;
jelord 3:122bfc998c4c 166 double lastsecondD = 0;
caseyquinn 9:8646fd501832 167 float massflowSet;
jelord 3:122bfc998c4c 168 float deltaVflow = 0.0;
jelord 3:122bfc998c4c 169 float deltaMflow = 0.0;
caseyquinn 9:8646fd501832 170 float gainFlow;
caseyquinn 9:8646fd501832 171 float sampledVol; //L, total sampled volume
jelord 3:122bfc998c4c 172
caseyquinn 29:fd74725294d5 173 int digital_pot_setpoint = 30; //min = 0x7F, max = 0x00
caseyquinn 9:8646fd501832 174 int digital_pot_set;
caseyquinn 9:8646fd501832 175 int digital_pot_change;
jelord 3:122bfc998c4c 176 int digitalpotMax = 127;
caseyquinn 9:8646fd501832 177 int digitalpotMin = 10;
jelord 3:122bfc998c4c 178
caseyquinn 46:99d129bfdbbd 179 //int dutyUp;
caseyquinn 46:99d129bfdbbd 180 //int dutyDown;
caseyquinn 46:99d129bfdbbd 181 int dutycycleSecOn;
caseyquinn 46:99d129bfdbbd 182 int dutyCycleI;
caseyquinn 12:5b4f3245606a 183
caseyquinn 23:1ca41779b8ec 184 bool gpsFix;
caseyquinn 12:5b4f3245606a 185 uint8_t gpssatellites = 0;
caseyquinn 23:1ca41779b8ec 186 double gpsspeed = 0.0;
caseyquinn 28:42932d3b105d 187 double gpscourse = 0.0;
caseyquinn 23:1ca41779b8ec 188 double gpslatitude = 0.0;
caseyquinn 23:1ca41779b8ec 189 double gpslongitude = 0.0;
caseyquinn 23:1ca41779b8ec 190 float gpsaltitude = 0.0;
caseyquinn 51:feba3e2aa1a0 191 long gpsTime;
caseyquinn 51:feba3e2aa1a0 192 long gpsDate;
caseyquinn 12:5b4f3245606a 193
caseyquinn 26:6aa294d83af4 194 float home_lat = 40.00000; //40.580508;
caseyquinn 26:6aa294d83af4 195 float home_lon = -105.000000; //-105.081823;
caseyquinn 36:2e344db70d35 196 float home_lat2 = 40.00000; //40.580508;
caseyquinn 36:2e344db70d35 197 float home_lon2 = -105.000000; //-105.081823;
caseyquinn 26:6aa294d83af4 198 float work_lat = 40.100000; //40.594062; //40.569136;
caseyquinn 26:6aa294d83af4 199 float work_lon = -105.100000; //-105.075683; //-105.081966;
caseyquinn 12:5b4f3245606a 200 int location = 0;
caseyquinn 12:5b4f3245606a 201
caseyquinn 12:5b4f3245606a 202 float homeDistance = 99999;
caseyquinn 36:2e344db70d35 203 float home2Distance = 99999;
caseyquinn 12:5b4f3245606a 204 float workDistance = 99999;
caseyquinn 12:5b4f3245606a 205
jelord 3:122bfc998c4c 206 //*************************************************//
jelord 3:122bfc998c4c 207
jelord 2:88fcbfadec6a 208 void sendData();
caseyquinn 52:95949e34b1f6 209 void Read_File();
caseyquinn 52:95949e34b1f6 210 int file_copy(const char *src, const char *dst);
caseyquinn 52:95949e34b1f6 211 //void Read_File(char[]);
caseyquinn 11:aa21628a9b15 212
caseyquinn 11:aa21628a9b15 213 void pc_recv(){
caseyquinn 11:aa21628a9b15 214 while(pc.readable()){
caseyquinn 11:aa21628a9b15 215 pc.getc();
caseyquinn 11:aa21628a9b15 216 }
caseyquinn 11:aa21628a9b15 217 }
caseyquinn 11:aa21628a9b15 218
jelord 0:2cb2b2ea316f 219 static uint8_t rx_buf[20];
jelord 0:2cb2b2ea316f 220 static uint8_t rx_len=0;
jelord 1:9fbb5b665068 221 static int haltBLE = 1;
jelord 1:9fbb5b665068 222 static int transmissionValue = 0;
jelord 2:88fcbfadec6a 223 uint8_t writeData[20] = {0,};
jelord 2:88fcbfadec6a 224 static uint8_t dataLength = 0;
jelord 3:122bfc998c4c 225 static int runReady = 0;
jelord 3:122bfc998c4c 226 static uint8_t startAndEndTime[12] = {0,};
jelord 39:f1ebecfb32ca 227 static uint8_t fileTransferLock = 0;
jelord 49:055231b09a7e 228 static uint8_t transmissionStopLock = 1;
caseyquinn 5:c3252e5d45ca 229
caseyquinn 9:8646fd501832 230 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 231 //BLE Functions
caseyquinn 9:8646fd501832 232 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 233
caseyquinn 9:8646fd501832 234 void uartMicro(){
caseyquinn 25:fbf7d44e7da4 235
jelord 3:122bfc998c4c 236 if(runReady!=1){
jelord 3:122bfc998c4c 237 haltBLE = 2;
jelord 3:122bfc998c4c 238 while(microChannel.readable()){
jelord 3:122bfc998c4c 239 rx_buf[rx_len++] = microChannel.getc();
jelord 2:88fcbfadec6a 240
jelord 3:122bfc998c4c 241 //Code block to verify what is being transmitted. To function correctly, all data must terminate with \0 or \n
jelord 3:122bfc998c4c 242 if(transmissionValue==0){
jelord 3:122bfc998c4c 243
caseyquinn 4:5d004fd997d5 244 if (rx_buf[0] == 0x01)transmissionValue = 1; //rtc
jelord 3:122bfc998c4c 245 else if(rx_buf[0] == 0x02)transmissionValue = 2; //sample start and end times
jelord 3:122bfc998c4c 246 else if(rx_buf[0] == 0x03)transmissionValue = 3; //sample name
jelord 3:122bfc998c4c 247 else if(rx_buf[0] == 0x04)transmissionValue = 4; //Send Data Check
jelord 3:122bfc998c4c 248
jelord 3:122bfc998c4c 249 else if(rx_buf[0] == 0x05)transmissionValue = 5; //log interval
jelord 3:122bfc998c4c 250 else if(rx_buf[0] == 0x06)transmissionValue = 6; //Flow Rate
jelord 3:122bfc998c4c 251 else if(rx_buf[0] == 0x07)transmissionValue = 7; //Serial Number
jelord 3:122bfc998c4c 252 else if(rx_buf[0] == 0x08)transmissionValue = 8; //Run Enable
caseyquinn 25:fbf7d44e7da4 253 else if(rx_buf[0] == 0x0A)transmissionValue = 10; //GPS Coordinates
jelord 33:03d0e7f5ef0a 254 else if(rx_buf[0] == 0x0B)transmissionValue = 11; //GPS Coordinates (Second Set)
jelord 38:65ae9771f1e3 255 else if(rx_buf[0] == 0x0C)transmissionValue = 12; //Cartridge ID
jelord 38:65ae9771f1e3 256 else if(rx_buf[0] == 0x0D)transmissionValue = 13; //Duty Cycle
jelord 39:f1ebecfb32ca 257 else if (rx_buf[0] == 0x0F)transmissionValue = 15; //BT TRANSFER TEST
caseyquinn 25:fbf7d44e7da4 258 //else if(rx_buf[0] == 0x30)RGB_LED.set_led(1,0,0);
jelord 3:122bfc998c4c 259 else transmissionValue = 100; //Not useful data
jelord 3:122bfc998c4c 260 }
jelord 3:122bfc998c4c 261
jelord 38:65ae9771f1e3 262 if(rx_buf[rx_len-1]=='\0' || rx_buf[rx_len-1]=='\n' || rx_buf[rx_len-1] == 0xff || transmissionValue==15){
jelord 3:122bfc998c4c 263 if((transmissionValue == 1 || transmissionValue == 2 || transmissionValue == 3 || transmissionValue == 4 || transmissionValue == 5 ||
jelord 38:65ae9771f1e3 264 transmissionValue == 6 || transmissionValue == 7 || transmissionValue ==10 || transmissionValue ==11 || transmissionValue ==12) && rx_buf[rx_len-1] != 0xff)
jelord 3:122bfc998c4c 265 {}else{
caseyquinn 21:bb10efc5bf57 266 if(transmissionValue == 4 ) sendData();
jelord 39:f1ebecfb32ca 267 if(transmissionValue == 15){
jelord 39:f1ebecfb32ca 268 if(fileTransferLock==0){
jelord 39:f1ebecfb32ca 269 fileTransferLock=1;
caseyquinn 52:95949e34b1f6 270 //Read_File(fileTest);
caseyquinn 52:95949e34b1f6 271 Read_File();
jelord 39:f1ebecfb32ca 272 fileTransferLock=0;
jelord 39:f1ebecfb32ca 273 RGB_LED.set_led(1,1,1);
jelord 39:f1ebecfb32ca 274 }
jelord 49:055231b09a7e 275 }
jelord 49:055231b09a7e 276 if((transmissionValue == 10 && dataLength<17)||(transmissionValue == 11 && dataLength<9))transmissionStopLock=0;
jelord 49:055231b09a7e 277 else transmissionStopLock=1;
jelord 3:122bfc998c4c 278 if(transmissionValue == 8){
jelord 3:122bfc998c4c 279 runReady = 1;
jelord 3:122bfc998c4c 280 microChannel.attach(NULL,microChannel.RxIrq);
jelord 49:055231b09a7e 281 }
jelord 49:055231b09a7e 282 if(transmissionStopLock==1){
jelord 49:055231b09a7e 283 haltBLE = 1;
jelord 49:055231b09a7e 284 transmissionValue = 0;
jelord 49:055231b09a7e 285 dataLength = 0;
jelord 49:055231b09a7e 286 }
jelord 3:122bfc998c4c 287 }
jelord 2:88fcbfadec6a 288 }
jelord 1:9fbb5b665068 289 }
caseyquinn 12:5b4f3245606a 290
jelord 3:122bfc998c4c 291 if(haltBLE!=1){
jelord 2:88fcbfadec6a 292
jelord 3:122bfc998c4c 293 if((transmissionValue!=100) && (dataLength!= 0)) writeData[dataLength-1] = rx_buf[0];
jelord 3:122bfc998c4c 294
jelord 3:122bfc998c4c 295 if(transmissionValue ==100){
caseyquinn 10:06fbb1c9e3bd 296 pc.putc(rx_buf[0]);
jelord 2:88fcbfadec6a 297
jelord 3:122bfc998c4c 298 }else if(transmissionValue ==1){ //process and store RTC values
jelord 3:122bfc998c4c 299
caseyquinn 7:29b01d5812ee 300 //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 301 if(dataLength==6){
caseyquinn 17:3e6dda6e6335 302 RTC_UPAS.set_time(writeData[0],writeData[1],writeData[2],writeData[3],writeData[3],writeData[4],writeData[5]);//sets chronodot RTC
caseyquinn 12:5b4f3245606a 303 ///////////////////////
caseyquinn 7:29b01d5812ee 304 //sets ST RTC
caseyquinn 12:5b4f3245606a 305 //////////////////////
caseyquinn 7:29b01d5812ee 306 STtime.tm_sec = writeData[0]; // 0-59
caseyquinn 7:29b01d5812ee 307 STtime.tm_min = writeData[1]; // 0-59
caseyquinn 7:29b01d5812ee 308 STtime.tm_hour = writeData[2]; // 0-23
caseyquinn 7:29b01d5812ee 309 STtime.tm_mday = writeData[3]; // 1-31
caseyquinn 7:29b01d5812ee 310 STtime.tm_mon = writeData[4]-1; // 0-11
caseyquinn 7:29b01d5812ee 311 STtime.tm_year = 100+writeData[5]; // year since 1900 (116 = 2016)
caseyquinn 7:29b01d5812ee 312 time_t STseconds = mktime(&STtime);
caseyquinn 12:5b4f3245606a 313 set_time(STseconds); // Set RTC time
caseyquinn 7:29b01d5812ee 314 }
jelord 3:122bfc998c4c 315
caseyquinn 12:5b4f3245606a 316 }
caseyquinn 14:7cdb643da356 317 else if(transmissionValue ==2){ //process and store sample start/end
jelord 3:122bfc998c4c 318 if(dataLength ==12)E2PROM.write(0x00015, writeData, 12);
jelord 3:122bfc998c4c 319
jelord 3:122bfc998c4c 320 }else if(transmissionValue ==3){ //process and store sample name
jelord 39:f1ebecfb32ca 321 if(dataLength ==15)E2PROM.write(0x00001,writeData,15);
jelord 3:122bfc998c4c 322
jelord 3:122bfc998c4c 323 }else if(transmissionValue ==5){ //process and store Log Interval
jelord 3:122bfc998c4c 324 if(dataLength ==1)E2PROM.write(0x00014,writeData,1);
jelord 2:88fcbfadec6a 325
jelord 3:122bfc998c4c 326 }else if(transmissionValue ==6){ //process and store Flow Rate
jelord 3:122bfc998c4c 327 if(dataLength ==4)E2PROM.write(0x00010,writeData,4);
jelord 3:122bfc998c4c 328
jelord 3:122bfc998c4c 329 }else if(transmissionValue ==7){ //process and store Serial Number
jelord 3:122bfc998c4c 330 if(dataLength ==2)E2PROM.write(0x00034,writeData,2);
caseyquinn 25:fbf7d44e7da4 331 }else if (transmissionValue == 10){
caseyquinn 25:fbf7d44e7da4 332 if(dataLength == 16)E2PROM.write(0x00050,writeData,16);
jelord 33:03d0e7f5ef0a 333 }else if (transmissionValue == 11){
jelord 33:03d0e7f5ef0a 334 if(dataLength == 8)E2PROM.write(0x00060,writeData,8);
jelord 38:65ae9771f1e3 335 }else if (transmissionValue == 12){
jelord 38:65ae9771f1e3 336 if(dataLength == 3)E2PROM.write(0x00070,writeData,3);
jelord 38:65ae9771f1e3 337 }else if (transmissionValue == 13){
jelord 38:65ae9771f1e3 338 if(dataLength == 3)E2PROM.write(0x00076,writeData,3);
jelord 3:122bfc998c4c 339 }
caseyquinn 25:fbf7d44e7da4 340
jelord 3:122bfc998c4c 341 dataLength++;
jelord 1:9fbb5b665068 342 }
jelord 3:122bfc998c4c 343
jelord 3:122bfc998c4c 344 rx_len = 0;
jelord 3:122bfc998c4c 345 }else{
jelord 3:122bfc998c4c 346 while(microChannel.readable())
jelord 3:122bfc998c4c 347 uint8_t extract = microChannel.getc();
jelord 3:122bfc998c4c 348 }
jelord 2:88fcbfadec6a 349
caseyquinn 12:5b4f3245606a 350
jelord 2:88fcbfadec6a 351 }
caseyquinn 14:7cdb643da356 352
jelord 2:88fcbfadec6a 353 void sendData(){
jelord 2:88fcbfadec6a 354
caseyquinn 27:922f53fa649c 355 //First byte is designator for the App
caseyquinn 21:bb10efc5bf57 356 uint8_t sampleTimePassValues[13] = {0x01,0x00,0x00,0x0A,0x01,0x01,0x10,0x00,0x00,0x0A,0x01,0x01,0x10};
caseyquinn 40:cac5bdffba44 357 uint8_t subjectLabelOriginal[16] = {0x02,0x52,0x45,0x53,0x45,0x54,0x5F,0x5F,0x5F,0x5F,0x5F,0x5F,0x5F,0x5F,0x5F,0x0F};
caseyquinn 21:bb10efc5bf57 358 uint8_t dataLogOriginal[2] = {0x03,0x0A,};
caseyquinn 21:bb10efc5bf57 359 uint8_t flowRateOriginal[5] = {0x04,0x00,0x00,0x80,0x3F};
caseyquinn 29:fd74725294d5 360 uint8_t serialBytes[3] = {0x07,0x00,0x00};
caseyquinn 25:fbf7d44e7da4 361 uint8_t latLongSchoolOriginal[17] = {0x0A,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F};
jelord 33:03d0e7f5ef0a 362 uint8_t latLongHome2[9] = {0x0B,0x00,0x00,0x80,0x3F,0x00,0x00,0x80,0x3F};
jelord 38:65ae9771f1e3 363 uint8_t cartridgeIDOriginal[4] = {0x0C,0x48,0x48,0x48};
jelord 38:65ae9771f1e3 364 uint8_t dutyCycleOriginal[4] = {0x0D,0x31,0x30,0x30};
caseyquinn 52:95949e34b1f6 365 //uint8_t transfer_fileName[62] = {0x0E, 0x4d, 0x53, 0x30, 0x30, 0x30, 0x30, 0x4c, 0x4f, 0x47, 0x5f, 0x30, 0x30, 0x2d, 0x30, 0x30, 0x2d, 0x30, 0x30, 0x5f, 0x30, 0x30, 0x3d, 0x30, 0x30, 0x3d, 0x30, 0x30, 0x5f, 0x30, 0x30, 0x30, 0x30, 0x30, 0x30, 0x5f, 0x30, 0x30, 0x30, 0x30, 0x30, 0x30, 0x5f, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2d, 0x2e, 0x74, 0x78, 0x74};
caseyquinn 25:fbf7d44e7da4 366 // Latitude School EEPROM = 0x50-0x53
caseyquinn 25:fbf7d44e7da4 367 // Longitude School EEPROM = 0x54-0x57
caseyquinn 25:fbf7d44e7da4 368 // Latitude Home EEPROM = 0x58-0x5B
caseyquinn 25:fbf7d44e7da4 369 // Longitude Home EEPROM = 0x5C-0x5F
caseyquinn 25:fbf7d44e7da4 370 uint8_t NEW_EEPROM_CHECK[1] = {0,}; //THIS IS USED TO ENSURE COOPERATION WITH MOBILE APPS
jelord 33:03d0e7f5ef0a 371 uint8_t TERMINATE_BYTE[1] = {0xff,}; //used for compatibility with android app
caseyquinn 25:fbf7d44e7da4 372
caseyquinn 25:fbf7d44e7da4 373 //NEW EEPROM Check bit = 0x75
caseyquinn 25:fbf7d44e7da4 374 E2PROM.read(0x00075,NEW_EEPROM_CHECK,1);
caseyquinn 25:fbf7d44e7da4 375
jelord 39:f1ebecfb32ca 376 if(NEW_EEPROM_CHECK[0] == 0x0C){ //increment when you add a new parameter to pass to app
caseyquinn 25:fbf7d44e7da4 377 E2PROM.read(0x00015, sampleTimePassValues+1, 12);
jelord 39:f1ebecfb32ca 378 E2PROM.read(0x00001, subjectLabelOriginal+1,15);
caseyquinn 25:fbf7d44e7da4 379 E2PROM.read(0x00014,dataLogOriginal+1,1);
caseyquinn 25:fbf7d44e7da4 380 E2PROM.read(0x00010,flowRateOriginal+1,4);
caseyquinn 29:fd74725294d5 381 E2PROM.read(0x00034,serialBytes+1,2);
caseyquinn 25:fbf7d44e7da4 382 E2PROM.read(0x00050,latLongSchoolOriginal+1,16);
jelord 33:03d0e7f5ef0a 383 E2PROM.read(0x00060,latLongHome2+1,8);
jelord 38:65ae9771f1e3 384 E2PROM.read(0x00070,cartridgeIDOriginal+1,3);
jelord 38:65ae9771f1e3 385 E2PROM.read(0x00076,dutyCycleOriginal+1,3);
jelord 38:65ae9771f1e3 386
caseyquinn 25:fbf7d44e7da4 387 }else{
jelord 39:f1ebecfb32ca 388 NEW_EEPROM_CHECK[0] = 0x0C; //increment as well
caseyquinn 25:fbf7d44e7da4 389 E2PROM.write(0x00075,NEW_EEPROM_CHECK,1);
caseyquinn 25:fbf7d44e7da4 390 E2PROM.write(0x00015, sampleTimePassValues+1, 12);
jelord 39:f1ebecfb32ca 391 E2PROM.write(0x00001, subjectLabelOriginal+1,15);
caseyquinn 25:fbf7d44e7da4 392 E2PROM.write(0x00014,dataLogOriginal+1,1);
caseyquinn 25:fbf7d44e7da4 393 E2PROM.write(0x00010,flowRateOriginal+1,4);
caseyquinn 29:fd74725294d5 394 E2PROM.write(0x00034,serialBytes+1,2);
caseyquinn 25:fbf7d44e7da4 395 E2PROM.write(0x00050,latLongSchoolOriginal+1,16);
jelord 33:03d0e7f5ef0a 396 E2PROM.write(0x00060,latLongHome2+1,8);
jelord 38:65ae9771f1e3 397 E2PROM.write(0x00070,cartridgeIDOriginal+1,3);
jelord 38:65ae9771f1e3 398 E2PROM.write(0x00076,dutyCycleOriginal+1,3);
caseyquinn 25:fbf7d44e7da4 399 }
caseyquinn 21:bb10efc5bf57 400
jelord 2:88fcbfadec6a 401
jelord 2:88fcbfadec6a 402 for(int i=0; i<13; i++){
jelord 2:88fcbfadec6a 403 microChannel.putc(sampleTimePassValues[i]);
jelord 2:88fcbfadec6a 404 }
jelord 33:03d0e7f5ef0a 405 wait(.15);
jelord 2:88fcbfadec6a 406
jelord 39:f1ebecfb32ca 407 for(int i=0; i<16; i++){
jelord 2:88fcbfadec6a 408 microChannel.putc(subjectLabelOriginal[i]);
jelord 2:88fcbfadec6a 409 }
jelord 33:03d0e7f5ef0a 410 wait(.15);
jelord 2:88fcbfadec6a 411
jelord 2:88fcbfadec6a 412 for(int i=0; i<2; i++){
jelord 2:88fcbfadec6a 413 microChannel.putc(dataLogOriginal[i]);
jelord 2:88fcbfadec6a 414 }
jelord 33:03d0e7f5ef0a 415 wait(.15);
jelord 2:88fcbfadec6a 416
jelord 2:88fcbfadec6a 417 for(int i=0; i<5; i++){
jelord 2:88fcbfadec6a 418 microChannel.putc(flowRateOriginal[i]);
caseyquinn 25:fbf7d44e7da4 419 }
jelord 33:03d0e7f5ef0a 420 wait(.15);
caseyquinn 25:fbf7d44e7da4 421
caseyquinn 25:fbf7d44e7da4 422 for(int i=0;i<17;i++){
caseyquinn 25:fbf7d44e7da4 423 microChannel.putc(latLongSchoolOriginal[i]);
jelord 2:88fcbfadec6a 424 }
jelord 33:03d0e7f5ef0a 425 wait(.15);
jelord 33:03d0e7f5ef0a 426
jelord 33:03d0e7f5ef0a 427 for(int i=0;i<9;i++){
jelord 33:03d0e7f5ef0a 428 microChannel.putc(latLongHome2[i]);
jelord 33:03d0e7f5ef0a 429 }
jelord 33:03d0e7f5ef0a 430 wait(.15);
jelord 38:65ae9771f1e3 431 for(int i=0;i<4;i++){
jelord 38:65ae9771f1e3 432 microChannel.putc(cartridgeIDOriginal[i]);
jelord 38:65ae9771f1e3 433 }
jelord 38:65ae9771f1e3 434 wait(.15);
jelord 38:65ae9771f1e3 435 for(int i=0;i<4;i++){
jelord 38:65ae9771f1e3 436 microChannel.putc(dutyCycleOriginal[i]);
jelord 38:65ae9771f1e3 437 }
jelord 38:65ae9771f1e3 438 wait(.15);
jelord 33:03d0e7f5ef0a 439 microChannel.putc(TERMINATE_BYTE[0]);
jelord 0:2cb2b2ea316f 440
jelord 2:88fcbfadec6a 441
caseyquinn 25:fbf7d44e7da4 442 }
caseyquinn 52:95949e34b1f6 443 void Read_File(){
caseyquinn 52:95949e34b1f6 444 //void Read_File(char filename[]){
caseyquinn 52:95949e34b1f6 445
caseyquinn 52:95949e34b1f6 446 char transfer_fileName[] = "MS000LOG_000000_000000_000000_000000_---------------_xxx.txt";
caseyquinn 52:95949e34b1f6 447 char transfer_fileNamedir[] = "/sd/MS000LOG_000000_000000_000000_000000_---------------_xxx.txt";
caseyquinn 54:a6073442bcef 448 //char transfer_fileNamedirCopy[] = "/sd/c/MS000LOG_000000_000000_000000_000000_---------------_xxx.txt";
caseyquinn 52:95949e34b1f6 449
jelord 39:f1ebecfb32ca 450
caseyquinn 52:95949e34b1f6 451 vector<string> filenames; //filenames are stored in a vector string
caseyquinn 52:95949e34b1f6 452 DIR *dp;
caseyquinn 52:95949e34b1f6 453 struct dirent *dirp;
caseyquinn 52:95949e34b1f6 454 dp = opendir("/sd");
caseyquinn 52:95949e34b1f6 455 //read all directory and file names in current directory into filename vector
caseyquinn 54:a6073442bcef 456
caseyquinn 52:95949e34b1f6 457 while((dirp = readdir(dp)) != NULL) {
caseyquinn 54:a6073442bcef 458
caseyquinn 54:a6073442bcef 459 if (strcmp(dirp->d_name, ".txt") )
caseyquinn 54:a6073442bcef 460 {
caseyquinn 54:a6073442bcef 461 filenames.push_back(string(dirp->d_name));
caseyquinn 54:a6073442bcef 462 } else {}
jelord 39:f1ebecfb32ca 463 }
caseyquinn 52:95949e34b1f6 464 closedir(dp);
caseyquinn 52:95949e34b1f6 465 vector<string>::iterator it;
caseyquinn 54:a6073442bcef 466
caseyquinn 52:95949e34b1f6 467
caseyquinn 54:a6073442bcef 468
caseyquinn 52:95949e34b1f6 469 for(it=filenames.begin(); it < filenames.end(); it++) {
caseyquinn 52:95949e34b1f6 470 // string str ((*it).c_str());
caseyquinn 54:a6073442bcef 471
caseyquinn 52:95949e34b1f6 472 if((*it).substr((*it).length()-3) == "txt"){
caseyquinn 52:95949e34b1f6 473 //if(((it - filenames.begin())+1) == 1){
caseyquinn 52:95949e34b1f6 474 pc.printf("%d: %s\r\n", ((it - filenames.begin())+1), (*it).c_str());
caseyquinn 52:95949e34b1f6 475 sprintf(transfer_fileName, "%s", (*it).c_str());
caseyquinn 52:95949e34b1f6 476 sprintf(transfer_fileNamedir, "/sd/%s", (*it).c_str());
caseyquinn 54:a6073442bcef 477 //sprintf(transfer_fileNamedirCopy, "/sd/c/%s", (*it).c_str());
caseyquinn 54:a6073442bcef 478 //pc.printf("%s", transfer_fileNamedirCopy);
caseyquinn 52:95949e34b1f6 479 FILE *fp = fopen(transfer_fileNamedir, "r");
caseyquinn 52:95949e34b1f6 480 if(fp == NULL) {
caseyquinn 52:95949e34b1f6 481 pc.printf("Could not open file, check disk.\r\n");
caseyquinn 54:a6073442bcef 482 //while(1) {};
caseyquinn 52:95949e34b1f6 483 } else {
caseyquinn 52:95949e34b1f6 484 pc.printf("file opened\r\n");
caseyquinn 52:95949e34b1f6 485 }
caseyquinn 52:95949e34b1f6 486 unsigned char c;
caseyquinn 52:95949e34b1f6 487 uint8_t sendMe[1] = {254};
caseyquinn 52:95949e34b1f6 488 RGB_LED.set_led(0,1,0);
caseyquinn 52:95949e34b1f6 489 //pc.printf("%s\r\n",fp.c_str());
caseyquinn 52:95949e34b1f6 490 microChannel.putc(sendMe[0]);
caseyquinn 53:5b4991d93cb1 491 for(int i=0;i<60;i++){
caseyquinn 52:95949e34b1f6 492 microChannel.putc(transfer_fileName[i]);
caseyquinn 52:95949e34b1f6 493 }
caseyquinn 52:95949e34b1f6 494 while (c != 255){ // while not end of file or forever
caseyquinn 52:95949e34b1f6 495 c=fgetc(fp); // get a character/byte from the file
caseyquinn 52:95949e34b1f6 496 //printf("%c",c); // and show it in hex format
caseyquinn 52:95949e34b1f6 497 microChannel.putc(c);
caseyquinn 52:95949e34b1f6 498 //wait(0.005);
caseyquinn 52:95949e34b1f6 499 }
caseyquinn 52:95949e34b1f6 500 //RGB_LED.set_led(1,0,0);
caseyquinn 52:95949e34b1f6 501 printf("\r\n");
caseyquinn 52:95949e34b1f6 502 fclose(fp);
caseyquinn 52:95949e34b1f6 503
caseyquinn 54:a6073442bcef 504 //int status = file_copy(transfer_fileNamedir, transfer_fileNamedirCopy);
caseyquinn 52:95949e34b1f6 505 remove(transfer_fileNamedir);
caseyquinn 54:a6073442bcef 506 //break; // close the file
caseyquinn 54:a6073442bcef 507 }else{
caseyquinn 54:a6073442bcef 508 //pc.printf("%d: %s\r\n", ((it - filenames.begin())+1), (*it).c_str());
caseyquinn 54:a6073442bcef 509 }
caseyquinn 52:95949e34b1f6 510
jelord 39:f1ebecfb32ca 511 }
caseyquinn 52:95949e34b1f6 512
caseyquinn 52:95949e34b1f6 513
caseyquinn 52:95949e34b1f6 514
caseyquinn 52:95949e34b1f6 515 };
caseyquinn 52:95949e34b1f6 516
caseyquinn 52:95949e34b1f6 517 int file_copy(const char *src, const char *dst)
caseyquinn 52:95949e34b1f6 518 {
caseyquinn 52:95949e34b1f6 519 int retval = 0;
caseyquinn 52:95949e34b1f6 520 int ch;
caseyquinn 52:95949e34b1f6 521
caseyquinn 52:95949e34b1f6 522 FILE *fpsrc = fopen(src, "r"); // src file
caseyquinn 52:95949e34b1f6 523 FILE *fpdst = fopen(dst, "w"); // dest file
jelord 39:f1ebecfb32ca 524
caseyquinn 52:95949e34b1f6 525 while (1) { // Copy src to dest
caseyquinn 52:95949e34b1f6 526 ch = fgetc(fpsrc); // until src EOF read.
caseyquinn 52:95949e34b1f6 527 if (ch == EOF) break;
caseyquinn 52:95949e34b1f6 528 fputc(ch, fpdst);
caseyquinn 52:95949e34b1f6 529 }
caseyquinn 52:95949e34b1f6 530 fclose(fpsrc);
caseyquinn 52:95949e34b1f6 531 fclose(fpdst);
caseyquinn 52:95949e34b1f6 532
caseyquinn 52:95949e34b1f6 533 fpdst = fopen(dst, "r"); // Reopen dest to insure
caseyquinn 52:95949e34b1f6 534 if (fpdst == NULL) { // that it was created.
caseyquinn 52:95949e34b1f6 535 retval = -1; // Return error.
caseyquinn 52:95949e34b1f6 536 } else {
caseyquinn 52:95949e34b1f6 537 fclose(fpdst);
caseyquinn 52:95949e34b1f6 538 retval = 0; // Return success.
caseyquinn 52:95949e34b1f6 539 }
caseyquinn 52:95949e34b1f6 540 return retval;
jelord 39:f1ebecfb32ca 541 };
caseyquinn 14:7cdb643da356 542
caseyquinn 12:5b4f3245606a 543 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 544 // GPS: Calculate distance from target location
caseyquinn 12:5b4f3245606a 545 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 546 double GPSdistanceCalc (float tlat, float tlon)
caseyquinn 12:5b4f3245606a 547 {
caseyquinn 12:5b4f3245606a 548
caseyquinn 12:5b4f3245606a 549 float tlatrad, flatrad;
caseyquinn 12:5b4f3245606a 550 float sdlong, cdlong;
caseyquinn 12:5b4f3245606a 551 float sflat, cflat;
caseyquinn 12:5b4f3245606a 552 float stlat, ctlat;
caseyquinn 12:5b4f3245606a 553 float delta, denom;
caseyquinn 12:5b4f3245606a 554
caseyquinn 12:5b4f3245606a 555 double distance;
caseyquinn 27:922f53fa649c 556 delta = (gpslongitude-tlon)*0.0174532925;
caseyquinn 12:5b4f3245606a 557 sdlong = sin(delta);
caseyquinn 12:5b4f3245606a 558 cdlong = cos(delta);
caseyquinn 27:922f53fa649c 559 flatrad = (gpslatitude)*0.0174532925;
caseyquinn 12:5b4f3245606a 560 tlatrad = (tlat)*0.0174532925;
caseyquinn 12:5b4f3245606a 561 sflat = sin(flatrad);
caseyquinn 12:5b4f3245606a 562 cflat = cos(flatrad);
caseyquinn 12:5b4f3245606a 563 stlat = sin(tlatrad);
caseyquinn 12:5b4f3245606a 564 ctlat = cos(tlatrad);
caseyquinn 12:5b4f3245606a 565 delta = (cflat * stlat) - (sflat * ctlat * cdlong);
caseyquinn 12:5b4f3245606a 566 delta = pow(delta,2);
caseyquinn 12:5b4f3245606a 567 delta += pow(ctlat * sdlong,2);
caseyquinn 12:5b4f3245606a 568 delta = sqrt(delta);
caseyquinn 12:5b4f3245606a 569 denom = (sflat * stlat) + (cflat * ctlat * cdlong);
caseyquinn 12:5b4f3245606a 570 delta = atan2(delta, denom);
caseyquinn 12:5b4f3245606a 571 distance = delta * 6372795;
caseyquinn 12:5b4f3245606a 572 return distance;
caseyquinn 12:5b4f3245606a 573 }
caseyquinn 12:5b4f3245606a 574
caseyquinn 43:05aa1fb68946 575 //////////////////////////////////////////////////////////////
caseyquinn 45:5e0942088e31 576 //Time Comparison Function
caseyquinn 43:05aa1fb68946 577 //////////////////////////////////////////////////////////////
caseyquinn 43:05aa1fb68946 578 bool timecompare(uint8_t t_sec, uint8_t t_minutes, uint8_t t_hour, uint8_t t_date, uint8_t t_month, uint8_t t_year)
caseyquinn 43:05aa1fb68946 579 {
caseyquinn 43:05aa1fb68946 580
caseyquinn 43:05aa1fb68946 581 time_t seconds = time(NULL);
caseyquinn 43:05aa1fb68946 582 //strftime(timestr, 32, "%y%m%d%H%M%S", localtime(&seconds));
caseyquinn 43:05aa1fb68946 583
caseyquinn 43:05aa1fb68946 584 strftime(yrstr, 4, "%y", localtime(&seconds));
caseyquinn 43:05aa1fb68946 585 stYr = atoi(yrstr);
caseyquinn 43:05aa1fb68946 586
caseyquinn 43:05aa1fb68946 587 strftime(mostr, 4, "%m", localtime(&seconds));
caseyquinn 43:05aa1fb68946 588 stMo = atoi(mostr);
caseyquinn 43:05aa1fb68946 589
caseyquinn 43:05aa1fb68946 590 strftime(daystr, 4, "%d", localtime(&seconds));
caseyquinn 43:05aa1fb68946 591 stDay = atoi(daystr);
caseyquinn 43:05aa1fb68946 592
caseyquinn 43:05aa1fb68946 593 strftime(hrstr, 4, "%H", localtime(&seconds));
caseyquinn 43:05aa1fb68946 594 stHr = atoi(hrstr);
caseyquinn 43:05aa1fb68946 595
caseyquinn 43:05aa1fb68946 596 strftime(minstr, 4, "%M", localtime(&seconds));
caseyquinn 43:05aa1fb68946 597 stMin = atoi(minstr);
caseyquinn 43:05aa1fb68946 598
caseyquinn 43:05aa1fb68946 599 strftime(secstr, 4, "%S", localtime(&seconds));
caseyquinn 43:05aa1fb68946 600 stSec = atoi(secstr);
caseyquinn 43:05aa1fb68946 601
caseyquinn 43:05aa1fb68946 602 if(t_year != stYr){
caseyquinn 43:05aa1fb68946 603 return t_year < stYr;
caseyquinn 43:05aa1fb68946 604 }
caseyquinn 43:05aa1fb68946 605 if(t_month != stMo){
caseyquinn 43:05aa1fb68946 606 return t_month < stMo;
caseyquinn 43:05aa1fb68946 607 }
caseyquinn 43:05aa1fb68946 608 if(t_date != stDay){
caseyquinn 43:05aa1fb68946 609 return t_date < stDay;
caseyquinn 43:05aa1fb68946 610 }
caseyquinn 43:05aa1fb68946 611 if(t_hour != stHr){
caseyquinn 43:05aa1fb68946 612 return t_hour < stHr;
caseyquinn 43:05aa1fb68946 613 }
caseyquinn 43:05aa1fb68946 614 if(t_minutes != stMin){
caseyquinn 43:05aa1fb68946 615 return t_minutes < stMin;
caseyquinn 43:05aa1fb68946 616 }
caseyquinn 43:05aa1fb68946 617 return t_sec < stSec;
caseyquinn 43:05aa1fb68946 618
caseyquinn 43:05aa1fb68946 619 }
caseyquinn 43:05aa1fb68946 620
caseyquinn 5:c3252e5d45ca 621
caseyquinn 9:8646fd501832 622 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 623 //Shutdown Function
caseyquinn 9:8646fd501832 624 //////////////////////////////////////////////////////////////
jelord 3:122bfc998c4c 625 void check_stop() // this checks if it's time to stop and shutdown
jelord 3:122bfc998c4c 626 {
caseyquinn 17:3e6dda6e6335 627
caseyquinn 43:05aa1fb68946 628 if(timecompare(startAndEndTime[6], startAndEndTime[7], startAndEndTime[8], startAndEndTime[9], startAndEndTime[10], startAndEndTime[11])) {
jelord 3:122bfc998c4c 629 pbKill = 0; // this is were we shut everything down
caseyquinn 4:5d004fd997d5 630 //pc.printf("If you're reading this something has gone very wrong.");
jelord 3:122bfc998c4c 631 }
caseyquinn 17:3e6dda6e6335 632
jelord 3:122bfc998c4c 633 }
caseyquinn 5:c3252e5d45ca 634
caseyquinn 9:8646fd501832 635 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 636 //SD Logging Function
caseyquinn 9:8646fd501832 637 //////////////////////////////////////////////////////////////
jelord 3:122bfc998c4c 638 void log_data()
jelord 3:122bfc998c4c 639 {
caseyquinn 44:075fa63d5df1 640 //Get RTC time(s)
caseyquinn 28:42932d3b105d 641 ///////////////////////////
caseyquinn 43:05aa1fb68946 642 RTC_UPAS.get_time();
caseyquinn 7:29b01d5812ee 643 time_t seconds = time(NULL);
caseyquinn 42:c8ed2dc04dfe 644 strftime(timestr, 32, "%y%m%d%H%M%S", localtime(&seconds));
caseyquinn 43:05aa1fb68946 645
caseyquinn 43:05aa1fb68946 646 strftime(yrstr, 4, "%y", localtime(&seconds));
caseyquinn 43:05aa1fb68946 647 stYr = atoi(yrstr);
caseyquinn 43:05aa1fb68946 648
caseyquinn 43:05aa1fb68946 649 strftime(mostr, 4, "%m", localtime(&seconds));
caseyquinn 43:05aa1fb68946 650 stMo = atoi(mostr);
caseyquinn 43:05aa1fb68946 651
caseyquinn 43:05aa1fb68946 652 strftime(daystr, 4, "%d", localtime(&seconds));
caseyquinn 43:05aa1fb68946 653 stDay = atoi(daystr);
caseyquinn 43:05aa1fb68946 654
caseyquinn 43:05aa1fb68946 655 strftime(hrstr, 4, "%H", localtime(&seconds));
caseyquinn 43:05aa1fb68946 656 stHr = atoi(hrstr);
caseyquinn 43:05aa1fb68946 657
caseyquinn 43:05aa1fb68946 658 strftime(minstr, 4, "%M", localtime(&seconds));
caseyquinn 43:05aa1fb68946 659 stMin = atoi(minstr);
caseyquinn 43:05aa1fb68946 660
caseyquinn 43:05aa1fb68946 661 strftime(secstr, 4, "%S", localtime(&seconds));
caseyquinn 43:05aa1fb68946 662 stSec = atoi(secstr);
caseyquinn 43:05aa1fb68946 663
caseyquinn 44:075fa63d5df1 664 //pc.printf("%s,%s,%d,%s,%d,%s,%d,%s,%d,%s,%d,%s,%d\r\n", timestr,yrstr,stYr,mostr,stMo,daystr,stDay,hrstr,stHr,minstr,stMin,secstr,stSec);
caseyquinn 36:2e344db70d35 665
caseyquinn 46:99d129bfdbbd 666 /////////////////////////////
caseyquinn 46:99d129bfdbbd 667 ///Dutycycle
caseyquinn 46:99d129bfdbbd 668 ////////////////////////////
caseyquinn 46:99d129bfdbbd 669 if(stSec >= dutycycleSecOn && pumps == 1){
caseyquinn 46:99d129bfdbbd 670 pumps = 0;
caseyquinn 46:99d129bfdbbd 671 }
caseyquinn 46:99d129bfdbbd 672 else if(stSec < dutycycleSecOn && pumps == 0) {
caseyquinn 46:99d129bfdbbd 673 pumps = 1;
caseyquinn 46:99d129bfdbbd 674 }
caseyquinn 46:99d129bfdbbd 675
caseyquinn 28:42932d3b105d 676 //Get Sensor Data except GPS
caseyquinn 28:42932d3b105d 677 ////////////////////////////
caseyquinn 7:29b01d5812ee 678 press = bmesensor.getPressure();
caseyquinn 7:29b01d5812ee 679 temp = bmesensor.getTemperature()-5.0;
caseyquinn 7:29b01d5812ee 680 rh = bmesensor.getHumidity();
caseyquinn 7:29b01d5812ee 681 uv = lightsensor.getUV();
caseyquinn 14:7cdb643da356 682 movementsensor.getACCEL();
caseyquinn 14:7cdb643da356 683 movementsensor.getCOMPASS();
caseyquinn 14:7cdb643da356 684 compass = movementsensor.getCOMPASS_HEADING();
caseyquinn 14:7cdb643da356 685 accel_x = movementsensor.AccelData.x;
caseyquinn 14:7cdb643da356 686 accel_y = movementsensor.AccelData.y;
caseyquinn 14:7cdb643da356 687 accel_z = movementsensor.AccelData.z;
caseyquinn 14:7cdb643da356 688 accel_comp = pow(accel_x,(float)2)+pow(accel_y,(float)2)+pow(accel_z,(float)2)-1.0;
caseyquinn 14:7cdb643da356 689 mag_x = movementsensor.MagData.x;
caseyquinn 14:7cdb643da356 690 mag_y = movementsensor.MagData.y;
caseyquinn 14:7cdb643da356 691 mag_z = movementsensor.MagData.z;
caseyquinn 25:fbf7d44e7da4 692 vInReadingLast = vInReading;
caseyquinn 25:fbf7d44e7da4 693 vInReading = ads.readADC_SingleEnded(1, 0xD583); // read channel 0
caseyquinn 25:fbf7d44e7da4 694 amps = gasG.getAmps();
caseyquinn 25:fbf7d44e7da4 695 bVolt = gasG.getVolts();
caseyquinn 25:fbf7d44e7da4 696 bFuel = gasG.getCharge();
caseyquinn 35:e0bdd6389a75 697
caseyquinn 28:42932d3b105d 698 //Check for fully charged battery
caseyquinn 28:42932d3b105d 699 if(bVolt > 1750 && amps > 8191) {
caseyquinn 55:2fb27f1ddff5 700 RGB_LED.set_led(0,0,0);
caseyquinn 55:2fb27f1ddff5 701 //RGB_LED.set_led(0,1,0);
caseyquinn 44:075fa63d5df1 702 //Check for battery with ~2 hours left of runtime at 2lpm to remind user to plug in sampler
caseyquinn 44:075fa63d5df1 703 }else if(amps > 8191 && bVolt < 1500) {
caseyquinn 28:42932d3b105d 704 if(ledOn) {
caseyquinn 28:42932d3b105d 705 RGB_LED.set_led(0,0,0);
caseyquinn 28:42932d3b105d 706 ledOn = 0;
caseyquinn 28:42932d3b105d 707 }else {
caseyquinn 28:42932d3b105d 708 RGB_LED.set_led(1,0,0);
caseyquinn 28:42932d3b105d 709 ledOn = 1;
caseyquinn 28:42932d3b105d 710 }
caseyquinn 28:42932d3b105d 711 //No LED on when not low battery and not fully charged
caseyquinn 28:42932d3b105d 712 }else{
caseyquinn 28:42932d3b105d 713 RGB_LED.set_led(0,0,0);
caseyquinn 28:42932d3b105d 714 }
caseyquinn 28:42932d3b105d 715
caseyquinn 35:e0bdd6389a75 716
caseyquinn 28:42932d3b105d 717 // Get GPS Data
caseyquinn 28:42932d3b105d 718 //////////////////////////////
caseyquinn 28:42932d3b105d 719 //if(gpsEN ==1){
caseyquinn 28:42932d3b105d 720
caseyquinn 28:42932d3b105d 721 gpsFix = gps.read(1);
caseyquinn 28:42932d3b105d 722 gpsspeed = gps.speed;
caseyquinn 28:42932d3b105d 723 //gpscourse = gps.course;
caseyquinn 28:42932d3b105d 724 gpssatellites = gps.satellites;
caseyquinn 28:42932d3b105d 725 gpslatitude = gps.lat;
caseyquinn 28:42932d3b105d 726 gpslongitude = gps.lon;
caseyquinn 28:42932d3b105d 727 gpsaltitude = gps.altitude;
caseyquinn 51:feba3e2aa1a0 728 gpsTime = (long)gps.utc;
caseyquinn 51:feba3e2aa1a0 729 gpsDate = (long)gps.date;
caseyquinn 43:05aa1fb68946 730 //}
caseyquinn 28:42932d3b105d 731
caseyquinn 28:42932d3b105d 732 //Check for 3.3V rail cut out and turn off pumps in this event
caseyquinn 28:42932d3b105d 733 if(vInReading > 5950 && amps > 8191) {
caseyquinn 35:e0bdd6389a75 734 pumps = 0;
caseyquinn 28:42932d3b105d 735 wait(1);
caseyquinn 28:42932d3b105d 736 //Turn pumps back on once the sampler is plugged in and charging after pumps shutoff and 3.3V rail drops out
caseyquinn 28:42932d3b105d 737 } else if(pumps == 0 && amps < 8191) {
caseyquinn 46:99d129bfdbbd 738 //pumps = 1;
caseyquinn 28:42932d3b105d 739 }
caseyquinn 28:42932d3b105d 740
caseyquinn 28:42932d3b105d 741
caseyquinn 14:7cdb643da356 742
caseyquinn 25:fbf7d44e7da4 743 if(pumps == 1){
caseyquinn 34:da333abe3476 744 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 745 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 25:fbf7d44e7da4 746
caseyquinn 25:fbf7d44e7da4 747 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 25:fbf7d44e7da4 748 massflow = calibrations.omronMFMin;
caseyquinn 25:fbf7d44e7da4 749 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 25:fbf7d44e7da4 750 massflow = calibrations.omronMFMax;
caseyquinn 25:fbf7d44e7da4 751 } else {
caseyquinn 25:fbf7d44e7da4 752 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 753 }
caseyquinn 25:fbf7d44e7da4 754
caseyquinn 25:fbf7d44e7da4 755 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 756 volflow = massflow/atmoRho;
caseyquinn 25:fbf7d44e7da4 757 sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow);
caseyquinn 25:fbf7d44e7da4 758 deltaVflow = volflow-volflowSet;
caseyquinn 25:fbf7d44e7da4 759 massflowSet = volflowSet*atmoRho;
caseyquinn 25:fbf7d44e7da4 760 deltaMflow = massflow-massflowSet;
caseyquinn 25:fbf7d44e7da4 761
caseyquinn 25:fbf7d44e7da4 762 vBlowerReading = ads.readADC_SingleEnded(2, 0xE783); // read channel 0
caseyquinn 25:fbf7d44e7da4 763 omronDiff = ads.readADC_Differential(0x8583); // differential channel 2-3
caseyquinn 50:5f1b378e4f64 764 /*
caseyquinn 50:5f1b378e4f64 765 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 50:5f1b378e4f64 766 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 50:5f1b378e4f64 767 vBlowerReading = ads.readADC_SingleEnded(2, 0xE783); // read channel 0
caseyquinn 50:5f1b378e4f64 768 omronDiff = ads.readADC_Differential(0x8583); // differential channel 2-3
caseyquinn 50:5f1b378e4f64 769
caseyquinn 50:5f1b378e4f64 770 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 50:5f1b378e4f64 771 massflow = calibrations.omronMFMin;
caseyquinn 50:5f1b378e4f64 772 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 50:5f1b378e4f64 773 massflow = calibrations.omronMFMax;
caseyquinn 50:5f1b378e4f64 774 } else {
caseyquinn 50:5f1b378e4f64 775 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 50:5f1b378e4f64 776 }
caseyquinn 50:5f1b378e4f64 777
caseyquinn 50:5f1b378e4f64 778 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 50:5f1b378e4f64 779 volflow = massflow/atmoRho;
caseyquinn 50:5f1b378e4f64 780 sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow);
caseyquinn 50:5f1b378e4f64 781 deltaVflow = volflow-volflowSet;
caseyquinn 50:5f1b378e4f64 782 massflowSet = volflowSet*atmoRho;
caseyquinn 50:5f1b378e4f64 783 deltaMflow = massflow-massflowSet;
caseyquinn 50:5f1b378e4f64 784
caseyquinn 50:5f1b378e4f64 785 if(abs(deltaMflow)>.025) {
caseyquinn 50:5f1b378e4f64 786 digital_pot_change = (int)(gainFlow*deltaMflow);
caseyquinn 50:5f1b378e4f64 787
caseyquinn 50:5f1b378e4f64 788
caseyquinn 50:5f1b378e4f64 789 if(abs(digital_pot_change)>=10) {
caseyquinn 50:5f1b378e4f64 790 digital_pot_set = (int)(digital_pot_set+ (int)(1*deltaMflow));
caseyquinn 50:5f1b378e4f64 791 //RGB_LED.set_led(1,0,0);
caseyquinn 50:5f1b378e4f64 792 } else {
caseyquinn 50:5f1b378e4f64 793 digital_pot_set = (digital_pot_set+ digital_pot_change);
caseyquinn 50:5f1b378e4f64 794 //RGB_LED.set_led(1,1,0);
caseyquinn 50:5f1b378e4f64 795 }
caseyquinn 50:5f1b378e4f64 796
caseyquinn 50:5f1b378e4f64 797 if(digital_pot_set>=digitalpotMax) {
caseyquinn 50:5f1b378e4f64 798 digital_pot_set = digitalpotMax;
caseyquinn 50:5f1b378e4f64 799 //RGB_LED.set_led(1,0,0);
caseyquinn 50:5f1b378e4f64 800 } else if(digital_pot_set<=digitalpotMin) {
caseyquinn 50:5f1b378e4f64 801 digital_pot_set = digitalpotMin;
caseyquinn 50:5f1b378e4f64 802 //RGB_LED.set_led(1,0,0);
caseyquinn 50:5f1b378e4f64 803 }
caseyquinn 50:5f1b378e4f64 804
caseyquinn 50:5f1b378e4f64 805 DigPot.writeRegister(digital_pot_set);
caseyquinn 50:5f1b378e4f64 806
caseyquinn 50:5f1b378e4f64 807 } else {
caseyquinn 50:5f1b378e4f64 808 //RGB_LED.set_led(0,1,0);
caseyquinn 50:5f1b378e4f64 809 }
caseyquinn 50:5f1b378e4f64 810 */
caseyquinn 50:5f1b378e4f64 811
caseyquinn 14:7cdb643da356 812 }
caseyquinn 14:7cdb643da356 813
caseyquinn 27:922f53fa649c 814
caseyquinn 21:bb10efc5bf57 815
caseyquinn 7:29b01d5812ee 816 FILE *fp = fopen(filename, "a");
caseyquinn 21:bb10efc5bf57 817 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 818 fprintf(fp, "%s,", timestr);
caseyquinn 7:29b01d5812ee 819 fprintf(fp, "%1.3f,%1.3f,%2.2f,%4.2f,%2.1f,%1.3f,", omronVolt,massflow,temp,press,rh,atmoRho);
caseyquinn 7:29b01d5812ee 820 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 821 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 822 fprintf(fp, "%d,%d,%d,%d,%d,%d," ,uv,omronReading, vInReading, vBlowerReading, omronDiff,amps);
caseyquinn 25:fbf7d44e7da4 823 fprintf(fp, "%d,%d,%d,%1.3f,%1.3f,", bVolt, bFuel,digital_pot_set, deltaMflow, deltaVflow);
caseyquinn 51:feba3e2aa1a0 824 fprintf(fp, "%f,%f,%06d,%06d,", gpslatitude, gpslongitude, gpsDate, gpsTime);
caseyquinn 28:42932d3b105d 825 //fprintf(fp, "%f,%d,%f,%f,%d,", gpsspeed, gpssatellites, gpscourse, gpsaltitude, gpsFix);
caseyquinn 28:42932d3b105d 826 fprintf(fp, "%f,%d,%f,%d,", gpsspeed, gpssatellites, gpsaltitude, gpsFix);
caseyquinn 46:99d129bfdbbd 827 fprintf(fp, "%d,%d\r\n", dutyCycleI, pumps == 1); // test and add in speed, etc that Josh added in to match the adafruit GPS
caseyquinn 7:29b01d5812ee 828 fclose(fp);
caseyquinn 7:29b01d5812ee 829 free(fp);
caseyquinn 25:fbf7d44e7da4 830
caseyquinn 25:fbf7d44e7da4 831
caseyquinn 14:7cdb643da356 832
caseyquinn 12:5b4f3245606a 833
caseyquinn 25:fbf7d44e7da4 834
caseyquinn 12:5b4f3245606a 835
jelord 3:122bfc998c4c 836 }
caseyquinn 8:c4a8f9b67cee 837
caseyquinn 9:8646fd501832 838 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 839 //Flow Control Function
caseyquinn 9:8646fd501832 840 //////////////////////////////////////////////////////////////
caseyquinn 8:c4a8f9b67cee 841 void flowControl()
caseyquinn 8:c4a8f9b67cee 842 {
caseyquinn 50:5f1b378e4f64 843 if(pumps == 1){
caseyquinn 50:5f1b378e4f64 844 //RGB_LED.set_led(1,1,1);
caseyquinn 34:da333abe3476 845 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 846 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 8:c4a8f9b67cee 847
caseyquinn 8:c4a8f9b67cee 848 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 8:c4a8f9b67cee 849 massflow = calibrations.omronMFMin;
caseyquinn 8:c4a8f9b67cee 850 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 8:c4a8f9b67cee 851 massflow = calibrations.omronMFMax;
caseyquinn 8:c4a8f9b67cee 852 } else {
caseyquinn 8:c4a8f9b67cee 853 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 854 }
caseyquinn 8:c4a8f9b67cee 855
caseyquinn 8:c4a8f9b67cee 856 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 857 volflow = massflow/atmoRho;
caseyquinn 47:fe50d72c7adc 858 //sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow);
caseyquinn 8:c4a8f9b67cee 859 deltaVflow = volflow-volflowSet;
caseyquinn 8:c4a8f9b67cee 860 massflowSet = volflowSet*atmoRho;
caseyquinn 8:c4a8f9b67cee 861 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 862
caseyquinn 8:c4a8f9b67cee 863 if(abs(deltaMflow)>.025) {
caseyquinn 8:c4a8f9b67cee 864 digital_pot_change = (int)(gainFlow*deltaMflow);
caseyquinn 8:c4a8f9b67cee 865
caseyquinn 8:c4a8f9b67cee 866
caseyquinn 12:5b4f3245606a 867 if(abs(digital_pot_change)>=10) {
caseyquinn 50:5f1b378e4f64 868 digital_pot_set = (int)(digital_pot_set+ (int)((2/volflowSet)*deltaMflow));
caseyquinn 25:fbf7d44e7da4 869 //RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 870 } else {
caseyquinn 8:c4a8f9b67cee 871 digital_pot_set = (digital_pot_set+ digital_pot_change);
caseyquinn 25:fbf7d44e7da4 872 //RGB_LED.set_led(1,1,0);
caseyquinn 8:c4a8f9b67cee 873 }
caseyquinn 8:c4a8f9b67cee 874
caseyquinn 12:5b4f3245606a 875 if(digital_pot_set>=digitalpotMax) {
caseyquinn 12:5b4f3245606a 876 digital_pot_set = digitalpotMax;
caseyquinn 25:fbf7d44e7da4 877 //RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 878 } else if(digital_pot_set<=digitalpotMin) {
caseyquinn 12:5b4f3245606a 879 digital_pot_set = digitalpotMin;
caseyquinn 25:fbf7d44e7da4 880 //RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 881 }
caseyquinn 8:c4a8f9b67cee 882
caseyquinn 8:c4a8f9b67cee 883 DigPot.writeRegister(digital_pot_set);
caseyquinn 12:5b4f3245606a 884
caseyquinn 8:c4a8f9b67cee 885 } else {
caseyquinn 25:fbf7d44e7da4 886 //RGB_LED.set_led(0,1,0);
caseyquinn 8:c4a8f9b67cee 887 }
caseyquinn 50:5f1b378e4f64 888 }
caseyquinn 25:fbf7d44e7da4 889
caseyquinn 8:c4a8f9b67cee 890 }
caseyquinn 9:8646fd501832 891 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 892 //Main Function
caseyquinn 9:8646fd501832 893 //////////////////////////////////////////////////////////////
jelord 1:9fbb5b665068 894 int main(){
caseyquinn 27:922f53fa649c 895
caseyquinn 29:fd74725294d5 896
caseyquinn 23:1ca41779b8ec 897 RGB_LED.set_led(0,0,1);
caseyquinn 36:2e344db70d35 898
caseyquinn 36:2e344db70d35 899
caseyquinn 29:fd74725294d5 900 /*
caseyquinn 27:922f53fa649c 901 while(1){
caseyquinn 27:922f53fa649c 902 if(sdCD == 0){
caseyquinn 27:922f53fa649c 903 RGB_LED.set_led(0,1,0);
caseyquinn 27:922f53fa649c 904 }else{
caseyquinn 27:922f53fa649c 905 RGB_LED.set_led(1,0,0);
caseyquinn 27:922f53fa649c 906 }
caseyquinn 27:922f53fa649c 907
caseyquinn 27:922f53fa649c 908 wait(10);
caseyquinn 27:922f53fa649c 909 }
caseyquinn 35:e0bdd6389a75 910
caseyquinn 43:05aa1fb68946 911 */
caseyquinn 30:aa6324845a84 912
caseyquinn 23:1ca41779b8ec 913
caseyquinn 23:1ca41779b8ec 914 gpsEN = 1;
caseyquinn 23:1ca41779b8ec 915 wait(1);
caseyquinn 23:1ca41779b8ec 916 BT_SW = 1;
caseyquinn 23:1ca41779b8ec 917 wait(1);
caseyquinn 23:1ca41779b8ec 918 BT_IRST = 1;
caseyquinn 23:1ca41779b8ec 919 wait(1);
caseyquinn 23:1ca41779b8ec 920
caseyquinn 12:5b4f3245606a 921
caseyquinn 10:06fbb1c9e3bd 922 pc.baud(115200); // set what you want here depending on your terminal program speed
caseyquinn 10:06fbb1c9e3bd 923 pc.printf("\f\n\r-------------Startup-------------\n\r");
jelord 1:9fbb5b665068 924 wait(0.5);
caseyquinn 5:c3252e5d45ca 925
caseyquinn 29:fd74725294d5 926
caseyquinn 29:fd74725294d5 927
caseyquinn 29:fd74725294d5 928 uint8_t serialNumberAndType[6] = {0x50,0x53,}; //ex) PS0018 // 0x50,0x53 <- ASCII 80 + 83 (PS) //0x4d,0x53 <- ASCII 77 + 83 (MS)
caseyquinn 29:fd74725294d5 929 E2PROM.read(0x00034,serialNumberAndType+2,2);
caseyquinn 29:fd74725294d5 930
caseyquinn 29:fd74725294d5 931 int tempSerialNum = ((serialNumberAndType[2]-48)*10 + serialNumberAndType[3]-48);
caseyquinn 29:fd74725294d5 932 if(tempSerialNum < 18){
caseyquinn 29:fd74725294d5 933 serialNumberAndType[0] = 0x4D;
caseyquinn 29:fd74725294d5 934 }
caseyquinn 13:455601f62aad 935
jelord 3:122bfc998c4c 936 int serialNumDigits[4];
jelord 3:122bfc998c4c 937 serialNumDigits[0] = tempSerialNum / 1000 % 10;
jelord 3:122bfc998c4c 938 serialNumDigits[1] = tempSerialNum / 100 % 10;
jelord 3:122bfc998c4c 939 serialNumDigits[2] = tempSerialNum / 10 % 10;
jelord 3:122bfc998c4c 940 serialNumDigits[3] = tempSerialNum % 10;
jelord 3:122bfc998c4c 941
caseyquinn 29:fd74725294d5 942
jelord 3:122bfc998c4c 943 serialNumberAndType[2] = serialNumDigits[0]+48;
jelord 3:122bfc998c4c 944 serialNumberAndType[3] = serialNumDigits[1]+48;
jelord 3:122bfc998c4c 945 serialNumberAndType[4] = serialNumDigits[2]+48;
jelord 3:122bfc998c4c 946 serialNumberAndType[5] = serialNumDigits[3]+48;
caseyquinn 12:5b4f3245606a 947
caseyquinn 29:fd74725294d5 948 /*
caseyquinn 29:fd74725294d5 949 serialNumberAndType[2] = serialNumDigits[0];
caseyquinn 29:fd74725294d5 950 serialNumberAndType[3] = serialNumDigits[1];
caseyquinn 29:fd74725294d5 951 serialNumberAndType[4] = serialNumDigits[2];
caseyquinn 29:fd74725294d5 952 serialNumberAndType[5] = serialNumDigits[3];
caseyquinn 29:fd74725294d5 953 */
caseyquinn 29:fd74725294d5 954
caseyquinn 29:fd74725294d5 955 RGB_LED.set_led(0,1,0);
caseyquinn 13:455601f62aad 956
caseyquinn 10:06fbb1c9e3bd 957 pc.attach(pc_recv);
jelord 1:9fbb5b665068 958 microChannel.attach(uartMicro,microChannel.RxIrq);
jelord 3:122bfc998c4c 959 microChannel.baud(115200);
jelord 1:9fbb5b665068 960 microChannel.printf("$$$");
jelord 3:122bfc998c4c 961 wait(0.5);
jelord 3:122bfc998c4c 962 microChannel.printf("SN,");
jelord 3:122bfc998c4c 963 for(int i=0;i<6;i++)microChannel.putc(serialNumberAndType[i]);
jelord 3:122bfc998c4c 964 microChannel.printf("\r");
jelord 3:122bfc998c4c 965 wait(0.5);
jelord 1:9fbb5b665068 966 microChannel.printf("A\r");
jelord 3:122bfc998c4c 967 wait(0.5);
jelord 2:88fcbfadec6a 968 microChannel.printf("---\r");
jelord 3:122bfc998c4c 969 wait(0.5);
jelord 2:88fcbfadec6a 970
caseyquinn 18:41ef98db0423 971 RGB_LED.set_led(1,1,1);
caseyquinn 36:2e344db70d35 972
jelord 3:122bfc998c4c 973 while(runReady!=1) {
jelord 3:122bfc998c4c 974 wait(1);
caseyquinn 26:6aa294d83af4 975 pc.printf("Waiting for BLE instruction\r\n");
jelord 3:122bfc998c4c 976
jelord 3:122bfc998c4c 977 }
jelord 3:122bfc998c4c 978
caseyquinn 36:2e344db70d35 979 BT_SW = 0;
caseyquinn 36:2e344db70d35 980 wait(1);
caseyquinn 36:2e344db70d35 981 BT_IRST = 0;
caseyquinn 36:2e344db70d35 982 wait(1);
caseyquinn 36:2e344db70d35 983
caseyquinn 36:2e344db70d35 984
caseyquinn 36:2e344db70d35 985
jelord 3:122bfc998c4c 986 E2PROM.read(0x00015, startAndEndTime, 12); //Grab start and end times from EEPROM
jelord 3:122bfc998c4c 987 RGB_LED.set_led(0,1,0);
caseyquinn 14:7cdb643da356 988
caseyquinn 26:6aa294d83af4 989
caseyquinn 26:6aa294d83af4 990 //Pull MicroEnviornment Lat/Lons from EEPROM
caseyquinn 26:6aa294d83af4 991 // Latitude School EEPROM = 0x50-0x53
caseyquinn 26:6aa294d83af4 992 // Longitude School EEPROM = 0x54-0x57
caseyquinn 26:6aa294d83af4 993 // Latitude Home EEPROM = 0x58-0x5B
caseyquinn 26:6aa294d83af4 994 // Longitude Home EEPROM = 0x5C-0x5F
caseyquinn 26:6aa294d83af4 995
caseyquinn 26:6aa294d83af4 996 uint8_t workLat[4] = {0,};
caseyquinn 26:6aa294d83af4 997 E2PROM.read(0x00050,workLat,4);
caseyquinn 26:6aa294d83af4 998 E2PROM.byteToFloat(workLat, &work_lat);
caseyquinn 26:6aa294d83af4 999
caseyquinn 26:6aa294d83af4 1000 uint8_t workLon[4] = {0,};
caseyquinn 26:6aa294d83af4 1001 E2PROM.read(0x00054,workLon,4);
caseyquinn 26:6aa294d83af4 1002 E2PROM.byteToFloat(workLon, &work_lon);
caseyquinn 26:6aa294d83af4 1003
caseyquinn 26:6aa294d83af4 1004 uint8_t homeLat[4] = {0,};
caseyquinn 26:6aa294d83af4 1005 E2PROM.read(0x00058,homeLat,4);
caseyquinn 26:6aa294d83af4 1006 E2PROM.byteToFloat(homeLat, &home_lat);
caseyquinn 26:6aa294d83af4 1007
caseyquinn 26:6aa294d83af4 1008 uint8_t homeLon[4] = {0,};
caseyquinn 26:6aa294d83af4 1009 E2PROM.read(0x0005C,homeLon,4);
caseyquinn 26:6aa294d83af4 1010 E2PROM.byteToFloat(homeLon, &home_lon);
caseyquinn 26:6aa294d83af4 1011
caseyquinn 36:2e344db70d35 1012 uint8_t homeLat2[4] = {0,};
caseyquinn 36:2e344db70d35 1013 E2PROM.read(0x00060,homeLat2,4);
caseyquinn 36:2e344db70d35 1014 E2PROM.byteToFloat(homeLat2, &home_lat2);
caseyquinn 26:6aa294d83af4 1015
caseyquinn 36:2e344db70d35 1016 uint8_t homeLon2[4] = {0,};
caseyquinn 36:2e344db70d35 1017 E2PROM.read(0x00064,homeLon2,4);
caseyquinn 36:2e344db70d35 1018 E2PROM.byteToFloat(homeLon2, &home_lon2);
caseyquinn 36:2e344db70d35 1019
caseyquinn 36:2e344db70d35 1020 pc.printf("%f,%f\r\n %f,%f\r\n %f,%f\r\n", home_lat, home_lon, work_lat, work_lon, home_lat2, home_lon2);
caseyquinn 36:2e344db70d35 1021
caseyquinn 36:2e344db70d35 1022 //Get the subject line information
caseyquinn 40:cac5bdffba44 1023 uint8_t subjectLabelOriginal[15] = {0,};
caseyquinn 40:cac5bdffba44 1024 E2PROM.read(0x00001, subjectLabelOriginal,15);
jelord 3:122bfc998c4c 1025
caseyquinn 44:075fa63d5df1 1026 //Get the cartridge ID information
caseyquinn 44:075fa63d5df1 1027 uint8_t cartridgeID[3] = {0,};
caseyquinn 44:075fa63d5df1 1028 E2PROM.read(0x00070, cartridgeID,3);
caseyquinn 44:075fa63d5df1 1029
caseyquinn 46:99d129bfdbbd 1030 //Get the dutycycle information
caseyquinn 46:99d129bfdbbd 1031 uint8_t dutycycleStr[3] = {0,};
caseyquinn 46:99d129bfdbbd 1032 E2PROM.read(0x00076, dutycycleStr,3);
caseyquinn 46:99d129bfdbbd 1033 dutyCycleI = ((dutycycleStr[0]-48)*100 + (dutycycleStr[1]-48)*10 + (dutycycleStr[2]-48));
caseyquinn 46:99d129bfdbbd 1034 float dutycycleF = ((float)dutyCycleI/100);
caseyquinn 46:99d129bfdbbd 1035 dutycycleSecOn = (int)(dutycycleF*60);
caseyquinn 46:99d129bfdbbd 1036
caseyquinn 46:99d129bfdbbd 1037 //wait(1);
caseyquinn 46:99d129bfdbbd 1038 //pc.printf("%s,%d,%f,%d\r\n", dutycycleStr,dutyCycleI,dutycycleF,dutycycleSecOn);
caseyquinn 46:99d129bfdbbd 1039
jelord 3:122bfc998c4c 1040 //Get the proper serial number
jelord 3:122bfc998c4c 1041 uint8_t serialBytes[2] = {0,};
caseyquinn 29:fd74725294d5 1042 E2PROM.read(0x00034,serialBytes,2);
caseyquinn 29:fd74725294d5 1043 serial_num = (uint16_t)(((serialBytes[0]-48)*10 + serialBytes[1]-48));
caseyquinn 29:fd74725294d5 1044
caseyquinn 29:fd74725294d5 1045
caseyquinn 29:fd74725294d5 1046 ////////////////////////////////////////////////////////////////////
caseyquinn 29:fd74725294d5 1047 //Temporary fix for setting serial_num
caseyquinn 29:fd74725294d5 1048 ////////////////////////////////////////////////////////////////////
caseyquinn 29:fd74725294d5 1049 //uint8_t serialsubjectLabelOriginal[2] = {0,};
caseyquinn 29:fd74725294d5 1050 //E2PROM.read(0x00001, serialsubjectLabelOriginal,2);
caseyquinn 29:fd74725294d5 1051 //uint8_t newserialBytes[2] = {0,};
caseyquinn 29:fd74725294d5 1052
caseyquinn 30:aa6324845a84 1053 if(subjectLabelOriginal[2] == 126){
caseyquinn 29:fd74725294d5 1054 E2PROM.write(0x00034,subjectLabelOriginal,2);
caseyquinn 29:fd74725294d5 1055 serial_num = (uint16_t)(((subjectLabelOriginal[0]-48)*10 + subjectLabelOriginal[1]-48));
caseyquinn 29:fd74725294d5 1056 }
caseyquinn 29:fd74725294d5 1057
caseyquinn 29:fd74725294d5 1058 //----------------------------------------------
jelord 3:122bfc998c4c 1059 calibrations.initialize(serial_num);
caseyquinn 29:fd74725294d5 1060 pc.printf("%d\r\n", serial_num);
caseyquinn 29:fd74725294d5 1061 pc.printf("%f\r\n",calibrations.MF4);
caseyquinn 29:fd74725294d5 1062 //----------------------------------------------
caseyquinn 29:fd74725294d5 1063 ////////////////////////////////////////////////////////////////////
caseyquinn 29:fd74725294d5 1064
jelord 3:122bfc998c4c 1065
jelord 3:122bfc998c4c 1066 uint8_t logByte[1] = {0,};
jelord 3:122bfc998c4c 1067 E2PROM.read(0x00014,logByte,1);
jelord 3:122bfc998c4c 1068 logInerval = logByte[0];
jelord 3:122bfc998c4c 1069
jelord 3:122bfc998c4c 1070 //Use the flow rate value stored in eeprom
jelord 3:122bfc998c4c 1071 uint8_t flowRateBytes[4] = {0,};
jelord 3:122bfc998c4c 1072 E2PROM.read(0x00010,flowRateBytes,4);
jelord 3:122bfc998c4c 1073 E2PROM.byteToFloat(flowRateBytes, &volflowSet);
caseyquinn 29:fd74725294d5 1074
caseyquinn 29:fd74725294d5 1075
caseyquinn 43:05aa1fb68946 1076
caseyquinn 36:2e344db70d35 1077 /*
caseyquinn 36:2e344db70d35 1078 while(!gpsFix){
caseyquinn 36:2e344db70d35 1079 gpsFix = gps.read(1);
caseyquinn 36:2e344db70d35 1080 if(ledOn) {
caseyquinn 36:2e344db70d35 1081 RGB_LED.set_led(0,0,0);
caseyquinn 36:2e344db70d35 1082 ledOn = 0;
caseyquinn 36:2e344db70d35 1083 }else {
caseyquinn 36:2e344db70d35 1084 RGB_LED.set_led(1,0,0);
caseyquinn 36:2e344db70d35 1085 ledOn = 1;
caseyquinn 36:2e344db70d35 1086 }
caseyquinn 36:2e344db70d35 1087 wait(1);
caseyquinn 36:2e344db70d35 1088 }
caseyquinn 36:2e344db70d35 1089 */
caseyquinn 36:2e344db70d35 1090
caseyquinn 36:2e344db70d35 1091
caseyquinn 36:2e344db70d35 1092
caseyquinn 43:05aa1fb68946 1093 while(!timecompare(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
caseyquinn 36:2e344db70d35 1094 wait(0.5);
caseyquinn 36:2e344db70d35 1095
caseyquinn 36:2e344db70d35 1096 }
caseyquinn 52:95949e34b1f6 1097 RTC_UPAS.get_time();
caseyquinn 46:99d129bfdbbd 1098
caseyquinn 51:feba3e2aa1a0 1099 gps.read(1);
caseyquinn 51:feba3e2aa1a0 1100 gpsTime = (long)gps.utc;
caseyquinn 51:feba3e2aa1a0 1101 gpsDate = (long)gps.date;
caseyquinn 52:95949e34b1f6 1102
caseyquinn 43:05aa1fb68946 1103 time_t seconds = time(NULL);
caseyquinn 43:05aa1fb68946 1104 strftime(timestr, 32, "%y-%m-%d-%H=%M=%S", localtime(&seconds));
caseyquinn 52:95949e34b1f6 1105
caseyquinn 52:95949e34b1f6 1106 strftime(yrstr, 4, "%y", localtime(&seconds));
caseyquinn 52:95949e34b1f6 1107 stYr = atoi(yrstr);
caseyquinn 52:95949e34b1f6 1108
caseyquinn 52:95949e34b1f6 1109 strftime(mostr, 4, "%m", localtime(&seconds));
caseyquinn 52:95949e34b1f6 1110 stMo = atoi(mostr);
caseyquinn 52:95949e34b1f6 1111
caseyquinn 52:95949e34b1f6 1112 strftime(daystr, 4, "%d", localtime(&seconds));
caseyquinn 52:95949e34b1f6 1113 stDay = atoi(daystr);
caseyquinn 52:95949e34b1f6 1114
caseyquinn 52:95949e34b1f6 1115 strftime(hrstr, 4, "%H", localtime(&seconds));
caseyquinn 52:95949e34b1f6 1116 stHr = atoi(hrstr);
caseyquinn 52:95949e34b1f6 1117
caseyquinn 52:95949e34b1f6 1118 strftime(minstr, 4, "%M", localtime(&seconds));
caseyquinn 52:95949e34b1f6 1119 stMin = atoi(minstr);
caseyquinn 52:95949e34b1f6 1120
caseyquinn 52:95949e34b1f6 1121 strftime(secstr, 4, "%S", localtime(&seconds));
caseyquinn 52:95949e34b1f6 1122 stSec = atoi(secstr);
caseyquinn 52:95949e34b1f6 1123
caseyquinn 52:95949e34b1f6 1124
caseyquinn 52:95949e34b1f6 1125
caseyquinn 52:95949e34b1f6 1126
caseyquinn 52:95949e34b1f6 1127
caseyquinn 43:05aa1fb68946 1128 if(tempSerialNum < 18){
caseyquinn 52:95949e34b1f6 1129 sprintf(filename, "/sd/MS%03dLOG_%02d%02d%02d_%02d%02d%02d_%06d_%06d_%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c_%c%c%c.txt",serial_num,stYr,stMo,stDay,stHr,stMin,stSec,gpsDate,gpsTime,subjectLabelOriginal[0],subjectLabelOriginal[1],subjectLabelOriginal[2],subjectLabelOriginal[3],subjectLabelOriginal[4],subjectLabelOriginal[5],subjectLabelOriginal[6],subjectLabelOriginal[7],subjectLabelOriginal[8],subjectLabelOriginal[9],subjectLabelOriginal[10],subjectLabelOriginal[11],subjectLabelOriginal[12],subjectLabelOriginal[13],subjectLabelOriginal[14],cartridgeID[0],cartridgeID[1],cartridgeID[2]);
caseyquinn 36:2e344db70d35 1130
caseyquinn 43:05aa1fb68946 1131 }
caseyquinn 43:05aa1fb68946 1132 else{
caseyquinn 52:95949e34b1f6 1133 sprintf(filename, "/sd/PS%03dLOG_%02d%02d%02d_%02d%02d%02d_%06d_%06d_%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c_%c%c%c.txt",serial_num,stYr,stMo,stDay,stHr,stMin,stSec,gpsDate,gpsTime,subjectLabelOriginal[0],subjectLabelOriginal[1],subjectLabelOriginal[2],subjectLabelOriginal[3],subjectLabelOriginal[4],subjectLabelOriginal[5],subjectLabelOriginal[6],subjectLabelOriginal[7],subjectLabelOriginal[8],subjectLabelOriginal[9],subjectLabelOriginal[10],subjectLabelOriginal[11],subjectLabelOriginal[12],subjectLabelOriginal[13],subjectLabelOriginal[14],cartridgeID[0],cartridgeID[1],cartridgeID[2]);
caseyquinn 52:95949e34b1f6 1134
caseyquinn 43:05aa1fb68946 1135 }
caseyquinn 43:05aa1fb68946 1136 //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 43:05aa1fb68946 1137 //sprintf(filename, "/sd/UPAS_TboardtestLog_%s.txt", timestr);
caseyquinn 43:05aa1fb68946 1138 FILE *fp = fopen(filename, "w");
caseyquinn 43:05aa1fb68946 1139 fclose(fp);
caseyquinn 36:2e344db70d35 1140
caseyquinn 36:2e344db70d35 1141 RGB_LED.set_led(1,0,1);
caseyquinn 36:2e344db70d35 1142
jelord 3:122bfc998c4c 1143 if(volflowSet<=1.0) {
jelord 3:122bfc998c4c 1144 gainFlow = 100;
jelord 3:122bfc998c4c 1145 } else if(volflowSet>=2.0) {
jelord 3:122bfc998c4c 1146 gainFlow = 25;
jelord 3:122bfc998c4c 1147 } else {
jelord 3:122bfc998c4c 1148 gainFlow = 25;
jelord 0:2cb2b2ea316f 1149 }
caseyquinn 36:2e344db70d35 1150
jelord 3:122bfc998c4c 1151 press = bmesensor.getPressure();
jelord 3:122bfc998c4c 1152 temp = bmesensor.getTemperature();
jelord 3:122bfc998c4c 1153 rh = bmesensor.getHumidity();
jelord 3:122bfc998c4c 1154
jelord 3:122bfc998c4c 1155 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 1156 massflowSet = volflowSet*atmoRho;
jelord 3:122bfc998c4c 1157
jelord 3:122bfc998c4c 1158 DigPot.writeRegister(digital_pot_setpoint);
jelord 3:122bfc998c4c 1159 wait(1);
caseyquinn 28:42932d3b105d 1160 pumps = 1;
caseyquinn 25:fbf7d44e7da4 1161 //pumpOn = 1;
jelord 3:122bfc998c4c 1162
caseyquinn 35:e0bdd6389a75 1163
caseyquinn 29:fd74725294d5 1164 if(volflowSet<=1.0) {
caseyquinn 29:fd74725294d5 1165 gainFlow = 100;
caseyquinn 29:fd74725294d5 1166 } else if(volflowSet>=2.0) {
caseyquinn 29:fd74725294d5 1167 gainFlow = 25;
caseyquinn 29:fd74725294d5 1168 } else {
caseyquinn 29:fd74725294d5 1169 gainFlow = 25;
caseyquinn 29:fd74725294d5 1170 }
caseyquinn 29:fd74725294d5 1171
caseyquinn 29:fd74725294d5 1172 RGB_LED.set_led(1,0,0);
caseyquinn 29:fd74725294d5 1173 press = bmesensor.getPressure();
caseyquinn 29:fd74725294d5 1174 temp = bmesensor.getTemperature();
caseyquinn 29:fd74725294d5 1175 rh = bmesensor.getHumidity();
caseyquinn 29:fd74725294d5 1176
caseyquinn 29:fd74725294d5 1177 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 1178 massflowSet = volflowSet*atmoRho;
caseyquinn 29:fd74725294d5 1179
caseyquinn 29:fd74725294d5 1180 //Digtal pot tf from file: UPAS v2 OSU-PrimaryFlowData FullSet 2015-05-29 CQ mods.xlsx
caseyquinn 29:fd74725294d5 1181 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 1182
caseyquinn 29:fd74725294d5 1183 if(digital_pot_setpoint>=digitalpotMax) {
caseyquinn 29:fd74725294d5 1184 digital_pot_setpoint = digitalpotMax;
caseyquinn 29:fd74725294d5 1185 } else if(digital_pot_setpoint<=digitalpotMin) {
caseyquinn 29:fd74725294d5 1186 digital_pot_setpoint = digitalpotMin;
caseyquinn 29:fd74725294d5 1187 }
caseyquinn 29:fd74725294d5 1188
caseyquinn 29:fd74725294d5 1189 pc.printf("%d\r\n", digital_pot_setpoint);
caseyquinn 29:fd74725294d5 1190 DigPot.writeRegister(digital_pot_setpoint);
caseyquinn 29:fd74725294d5 1191 wait(1);
caseyquinn 35:e0bdd6389a75 1192 pumps = 1;
caseyquinn 35:e0bdd6389a75 1193
jelord 3:122bfc998c4c 1194
caseyquinn 25:fbf7d44e7da4 1195
caseyquinn 34:da333abe3476 1196 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 1197 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 12:5b4f3245606a 1198 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 12:5b4f3245606a 1199 massflow = calibrations.omronMFMin;
caseyquinn 12:5b4f3245606a 1200 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 12:5b4f3245606a 1201 massflow = calibrations.omronMFMax;
caseyquinn 12:5b4f3245606a 1202 } else {
caseyquinn 12:5b4f3245606a 1203 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 1204 }
caseyquinn 12:5b4f3245606a 1205 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 1206 digital_pot_set = digital_pot_setpoint;
caseyquinn 12:5b4f3245606a 1207 wait(5);
caseyquinn 12:5b4f3245606a 1208
caseyquinn 12:5b4f3245606a 1209 //---------------------------------------------------------------------------------------------//
caseyquinn 12:5b4f3245606a 1210 //Sets the flow withen +-1.5% of the desired flow rate based on mass flow
caseyquinn 35:e0bdd6389a75 1211
caseyquinn 12:5b4f3245606a 1212 while(abs(deltaMflow)>.025) {
caseyquinn 12:5b4f3245606a 1213
caseyquinn 34:da333abe3476 1214 omronReading = ads.readADC_SingleEnded(0, 0xC383); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 34:da333abe3476 1215 omronVolt = (omronReading*4.096)/(32768*1);
caseyquinn 36:2e344db70d35 1216 pc.printf("%d,%f\r\n", omronReading, omronVolt);
caseyquinn 12:5b4f3245606a 1217 //Mass Flow tf from file: UPAS v2 OSU-PrimaryFlowData FullSet 2015-05-29 CQ mods.xlsx
caseyquinn 12:5b4f3245606a 1218 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 12:5b4f3245606a 1219 massflow = calibrations.omronMFMin;
caseyquinn 12:5b4f3245606a 1220 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 12:5b4f3245606a 1221 massflow = calibrations.omronMFMax;
caseyquinn 12:5b4f3245606a 1222 } else {
caseyquinn 12:5b4f3245606a 1223 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 1224 }
caseyquinn 12:5b4f3245606a 1225
caseyquinn 12:5b4f3245606a 1226 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 1227 volflow = massflow/atmoRho;
caseyquinn 36:2e344db70d35 1228 pc.printf("%f\r\n", volflow);
caseyquinn 12:5b4f3245606a 1229 massflowSet = volflowSet*atmoRho;
caseyquinn 12:5b4f3245606a 1230 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 1231
caseyquinn 12:5b4f3245606a 1232 digital_pot_set = (int)(digital_pot_set+(int)((gainFlow*deltaMflow)));
caseyquinn 12:5b4f3245606a 1233 if(digital_pot_set>=digitalpotMax) {
caseyquinn 12:5b4f3245606a 1234 digital_pot_set = digitalpotMax;
caseyquinn 12:5b4f3245606a 1235 } else if(digital_pot_set<=digitalpotMin) {
caseyquinn 12:5b4f3245606a 1236 digital_pot_set = digitalpotMin;
caseyquinn 12:5b4f3245606a 1237 }
caseyquinn 12:5b4f3245606a 1238
caseyquinn 12:5b4f3245606a 1239 wait(2);
caseyquinn 12:5b4f3245606a 1240 DigPot.writeRegister(digital_pot_set);
caseyquinn 12:5b4f3245606a 1241 pc.printf("%d,\r\n", digital_pot_set);
caseyquinn 12:5b4f3245606a 1242 wait(1);
caseyquinn 12:5b4f3245606a 1243
caseyquinn 12:5b4f3245606a 1244
caseyquinn 12:5b4f3245606a 1245 }
caseyquinn 36:2e344db70d35 1246 //pumps = 0;
jelord 3:122bfc998c4c 1247 sampledVol = 0.0;
jelord 3:122bfc998c4c 1248 RGB_LED.set_led(0,1,0);
caseyquinn 25:fbf7d44e7da4 1249 wait(1);
caseyquinn 25:fbf7d44e7da4 1250 RGB_LED.set_led(0,0,0);
caseyquinn 14:7cdb643da356 1251
caseyquinn 46:99d129bfdbbd 1252 while(fmod((double)stSec,10)!=0) {
caseyquinn 46:99d129bfdbbd 1253 //pc.printf("%f, %f\r\n", floor(secondsD), floor(lastsecondD));
caseyquinn 46:99d129bfdbbd 1254 time_t seconds = time(NULL);
caseyquinn 46:99d129bfdbbd 1255 strftime(secstr, 4, "%S", localtime(&seconds));
caseyquinn 46:99d129bfdbbd 1256 stSec = atoi(secstr);
caseyquinn 46:99d129bfdbbd 1257 wait_ms(100);
caseyquinn 46:99d129bfdbbd 1258 }
caseyquinn 46:99d129bfdbbd 1259
caseyquinn 46:99d129bfdbbd 1260 logg.attach(&log_data, logInerval);
caseyquinn 43:05aa1fb68946 1261 stop.attach(&check_stop, 9); // check if we should shut down every 9 number seconds, starting after the start.
caseyquinn 35:e0bdd6389a75 1262 flowCtl.attach(&flowControl, 3);
caseyquinn 30:aa6324845a84 1263
caseyquinn 35:e0bdd6389a75 1264
caseyquinn 35:e0bdd6389a75 1265
caseyquinn 30:aa6324845a84 1266
jelord 3:122bfc998c4c 1267 //** end of initalization **//
jelord 3:122bfc998c4c 1268 //---------------------------------------------------------------------------------------------//
jelord 3:122bfc998c4c 1269 //---------------------------------------------------------------------------------------------//
jelord 3:122bfc998c4c 1270 // Main Control Loop
jelord 3:122bfc998c4c 1271
caseyquinn 7:29b01d5812ee 1272 while (1) {
caseyquinn 7:29b01d5812ee 1273 // Do other things...
caseyquinn 46:99d129bfdbbd 1274
caseyquinn 46:99d129bfdbbd 1275 }
caseyquinn 7:29b01d5812ee 1276
caseyquinn 8:c4a8f9b67cee 1277
caseyquinn 4:5d004fd997d5 1278
jelord 3:122bfc998c4c 1279
jelord 0:2cb2b2ea316f 1280 }