DS18B20_VOC_DS2438_SHT direct/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/SHT2x.h"\r
  44 #include "../common/calibr.h"\r
  45 \r
  46 extern void OWINIT(void);\r
  47 extern void EXTERN_SLEEP(void);\r
  48 \r
  49 \r
  50 \r
  51 volatile uint8_t owid1[8]={0x28, 0xA3, 0xD9, 0x84, 0x00, 0x16, 0x05, 0x18};/**/\r
  52 volatile uint8_t owid2[8]={0x26, 0xA3, 0xD9, 0x84, 0x00, 0x16, 0x05, 0x67};/**/\r
  53 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
  54 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
  55         \r
  56 #if (owid>128) \r
  57 #error "Variable not correct"\r
  58 #endif\r
  59 \r
  60 extern uint8_t mode;\r
  61 extern uint8_t gcontrol;\r
  62 extern uint8_t reset_indicator;\r
  63 extern uint8_t alarmflag;\r
  64 volatile uint8_t wdcounter=1;\r
  65 \r
  66 \r
  67 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
  68 ISR(WATCHDOG_vect) {\r
  69 #else\r
  70 ISR(WDT_vect) {\r
  71 #endif \r
  72         wdcounter++;\r
  73         if (reset_indicator==1) reset_indicator++;\r
  74         else if (reset_indicator==2) mode=0;\r
  75 \r
  76 \r
  77 }\r
  78 \r
  79 \r
  80 typedef union {\r
  81         volatile uint8_t bytes[8];\r
  82         struct {\r
  83                 uint16_t temp;  //0\r
  84                 uint8_t TH;  //2\r
  85                 uint8_t TL;  //3\r
  86                 uint8_t config;  //4\r
  87                 uint8_t rrFF; //5\r
  88                 uint8_t rr00; //6\r
  89                 uint8_t rr10; //7\r
  90         };\r
  91 } pack1_t;\r
  92 volatile pack1_t pack1;\r
  93 \r
  94 \r
  95 \r
  96 typedef union {\r
  97         #if  defined(__AVR_ATtiny25__)\r
  98         volatile uint8_t bytes[16];\r
  99         #else\r
 100         volatile uint8_t bytes[64];\r
 101         #endif\r
 102         struct {\r
 103                 uint8_t status;  //1\r
 104                 int16_t temp;  //2\r
 105                 uint16_t voltage;  //4\r
 106                 int16_t current;  //6\r
 107                 uint8_t threshold; //8\r
 108                 \r
 109                 uint8_t page1[8]; //9\r
 110                 #if  defined(__AVR_ATtiny25__)\r
 111                 #else\r
 112                 uint8_t page2[8]; //17\r
 113                 union{ \r
 114                         uint8_t page3[8]; //25\r
 115                         struct {\r
 116                                 uint16_t R0;\r
 117                                 uint16_t VS;\r
 118                                 uint8_t cmode;\r
 119                                 int16_t ip;\r
 120                                 uint8_t free;\r
 121                         };\r
 122                 };\r
 123                 union{ \r
 124                         uint8_t page4[8];  //33\r
 125                         struct {\r
 126                                 uint16_t tol_s8;\r
 127                                 uint16_t tol_d;\r
 128                                 uint16_t r_day_max;\r
 129                                 uint16_t r_week_max;\r
 130                         };\r
 131                 };\r
 132                 uint8_t page5[8];  //41\r
 133                 uint8_t page6[8];  //49\r
 134                 uint8_t page7[8];  //57\r
 135                 \r
 136                 #endif\r
 137         };\r
 138 } pack2_t;\r
 139 volatile pack2_t pack2;\r
 140 \r
 141 \r
 142 \r
 143 \r
 144 volatile int16_t am2302_temp;\r
 145 volatile uint16_t am2302_hum;\r
 146 \r
 147 \r
 148 uint8_t userRegister[1];\r
 149 int16_t sRH,sT;\r
 150 double temperatureC,humidityRH,hhum;\r
 151 double l;\r
 152 \r
 153 \r
 154 uint16_t weekmaxarr[8];\r
 155 \r
 156 //Kompensieren der Abhänigkeit von RS/RO von Temperatur und Luftfeuchte\r
 157 inline double interp(double t, double h) {\r
 158         double h2;\r
 159          double t2;\r
 160         h2=h*h;\r
 161         t2=t*t;\r
 162         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
 163 }\r
 164 \r
 165 double R0;\r
 166 uint16_t mr;\r
 167 uint8_t startup=10;\r
 168 double ip;\r
 169 \r
 170 \r
 171 int testSW(void) {\r
 172         uint8_t r;\r
 173         DDRB&=~(1<<PORTB0);  //Eingang\r
 174          __asm__ __volatile__ ("nop"); \r
 175          PORTB|=(1<<PORTB0); //Pullup\r
 176          __asm__ __volatile__ ("nop"); \r
 177          __asm__ __volatile__ ("nop"); \r
 178          __asm__ __volatile__ ("nop"); \r
 179          __asm__ __volatile__ ("nop"); \r
 180          __asm__ __volatile__ ("nop"); \r
 181          r=PINB&(1<<PORTB0);\r
 182          __asm__ __volatile__ ("nop"); \r
 183          PORTB&=~(1<<PORTB0); \r
 184          __asm__ __volatile__ ("nop"); \r
 185         DDRB|=(1<<PORTB0);  //Eingang\r
 186         return (r==0);  //Offen mal HIH4030\r
 187          \r
 188          \r
 189 }\r
 190 \r
 191 #define EEPROM_R0 0\r
 192 #define EEPROM_R0d 2\r
 193 #define EEPROM_R0w 4\r
 194 #define EEPROM_dol 6\r
 195 \r
 196 \r
 197 uint16_t readEEPROM(uint8_t addr,uint16_t def) {\r
 198         uint16_t hr;\r
 199         while(EECR & (1<<EEPE));\r
 200         EEARL=addr+1;\r
 201         EECR |= (1<<EERE);\r
 202         hr=EEDR;\r
 203         if (hr!=0xFF) {\r
 204                 hr=hr<<8;\r
 205                 while(EECR & (1<<EEPE));\r
 206                 EEARL=addr;\r
 207                 EECR |= (1<<EERE);\r
 208                 hr|=EEDR;\r
 209                 return hr;\r
 210         }\r
 211         return def;\r
 212 }\r
 213 \r
 214 void writeEEPROM(uint8_t addr,uint16_t val) {\r
 215         while(EECR & (1<<EEPE));\r
 216         EECR = (0<<EEPM1)|(0<<EEPM0);\r
 217         EEARL = addr;\r
 218         EEDR = val&0xFF;\r
 219         EECR |= (1<<EEMPE);\r
 220         EECR |= (1<<EEPE);\r
 221         while(EECR & (1<<EEPE));\r
 222         EECR = (0<<EEPM1)|(0<<EEPM0);\r
 223         EEARL = addr+1;\r
 224         EEDR = val>>8;\r
 225         EECR |= (1<<EEMPE);\r
 226         EECR |= (1<<EEPE);\r
 227 }\r
 228 \r
 229 int main(void){\r
 230         PORTA=0xFF;\r
 231         PORTB=0xFF-(1<<PORTB0); //Schalter kann gegen Masse sein und zieht dann immer Strom\r
 232         DDRB|=(1<<PORTB0); //Als Ausgang und 0\r
 233         OWINIT();\r
 234         DDRB|=(1<<PINB1);//Ausgang und 1\r
 235         DDRA|=(1<<PINA0);\r
 236         \r
 237         WDTCSR |= ((1<<WDCE) );   // Enable the WD Change Bit//| (1<<WDE)\r
 238         WDTCSR |=   (1<<WDIE) |              // Enable WDT Interrupt\r
 239         //(1<<WDP0) |(1<<WDP2) | (1<<WDP1);    // Set Timeout to ~2 seconds\r
 240         (1<<WDP3) | (1<<WDP0);    // Set Timeout to ~8 seconds\r
 241 \r
 242         MCUSR=0;\r
 243 \r
 244         ADMUX=0b00001110 //ADC1 +   ADC3 -\r
 245         ADCSRA = (1<<ADEN)|\r
 246 \r
 247         pack1.temp=0x0550;\r
 248         pack1.config=0x7F;\r
 249         pack1.TH=75;\r
 250         pack1.TL=70;\r
 251         pack1.rrFF=0xFF;\r
 252         pack1.rr00=0;\r
 253         pack1.rr10=0x10;\r
 254 \r
 255         pack2.cmode=0;\r
 256         pack2.R0=readEEPROM(EEPROM_R0,1);\r
 257         R0=pack2.R0/100.0;\r
 258                 \r
 259         pack2.r_day_max=readEEPROM(EEPROM_R0d,1);\r
 260         pack2.r_week_max=readEEPROM(EEPROM_R0w,1);\r
 261         pack2.tol_d=readEEPROM(EEPROM_dol,0); \r
 262         pack2.tol_s8=0;  //Tag faengt mit Einschalten an\r
 263         for(uint8_t i=0;i<7;i++) {\r
 264                 weekmaxarr[i]=pack2.r_week_max;\r
 265         }\r
 266 \r
 267         if (testSW()) {\r
 268                 config_info2[5]=8;\r
 269         }else{\r
 270                 config_info2[5]=7;\r
 271         }\r
 272 \r
 273         USI_TWI_Master_Initialise();\r
 274         \r
 275         SHT2x_SoftReset();\r
 276         SHT2x_ReadUserRegister(userRegister);\r
 277         SHT2x_WriteUserRegister(userRegister); //write changed user reg\r
 278         gcontrol=1;\r
 279         sei();\r
 280         //DDRB|=(1<<PINB1);\r
 281     while(1)   {\r
 282                 if (pack1.config==0x1F) {\r
 283                         pack1.config=0x7F;\r
 284                         R0=1;\r
 285                         pack2.R0=0;\r
 286                         writeEEPROM(EEPROM_R0,0);\r
 287                 } \r
 288                 if (pack1.config==0x05) {\r
 289                         pack1.config=0x7F;                              \r
 290                         pack2.r_day_max=1;\r
 291                         pack2.r_week_max=1;\r
 292                         pack2.tol_d=0;\r
 293                         pack2.tol_s8=0;  //Tag faengt mit Einschalten an        \r
 294                         R0=1;   \r
 295                         writeEEPROM(EEPROM_R0,0xFF);\r
 296                         writeEEPROM(EEPROM_R0d,0xFF);  //Maximum des Tages\r
 297                         writeEEPROM(EEPROM_R0w,0xFF); //Maximum der Letzten 7 Tage\r
 298                         writeEEPROM(EEPROM_dol,0xFF); //Anzahl der Betriebstage         \r
 299                         for(uint8_t i=0;i<7;i++) {\r
 300                                 weekmaxarr[i]=1;\r
 301                         }                               \r
 302                 } \r
 303                 if (wdcounter>0) {\r
 304                         pack2.tol_s8++;\r
 305                         if (pack2.tol_s8>(10000))  {//10800 ist theortisch der Tag aber meistens zu lang\r
 306                                 pack2.tol_s8=0;\r
 307                                 pack2.tol_d++;  //rund 180 Jahre :-)\r
 308                                 pack2.r_week_max=0;\r
 309                                 weekmaxarr[7]=pack2.r_day_max;\r
 310                                 for(uint8_t i=0;i<7;i++) {\r
 311                                         weekmaxarr[i]=weekmaxarr[i+1];\r
 312                                         //maximum of week\r
 313                                         if (weekmaxarr[i]>pack2.r_week_max) pack2.r_week_max=weekmaxarr[i];\r
 314                                 }\r
 315                                 if (pack2.tol_d>7) {\r
 316                                         pack2.R0=pack2.r_week_max;\r
 317                                 } else {\r
 318                                         pack2.R0=pack2.r_day_max;\r
 319                                 }\r
 320                                 //R0=//R0-0.5*(pack2.R0/100-R0);\r
 321                                 R0=R0-(R0-pack2.R0/100.0)*0.5   ;\r
 322                                 pack2.R0=R0*100;\r
 323                                 writeEEPROM(EEPROM_R0,pack2.R0);\r
 324                                 writeEEPROM(EEPROM_R0d,pack2.r_day_max);  //Maximum des Tages\r
 325                                 writeEEPROM(EEPROM_R0w,pack2.r_week_max); //Maximum der Letzten 7 Tage\r
 326                                 writeEEPROM(EEPROM_dol,pack2.tol_d); //Anzahl der Betriebstage\r
 327                                 pack2.r_day_max=0;\r
 328                         }\r
 329                         if (startup!=0) startup--;\r
 330                         SHT2x_MeasurePoll(HUMIDITY, &sRH);\r
 331                         // --- measure temperature with "Polling Mode" (no hold master) ---\r
 332                         SHT2x_MeasurePoll(TEMP, &sT);\r
 333                         //-- calculate humidity and temperature --\r
 334                         temperatureC = SHT2x_CalcTemperatureC(sT);\r
 335                         humidityRH = SHT2x_CalcRH(sRH);\r
 336                         ip=interp(temperatureC,humidityRH);\r
 337                         pack2.ip=ip*1000;\r
 338                         humidityRH=calibr_hum(temperatureC,-0.2,humidityRH)*10.0;\r
 339                         //humidityRH=humidityRH*10.0;\r
 340                         temperatureC =temperatureC *10.0-2;\r
 341 \r
 342 \r
 343                         if (testSW()) {\r
 344                                  am2302_hum= humidityRH*10.0;\r
 345                                  am2302_temp=temperatureC*25.6;\r
 346                                  //am2302_temp=am2302_temp-45;\r
 347                                  config_info2[5]=8;     \r
 348                         }else{\r
 349                                 hhum=(1.0546-0.000216*temperatureC)*(humidityRH);\r
 350                                 //am2302_hum=0.318*hhum +76.0;\r
 351                                 am2302_hum=0.31*hhum +80;\r
 352                                 am2302_temp=temperatureC*25.6;\r
 353                                 config_info2[5]=7;\r
 354                         }\r
 355                         //PORTB&=~(1<<PINB1);\r
 356                         mr=0;\r
 357 //Kritische Sektion !___Ein Breakpoint in dieser Section kann den TGS8100 zerstoeren!___________________________\r
 358                         PORTB&=~(1<<PINB1); //Auf 0 Ziehen\r
 359                         _delay_us(150);\r
 360                         _delay_us(150);\r
 361                         PORTB|=(1<<PINB1);\r
 362 //ENDE Kritische Sektion !______________________________\r
 363                         //l=mr/2.0*2.048/4096; \r
 364                         // l maximal 2  mr max 4096  //mr 2V=8000 \r
 365                         \r
 366                         if (pack2.cmode) { //cmode=0 V 0..2 V cmode=1 V 1.5..3.5V\r
 367                                 //l+=1.5; //Spannung real\r
 368                                 mr+=6000;\r
 369                         } \r
 370                         //if (l>1.8) {\r
 371                         if (mr>7200) {                          \r
 372                                 if (pack2.cmode==0) {\r
 373 //                                      MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_CH1);\r
 374                                         pack2.cmode=1;\r
 375                                 }\r
 376                         }\r
 377                         //if (l<1.6) {\r
 378                         if (mr<6400) {  \r
 379                                 if (pack2.cmode==1) {\r
 380         //                              MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_M);\r
 381                                         pack2.cmode=0;\r
 382                                 }\r
 383                                 \r
 384                                 \r
 385                         }\r
 386                         pack2.VS=mr*5/2;\r
 387                         l=mr/4000.0;\r
 388                         l=( 3/l- 1) *30;\r
 389                         pack2.current=l*100;\r
 390                         \r
 391                         l=l/ip;\r
 392                         \r
 393                         if (startup==0){\r
 394                                 if (l>R0) {\r
 395                                         R0=l;\r
 396                                         pack2.R0=R0*100;\r
 397                                         writeEEPROM(EEPROM_R0,pack2.R0);\r
 398 \r
 399                                 }\r
 400                                 if (l*100>pack2.r_day_max) {\r
 401                                         pack2.r_day_max=l*100;\r
 402                                 }\r
 403                         } else if (l<R0) l=R0; //negative Werte am Anfang verhintern\r
 404                         l=R0/l;\r
 405                         l=log(l);\r
 406                         l=l*160*4; //fuer DS18B20\r
 407                         wdcounter=0;\r
 408                         \r
 409                 }\r
 410         \r
 411                 if (gcontrol==1) {\r
 412                         uint16_t w=l;\r
 413                         uint8_t t8=w>>4;\r
 414                         uint8_t af=0;\r
 415                         if (t8>pack1.TH) af=1;\r
 416                         if (t8<=pack1.TL) af=1; \r
 417                         cli();\r
 418                         pack1.temp=w;\r
 419                         //pack.temp++;\r
 420                         alarmflag=af;\r
 421                         sei();                  \r
 422                         EXTERN_SLEEP();         \r
 423                 }\r
 424                 if ((gcontrol==2)||(gcontrol==3)) {\r
 425                         gcontrol=0;\r
 426                         \r
 427                 }\r
 428 \r
 429                 \r
 430 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)\r
 431                         if (((TIMSK & (1<<TOIE0))==0)&& (mode==0))\r
 432 #endif                  \r
 433 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) ||defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
 434                         if (((TIMSK0 & (1<<TOIE0))==0)&& (mode==0))\r
 435 #endif\r
 436                           {\r
 437 \r
 438                         MCUCR|=(1<<SE)|(1<<SM1);\r
 439                         MCUCR&=~(1<<ISC01);\r
 440                 } else {\r
 441                         MCUCR|=(1<<SE);\r
 442                         MCUCR&=~(1<<SM1);\r
 443                 }\r
 444                 asm("SLEEP");\r
 445    }\r
 446 \r
 447 \r
 448 }\r