DS2450_VOC_SHT_BMP/DS2450_VOC_SHT_BMP.c

   1 \r
   2 // Copyright (c) 2015, Tobias Mueller tm(at)tm3d.de\r
   3 // All rights reserved.\r
   4 //\r
   5 // Redistribution and use in source and binary forms, with or without\r
   6 // modification, are permitted provided that the following conditions are\r
   7 // met:\r
   8 //\r
   9 //  * Redistributions of source code must retain the above copyright\r
  10 //    notice, this list of conditions and the following disclaimer.\r
  11 //  * Redistributions in binary form must reproduce the above copyright\r
  12 //    notice, this list of conditions and the following disclaimer in the\r
  13 //    documentation and/or other materials provided with the\r
  14 //    distribution.\r
  15 //  * All advertising materials mentioning features or use of this\r
  16 //    software must display the following acknowledgement: This product\r
  17 //    includes software developed by tm3d.de and its contributors.\r
  18 //  * Neither the name of tm3d.de nor the names of its contributors may\r
  19 //    be used to endorse or promote products derived from this software\r
  20 //    without specific prior written permission.\r
  21 //\r
  22 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS\r
  23 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT\r
  24 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR\r
  25 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT\r
  26 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,\r
  27 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT\r
  28 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,\r
  29 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\r
  30 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT\r
  31 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE\r
  32 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.\r
  33 \r
  34 #define F_CPU 8000000UL\r
  35 #include <avr/io.h>\r
  36 #include <avr/interrupt.h>\r
  37 #include <util/delay.h>\r
  38 #include <avr/wdt.h>\r
  39 #include <avr/sleep.h>\r
  40 #include "../common/I2C/USI_TWI_Master.h"\r
  41 #include "../common/I2C/MAX1164x.h"\r
  42 #include "../common/I2C/SHT2x.h"\r
  43 #include "../common/calibr.h"\r
  44 #include "../common/I2C/BMP280.h"\r
  45 \r
  46 \r
  47 \r
  48 extern void OWINIT();\r
  49 extern void EXTERN_SLEEP();\r
  50 \r
  51 uint8_t owid[8]={0x20, 0xA2, 0xD9, 0x84, 0x00, 0x16, 0x02, 0x5D};/**/\r
  52 uint8_t config_info[16]={0x01,14, 0x04,0x08, 0x08,1, 0x02,16,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00};\r
  53 \r
  54 #if (owid>128) \r
  55 #error "Variable not correct"\r
  56 #endif\r
  57 \r
  58 extern uint8_t mode;\r
  59 extern uint8_t gcontrol;\r
  60 extern uint8_t reset_indicator;\r
  61 extern uint8_t alarmflag;\r
  62 volatile uint8_t wdcounter=1;\r
  63 \r
  64 \r
  65 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
  66 ISR(WATCHDOG_vect) {\r
  67 #else\r
  68 ISR(WDT_vect) {\r
  69 #endif \r
  70         wdcounter++;\r
  71         if (reset_indicator==1) reset_indicator++;\r
  72         else if (reset_indicator==2) mode=0;\r
  73 \r
  74 \r
  75 }\r
  76 \r
  77 volatile uint16_t _temp;\r
  78 volatile uint16_t _hum;\r
  79 \r
  80 \r
  81 uint8_t userRegister[1];\r
  82 int16_t sRH,sT;\r
  83 double temperatureC,humidityRH,hhum;\r
  84 double l;\r
  85 \r
  86 double R0;\r
  87 uint16_t mr;\r
  88 uint8_t startup=10;\r
  89 double ip;\r
  90 \r
  91 uint32_t bmp_P;\r
  92 int32_t bmp_t;\r
  93 \r
  94 uint8_t max_adr=0;\r
  95 #define CH0_M MAX1164x_C_SCAN0|MAX1164x_C_SGL\r
  96 #define CH1_M MAX1164x_C_SCAN0|MAX1164x_C_SGL|MAX1164x_C_CS0\r
  97 #define CH0_CH1 MAX1164x_C_SCAN0\r
  98 //|MAX1164x_C_CS0\r
  99 \r
 100 uint16_t weekmaxarr[8];\r
 101 \r
 102 \r
 103 typedef union {\r
 104         volatile uint8_t bytes[0x20];\r
 105         struct {\r
 106                 //Page0\r
 107                 uint16_t A;  //0\r
 108                 uint16_t B;  //2\r
 109                 uint16_t C;  //4\r
 110                 uint16_t D;  //6\r
 111                 //Page1\r
 112                 uint8_t CSA1;\r
 113                 uint8_t CSA2;\r
 114                 uint8_t CSB1;\r
 115                 uint8_t CSB2;\r
 116                 uint8_t CSC1;\r
 117                 uint8_t CSC2;\r
 118                 uint8_t CSD1;\r
 119                 uint8_t CSD2;\r
 120                 //Page2\r
 121                 uint8_t LA;\r
 122                 uint8_t HA;\r
 123                 uint8_t LB;\r
 124                 uint8_t HB;\r
 125                 uint8_t LC;\r
 126                 uint8_t HC;\r
 127                 uint8_t LD;\r
 128                 uint8_t HD;\r
 129                 //Page3\r
 130                 uint8_t FC1;\r
 131                 uint8_t FC2;\r
 132                 uint8_t FC3;\r
 133                 uint8_t FC4;\r
 134                 uint8_t VCCP;\r
 135                 uint8_t FC5;\r
 136                 uint8_t FC6;\r
 137                 uint8_t FC7;\r
 138                 uint8_t convc1;\r
 139                 uint8_t convc2;\r
 140                 \r
 141                 \r
 142         };\r
 143 } pack_t;\r
 144 volatile pack_t pack;\r
 145 \r
 146 \r
 147 typedef struct {\r
 148         int16_t current;  //6\r
 149         uint16_t R0;\r
 150         //uint16_t VS;\r
 151         uint8_t cmode;\r
 152         int16_t ip;\r
 153         //uint8_t free;\r
 154         uint16_t tol_s8;\r
 155         uint16_t tol_d;\r
 156         uint16_t r_day_max;\r
 157         uint16_t r_week_max;\r
 158 } pack2_t;\r
 159 volatile pack2_t pack2;\r
 160 \r
 161 \r
 162 //Kompensieren der Abhänigkeit von RS/RO von Temperatur und Luftfeuchte\r
 163 inline double interp(double t, double h) {\r
 164         double h2;\r
 165          double t2;\r
 166         h2=h*h;\r
 167         t2=t*t;\r
 168         return 4.76111e-9*h2*t2-3.96956e-7*h2*t+0.0000408889*h2-1.07132e-6*h*t2+0.000115968*h*t-0.0101333*h+0.000163806*t2-0.0241179*t+1.80591;\r
 169 }\r
 170 \r
 171 #define EEPROM_R0 0\r
 172 #define EEPROM_R0d 2\r
 173 #define EEPROM_R0w 4\r
 174 #define EEPROM_dol 6\r
 175 \r
 176 \r
 177 uint16_t readEEPROM(uint8_t addr,uint16_t def) {\r
 178         uint16_t hr;\r
 179         while(EECR & (1<<EEPE));\r
 180         EEARL=addr+1;\r
 181         EECR |= (1<<EERE);\r
 182         hr=EEDR;\r
 183         if (hr!=0xFF) {\r
 184                 hr=hr<<8;\r
 185                 while(EECR & (1<<EEPE));\r
 186                 EEARL=addr;\r
 187                 EECR |= (1<<EERE);\r
 188                 hr|=EEDR;\r
 189                 return hr;\r
 190         }\r
 191         return def;\r
 192 }\r
 193 \r
 194 void writeEEPROM(uint8_t addr,uint16_t val) {\r
 195         while(EECR & (1<<EEPE));\r
 196         EECR = (0<<EEPM1)|(0<<EEPM0);\r
 197         EEARL = addr;\r
 198         EEDR = val&0xFF;\r
 199         EECR |= (1<<EEMPE);\r
 200         EECR |= (1<<EEPE);\r
 201         while(EECR & (1<<EEPE));\r
 202         EECR = (0<<EEPM1)|(0<<EEPM0);\r
 203         EEARL = addr+1;\r
 204         EEDR = val>>8;\r
 205         EECR |= (1<<EEMPE);\r
 206         EECR |= (1<<EEPE);\r
 207 }\r
 208 \r
 209 \r
 210 \r
 211 \r
 212 \r
 213 int main(void){\r
 214         PRR|=(1<<PRADC);  // adc for save Power\r
 215         PORTA=0xFF;\r
 216         PORTB=0xFF-(1<<PORTB0); //Schalter kann gegen Masse sein und zieht dann immer Strom\r
 217         DDRB|=(1<<PORTB0); //Als Ausgang und 0\r
 218         OWINIT();\r
 219         DDRB|=(1<<PINB1);//Ausgang und 1\r
 220         DDRA|=(1<<PINA0);\r
 221         \r
 222         WDTCSR |= ((1<<WDCE) );   // Enable the WD Change Bit//| (1<<WDE)\r
 223         WDTCSR |=   (1<<WDIE) |              // Enable WDT Interrupt\r
 224         //(1<<WDP0) |(1<<WDP2) | (1<<WDP1);    // Set Timeout to ~2 seconds\r
 225         (1<<WDP3) | (1<<WDP0);    // Set Timeout to ~8 seconds\r
 226 \r
 227         MCUSR=0;\r
 228         pack.A=0;\r
 229         pack.B=0;\r
 230         pack.C=0;\r
 231         pack.D=0;\r
 232         pack.CSA1=0x08;\r
 233         pack.CSA2=0x8C;\r
 234         pack.CSB1=0x08;\r
 235         pack.CSB2=0x8C;\r
 236         pack.CSC1=0x08;\r
 237         pack.CSC2=0x8C;\r
 238         pack.CSD1=0x08;\r
 239         pack.CSD2=0x8C;\r
 240         pack.HA=0xFF;\r
 241         pack.LA=0x00;\r
 242         pack.HB=0xFF;\r
 243         pack.LB=0x00;\r
 244         pack.HC=0xFF;\r
 245         pack.LC=0x00;\r
 246         pack.HD=0xFF;\r
 247         pack.LD=0x00;\r
 248         pack.VCCP=0;\r
 249 \r
 250         pack2.cmode=0;\r
 251         pack2.R0=readEEPROM(EEPROM_R0,1);\r
 252         R0=pack2.R0/100.0;\r
 253                 \r
 254         pack2.r_day_max=readEEPROM(EEPROM_R0d,1);\r
 255         pack2.r_week_max=readEEPROM(EEPROM_R0w,1);\r
 256         pack2.tol_d=readEEPROM(EEPROM_dol,0); \r
 257         pack2.tol_s8=0;  //Tag faengt mit Einschalten an\r
 258         for(uint8_t i=0;i<7;i++) {\r
 259                 weekmaxarr[i]=pack2.r_week_max;\r
 260         }\r
 261 \r
 262         USI_TWI_Master_Initialise();\r
 263         bmp280Init();\r
 264         SHT2x_SoftReset();\r
 265         SHT2x_ReadUserRegister(userRegister);\r
 266         SHT2x_WriteUserRegister(userRegister); //write changed user reg\r
 267         MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_M);//#define MAX1164x_C_CS0\r
 268         _delay_ms(30); //Internal Referenz start\r
 269         //2970 -> 1,5V  \r
 270         gcontrol=1;\r
 271         sei();\r
 272         \r
 273 \r
 274     while(1)   {\r
 275 \r
 276                 /*if (pack1.config==0x1F) {\r
 277                         pack1.config=0x7F;\r
 278                         R0=1;\r
 279                         pack2.R0=0;\r
 280                         writeEEPROM(EEPROM_R0,0);\r
 281                 } \r
 282                 if (pack1.config==0x05) {\r
 283                         pack1.config=0x7F;                              \r
 284                         pack2.r_day_max=1;\r
 285                         pack2.r_week_max=1;\r
 286                         pack2.tol_d=0;\r
 287                         pack2.tol_s8=0;  //Tag faengt mit Einschalten an        \r
 288                         R0=1;   \r
 289                         writeEEPROM(EEPROM_R0,0xFF);\r
 290                         writeEEPROM(EEPROM_R0d,0xFF);  //Maximum des Tages\r
 291                         writeEEPROM(EEPROM_R0w,0xFF); //Maximum der Letzten 7 Tage\r
 292                         writeEEPROM(EEPROM_dol,0xFF); //Anzahl der Betriebstage         \r
 293                         for(uint8_t i=0;i<7;i++) {\r
 294                                 weekmaxarr[i]=1;\r
 295                         }                               \r
 296                 } */\r
 297                 if (wdcounter>0) {\r
 298                         pack2.tol_s8++;\r
 299                         if (pack2.tol_s8>(10000))  {//10800 ist theortisch der Tag aber meistens zu lang\r
 300                                 pack2.tol_s8=0;\r
 301                                 pack2.tol_d++;  //rund 180 Jahre :-)\r
 302                                 pack2.r_week_max=0;\r
 303                                 weekmaxarr[7]=pack2.r_day_max;\r
 304                                 for(uint8_t i=0;i<7;i++) {\r
 305                                         weekmaxarr[i]=weekmaxarr[i+1];\r
 306                                         if (weekmaxarr[i]>pack2.r_week_max) pack2.r_week_max=weekmaxarr[i];\r
 307                                 }\r
 308                                 if (pack2.tol_d>7) {\r
 309                                         pack2.R0=pack2.r_week_max;\r
 310                                 } else {\r
 311                                         pack2.R0=pack2.r_day_max;\r
 312                                 }\r
 313                                 //R0=pack2.R0/100.0-0.5*(pack2.R0/100.0-R0);\r
 314                                 R0=R0-(R0-pack2.R0/100.0)*0.5   ;\r
 315                                 pack2.R0=R0*100;\r
 316                                 writeEEPROM(EEPROM_R0,pack2.R0);\r
 317                                 writeEEPROM(EEPROM_R0d,pack2.r_day_max);  //Maximum des Tages\r
 318                                 writeEEPROM(EEPROM_R0w,pack2.r_week_max); //Maximum der Letzten 7 Tage\r
 319                                 writeEEPROM(EEPROM_dol,pack2.tol_d); //Anzahl der Betriebstage\r
 320                                 pack2.r_day_max=0;\r
 321                         }\r
 322                         if (startup!=0) startup--;\r
 323                         SHT2x_MeasurePoll(HUMIDITY, &sRH);\r
 324                         // --- measure temperature with "Polling Mode" (no hold master) ---\r
 325                         SHT2x_MeasurePoll(TEMP, &sT);\r
 326                         //-- calculate humidity and temperature --\r
 327                         temperatureC = SHT2x_CalcTemperatureC(sT);\r
 328                         humidityRH = SHT2x_CalcRH(sRH);\r
 329                         ip=interp(temperatureC,humidityRH);\r
 330                         pack2.ip=ip*1000;\r
 331                         //humidityRH=calibr_hum(temperatureC,-0.45,humidityRH);\r
 332                         //temperatureC =temperatureC -0.45;\r
 333                         _hum= humidityRH*100.0;\r
 334                         _temp=(temperatureC*100.0)+32767;\r
 335                         //PORTB&=~(1<<PINB1);\r
 336                         mr=0;\r
 337 //Kritische Sektion !___Ein Breakpoint in dieser Section kann den TGS8100 zerstoeren!___________________________\r
 338                         PORTB&=~(1<<PINB1); //Auf 0 Ziehen\r
 339                         _delay_us(150);\r
 340                         mr+=MAX1164x_read();\r
 341                         _delay_us(150);\r
 342                         mr+=MAX1164x_read();\r
 343                         PORTB|=(1<<PINB1);\r
 344 //ENDE Kritische Sektion !______________________________\r
 345                         //l=mr/2.0*2.048/4096; \r
 346                         // l maximal 2  mr max 4096  //mr 2V=8000 \r
 347                         \r
 348                         if (pack2.cmode) { //cmode=0 V 0..2 V cmode=1 V 1.5..3.5V\r
 349                                 //l+=1.5; //Spannung real\r
 350                                 mr+=6000;\r
 351                         } \r
 352                         //if (l>1.8) {\r
 353                         if (mr>7200) {                          \r
 354                                 if (pack2.cmode==0) {\r
 355                                         MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_CH1);\r
 356                                         pack2.cmode=1;\r
 357                                 }\r
 358                         }\r
 359                         //if (l<1.6) {\r
 360                         if (mr<6400) {  \r
 361                                 if (pack2.cmode==1) {\r
 362                                         MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_M);\r
 363                                         pack2.cmode=0;\r
 364                                 }\r
 365                                 \r
 366                                 \r
 367                         }\r
 368                         //pack2.VS=mr*5/2;\r
 369                         l=mr/4000.0;\r
 370                         l=( 3/l- 1) *30;\r
 371                         pack2.current=l*100;\r
 372                         \r
 373                         l=l/ip;\r
 374                         \r
 375                         if (startup==0){\r
 376                                 if (l>R0) {\r
 377                                         R0=l;\r
 378                                         pack2.R0=R0*100;\r
 379                                         writeEEPROM(EEPROM_R0,pack2.R0);\r
 380 \r
 381                                 }\r
 382                                 if (l*100>pack2.r_day_max) {\r
 383                                         pack2.r_day_max=l*100;\r
 384                                 }\r
 385                         } else if (l<R0) l=R0; //negative Werte am Anfang verhintern\r
 386                         l=R0/l;\r
 387                         l=log(l);\r
 388                         l=l*160*4; //fuer DS18B20\r
 389                         bmp280ConvertIntP1(&bmp_P);\r
 390                         bmp_P=bmp_P/3;    // /100.0*32.0;\r
 391                         wdcounter=0;\r
 392                         \r
 393                 }\r
 394 \r
 395                 if (gcontrol) {\r
 396                         //PORTB|=(1<<PINB1);\r
 397                         uint8_t bb=1;\r
 398                         uint8_t bb1=1;\r
 399                         for(uint8_t i=0;i<4;i++){\r
 400                                 if (pack.convc1&bb1) {\r
 401                                         if (pack.convc2&(bb)) {pack.bytes[i*2]=0;pack.bytes[i*2+1]=0;}\r
 402                                         bb=bb<<1;\r
 403                                         if (pack.convc2&(bb)) {pack.bytes[i*2]=0xFF;pack.bytes[i*2+1]=0xFF;}\r
 404                                         bb=bb<<1;\r
 405                                 } else bb=bb<<2;\r
 406                                 bb1=bb1<<1;                             \r
 407                         }\r
 408                         //CHanel A\r
 409                         if (pack.convc1&1) {\r
 410                                 cli();pack.A=_temp;sei();\r
 411                                 alarmflag=0;\r
 412                                 if (pack.CSA2&0x08)  //AEH\r
 413                                         if (pack.bytes[1]>pack.HA) {alarmflag=1;pack.CSA2|=0x20;}\r
 414                                 if (pack.CSA2&0x04)  //AEL\r
 415                                         if (pack.bytes[1]<pack.LA) {alarmflag=1;pack.CSA2|=0x10;}\r
 416                         }\r
 417 \r
 418                         if (pack.convc1&2) {\r
 419                                 cli();pack.B=_hum;sei();\r
 420                                 if (pack.CSB2&0x08)  //AEH\r
 421                                         if (pack.bytes[1]>pack.HB) {alarmflag=1;pack.CSB2|=0x20;}\r
 422                                 if (pack.CSB2&0x04)  //AEL\r
 423                                         if (pack.bytes[1]<pack.LB) {alarmflag=1;pack.CSB2|=0x10;}\r
 424                         }\r
 425 \r
 426                         if (pack.convc1&4) {\r
 427                                 cli();pack.C=l;sei();\r
 428                                 if (pack.CSC2&0x08)  //AEH\r
 429                                         if (pack.bytes[1]>pack.HC) {alarmflag=1;pack.CSC2|=0x20;}\r
 430                                 if (pack.CSC2&0x04)  //AEL\r
 431                                         if (pack.bytes[1]<pack.LC) {alarmflag=1;pack.CSC2|=0x10;}\r
 432                         } \r
 433                         if (pack.convc1&8) {\r
 434                                 cli();pack.D=bmp_P;sei();\r
 435                                 if (pack.CSD2&0x08)  //AEH\r
 436                                         if (pack.bytes[1]>pack.HD) {alarmflag=1;pack.CSD2|=0x20;}\r
 437                                 if (pack.CSD2&0x04)  //AEL\r
 438                                         if (pack.bytes[1]<pack.LD) {alarmflag=1;pack.CSD2|=0x10;}\r
 439                         }\r
 440                         \r
 441                         EXTERN_SLEEP();\r
 442                         //PORTB&=~(1<<PINB1);\r
 443                 }\r
 444 \r
 445                 \r
 446 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)\r
 447                         if (((TIMSK & (1<<TOIE0))==0)&& (mode==0))\r
 448 #endif                  \r
 449 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) ||defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
 450                         if (((TIMSK0 & (1<<TOIE0))==0)&& (mode==0))\r
 451 #endif\r
 452                           {\r
 453 \r
 454                         MCUCR|=(1<<SE)|(1<<SM1);\r
 455                         MCUCR&=~(1<<ISC01);\r
 456                 } else {\r
 457                         MCUCR|=(1<<SE);\r
 458                         MCUCR&=~(1<<SM1);\r
 459                 }\r
 460         //      asm("SLEEP");\r
 461    }\r
 462 \r
 463 \r
 464 }\r