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/SHT2xV2.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                                         //18\r
  54 volatile uint8_t config_info1[26]={0x08,18, 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         volatile double l;\r
 153 \r
 154 \r
 155         uint16_t weekmaxarr[8];\r
 156 \r
 157         //Kompensieren der Abhänigkeit von RS/RO von Temperatur und Luftfeuchte\r
 158         inline double interp(double t, double h) {\r
 159                 double h2;\r
 160                 double t2;\r
 161                 h2=h*h;\r
 162                 t2=t*t;\r
 163                 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
 164         }\r
 165 \r
 166         double R0;\r
 167         uint16_t mr;\r
 168         uint8_t startup=10;\r
 169         double ip;\r
 170         double la[4];\r
 171         uint8_t lainit=1;\r
 172 \r
 173         int testSW(void) {\r
 174                 uint8_t r;\r
 175                 DDRB&=~(1<<PORTB0);  //Eingang\r
 176                 __asm__ __volatile__ ("nop");\r
 177                 PORTB|=(1<<PORTB0); //Pullup\r
 178                 __asm__ __volatile__ ("nop");\r
 179                 __asm__ __volatile__ ("nop");\r
 180                 __asm__ __volatile__ ("nop");\r
 181                 __asm__ __volatile__ ("nop");\r
 182                 __asm__ __volatile__ ("nop");\r
 183                 r=PINB&(1<<PORTB0);\r
 184                 __asm__ __volatile__ ("nop");\r
 185                 PORTB&=~(1<<PORTB0);\r
 186                 __asm__ __volatile__ ("nop");\r
 187                 DDRB|=(1<<PORTB0);  //Eingang\r
 188                 return (r==0);  //Offen mal HIH4030\r
 189                 \r
 190                 \r
 191         }\r
 192 \r
 193         #define EEPROM_R0 0\r
 194         #define EEPROM_R0d 2\r
 195         #define EEPROM_R0w 4\r
 196         #define EEPROM_dol 6\r
 197 \r
 198 \r
 199         uint16_t readEEPROM(uint8_t addr,uint16_t def) {\r
 200                 uint16_t hr;\r
 201                 while(EECR & (1<<EEPE));\r
 202                 EEARL=addr+1;\r
 203                 EECR |= (1<<EERE);\r
 204                 hr=EEDR;\r
 205                 if (hr!=0xFF) {\r
 206                         hr=hr<<8;\r
 207                         while(EECR & (1<<EEPE));\r
 208                         EEARL=addr;\r
 209                         EECR |= (1<<EERE);\r
 210                         hr|=EEDR;\r
 211                         return hr;\r
 212                 }\r
 213                 return def;\r
 214         }\r
 215 \r
 216         void writeEEPROM(uint8_t addr,uint16_t val) {\r
 217                 while(EECR & (1<<EEPE));\r
 218                 EECR = (0<<EEPM1)|(0<<EEPM0);\r
 219                 EEARL = addr;\r
 220                 EEDR = val&0xFF;\r
 221                 EECR |= (1<<EEMPE);\r
 222                 EECR |= (1<<EEPE);\r
 223                 while(EECR & (1<<EEPE));\r
 224                 EECR = (0<<EEPM1)|(0<<EEPM0);\r
 225                 EEARL = addr+1;\r
 226                 EEDR = val>>8;\r
 227                 EECR |= (1<<EEMPE);\r
 228                 EECR |= (1<<EEPE);\r
 229         }\r
 230 \r
 231         int main(void){\r
 232                 PORTA=0xFF-(1<<PINA1);\r
 233                 PORTB=0xFF-(1<<PORTB0); //Schalter kann gegen Masse sein und zieht dann immer Strom\r
 234                 DDRB|=(1<<PORTB0); //Als Ausgang und 0\r
 235                 OWINIT();\r
 236                 DDRB|=(1<<PINB1);//Ausgang und 1\r
 237                 DDRA|=(1<<PINA0);\r
 238                 \r
 239                 WDTCSR |= ((1<<WDCE) );   // Enable the WD Change Bit//| (1<<WDE)\r
 240                 WDTCSR |=   (1<<WDIE) |              // Enable WDT Interrupt\r
 241                 //(1<<WDP0) |(1<<WDP2) | (1<<WDP1);    // Set Timeout to ~2 seconds\r
 242                 (1<<WDP3) | (1<<WDP0);    // Set Timeout to ~8 seconds\r
 243 \r
 244                 MCUSR=0;\r
 245 \r
 246                 //ADMUX=0b00001110; //ADC1 +   ADC3 -\r
 247                 ADMUX=0x01 ; //PA3 single and  3V\r
 248                 ADCSRA = (1<<ADEN)|(1<<ADPS1)|(1<<ADPS0);//|\r
 249                 pack1.temp=0x0550;\r
 250                 pack1.config=0x7F;\r
 251                 pack1.TH=75;\r
 252                 pack1.TL=70;\r
 253                 pack1.rrFF=0xFF;\r
 254                 pack1.rr00=0;\r
 255                 pack1.rr10=0x10;\r
 256 \r
 257                 pack2.cmode=0;\r
 258                 pack2.R0=readEEPROM(EEPROM_R0,1);\r
 259                 R0=pack2.R0/100.0;\r
 260                 \r
 261                 pack2.r_day_max=readEEPROM(EEPROM_R0d,1);\r
 262                 pack2.r_week_max=readEEPROM(EEPROM_R0w,1);\r
 263                 pack2.tol_d=readEEPROM(EEPROM_dol,0);\r
 264                 pack2.tol_s8=0;  //Tag faengt mit Einschalten an\r
 265                 for(uint8_t i=0;i<7;i++) {\r
 266                         weekmaxarr[i]=pack2.r_week_max;\r
 267                 }\r
 268 \r
 269                 if (testSW()) {\r
 270                         config_info2[5]=12;\r
 271                         }else{\r
 272                         config_info2[5]=7;\r
 273                 }\r
 274 \r
 275                 USI_TWI_Master_Initialise();\r
 276                 \r
 277                 initSHT2x();\r
 278                 _delay_ms(100);\r
 279                 gcontrol=1;\r
 280                 sei();\r
 281                 while(1)   {\r
 282                         if (pack1.config==0x1F) {  //Reset R0\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) {  //Reset all Data\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) {  //8s\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                                 getSHT2xHumTemp(&temperatureC,&humidityRH);\r
 331                                 ip=interp(temperatureC,humidityRH);\r
 332                                 pack2.ip=ip*1000;\r
 333                                 double RH=calibr_hum(temperatureC,-0.2,humidityRH)*10.0;\r
 334                                 double TC =temperatureC *10.0-2;\r
 335 \r
 336 \r
 337                                 if (testSW()) {\r
 338                                         am2302_hum=RH;\r
 339                                         am2302_temp=TC*25.6;\r
 340                                         config_info2[5]=12;     //10V = 100%\r
 341                                 }else{\r
 342                                         hhum=(1.0546-0.000216*TC)*(RH);\r
 343                                         //am2302_hum=0.318*hhum +76.0;\r
 344                                         am2302_hum=0.31*hhum +80;\r
 345                                         am2302_temp=TC*25.6;\r
 346                                         config_info2[5]=7;\r
 347                                 }\r
 348                                 mr=0;\r
 349                                 //Kritische Sektion !___Ein Breakpoint in dieser Section kann den TGS8100 zerstoeren!___________________________\r
 350                                 PORTB&=~(1<<PINB1); //Auf 0 Ziehen\r
 351                                 _delay_us(500);\r
 352                                 for(uint8_t i=0;i<32;i++) {\r
 353                                         ADCSRA|=(1<<ADSC);\r
 354                                         while ((ADCSRA&(1<<ADSC)));\r
 355                                         mr+=ADC;\r
 356                                  }\r
 357                                 PORTB|=(1<<PINB1);\r
 358                                 //ENDE Kritische Sektion !______________________________\r
 359 \r
 360                                 pack2.VS=mr*3/128;  //VS in Volt = VS/256\r
 361                                 l=mr*3.0/32768.0;  //Spannung in v\r
 362                                 l=( 3/l- 1) *30; //l is resistance\r
 363                                 if (lainit) {\r
 364                                         la[0]=la[1]=la[2]=la[3]=l;  //smaller code\r
 365                                         lainit=0;\r
 366                                 } else {\r
 367                                         la[0]=la[1];\r
 368                                         la[1]=la[2];\r
 369                                         la[2]=la[3];\r
 370                                         la[3]=l;\r
 371                                 }\r
 372                                 double lasum=la[0]+la[1]+la[2]+la[3];\r
 373                                 l=lasum/4.0;\r
 374                                 \r
 375                                 pack2.current=l*100;\r
 376                                 \r
 377                                 l=l/ip;\r
 378                                 \r
 379                                 if (startup==0){\r
 380                                         if (l>R0) {\r
 381                                                 R0=l;\r
 382                                                 pack2.R0=R0*100;\r
 383                                                 writeEEPROM(EEPROM_R0,pack2.R0);\r
 384 \r
 385                                         }\r
 386                                         if (l*100>pack2.r_day_max) {\r
 387                                                 pack2.r_day_max=l*100;\r
 388                                         }\r
 389                                 } else if (l<R0) l=R0; //negative Werte am Anfang verhintern\r
 390                                 l=exp((1-(l/R0))*6.05)-1;// exp((1-($val)/55)*5.75);  (5.75 geht über 125 6.05 geht bis 240... mittlere Linie im Datenblatt)\r
 391                                 l=l*8.0; //fuer DS18B20*/\r
 392                                 wdcounter=0;\r
 393                                 \r
 394                         }\r
 395                         \r
 396                         if (gcontrol==1) {\r
 397                                 uint16_t w=l;\r
 398                                 uint8_t t8=w>>4;\r
 399                                 uint8_t af=0;\r
 400                                 if (t8>pack1.TH) af=1;\r
 401                                 if (t8<=pack1.TL) af=1;\r
 402                                 cli();\r
 403                                 pack1.temp=w;\r
 404                                 //pack.temp++;\r
 405                                 alarmflag=af;\r
 406                                 sei();\r
 407                                 EXTERN_SLEEP();\r
 408                         }\r
 409                         if ((gcontrol==2)||(gcontrol==3)) {\r
 410                                 gcontrol=0;\r
 411                                 \r
 412                         }\r
 413 \r
 414                         \r
 415                         #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)\r
 416                         if (((TIMSK & (1<<TOIE0))==0)&& (mode==0))\r
 417                         #endif\r
 418                         #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) ||defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
 419                         if (((TIMSK0 & (1<<TOIE0))==0)&& (mode==0))\r
 420                         #endif\r
 421                         {\r
 422 \r
 423                                 MCUCR|=(1<<SE)|(1<<SM1);\r
 424                                 MCUCR&=~(1<<ISC01);\r
 425                         } else {\r
 426                                 MCUCR|=(1<<SE);\r
 427                                 MCUCR&=~(1<<SM1);\r
 428                         }\r
 429                         asm("SLEEP");\r
 430                 }\r
 431 \r
 432 \r
 433         }\r