DS18B20_VOC_DS2438_SHT/DS18B20_DS2438.c

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