First publish Luci

Dependencies:   Adafruit_RTCLib SoftI2C SoftSerial mbed

Committer:
arsenalist
Date:
Thu Jun 08 15:26:56 2017 +0000
Revision:
1:6cbf32f31179
Parent:
0:99eede875063
Child:
2:9d4438557eb7
Backup with STM32F030RB

Who changed what in which revision?

UserRevisionLine numberNew contents of line
arsenalist 0:99eede875063 1 #include "mbed.h"
arsenalist 0:99eede875063 2 #include "SoftSerial.h"
arsenalist 1:6cbf32f31179 3 //#include "SoftI2C.h"
arsenalist 0:99eede875063 4 //#include "DS1307.h"
arsenalist 0:99eede875063 5
arsenalist 1:6cbf32f31179 6 #define typeIP 0
arsenalist 1:6cbf32f31179 7 #define typeIL 1
arsenalist 1:6cbf32f31179 8 #define typeIB 2
arsenalist 1:6cbf32f31179 9
arsenalist 0:99eede875063 10 //Init debug port
arsenalist 0:99eede875063 11 Serial DBG(PA_9, PA_10); //tx, rx
arsenalist 0:99eede875063 12
arsenalist 0:99eede875063 13 //Init xbee
arsenalist 0:99eede875063 14 SoftSerial XB(PC_0, PC_1); //tx, rx
arsenalist 0:99eede875063 15
arsenalist 0:99eede875063 16 //Init rtc
arsenalist 0:99eede875063 17 //I2C luciI2C (PB_7,PB_6); //sda, scl
arsenalist 1:6cbf32f31179 18 //SoftI2C luciI2C (PB_7,PB_6); //sda, scl
arsenalist 0:99eede875063 19 //RtcDs1307 luciRTC(luciI2C);
arsenalist 0:99eede875063 20
arsenalist 0:99eede875063 21 //Init adc
arsenalist 0:99eede875063 22 AnalogIn anVP(PA_1);
arsenalist 0:99eede875063 23 AnalogIn anIP(PA_0);
arsenalist 0:99eede875063 24 AnalogIn anVL(PA_2);
arsenalist 0:99eede875063 25 AnalogIn anIL(PA_3);
arsenalist 0:99eede875063 26 AnalogIn anVB(PB_1);
arsenalist 0:99eede875063 27 AnalogIn anIB(PB_0);
arsenalist 0:99eede875063 28 AnalogIn anTE(PC_2);
arsenalist 0:99eede875063 29
arsenalist 1:6cbf32f31179 30 //Declared unused adc as digital out
arsenalist 1:6cbf32f31179 31 //PA0 used //PA1 used
arsenalist 1:6cbf32f31179 32 //PA2 used //PA3 used
arsenalist 1:6cbf32f31179 33 //PA4 UN //PA5 SPI UN
arsenalist 1:6cbf32f31179 34 //PA6 SPI UN //PA7 SPI UN
arsenalist 1:6cbf32f31179 35 //PB0 used //PB1 used
arsenalist 1:6cbf32f31179 36 //PC0 Ser used //PC1 Ser used
arsenalist 1:6cbf32f31179 37 //PC2 UN //PC3 UN
arsenalist 1:6cbf32f31179 38 //PC4 UN //PC5 UN
arsenalist 1:6cbf32f31179 39 DigitalOut PA4(PA_4);
arsenalist 1:6cbf32f31179 40 DigitalOut PA5(PA_5);
arsenalist 1:6cbf32f31179 41 DigitalOut PA6(PA_6);
arsenalist 1:6cbf32f31179 42 DigitalOut PA7(PA_7);
arsenalist 1:6cbf32f31179 43 DigitalOut PC2(PC_2);
arsenalist 1:6cbf32f31179 44 DigitalOut PC3(PC_3);
arsenalist 1:6cbf32f31179 45 DigitalOut PC4(PC_4);
arsenalist 1:6cbf32f31179 46 DigitalOut PC5(PC_5);
arsenalist 1:6cbf32f31179 47
arsenalist 0:99eede875063 48 //Sensor value
arsenalist 0:99eede875063 49 float valVP,valIP;
arsenalist 0:99eede875063 50 float valVL,valIL;
arsenalist 0:99eede875063 51 float valVB,valIB;
arsenalist 0:99eede875063 52 float valTE;
arsenalist 0:99eede875063 53
arsenalist 0:99eede875063 54 //Date and Time
arsenalist 0:99eede875063 55 int year,month,date;
arsenalist 0:99eede875063 56 int day,hr,min,sec;
arsenalist 0:99eede875063 57 //DateTime dt;
arsenalist 0:99eede875063 58
arsenalist 0:99eede875063 59 //Variables
arsenalist 0:99eede875063 60 int i;
arsenalist 0:99eede875063 61
arsenalist 0:99eede875063 62 float adcRead(AnalogIn an) {
arsenalist 0:99eede875063 63 float s = 0;
arsenalist 0:99eede875063 64 float sTotal = 0;
arsenalist 1:6cbf32f31179 65 int adcMax = 10000;
arsenalist 0:99eede875063 66
arsenalist 0:99eede875063 67 for(int i=0; i<adcMax; i++) { //Do adcMax readings
arsenalist 0:99eede875063 68 s = an.read();
arsenalist 0:99eede875063 69 sTotal = sTotal + s;
arsenalist 0:99eede875063 70 wait_us(10);
arsenalist 0:99eede875063 71 }
arsenalist 0:99eede875063 72 return sTotal/adcMax;
arsenalist 0:99eede875063 73 }
arsenalist 0:99eede875063 74
arsenalist 1:6cbf32f31179 75 float currentCalculate(float adcVal, int type) {
arsenalist 0:99eede875063 76 float res = 0;
arsenalist 0:99eede875063 77
arsenalist 0:99eede875063 78 adcVal = adcVal - 0.510980; //Remove offset
arsenalist 1:6cbf32f31179 79 if(-0.0025 < adcVal && adcVal < 0.0025) { //No current
arsenalist 0:99eede875063 80 res = 0;
arsenalist 0:99eede875063 81 } else {
arsenalist 0:99eede875063 82 res = (adcVal/13.2)*1000;
arsenalist 0:99eede875063 83 }
arsenalist 1:6cbf32f31179 84
arsenalist 1:6cbf32f31179 85 if(type == typeIP) {
arsenalist 1:6cbf32f31179 86 if(res < 0) res = 0;
arsenalist 1:6cbf32f31179 87 } else if(type == typeIL) {
arsenalist 1:6cbf32f31179 88 res = -1*res;
arsenalist 1:6cbf32f31179 89 }
arsenalist 0:99eede875063 90 return res;
arsenalist 0:99eede875063 91 }
arsenalist 0:99eede875063 92
arsenalist 0:99eede875063 93 /*
arsenalist 0:99eede875063 94 bool rtcUpdate(RtcDs1307 &rtc, int32_t bias) // this must be signed
arsenalist 0:99eede875063 95 { bool bUpdated = false;
arsenalist 0:99eede875063 96
arsenalist 0:99eede875063 97 // Use the compiled date/time as a basis for setting the clock.
arsenalist 0:99eede875063 98 // We assign it to a signed integer so that negative biases work correctly
arsenalist 0:99eede875063 99 int64_t compiledTime = DateTime(__DATE__,__TIME__).unixtime();
arsenalist 0:99eede875063 100
arsenalist 0:99eede875063 101 // This assumes that the program is run VERY soon after the initial compile.
arsenalist 0:99eede875063 102 time_t localt = DateTime(compiledTime + bias).unixtime(); // offset by bias
arsenalist 0:99eede875063 103
arsenalist 0:99eede875063 104 // If the stored static time stamp does not equal the compiled time stamp,
arsenalist 0:99eede875063 105 // then we need to update the RTC clock and the stored time stamp
arsenalist 0:99eede875063 106 if(*((time_t *)&rtc[0]) != localt)
arsenalist 0:99eede875063 107 {
arsenalist 0:99eede875063 108 // Update the RTC time as local time, not GMT/UTC
arsenalist 0:99eede875063 109 rtc.adjust(localt);
arsenalist 0:99eede875063 110 // Store the new compiled time statically in the object ram image
arsenalist 0:99eede875063 111 *((time_t *)&rtc[0]) = localt;
arsenalist 0:99eede875063 112 // Push the object ram image to the RTC ram image
arsenalist 0:99eede875063 113 bUpdated = rtc.commit();
arsenalist 0:99eede875063 114 }
arsenalist 0:99eede875063 115 return bUpdated;
arsenalist 0:99eede875063 116 }
arsenalist 0:99eede875063 117 */
arsenalist 0:99eede875063 118 int main() {
arsenalist 0:99eede875063 119 DBG.baud(115200);
arsenalist 0:99eede875063 120 XB.baud(9600);
arsenalist 0:99eede875063 121
arsenalist 0:99eede875063 122 // Uncomment to update time
arsenalist 1:6cbf32f31179 123 //DBG.printf("update time\r\n");
arsenalist 0:99eede875063 124 //if(rtcUpdate(luciRTC, (7*60*60) )) // GMT+7
arsenalist 0:99eede875063 125 // DBG.printf("Updated RTC to compiled time\r\n");
arsenalist 0:99eede875063 126 //DBG.printf("compiled %s %s\r\n",__DATE__,__TIME__);
arsenalist 0:99eede875063 127 //DBG.printf("rtc clock is %s\r\n", (luciRTC.isRunning() ? "running" : "halted"));
arsenalist 0:99eede875063 128
arsenalist 1:6cbf32f31179 129 PA4.write(0);
arsenalist 1:6cbf32f31179 130 PA5.write(0);
arsenalist 1:6cbf32f31179 131 PA6.write(0);
arsenalist 1:6cbf32f31179 132 PA7.write(0);
arsenalist 1:6cbf32f31179 133 PC2.write(0);
arsenalist 1:6cbf32f31179 134 PC3.write(0);
arsenalist 1:6cbf32f31179 135 PC4.write(0);
arsenalist 1:6cbf32f31179 136 PC5.write(0);
arsenalist 1:6cbf32f31179 137
arsenalist 0:99eede875063 138 while(1){
arsenalist 0:99eede875063 139 //Read sensor
arsenalist 0:99eede875063 140 valVP = 0;
arsenalist 0:99eede875063 141 valVL = 0;
arsenalist 0:99eede875063 142 valVB = 0;
arsenalist 0:99eede875063 143 valIP = 0;
arsenalist 0:99eede875063 144 valIL = 0;
arsenalist 0:99eede875063 145 valIB = 0;
arsenalist 0:99eede875063 146 valTE = 0;
arsenalist 0:99eede875063 147
arsenalist 0:99eede875063 148 //Read sensor
arsenalist 0:99eede875063 149 valVP = adcRead(anVP)*52.8;
arsenalist 0:99eede875063 150 valVL = adcRead(anVL)*52.8;
arsenalist 0:99eede875063 151 valVB = adcRead(anVB)*52.8;
arsenalist 1:6cbf32f31179 152 valIP = currentCalculate(adcRead(anIP),typeIP);
arsenalist 1:6cbf32f31179 153 valIL = currentCalculate(adcRead(anIL),typeIL);
arsenalist 1:6cbf32f31179 154 valIB = currentCalculate(adcRead(anIB),typeIB);
arsenalist 0:99eede875063 155 valTE = adcRead(anTE);
arsenalist 0:99eede875063 156
arsenalist 0:99eede875063 157 //Read time
arsenalist 0:99eede875063 158 //dt = luciRTC.now();
arsenalist 0:99eede875063 159 //DBG.printf("%02u%02u%02u %02u:%02u:%02u\r\n"
arsenalist 0:99eede875063 160 //,dt.year(),dt.month(),dt.day(),dt.hour(),dt.minute(),dt.second());
arsenalist 0:99eede875063 161
arsenalist 0:99eede875063 162 //Contruct and senddata
arsenalist 0:99eede875063 163 //DBG.printf("[%d]{DT=\"%02u%02u%02u %02u:%02u:%02u\",VP=%.1f,IP=%.1f,VL=%.1f,IL=%.1f,VB=%.1f,IB=%.1f,TE=%.1f}\r\n"
arsenalist 0:99eede875063 164 //,i,dt.year(),dt.month(),dt.day(),dt.hour(),dt.minute(),dt.second(),valVP,valIP,valVL,valIL,valVB,valIB,valTE);
arsenalist 0:99eede875063 165 //XB.printf("{DT=\"%02u%02u%02u %02u:%02u:%02u\",VP=%.1f,IP=%.1f,VL=%.1f,IL=%.1f,VB=%.1f,IB=%.1f,TE=%.1f}"
arsenalist 0:99eede875063 166 //,dt.year(),dt.month(),dt.day(),dt.hour(),dt.minute(),dt.second(),valVP,valIP,valVL,valIL,valVB,valIB,valTE);
arsenalist 0:99eede875063 167 DBG.printf("[%d]{DT=\"YYYYMMDD HH:MM:SS\",VP=%.1f,IP=%.1f,VL=%.1f,IL=%.1f,VB=%.1f,IB=%.1f,TE=%.1f}\r\n"
arsenalist 0:99eede875063 168 ,i,valVP,valIP,valVL,valIL,valVB,valIB,valTE);
arsenalist 0:99eede875063 169 XB.printf("{DT=\"YYYYMMDD HH:MM:SS\",VP=%.1f,IP=%.1f,VL=%.1f,IL=%.1f,VB=%.1f,IB=%.1f,TE=%.1f}"
arsenalist 0:99eede875063 170 ,valVP,valIP,valVL,valIL,valVB,valIB,valTE);
arsenalist 0:99eede875063 171 wait(60);
arsenalist 0:99eede875063 172 i++;
arsenalist 0:99eede875063 173 }
arsenalist 0:99eede875063 174 }