First publish Luci
Dependencies: Adafruit_RTCLib SoftI2C SoftSerial mbed
main.cpp@1:6cbf32f31179, 2017-06-08 (annotated)
- 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?
User | Revision | Line number | New 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 | } |