scott kelleher / Outdoor_UPAS_v1_2_powerfunction

attempt to fix posible power issues with the sharp

Dependencies:   ADS1115 BME280 CronoDot SDFileSystem mbed

Fork of Outdoor_UPAS_v1_2_Tboard by scott kelleher

main.cpp@24:e274a34492cf, 2016-04-07 (annotated)

Committer:
caseyquinn
Date:
Thu Apr 07 00:32:31 2016 +0000
Revision:
24:e274a34492cf
Parent:
23:1ca41779b8ec
Child:
25:fbf7d44e7da4
Commented out Hbridge code from now until Tboard fix is completed.

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 12:5b4f3245606a 53 DigitalIn bcs1(PC_9); //Charge complete if High. Connected but currently unused. (MCP73871) http://www.mouser.com/ds/2/268/22090a-52174.pdf
caseyquinn 12:5b4f3245606a 54 DigitalIn bcs2(PA_8); //Batt charging if High. Connected but currently unused. (MCP73871) http://www.mouser.com/ds/2/268/22090a-52174.pdf
caseyquinn 12:5b4f3245606a 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 24:e274a34492cf 80 /*
caseyquinn 24:e274a34492cf 81 DRV8830 motor1(PB_9, PB_8, 0xC4); //Not working due to trace issue on tboard
caseyquinn 23:1ca41779b8ec 82 DRV8830 motor2(PB_9, PB_8, 0xC8); //Works with 0xC8, not 0xCA since R8 isn't on the Tboards.
caseyquinn 24:e274a34492cf 83 DRV8830 motor3(PB_9, PB_8, 0xCC); //Not working due to trace issue on tboard
caseyquinn 23:1ca41779b8ec 84 DRV8830 motor4(PB_9, PB_8, 0xCE); //Works!
caseyquinn 12:5b4f3245606a 85 DigitalIn hb_fault1(PA_6);
caseyquinn 12:5b4f3245606a 86 DigitalIn hb_fault2(PA_7);
caseyquinn 12:5b4f3245606a 87 DigitalIn hb_fault3(PA_5);
caseyquinn 12:5b4f3245606a 88 DigitalIn hb_fault4(PA_4);
caseyquinn 24:e274a34492cf 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 12:5b4f3245606a 96 DigitalIn sdCD(PA_11);
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 4:5d004fd997d5 111 struct tm STtime;
caseyquinn 7:29b01d5812ee 112 char timestr[32];
jelord 3:122bfc998c4c 113
caseyquinn 9:8646fd501832 114 float press;
caseyquinn 9:8646fd501832 115 float temp;
caseyquinn 9:8646fd501832 116 float rh;
jelord 3:122bfc998c4c 117
caseyquinn 9:8646fd501832 118 int uv;
caseyquinn 9:8646fd501832 119 int vis;
caseyquinn 9:8646fd501832 120 int ir;
jelord 3:122bfc998c4c 121
caseyquinn 9:8646fd501832 122 float compass;
caseyquinn 9:8646fd501832 123 float accel_x;
caseyquinn 9:8646fd501832 124 float accel_y;
caseyquinn 9:8646fd501832 125 float accel_z;
caseyquinn 9:8646fd501832 126 float accel_comp;
caseyquinn 9:8646fd501832 127 float angle_x;
caseyquinn 9:8646fd501832 128 float angle_y;
caseyquinn 9:8646fd501832 129 float angle_z;
caseyquinn 9:8646fd501832 130 float mag_x;
caseyquinn 9:8646fd501832 131 float mag_y;
caseyquinn 9:8646fd501832 132 float mag_z;
jelord 3:122bfc998c4c 133
caseyquinn 9:8646fd501832 134 int vInReading;
caseyquinn 9:8646fd501832 135 int vBlowerReading;
caseyquinn 9:8646fd501832 136 int omronDiff;
caseyquinn 9:8646fd501832 137 float omronVolt; //V
caseyquinn 9:8646fd501832 138 int omronReading;
caseyquinn 9:8646fd501832 139 float atmoRho; //g/L
jelord 3:122bfc998c4c 140
caseyquinn 9:8646fd501832 141 float massflow; //g/min
caseyquinn 9:8646fd501832 142 float volflow; //L/min
jelord 3:122bfc998c4c 143 float volflowSet = 1.0; //L/min
caseyquinn 14:7cdb643da356 144 int logInerval = 5;//seconds
jelord 3:122bfc998c4c 145 double secondsD = 0;
jelord 3:122bfc998c4c 146 double lastsecondD = 0;
caseyquinn 9:8646fd501832 147 float massflowSet;
jelord 3:122bfc998c4c 148 float deltaVflow = 0.0;
jelord 3:122bfc998c4c 149 float deltaMflow = 0.0;
caseyquinn 9:8646fd501832 150 float gainFlow;
caseyquinn 9:8646fd501832 151 float sampledVol; //L, total sampled volume
jelord 3:122bfc998c4c 152
caseyquinn 14:7cdb643da356 153 int digital_pot_setpoint = 100; //min = 0x7F, max = 0x00
caseyquinn 9:8646fd501832 154 int digital_pot_set;
caseyquinn 9:8646fd501832 155 int digital_pot_change;
jelord 3:122bfc998c4c 156 int digitalpotMax = 127;
caseyquinn 9:8646fd501832 157 int digitalpotMin = 10;
jelord 3:122bfc998c4c 158
caseyquinn 12:5b4f3245606a 159 int dutyUp;
caseyquinn 12:5b4f3245606a 160 int dutyDown;
caseyquinn 12:5b4f3245606a 161
caseyquinn 12:5b4f3245606a 162 float flat = 0;
caseyquinn 12:5b4f3245606a 163 float flon = 0;
jelord 3:122bfc998c4c 164
caseyquinn 23:1ca41779b8ec 165 bool gpsFix;
caseyquinn 12:5b4f3245606a 166 uint8_t gpssatellites = 0;
caseyquinn 23:1ca41779b8ec 167 double gpsspeed = 0.0;
caseyquinn 23:1ca41779b8ec 168 double gpslatitude = 0.0;
caseyquinn 23:1ca41779b8ec 169 double gpslongitude = 0.0;
caseyquinn 23:1ca41779b8ec 170 float gpsaltitude = 0.0;
caseyquinn 23:1ca41779b8ec 171 char gpslat = 'W';
caseyquinn 23:1ca41779b8ec 172 char gpslon = 'N';
caseyquinn 12:5b4f3245606a 173
caseyquinn 12:5b4f3245606a 174
caseyquinn 12:5b4f3245606a 175 float home_lat = 40.580508;
caseyquinn 12:5b4f3245606a 176 float home_lon = -105.081823;
caseyquinn 12:5b4f3245606a 177 float work_lat = 40.594062; //40.569136;
caseyquinn 12:5b4f3245606a 178 float work_lon = -105.075683; //-105.081966;
caseyquinn 12:5b4f3245606a 179 int location = 0;
caseyquinn 12:5b4f3245606a 180
caseyquinn 12:5b4f3245606a 181 float homeDistance = 99999;
caseyquinn 12:5b4f3245606a 182 float workDistance = 99999;
caseyquinn 12:5b4f3245606a 183
jelord 3:122bfc998c4c 184 //*************************************************//
jelord 3:122bfc998c4c 185
jelord 2:88fcbfadec6a 186 void sendData();
caseyquinn 11:aa21628a9b15 187
caseyquinn 11:aa21628a9b15 188
caseyquinn 11:aa21628a9b15 189 void pc_recv(){
caseyquinn 11:aa21628a9b15 190 while(pc.readable()){
caseyquinn 11:aa21628a9b15 191 pc.getc();
caseyquinn 11:aa21628a9b15 192 }
caseyquinn 11:aa21628a9b15 193 }
caseyquinn 11:aa21628a9b15 194
jelord 0:2cb2b2ea316f 195 static uint8_t rx_buf[20];
jelord 0:2cb2b2ea316f 196 static uint8_t rx_len=0;
jelord 1:9fbb5b665068 197 static int haltBLE = 1;
jelord 1:9fbb5b665068 198 static int transmissionValue = 0;
jelord 2:88fcbfadec6a 199 uint8_t writeData[20] = {0,};
jelord 2:88fcbfadec6a 200 static uint8_t dataLength = 0;
jelord 3:122bfc998c4c 201 static int runReady = 0;
jelord 3:122bfc998c4c 202 static uint8_t startAndEndTime[12] = {0,};
caseyquinn 5:c3252e5d45ca 203
caseyquinn 9:8646fd501832 204 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 205 //BLE Functions
caseyquinn 9:8646fd501832 206 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 207
caseyquinn 9:8646fd501832 208 void uartMicro(){
jelord 3:122bfc998c4c 209 if(runReady!=1){
jelord 3:122bfc998c4c 210 haltBLE = 2;
jelord 3:122bfc998c4c 211 while(microChannel.readable()){
jelord 3:122bfc998c4c 212 rx_buf[rx_len++] = microChannel.getc();
jelord 2:88fcbfadec6a 213
jelord 3:122bfc998c4c 214 //Code block to verify what is being transmitted. To function correctly, all data must terminate with \0 or \n
jelord 3:122bfc998c4c 215 if(transmissionValue==0){
jelord 3:122bfc998c4c 216
caseyquinn 4:5d004fd997d5 217 if (rx_buf[0] == 0x01)transmissionValue = 1; //rtc
jelord 3:122bfc998c4c 218 else if(rx_buf[0] == 0x02)transmissionValue = 2; //sample start and end times
jelord 3:122bfc998c4c 219 else if(rx_buf[0] == 0x03)transmissionValue = 3; //sample name
jelord 3:122bfc998c4c 220 else if(rx_buf[0] == 0x04)transmissionValue = 4; //Send Data Check
jelord 3:122bfc998c4c 221
jelord 3:122bfc998c4c 222 else if(rx_buf[0] == 0x05)transmissionValue = 5; //log interval
jelord 3:122bfc998c4c 223 else if(rx_buf[0] == 0x06)transmissionValue = 6; //Flow Rate
jelord 3:122bfc998c4c 224 else if(rx_buf[0] == 0x07)transmissionValue = 7; //Serial Number
jelord 3:122bfc998c4c 225 else if(rx_buf[0] == 0x08)transmissionValue = 8; //Run Enable
jelord 3:122bfc998c4c 226 else transmissionValue = 100; //Not useful data
jelord 3:122bfc998c4c 227 }
jelord 3:122bfc998c4c 228
jelord 3:122bfc998c4c 229 if(rx_buf[rx_len-1]=='\0' || rx_buf[rx_len-1]=='\n' || rx_buf[rx_len-1] == 0xff){
jelord 3:122bfc998c4c 230 if((transmissionValue == 1 || transmissionValue == 2 || transmissionValue == 3 || transmissionValue == 4 || transmissionValue == 5 ||
jelord 3:122bfc998c4c 231 transmissionValue == 6 || transmissionValue == 7) && rx_buf[rx_len-1] != 0xff)
jelord 3:122bfc998c4c 232 {}else{
caseyquinn 21:bb10efc5bf57 233 if(transmissionValue == 4 ) sendData();
jelord 3:122bfc998c4c 234 if(transmissionValue == 8){
jelord 3:122bfc998c4c 235 runReady = 1;
jelord 3:122bfc998c4c 236 microChannel.attach(NULL,microChannel.RxIrq);
jelord 3:122bfc998c4c 237 }
jelord 3:122bfc998c4c 238 haltBLE = 1;
jelord 3:122bfc998c4c 239 transmissionValue = 0;
jelord 3:122bfc998c4c 240 dataLength = 0;
jelord 2:88fcbfadec6a 241
jelord 3:122bfc998c4c 242 }
jelord 2:88fcbfadec6a 243 }
jelord 1:9fbb5b665068 244 }
caseyquinn 12:5b4f3245606a 245
jelord 3:122bfc998c4c 246 if(haltBLE!=1){
jelord 2:88fcbfadec6a 247
jelord 3:122bfc998c4c 248 if((transmissionValue!=100) && (dataLength!= 0)) writeData[dataLength-1] = rx_buf[0];
jelord 3:122bfc998c4c 249
jelord 3:122bfc998c4c 250 if(transmissionValue ==100){
caseyquinn 10:06fbb1c9e3bd 251 pc.putc(rx_buf[0]);
jelord 2:88fcbfadec6a 252
jelord 3:122bfc998c4c 253 }else if(transmissionValue ==1){ //process and store RTC values
jelord 3:122bfc998c4c 254
caseyquinn 7:29b01d5812ee 255 //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 256 if(dataLength==6){
caseyquinn 17:3e6dda6e6335 257 RTC_UPAS.set_time(writeData[0],writeData[1],writeData[2],writeData[3],writeData[3],writeData[4],writeData[5]);//sets chronodot RTC
caseyquinn 12:5b4f3245606a 258 ///////////////////////
caseyquinn 7:29b01d5812ee 259 //sets ST RTC
caseyquinn 12:5b4f3245606a 260 //////////////////////
caseyquinn 7:29b01d5812ee 261 STtime.tm_sec = writeData[0]; // 0-59
caseyquinn 7:29b01d5812ee 262 STtime.tm_min = writeData[1]; // 0-59
caseyquinn 7:29b01d5812ee 263 STtime.tm_hour = writeData[2]; // 0-23
caseyquinn 7:29b01d5812ee 264 STtime.tm_mday = writeData[3]; // 1-31
caseyquinn 7:29b01d5812ee 265 STtime.tm_mon = writeData[4]-1; // 0-11
caseyquinn 7:29b01d5812ee 266 STtime.tm_year = 100+writeData[5]; // year since 1900 (116 = 2016)
caseyquinn 7:29b01d5812ee 267 time_t STseconds = mktime(&STtime);
caseyquinn 12:5b4f3245606a 268 set_time(STseconds); // Set RTC time
caseyquinn 7:29b01d5812ee 269 }
jelord 3:122bfc998c4c 270
caseyquinn 12:5b4f3245606a 271 }
caseyquinn 14:7cdb643da356 272 else if(transmissionValue ==2){ //process and store sample start/end
jelord 3:122bfc998c4c 273 if(dataLength ==12)E2PROM.write(0x00015, writeData, 12);
jelord 3:122bfc998c4c 274
jelord 3:122bfc998c4c 275 }else if(transmissionValue ==3){ //process and store sample name
jelord 3:122bfc998c4c 276 if(dataLength ==8)E2PROM.write(0x00001,writeData,8);
jelord 3:122bfc998c4c 277
jelord 3:122bfc998c4c 278 }else if(transmissionValue ==5){ //process and store Log Interval
jelord 3:122bfc998c4c 279 if(dataLength ==1)E2PROM.write(0x00014,writeData,1);
jelord 2:88fcbfadec6a 280
jelord 3:122bfc998c4c 281 }else if(transmissionValue ==6){ //process and store Flow Rate
jelord 3:122bfc998c4c 282 if(dataLength ==4)E2PROM.write(0x00010,writeData,4);
jelord 3:122bfc998c4c 283
jelord 3:122bfc998c4c 284 }else if(transmissionValue ==7){ //process and store Serial Number
jelord 3:122bfc998c4c 285 if(dataLength ==2)E2PROM.write(0x00034,writeData,2);
jelord 3:122bfc998c4c 286 }
caseyquinn 14:7cdb643da356 287
jelord 3:122bfc998c4c 288 dataLength++;
jelord 1:9fbb5b665068 289 }
jelord 3:122bfc998c4c 290
jelord 3:122bfc998c4c 291 rx_len = 0;
jelord 3:122bfc998c4c 292 }else{
jelord 3:122bfc998c4c 293 while(microChannel.readable())
jelord 3:122bfc998c4c 294 uint8_t extract = microChannel.getc();
jelord 3:122bfc998c4c 295 }
jelord 2:88fcbfadec6a 296
caseyquinn 12:5b4f3245606a 297
jelord 2:88fcbfadec6a 298 }
caseyquinn 14:7cdb643da356 299
jelord 2:88fcbfadec6a 300 void sendData(){
jelord 2:88fcbfadec6a 301
caseyquinn 21:bb10efc5bf57 302 uint8_t sampleTimePassValues[13] = {0x01,0x00,0x00,0x0A,0x01,0x01,0x10,0x00,0x00,0x0A,0x01,0x01,0x10};
caseyquinn 21:bb10efc5bf57 303 uint8_t subjectLabelOriginal[9] = {0x02,0x52,0x45,0x53,0x45,0x54,0x5F,0x5F,0x5f};
caseyquinn 21:bb10efc5bf57 304 uint8_t dataLogOriginal[2] = {0x03,0x0A,};
caseyquinn 21:bb10efc5bf57 305 uint8_t flowRateOriginal[5] = {0x04,0x00,0x00,0x80,0x3F};
jelord 2:88fcbfadec6a 306 //uint8_t presetRunModeCheck[1] = {0,}; Commented and currently unused to prevent mem issues
jelord 2:88fcbfadec6a 307 E2PROM.read(0x00015, sampleTimePassValues+1, 12);
jelord 2:88fcbfadec6a 308 E2PROM.read(0x00001, subjectLabelOriginal+1,8);
jelord 2:88fcbfadec6a 309 E2PROM.read(0x00014,dataLogOriginal+1,1);
jelord 2:88fcbfadec6a 310 E2PROM.read(0x00010,flowRateOriginal+1,4);
caseyquinn 21:bb10efc5bf57 311
jelord 2:88fcbfadec6a 312
jelord 2:88fcbfadec6a 313 for(int i=0; i<13; i++){
jelord 2:88fcbfadec6a 314 microChannel.putc(sampleTimePassValues[i]);
jelord 2:88fcbfadec6a 315 }
jelord 2:88fcbfadec6a 316 wait(.25);
jelord 2:88fcbfadec6a 317
jelord 2:88fcbfadec6a 318 for(int i=0; i<9; i++){
jelord 2:88fcbfadec6a 319 microChannel.putc(subjectLabelOriginal[i]);
jelord 2:88fcbfadec6a 320 }
jelord 2:88fcbfadec6a 321 wait(.25);
jelord 2:88fcbfadec6a 322
jelord 2:88fcbfadec6a 323 for(int i=0; i<2; i++){
jelord 2:88fcbfadec6a 324 microChannel.putc(dataLogOriginal[i]);
jelord 2:88fcbfadec6a 325 }
jelord 2:88fcbfadec6a 326 wait(.25);
jelord 2:88fcbfadec6a 327
jelord 2:88fcbfadec6a 328 for(int i=0; i<5; i++){
jelord 2:88fcbfadec6a 329 microChannel.putc(flowRateOriginal[i]);
jelord 2:88fcbfadec6a 330 }
jelord 0:2cb2b2ea316f 331
jelord 2:88fcbfadec6a 332
jelord 2:88fcbfadec6a 333 }
caseyquinn 14:7cdb643da356 334
caseyquinn 12:5b4f3245606a 335 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 336 // GPS: Degree-minute format to decimal-degrees
caseyquinn 12:5b4f3245606a 337 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 338 double convertDegMinToDecDeg (float degMin)
caseyquinn 12:5b4f3245606a 339 {
caseyquinn 12:5b4f3245606a 340 double min = 0.0;
caseyquinn 12:5b4f3245606a 341 double decDeg = 0.0;
caseyquinn 12:5b4f3245606a 342
caseyquinn 12:5b4f3245606a 343 //get the minutes, fmod() requires double
caseyquinn 12:5b4f3245606a 344 min = fmod((double)degMin, 100.0);
caseyquinn 12:5b4f3245606a 345
caseyquinn 12:5b4f3245606a 346 //rebuild coordinates in decimal degrees
caseyquinn 12:5b4f3245606a 347 degMin = (int) ( degMin / 100 );
caseyquinn 12:5b4f3245606a 348 decDeg = degMin + ( min / 60 );
caseyquinn 12:5b4f3245606a 349
caseyquinn 12:5b4f3245606a 350 return decDeg;
caseyquinn 12:5b4f3245606a 351 }
caseyquinn 12:5b4f3245606a 352
caseyquinn 12:5b4f3245606a 353 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 354 // GPS: Calculate distance from target location
caseyquinn 12:5b4f3245606a 355 //////////////////////////////////////////////////////////////
caseyquinn 12:5b4f3245606a 356 double GPSdistanceCalc (float tlat, float tlon)
caseyquinn 12:5b4f3245606a 357 {
caseyquinn 12:5b4f3245606a 358
caseyquinn 12:5b4f3245606a 359
caseyquinn 12:5b4f3245606a 360
caseyquinn 12:5b4f3245606a 361 float tlatrad, flatrad;
caseyquinn 12:5b4f3245606a 362 float sdlong, cdlong;
caseyquinn 12:5b4f3245606a 363 float sflat, cflat;
caseyquinn 12:5b4f3245606a 364 float stlat, ctlat;
caseyquinn 12:5b4f3245606a 365 float delta, denom;
caseyquinn 12:5b4f3245606a 366
caseyquinn 12:5b4f3245606a 367 double distance;
caseyquinn 12:5b4f3245606a 368 delta = (flon-tlon)*0.0174532925;
caseyquinn 12:5b4f3245606a 369 sdlong = sin(delta);
caseyquinn 12:5b4f3245606a 370 cdlong = cos(delta);
caseyquinn 12:5b4f3245606a 371 flatrad = (flat)*0.0174532925;
caseyquinn 12:5b4f3245606a 372 tlatrad = (tlat)*0.0174532925;
caseyquinn 12:5b4f3245606a 373 sflat = sin(flatrad);
caseyquinn 12:5b4f3245606a 374 cflat = cos(flatrad);
caseyquinn 12:5b4f3245606a 375 stlat = sin(tlatrad);
caseyquinn 12:5b4f3245606a 376 ctlat = cos(tlatrad);
caseyquinn 12:5b4f3245606a 377 delta = (cflat * stlat) - (sflat * ctlat * cdlong);
caseyquinn 12:5b4f3245606a 378 delta = pow(delta,2);
caseyquinn 12:5b4f3245606a 379 delta += pow(ctlat * sdlong,2);
caseyquinn 12:5b4f3245606a 380 delta = sqrt(delta);
caseyquinn 12:5b4f3245606a 381 denom = (sflat * stlat) + (cflat * ctlat * cdlong);
caseyquinn 12:5b4f3245606a 382 delta = atan2(delta, denom);
caseyquinn 12:5b4f3245606a 383 distance = delta * 6372795;
caseyquinn 12:5b4f3245606a 384 return distance;
caseyquinn 12:5b4f3245606a 385 }
caseyquinn 12:5b4f3245606a 386
caseyquinn 5:c3252e5d45ca 387
caseyquinn 9:8646fd501832 388 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 389 //Shutdown Function
caseyquinn 9:8646fd501832 390 //////////////////////////////////////////////////////////////
jelord 3:122bfc998c4c 391 void check_stop() // this checks if it's time to stop and shutdown
jelord 3:122bfc998c4c 392 {
caseyquinn 9:8646fd501832 393 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 9:8646fd501832 394 //UPDATE THIS TO WORK WITH ST RTC INSTEAD
caseyquinn 9:8646fd501832 395 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 17:3e6dda6e6335 396
jelord 3:122bfc998c4c 397 if(RTC_UPAS.compare(startAndEndTime[6], startAndEndTime[7], startAndEndTime[8], startAndEndTime[9], startAndEndTime[10], startAndEndTime[11])) {
jelord 3:122bfc998c4c 398 pbKill = 0; // this is were we shut everything down
caseyquinn 4:5d004fd997d5 399 //pc.printf("If you're reading this something has gone very wrong.");
jelord 3:122bfc998c4c 400 }
caseyquinn 17:3e6dda6e6335 401
jelord 3:122bfc998c4c 402 }
caseyquinn 5:c3252e5d45ca 403
caseyquinn 9:8646fd501832 404 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 405 //SD Logging Function
caseyquinn 9:8646fd501832 406 //////////////////////////////////////////////////////////////
jelord 3:122bfc998c4c 407 void log_data()
jelord 3:122bfc998c4c 408 {
caseyquinn 14:7cdb643da356 409
caseyquinn 23:1ca41779b8ec 410
caseyquinn 7:29b01d5812ee 411 time_t seconds = time(NULL);
caseyquinn 7:29b01d5812ee 412 strftime(timestr, 32, "%y%m%d%H%M%S", localtime(&seconds));
caseyquinn 13:455601f62aad 413
caseyquinn 17:3e6dda6e6335 414 RTC_UPAS.get_time();
caseyquinn 7:29b01d5812ee 415 press = bmesensor.getPressure();
caseyquinn 7:29b01d5812ee 416 temp = bmesensor.getTemperature()-5.0;
caseyquinn 7:29b01d5812ee 417 rh = bmesensor.getHumidity();
caseyquinn 7:29b01d5812ee 418 uv = lightsensor.getUV();
caseyquinn 14:7cdb643da356 419 movementsensor.getACCEL();
caseyquinn 14:7cdb643da356 420 movementsensor.getCOMPASS();
caseyquinn 14:7cdb643da356 421 compass = movementsensor.getCOMPASS_HEADING();
caseyquinn 14:7cdb643da356 422 accel_x = movementsensor.AccelData.x;
caseyquinn 14:7cdb643da356 423 accel_y = movementsensor.AccelData.y;
caseyquinn 14:7cdb643da356 424 accel_z = movementsensor.AccelData.z;
caseyquinn 14:7cdb643da356 425 accel_comp = pow(accel_x,(float)2)+pow(accel_y,(float)2)+pow(accel_z,(float)2)-1.0;
caseyquinn 14:7cdb643da356 426 mag_x = movementsensor.MagData.x;
caseyquinn 14:7cdb643da356 427 mag_y = movementsensor.MagData.y;
caseyquinn 14:7cdb643da356 428 mag_z = movementsensor.MagData.z;
caseyquinn 7:29b01d5812ee 429
caseyquinn 14:7cdb643da356 430 omronReading = ads.readADC_SingleEnded(0, 0xC583); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 14:7cdb643da356 431 omronVolt = (omronReading*4.096)/(32768*2);
caseyquinn 14:7cdb643da356 432
caseyquinn 14:7cdb643da356 433 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 14:7cdb643da356 434 massflow = calibrations.omronMFMin;
caseyquinn 14:7cdb643da356 435 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 14:7cdb643da356 436 massflow = calibrations.omronMFMax;
caseyquinn 14:7cdb643da356 437 } else {
caseyquinn 14:7cdb643da356 438 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 14:7cdb643da356 439 }
caseyquinn 14:7cdb643da356 440
caseyquinn 14:7cdb643da356 441 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 14:7cdb643da356 442 volflow = massflow/atmoRho;
caseyquinn 14:7cdb643da356 443 sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow);
caseyquinn 14:7cdb643da356 444 deltaVflow = volflow-volflowSet;
caseyquinn 14:7cdb643da356 445 massflowSet = volflowSet*atmoRho;
caseyquinn 14:7cdb643da356 446 deltaMflow = massflow-massflowSet;
caseyquinn 14:7cdb643da356 447
caseyquinn 14:7cdb643da356 448 vInReading = ads.readADC_SingleEnded(1, 0xD583); // read channel 0
caseyquinn 14:7cdb643da356 449 vBlowerReading = ads.readADC_SingleEnded(2, 0xE783); // read channel 0
caseyquinn 14:7cdb643da356 450 omronDiff = ads.readADC_Differential(0x8583); // differential channel 2-3
caseyquinn 21:bb10efc5bf57 451
caseyquinn 23:1ca41779b8ec 452 //if(gpsEN ==1){
caseyquinn 23:1ca41779b8ec 453
caseyquinn 23:1ca41779b8ec 454 if(gpsFix){
caseyquinn 23:1ca41779b8ec 455 RGB_LED.set_led(1,1,1);
caseyquinn 23:1ca41779b8ec 456 }else{
caseyquinn 23:1ca41779b8ec 457 RGB_LED.set_led(1,0,0);
caseyquinn 23:1ca41779b8ec 458 }
caseyquinn 23:1ca41779b8ec 459 gpsFix = gps.read(1);
caseyquinn 21:bb10efc5bf57 460 //RGB_LED.set_led(1,1,0);
caseyquinn 12:5b4f3245606a 461 gpsspeed = gps.speed;
caseyquinn 12:5b4f3245606a 462 gpssatellites = gps.satellites;
caseyquinn 12:5b4f3245606a 463 gpslatitude = gps.lat;
caseyquinn 12:5b4f3245606a 464 // gpslat = 'N'; //gps.lat; need to fix this (if statement?)
caseyquinn 12:5b4f3245606a 465 gpslongitude = gps.lon;
caseyquinn 12:5b4f3245606a 466 // gpslon = 'W'; //gps.lon; need to fix this (if statement?)
caseyquinn 12:5b4f3245606a 467 gpsaltitude = gps.altitude;
caseyquinn 12:5b4f3245606a 468
caseyquinn 21:bb10efc5bf57 469 /*
caseyquinn 16:577cb22cec99 470 if (abs(gpslatitude) > 0 && abs(gpslongitude) > 0) {
caseyquinn 12:5b4f3245606a 471
caseyquinn 12:5b4f3245606a 472 if(gpslat == 'S')
caseyquinn 12:5b4f3245606a 473 {
caseyquinn 12:5b4f3245606a 474 flat = convertDegMinToDecDeg (gpslatitude) * -1;
caseyquinn 12:5b4f3245606a 475 }
caseyquinn 12:5b4f3245606a 476 else
caseyquinn 12:5b4f3245606a 477 {
caseyquinn 12:5b4f3245606a 478 flat = convertDegMinToDecDeg (gpslatitude);
caseyquinn 12:5b4f3245606a 479 }
caseyquinn 12:5b4f3245606a 480
caseyquinn 12:5b4f3245606a 481 if(gpslon == 'W')
caseyquinn 12:5b4f3245606a 482 {
caseyquinn 12:5b4f3245606a 483 flon = convertDegMinToDecDeg (gpslongitude) * -1;
caseyquinn 12:5b4f3245606a 484 }
caseyquinn 12:5b4f3245606a 485 else
caseyquinn 12:5b4f3245606a 486 {
caseyquinn 12:5b4f3245606a 487 flon = convertDegMinToDecDeg (gpslongitude);
caseyquinn 12:5b4f3245606a 488 }
caseyquinn 12:5b4f3245606a 489
caseyquinn 12:5b4f3245606a 490 workDistance = GPSdistanceCalc (work_lat, work_lon);
caseyquinn 12:5b4f3245606a 491 homeDistance = GPSdistanceCalc (home_lat, home_lon);
caseyquinn 12:5b4f3245606a 492 }
caseyquinn 12:5b4f3245606a 493
caseyquinn 12:5b4f3245606a 494 if (homeDistance == 99999 && workDistance == 99999) {
caseyquinn 12:5b4f3245606a 495 // digitalWrite (work_yellow_led, HIGH);
caseyquinn 12:5b4f3245606a 496 // digitalWrite (home_green_led, HIGH);
caseyquinn 12:5b4f3245606a 497 // digitalWrite (travel_red_led, HIGH);
caseyquinn 12:5b4f3245606a 498 location = 0;
caseyquinn 12:5b4f3245606a 499 }
caseyquinn 12:5b4f3245606a 500
caseyquinn 12:5b4f3245606a 501 else if (workDistance < 30) {
caseyquinn 12:5b4f3245606a 502 // digitalWrite (work_yellow_led, HIGH);
caseyquinn 12:5b4f3245606a 503 // digitalWrite (home_green_led, LOW);
caseyquinn 12:5b4f3245606a 504 // digitalWrite (travel_red_led, LOW);
caseyquinn 12:5b4f3245606a 505 location = 1;
caseyquinn 12:5b4f3245606a 506 }
caseyquinn 12:5b4f3245606a 507
caseyquinn 12:5b4f3245606a 508 else if (homeDistance < 20) {
caseyquinn 12:5b4f3245606a 509 // digitalWrite (work_yellow_led, LOW);
caseyquinn 12:5b4f3245606a 510 // digitalWrite (home_green_led, HIGH);
caseyquinn 12:5b4f3245606a 511 // digitalWrite (travel_red_led, LOW);
caseyquinn 12:5b4f3245606a 512 location = 2;
caseyquinn 12:5b4f3245606a 513 }
caseyquinn 12:5b4f3245606a 514
caseyquinn 12:5b4f3245606a 515 else {
caseyquinn 12:5b4f3245606a 516 // digitalWrite (work_yellow_led, LOW);
caseyquinn 12:5b4f3245606a 517 // digitalWrite (home_green_led, LOW);
caseyquinn 12:5b4f3245606a 518 // digitalWrite (travel_red_led, HIGH);
caseyquinn 12:5b4f3245606a 519 location = 3;
caseyquinn 12:5b4f3245606a 520 }
caseyquinn 21:bb10efc5bf57 521
caseyquinn 23:1ca41779b8ec 522
caseyquinn 17:3e6dda6e6335 523 }
caseyquinn 23:1ca41779b8ec 524 */
caseyquinn 21:bb10efc5bf57 525
caseyquinn 7:29b01d5812ee 526 FILE *fp = fopen(filename, "a");
caseyquinn 21:bb10efc5bf57 527 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 528 fprintf(fp, "%s,", timestr);
caseyquinn 7:29b01d5812ee 529 fprintf(fp, "%1.3f,%1.3f,%2.2f,%4.2f,%2.1f,%1.3f,", omronVolt,massflow,temp,press,rh,atmoRho);
caseyquinn 7:29b01d5812ee 530 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 531 fprintf(fp, "%.1f,%.1f,%.1f,%.3f,%.3f,%.3f,%.1f,", angle_x,angle_y,angle_z,mag_x, mag_y, mag_z,compass);
caseyquinn 7:29b01d5812ee 532 fprintf(fp, "%d,%d,%d,%d,%d,%d," ,uv,omronReading, vInReading, vBlowerReading, omronDiff,gasG.getAmps());
caseyquinn 16:577cb22cec99 533 fprintf(fp, "%d,%d,%d,%1.3f,%1.3f,", gasG.getVolts(), gasG.getCharge(),digital_pot_set, deltaMflow, deltaVflow);
caseyquinn 24:e274a34492cf 534 fprintf(fp, "%f,%f,%06d,%06d,%f,%d,%f,%d\r\n", gps.lat, gps.lon, (long)gps.date, (long)gps.utc, gpsspeed, gpssatellites, gpsaltitude, gpsFix); // test and add in speed, etc that Josh added in to match the adafruit GPS
caseyquinn 7:29b01d5812ee 535 fclose(fp);
caseyquinn 7:29b01d5812ee 536 free(fp);
caseyquinn 14:7cdb643da356 537 RGB_LED.set_led(0,1,0);
caseyquinn 14:7cdb643da356 538
caseyquinn 12:5b4f3245606a 539
caseyquinn 12:5b4f3245606a 540 pc.printf("%s,", timestr);
caseyquinn 12:5b4f3245606a 541
jelord 3:122bfc998c4c 542
jelord 3:122bfc998c4c 543 }
caseyquinn 8:c4a8f9b67cee 544
caseyquinn 9:8646fd501832 545 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 546 //Flow Control Function
caseyquinn 9:8646fd501832 547 //////////////////////////////////////////////////////////////
caseyquinn 8:c4a8f9b67cee 548 void flowControl()
caseyquinn 8:c4a8f9b67cee 549 {
caseyquinn 12:5b4f3245606a 550 /*
caseyquinn 8:c4a8f9b67cee 551 RGB_LED.set_led(0,1,0);
caseyquinn 8:c4a8f9b67cee 552 omronReading = ads.readADC_SingleEnded(0, 0xC583); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 8:c4a8f9b67cee 553 omronVolt = (omronReading*4.096)/(32768*2);
caseyquinn 8:c4a8f9b67cee 554
caseyquinn 8:c4a8f9b67cee 555 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 8:c4a8f9b67cee 556 massflow = calibrations.omronMFMin;
caseyquinn 8:c4a8f9b67cee 557 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 8:c4a8f9b67cee 558 massflow = calibrations.omronMFMax;
caseyquinn 8:c4a8f9b67cee 559 } else {
caseyquinn 8:c4a8f9b67cee 560 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 561 }
caseyquinn 8:c4a8f9b67cee 562
caseyquinn 8:c4a8f9b67cee 563 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 564 volflow = massflow/atmoRho;
caseyquinn 8:c4a8f9b67cee 565 sampledVol = sampledVol + ((((float)logInerval)/60.0)*volflow);
caseyquinn 8:c4a8f9b67cee 566 deltaVflow = volflow-volflowSet;
caseyquinn 8:c4a8f9b67cee 567 massflowSet = volflowSet*atmoRho;
caseyquinn 8:c4a8f9b67cee 568 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 569
caseyquinn 8:c4a8f9b67cee 570 if(abs(deltaMflow)>.025) {
caseyquinn 8:c4a8f9b67cee 571 digital_pot_change = (int)(gainFlow*deltaMflow);
caseyquinn 8:c4a8f9b67cee 572
caseyquinn 8:c4a8f9b67cee 573
caseyquinn 12:5b4f3245606a 574 if(abs(digital_pot_change)>=10) {
caseyquinn 12:5b4f3245606a 575 digital_pot_set = (int)(digital_pot_set+ (int)(1*deltaMflow));
caseyquinn 12:5b4f3245606a 576 RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 577 } else {
caseyquinn 8:c4a8f9b67cee 578 digital_pot_set = (digital_pot_set+ digital_pot_change);
caseyquinn 12:5b4f3245606a 579 RGB_LED.set_led(1,1,0);
caseyquinn 8:c4a8f9b67cee 580 }
caseyquinn 8:c4a8f9b67cee 581
caseyquinn 12:5b4f3245606a 582 if(digital_pot_set>=digitalpotMax) {
caseyquinn 12:5b4f3245606a 583 digital_pot_set = digitalpotMax;
caseyquinn 12:5b4f3245606a 584 RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 585 } else if(digital_pot_set<=digitalpotMin) {
caseyquinn 12:5b4f3245606a 586 digital_pot_set = digitalpotMin;
caseyquinn 12:5b4f3245606a 587 RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 588 }
caseyquinn 8:c4a8f9b67cee 589
caseyquinn 8:c4a8f9b67cee 590 DigPot.writeRegister(digital_pot_set);
caseyquinn 12:5b4f3245606a 591
caseyquinn 8:c4a8f9b67cee 592 } else {
caseyquinn 12:5b4f3245606a 593 RGB_LED.set_led(0,1,0);
caseyquinn 8:c4a8f9b67cee 594 }
caseyquinn 12:5b4f3245606a 595
caseyquinn 12:5b4f3245606a 596 */
caseyquinn 8:c4a8f9b67cee 597 }
caseyquinn 9:8646fd501832 598 //////////////////////////////////////////////////////////////
caseyquinn 9:8646fd501832 599 //Main Function
caseyquinn 9:8646fd501832 600 //////////////////////////////////////////////////////////////
jelord 1:9fbb5b665068 601 int main(){
caseyquinn 23:1ca41779b8ec 602
caseyquinn 23:1ca41779b8ec 603 RGB_LED.set_led(0,0,1);
caseyquinn 14:7cdb643da356 604
caseyquinn 23:1ca41779b8ec 605 /*
jelord 20:30a00cd18e21 606 //CODE ADDED TO TEST EEPROM
jelord 20:30a00cd18e21 607 //////////////////////////////////////////
caseyquinn 21:bb10efc5bf57 608 uint8_t serialNumWriter [2] = {0x00,0x12};
jelord 20:30a00cd18e21 609 uint8_t putDataInMe[2] = {0x02,0x00};
jelord 20:30a00cd18e21 610 E2PROM.write(0x00034,serialNumWriter,2);
jelord 20:30a00cd18e21 611 wait(.5);
jelord 20:30a00cd18e21 612 E2PROM.read(0x00034,putDataInMe,2);
jelord 20:30a00cd18e21 613 if(putDataInMe[0] == 0x02)pumps=1;
jelord 20:30a00cd18e21 614 //////////////////////////////////////////
jelord 20:30a00cd18e21 615 //END CODE ADDED TO TEST EEPROM
caseyquinn 23:1ca41779b8ec 616
caseyquinn 14:7cdb643da356 617 RGB_LED.set_led(0,0,1);
caseyquinn 14:7cdb643da356 618 STtime.tm_sec = 10; // 0-59
caseyquinn 15:e564c8031c47 619 STtime.tm_min = 30; // 0-59
caseyquinn 19:b835bfb61e35 620 STtime.tm_hour = 13; // 0-23
caseyquinn 19:b835bfb61e35 621 STtime.tm_mday = 24; // 1-31
caseyquinn 15:e564c8031c47 622 STtime.tm_mon = 2; // 0-11
caseyquinn 15:e564c8031c47 623 STtime.tm_year = 116; // year since 1900
caseyquinn 14:7cdb643da356 624 time_t seconds = mktime(&STtime);
caseyquinn 15:e564c8031c47 625 set_time(seconds); // Set RTC time to 16 December 2013 10:05:23 UTC
caseyquinn 14:7cdb643da356 626 wait(5);
caseyquinn 7:29b01d5812ee 627
caseyquinn 24:e274a34492cf 628
caseyquinn 21:bb10efc5bf57 629
caseyquinn 16:577cb22cec99 630 motor1.getFault();
caseyquinn 23:1ca41779b8ec 631 wait(1);
caseyquinn 16:577cb22cec99 632 RGB_LED.set_led(0,0,0);
caseyquinn 16:577cb22cec99 633 motor2.getFault();
caseyquinn 23:1ca41779b8ec 634 wait(1);
caseyquinn 23:1ca41779b8ec 635 RGB_LED.set_led(0,1,0);
caseyquinn 21:bb10efc5bf57 636
caseyquinn 16:577cb22cec99 637 motor3.getFault();
caseyquinn 23:1ca41779b8ec 638 wait(1);
caseyquinn 16:577cb22cec99 639 RGB_LED.set_led(0,0,0);
caseyquinn 21:bb10efc5bf57 640
caseyquinn 16:577cb22cec99 641 motor4.getFault();
caseyquinn 23:1ca41779b8ec 642 wait(1);
caseyquinn 23:1ca41779b8ec 643 RGB_LED.set_led(0,1,0);
caseyquinn 16:577cb22cec99 644
caseyquinn 24:e274a34492cf 645
caseyquinn 16:577cb22cec99 646 RGB_LED.set_led(1,0,0);
caseyquinn 12:5b4f3245606a 647 motor1.drive(254); //closed = 253, open = 254
caseyquinn 16:577cb22cec99 648 wait(10);
caseyquinn 12:5b4f3245606a 649 motor1.stop();
caseyquinn 16:577cb22cec99 650 RGB_LED.set_led(0,0,0);
caseyquinn 16:577cb22cec99 651
caseyquinn 16:577cb22cec99 652
caseyquinn 16:577cb22cec99 653 motor2.drive(254); //closed = 253, open = 254
caseyquinn 16:577cb22cec99 654 wait(10);
caseyquinn 12:5b4f3245606a 655 motor2.stop();
caseyquinn 16:577cb22cec99 656 RGB_LED.set_led(1,0,0);
caseyquinn 16:577cb22cec99 657
caseyquinn 16:577cb22cec99 658 motor3.drive(254); //closed = 253, open = 254
caseyquinn 16:577cb22cec99 659 wait(10);
caseyquinn 12:5b4f3245606a 660 motor3.stop();
caseyquinn 16:577cb22cec99 661 RGB_LED.set_led(0,0,0);
caseyquinn 16:577cb22cec99 662
caseyquinn 16:577cb22cec99 663
caseyquinn 16:577cb22cec99 664 motor4.drive(254); //closed = 253, open = 254
caseyquinn 16:577cb22cec99 665 wait(10);
caseyquinn 12:5b4f3245606a 666 motor4.stop();
caseyquinn 16:577cb22cec99 667 RGB_LED.set_led(0,0,1);
caseyquinn 16:577cb22cec99 668
caseyquinn 24:e274a34492cf 669
caseyquinn 13:455601f62aad 670
caseyquinn 23:1ca41779b8ec 671 motor1.drive(254); //closed = 253, open = 254
caseyquinn 23:1ca41779b8ec 672 motor2.drive(254); //closed = 253, open = 254
caseyquinn 23:1ca41779b8ec 673 motor3.drive(254); //closed = 253, open = 254
caseyquinn 23:1ca41779b8ec 674 motor4.drive(254); //closed = 253, open = 254
caseyquinn 23:1ca41779b8ec 675
caseyquinn 23:1ca41779b8ec 676
caseyquinn 23:1ca41779b8ec 677 wait(10);
caseyquinn 23:1ca41779b8ec 678 motor1.stop();
caseyquinn 23:1ca41779b8ec 679 motor2.stop();
caseyquinn 23:1ca41779b8ec 680 motor3.stop();
caseyquinn 23:1ca41779b8ec 681 motor4.stop();
caseyquinn 24:e274a34492cf 682 */
caseyquinn 23:1ca41779b8ec 683
caseyquinn 23:1ca41779b8ec 684
caseyquinn 23:1ca41779b8ec 685 gpsEN = 1;
caseyquinn 23:1ca41779b8ec 686 wait(1);
caseyquinn 23:1ca41779b8ec 687 BT_SW = 1;
caseyquinn 23:1ca41779b8ec 688 wait(1);
caseyquinn 23:1ca41779b8ec 689 BT_IRST = 1;
caseyquinn 23:1ca41779b8ec 690 wait(1);
caseyquinn 23:1ca41779b8ec 691
caseyquinn 12:5b4f3245606a 692
caseyquinn 10:06fbb1c9e3bd 693 pc.baud(115200); // set what you want here depending on your terminal program speed
caseyquinn 10:06fbb1c9e3bd 694 pc.printf("\f\n\r-------------Startup-------------\n\r");
jelord 1:9fbb5b665068 695 wait(0.5);
caseyquinn 5:c3252e5d45ca 696
caseyquinn 12:5b4f3245606a 697
jelord 20:30a00cd18e21 698 uint8_t serialNumberAndType[6] = {0x50,0x53,};
caseyquinn 13:455601f62aad 699
jelord 3:122bfc998c4c 700 E2PROM.read(0x00034,serialNumberAndType+2,2);
caseyquinn 4:5d004fd997d5 701
jelord 3:122bfc998c4c 702 int tempSerialNum = serialNumberAndType[2]+serialNumberAndType[3];
jelord 3:122bfc998c4c 703 int serialNumDigits[4];
jelord 3:122bfc998c4c 704 serialNumDigits[0] = tempSerialNum / 1000 % 10;
jelord 3:122bfc998c4c 705 serialNumDigits[1] = tempSerialNum / 100 % 10;
jelord 3:122bfc998c4c 706 serialNumDigits[2] = tempSerialNum / 10 % 10;
jelord 3:122bfc998c4c 707 serialNumDigits[3] = tempSerialNum % 10;
jelord 3:122bfc998c4c 708
jelord 3:122bfc998c4c 709 serialNumberAndType[2] = serialNumDigits[0]+48;
jelord 3:122bfc998c4c 710 serialNumberAndType[3] = serialNumDigits[1]+48;
jelord 3:122bfc998c4c 711 serialNumberAndType[4] = serialNumDigits[2]+48;
jelord 3:122bfc998c4c 712 serialNumberAndType[5] = serialNumDigits[3]+48;
caseyquinn 12:5b4f3245606a 713
caseyquinn 5:c3252e5d45ca 714 RGB_LED.set_led(0,1,0);
caseyquinn 13:455601f62aad 715
caseyquinn 10:06fbb1c9e3bd 716 pc.attach(pc_recv);
jelord 1:9fbb5b665068 717 microChannel.attach(uartMicro,microChannel.RxIrq);
jelord 3:122bfc998c4c 718 microChannel.baud(115200);
jelord 1:9fbb5b665068 719 microChannel.printf("$$$");
jelord 3:122bfc998c4c 720 wait(0.5);
jelord 3:122bfc998c4c 721 microChannel.printf("SN,");
jelord 3:122bfc998c4c 722 for(int i=0;i<6;i++)microChannel.putc(serialNumberAndType[i]);
jelord 3:122bfc998c4c 723 microChannel.printf("\r");
jelord 3:122bfc998c4c 724 wait(0.5);
jelord 1:9fbb5b665068 725 microChannel.printf("A\r");
jelord 3:122bfc998c4c 726 wait(0.5);
jelord 2:88fcbfadec6a 727 microChannel.printf("---\r");
jelord 3:122bfc998c4c 728 wait(0.5);
jelord 2:88fcbfadec6a 729
caseyquinn 18:41ef98db0423 730 RGB_LED.set_led(1,1,1);
jelord 3:122bfc998c4c 731 while(runReady!=1) {
jelord 3:122bfc998c4c 732 wait(1);
caseyquinn 11:aa21628a9b15 733 pc.printf("Waiting for BLE instruction");
jelord 3:122bfc998c4c 734
jelord 3:122bfc998c4c 735 }
jelord 3:122bfc998c4c 736
caseyquinn 14:7cdb643da356 737
jelord 3:122bfc998c4c 738 E2PROM.read(0x00015, startAndEndTime, 12); //Grab start and end times from EEPROM
jelord 3:122bfc998c4c 739 RGB_LED.set_led(0,1,0);
caseyquinn 14:7cdb643da356 740
caseyquinn 7:29b01d5812ee 741 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 7:29b01d5812ee 742 //UPDATE THIS TO WORK WITH ST RTC INSTEAD
caseyquinn 7:29b01d5812ee 743 //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
caseyquinn 14:7cdb643da356 744
caseyquinn 21:bb10efc5bf57 745 BT_SW = 0;
caseyquinn 21:bb10efc5bf57 746 wait(1);
caseyquinn 21:bb10efc5bf57 747 BT_IRST = 0;
caseyquinn 21:bb10efc5bf57 748 wait(1);
caseyquinn 21:bb10efc5bf57 749
jelord 3:122bfc998c4c 750 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 751 wait(0.5);
jelord 3:122bfc998c4c 752
jelord 3:122bfc998c4c 753 RTC_UPAS.get_time();
jelord 3:122bfc998c4c 754
jelord 3:122bfc998c4c 755 }
caseyquinn 14:7cdb643da356 756
caseyquinn 14:7cdb643da356 757
jelord 3:122bfc998c4c 758
jelord 3:122bfc998c4c 759 //Get the proper serial number
jelord 3:122bfc998c4c 760 uint8_t serialBytes[2] = {0,};
jelord 3:122bfc998c4c 761 E2PROM.read(0x00034, serialBytes,2);
jelord 3:122bfc998c4c 762 serial_num = ((uint16_t)serialBytes[1] << 8) | serialBytes[0];
jelord 3:122bfc998c4c 763 calibrations.initialize(serial_num);
jelord 3:122bfc998c4c 764
jelord 3:122bfc998c4c 765 uint8_t logByte[1] = {0,};
jelord 3:122bfc998c4c 766 E2PROM.read(0x00014,logByte,1);
jelord 3:122bfc998c4c 767 logInerval = logByte[0];
jelord 3:122bfc998c4c 768
jelord 3:122bfc998c4c 769 //Use the flow rate value stored in eeprom
jelord 3:122bfc998c4c 770 uint8_t flowRateBytes[4] = {0,};
jelord 3:122bfc998c4c 771 E2PROM.read(0x00010,flowRateBytes,4);
jelord 3:122bfc998c4c 772 E2PROM.byteToFloat(flowRateBytes, &volflowSet);
jelord 3:122bfc998c4c 773
jelord 3:122bfc998c4c 774 if(volflowSet<=1.0) {
jelord 3:122bfc998c4c 775 gainFlow = 100;
jelord 3:122bfc998c4c 776 } else if(volflowSet>=2.0) {
jelord 3:122bfc998c4c 777 gainFlow = 25;
jelord 3:122bfc998c4c 778 } else {
jelord 3:122bfc998c4c 779 gainFlow = 25;
jelord 0:2cb2b2ea316f 780 }
caseyquinn 17:3e6dda6e6335 781
jelord 3:122bfc998c4c 782 RGB_LED.set_led(1,0,0);
jelord 3:122bfc998c4c 783 press = bmesensor.getPressure();
jelord 3:122bfc998c4c 784 temp = bmesensor.getTemperature();
jelord 3:122bfc998c4c 785 rh = bmesensor.getHumidity();
jelord 3:122bfc998c4c 786
jelord 3:122bfc998c4c 787 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 788 massflowSet = volflowSet*atmoRho;
jelord 3:122bfc998c4c 789
jelord 3:122bfc998c4c 790 DigPot.writeRegister(digital_pot_setpoint);
jelord 3:122bfc998c4c 791 wait(1);
caseyquinn 23:1ca41779b8ec 792 //pumps = 1;
jelord 3:122bfc998c4c 793
jelord 3:122bfc998c4c 794 uint8_t subjectLabelOriginal[8] = {0,};
caseyquinn 4:5d004fd997d5 795 E2PROM.read(0x00001, subjectLabelOriginal,8);
caseyquinn 12:5b4f3245606a 796
caseyquinn 13:455601f62aad 797
caseyquinn 12:5b4f3245606a 798
caseyquinn 21:bb10efc5bf57 799 time_t seconds = time(NULL);
caseyquinn 4:5d004fd997d5 800 strftime(timestr, 32, "%y-%m-%d-%H=%M=%S", localtime(&seconds));
caseyquinn 13:455601f62aad 801
caseyquinn 9:8646fd501832 802 //sprintf(filename, "/sd/UPAS%04dLOG_%02d-%02d-%02d_%02d=%02d=%02d_%c%c%c%c%c%c%c%c.txt",serial_num,RTC_UPAS.year,RTC_UPAS.month,RTC_UPAS.date,RTC_UPAS.hour,RTC_UPAS.minutes,RTC_UPAS.seconds,subjectLabelOriginal[0],subjectLabelOriginal[1],subjectLabelOriginal[2],subjectLabelOriginal[3],subjectLabelOriginal[4],subjectLabelOriginal[5],subjectLabelOriginal[6],subjectLabelOriginal[7]);
caseyquinn 22:baa5a077d908 803 //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 22:baa5a077d908 804 sprintf(filename, "/sd/UPAS_TboardtestLog_%s.txt", timestr);
jelord 3:122bfc998c4c 805 FILE *fp = fopen(filename, "w");
jelord 3:122bfc998c4c 806 fclose(fp);
jelord 3:122bfc998c4c 807
caseyquinn 14:7cdb643da356 808 /*
caseyquinn 12:5b4f3245606a 809 omronReading = ads.readADC_SingleEnded(0, 0xC583); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 12:5b4f3245606a 810 omronVolt = (omronReading*4.096)/(32768*2);
caseyquinn 12:5b4f3245606a 811 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 12:5b4f3245606a 812 massflow = calibrations.omronMFMin;
caseyquinn 12:5b4f3245606a 813 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 12:5b4f3245606a 814 massflow = calibrations.omronMFMax;
caseyquinn 12:5b4f3245606a 815 } else {
caseyquinn 12:5b4f3245606a 816 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 817 }
caseyquinn 12:5b4f3245606a 818 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 819 digital_pot_set = digital_pot_setpoint;
caseyquinn 12:5b4f3245606a 820 wait(5);
caseyquinn 12:5b4f3245606a 821
caseyquinn 12:5b4f3245606a 822 //---------------------------------------------------------------------------------------------//
caseyquinn 12:5b4f3245606a 823 //Sets the flow withen +-1.5% of the desired flow rate based on mass flow
caseyquinn 12:5b4f3245606a 824
caseyquinn 12:5b4f3245606a 825 while(abs(deltaMflow)>.025) {
caseyquinn 12:5b4f3245606a 826
caseyquinn 12:5b4f3245606a 827 omronReading = ads.readADC_SingleEnded(0, 0xC583); // read channel 0 PGA = 2 : Full Scale Range = 2.048V
caseyquinn 12:5b4f3245606a 828 omronVolt = (omronReading*4.096)/(32768*2);
caseyquinn 12:5b4f3245606a 829 //Mass Flow tf from file: UPAS v2 OSU-PrimaryFlowData FullSet 2015-05-29 CQ mods.xlsx
caseyquinn 12:5b4f3245606a 830 if(omronVolt<=calibrations.omronVMin) {
caseyquinn 12:5b4f3245606a 831 massflow = calibrations.omronMFMin;
caseyquinn 12:5b4f3245606a 832 } else if(omronVolt>=calibrations.omronVMax) {
caseyquinn 12:5b4f3245606a 833 massflow = calibrations.omronMFMax;
caseyquinn 12:5b4f3245606a 834 } else {
caseyquinn 12:5b4f3245606a 835 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 836 }
caseyquinn 12:5b4f3245606a 837
caseyquinn 12:5b4f3245606a 838 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 839 volflow = massflow/atmoRho;
caseyquinn 12:5b4f3245606a 840 massflowSet = volflowSet*atmoRho;
caseyquinn 12:5b4f3245606a 841 deltaMflow = massflow-massflowSet;
caseyquinn 12:5b4f3245606a 842
caseyquinn 12:5b4f3245606a 843 digital_pot_set = (int)(digital_pot_set+(int)((gainFlow*deltaMflow)));
caseyquinn 12:5b4f3245606a 844 if(digital_pot_set>=digitalpotMax) {
caseyquinn 12:5b4f3245606a 845 digital_pot_set = digitalpotMax;
caseyquinn 12:5b4f3245606a 846 } else if(digital_pot_set<=digitalpotMin) {
caseyquinn 12:5b4f3245606a 847 digital_pot_set = digitalpotMin;
caseyquinn 12:5b4f3245606a 848 }
caseyquinn 12:5b4f3245606a 849
caseyquinn 12:5b4f3245606a 850 wait(2);
caseyquinn 12:5b4f3245606a 851 DigPot.writeRegister(digital_pot_set);
caseyquinn 12:5b4f3245606a 852 pc.printf("%d,\r\n", digital_pot_set);
caseyquinn 12:5b4f3245606a 853 wait(1);
caseyquinn 12:5b4f3245606a 854
caseyquinn 12:5b4f3245606a 855
caseyquinn 12:5b4f3245606a 856 }
caseyquinn 14:7cdb643da356 857 */
jelord 3:122bfc998c4c 858 sampledVol = 0.0;
jelord 3:122bfc998c4c 859 RGB_LED.set_led(0,1,0);
caseyquinn 14:7cdb643da356 860
caseyquinn 18:41ef98db0423 861 stop.attach(&check_stop, 9); // check if we should shut down every 9 number seconds, starting after the start.
caseyquinn 14:7cdb643da356 862 logg.attach(&log_data, logInerval);
caseyquinn 12:5b4f3245606a 863 //flowCtl.attach(&flowControl, 1);
caseyquinn 7:29b01d5812ee 864
jelord 3:122bfc998c4c 865
jelord 3:122bfc998c4c 866 //** end of initalization **//
jelord 3:122bfc998c4c 867 //---------------------------------------------------------------------------------------------//
jelord 3:122bfc998c4c 868 //---------------------------------------------------------------------------------------------//
jelord 3:122bfc998c4c 869 // Main Control Loop
jelord 3:122bfc998c4c 870
caseyquinn 7:29b01d5812ee 871 while (1) {
caseyquinn 7:29b01d5812ee 872 // Do other things...
caseyquinn 14:7cdb643da356 873 /*
caseyquinn 18:41ef98db0423 874 pumps = 1;
caseyquinn 13:455601f62aad 875 wait(5);
caseyquinn 18:41ef98db0423 876 pumps = 0;
caseyquinn 13:455601f62aad 877 wait(5);
caseyquinn 14:7cdb643da356 878 */
caseyquinn 7:29b01d5812ee 879 }
caseyquinn 7:29b01d5812ee 880
caseyquinn 8:c4a8f9b67cee 881
caseyquinn 4:5d004fd997d5 882
jelord 3:122bfc998c4c 883
jelord 0:2cb2b2ea316f 884 }