DS18B20_Thermocouble_DS2438_SHT/DS18B20_DS2438.c

   1 \r
   2 // Copyright (c) 2017, 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 <avr/pgmspace.h>\r
  41 #include "../common/I2C/USI_TWI_Master.h"\r
  42 #include "../common/I2C/SHT2xV2.h"\r
  43 #include "../common/owSlave_tools.h"\r
  44 \r
  45 OWST_EXTERN_VARS\r
  46 \r
  47 //#define K_Type\r
  48 #define J_Type\r
  49 \r
  50 #ifdef K_Type\r
  51 //const float k_rs[54] PROGMEM ={0.000000,24.125000,48.585366,72.731707,96.829268,121.097561,145.700000,170.600000,195.650000,220.625000,245.365854,269.853659,294.119048,318.195122,342.166667,366.000000,389.761905,413.428571,437.023810,460.558140,484.047619,507.511628,530.976190,554.418605,577.883721,601.395349,624.952381,648.571429,672.285714,696.073171,719.976190,744.000000,768.146341,792.439024,816.853659,841.414634,866.125000,890.975000,916.000000,941.179487,966.525000,992.025641,1017.717949,1043.589744,1069.657895,1095.945946,1122.432432,1149.184211,1176.189189,1203.472222,1231.083333,1259.000000,1287.285714,1315.941176};\r
  52 const float k_rs[61] PROGMEM ={ -212.538462, -166.260870, -124.892857, -97.562500, -66.888889, -34.157895, 0.000000, 24.125000, 48.585366, 72.731707, 96.829268, 121.097561, 145.700000, 170.600000, 195.650000, 220.625000, 245.365854, 269.853659, 294.119048, 318.192771, 342.166667, 366.000000, 389.761905, 413.428571, 437.023810, 460.558140, 484.047619, 507.511628, 530.976190, 554.418605, 577.883721, 601.395349, 624.952381, 648.571429, 672.285714, 696.073171, 719.976190, 744.000000, 768.146341, 792.439024, 816.853659, 841.414634, 866.125000, 890.975000, 916.000000, 941.179487, 966.525000, 992.025641, 1017.717949, 1043.589744, 1069.657895, 1095.945946, 1122.432432, 1149.173333, 1176.189189, 1203.472222, 1231.083333, 1259.000000, 1287.285714, 1315.941176, 1344.941176};\r
  53 #define k_ofs 6\r
  54 #endif\r
  55 #ifdef J_Type\r
  56 #define k_ofs 0\r
  57 //J-Type\r
  58 const float k_rs[70] PROGMEM ={0, 18.302913, 34.830476, 50.783019, 70.653704, 90.505455, 110.341818, 130.165455, 149.163636, 160.791071, 180.596364, 200.398214, 220.200000, 240.000000, 250.882883, 270.603636, 290.409091, 310.216364, 330.025455, 342.472727, 360.649091, 380.461818, 400.275000, 420.087273, 435.275676, 450.703636, 470.503636, 490.298214, 510.082456, 523.486726, 540.621053, 560.370175, 580.105172, 591.979487, 610.527119, 630.213559, 644.601653, 660.534426, 680.168852, 690.787097, 710.391935, 729.123810, 740.559375, 760.126562, 770.684615, 790.235385, 800.782812, 820.331250, 834.681250, 850.446032, 870.017460, 880.600000, 900.196774, 911.099187, 930.432787, 950.073333, 960.728333, 980.396667, 1000.078333, 1010.772881, 1030.475862, 1050.187931, 1065.717241, 1080.631034, 1100.358621, 1120.089655, 1131.840000,1150.556897, 1170.294737, 1190.035088};\r
  59 #endif\r
  60 \r
  61 double gettemp_rs(double V) {\r
  62         uint8_t iv=(uint8_t)(V+k_ofs);\r
  63         float t0=pgm_read_float(&(k_rs[iv]));\r
  64         float t1=pgm_read_float(&(k_rs[iv+1]));\r
  65         return t0+(t1-t0)/1*((V+k_ofs)-iv);\r
  66 }\r
  67 \r
  68 \r
  69 \r
  70 \r
  71 \r
  72 uint8_t owid1[8]={0x28, 0xA6, 0xD9, 0x84, 0x00, 0x00, 0x03, 0x68};/**/\r
  73 uint8_t owid2[8]={0x26, 0xA7, 0xD9, 0x84, 0x00, 0x00, 0x03, 0x20};/**/\r
  74 uint8_t config_info1[26]={0x01,0x02 ,0x00,0x00, 0x00,0x00, 0x00,0x00, 0x02,6,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};  \r
  75 uint8_t config_info2[26]={0x01,0x06, 0x05,0x08, 0x04,0x07, 0x00,0x00, 0x02,7,0x00,7,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};     \r
  76         \r
  77 OWST_WDT_ISR\r
  78 OWST_TESTSW\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                 uint16_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                 uint8_t page3[8]; //25\r
 115                 uint8_t page4[8];  //33\r
 116                 uint8_t page5[8];  //41\r
 117                 uint8_t page6[8];  //49\r
 118                 uint8_t page7[8];  //57\r
 119                 //uint8_t crc;  //65\r
 120                 #endif\r
 121         };\r
 122 } pack2_t;\r
 123 volatile pack2_t pack2;\r
 124 \r
 125 \r
 126 volatile double V,ktemp;\r
 127 \r
 128 double ADmess() {\r
 129         ADMUX=0b10101101;  //PA2 + //PA1 - \r
 130         ADCSRA|=(1<<ADSC);\r
 131         while ((ADCSRA&(1<<ADSC)));\r
 132         if (ADC==0) {\r
 133                 ADMUX=0b10001101; //PA2 - //PA1 +\r
 134                 ADCSRA|=(1<<ADSC);\r
 135                 while ((ADCSRA&(1<<ADSC)));\r
 136                 return -(double)ADC;\r
 137         }\r
 138         return (double)ADC;\r
 139 }\r
 140 \r
 141 volatile int16_t DS2438_2_TEMP;\r
 142 volatile uint16_t DS2438_2_VAD;\r
 143 volatile uint16_t DS2438_2_VDD=0x01F4;\r
 144 \r
 145 \r
 146 \r
 147 double temperatureC,humidityRH;\r
 148 double TC;\r
 149 double l;\r
 150 \r
 151 int main(void){\r
 152         OWST_INIT_ALL_ON\r
 153         pack1.temp=0x0550;\r
 154         pack1.config=0x7F;\r
 155         pack1.TH=75;\r
 156         pack1.TL=70;\r
 157         pack1.rrFF=0xFF;\r
 158         pack1.rr00=0;\r
 159         pack1.rr10=0x10;\r
 160         PORTA=0xFF-(1<<PINA1)-(1<<PINA2);\r
 161         OWINIT();\r
 162 \r
 163         OWST_EN_PULLUP\r
 164         OWST_WDR_CONFIG1        \r
 165 \r
 166         if (testSW()) {\r
 167                 config_info2[5]=12;\r
 168                 }else{\r
 169                 config_info2[5]=7;\r
 170         }\r
 171         USI_TWI_Master_Initialise();\r
 172         initSHT2x();\r
 173                 \r
 174         gcontrol=1;\r
 175         for(uint8_t i=0;i<8;i++) pack2.page6[i]=owid1[i];\r
 176         pack2.page3[0]=0xF1;\r
 177         sei();\r
 178         ADCSRA=(1<<ADEN)|(1<<ADPS2)|(1<<ADPS1)|(1<<ADPS0);\r
 179         //DDRB|=(1<<PINB1);\r
 180 \r
 181         double ares[16],sum;\r
 182         uint8_t par=0;\r
 183         ares[0]=0;//ADmess();\r
 184         for (par=1;par<16;par++) {\r
 185                 ares[par]=ares[0];\r
 186         }\r
 187         par=0;\r
 188     while(1)   {\r
 189                 if ((gcontrol==2)||(gcontrol==3)) {\r
 190                         wdcounter=1;\r
 191                         gcontrol=0;\r
 192                         \r
 193                 }\r
 194                 \r
 195                 if (wdcounter>0) {\r
 196                         if (par==0) {\r
 197                                 getSHT2xHumTemp(&temperatureC,&humidityRH);\r
 198                                 double RH=humidityRH*10.0;\r
 199                                  TC =temperatureC *10.0;\r
 200 \r
 201                                 if (testSW()) {\r
 202                                         DS2438_2_VAD=RH;\r
 203                                         DS2438_2_TEMP=TC*25.6;\r
 204                 \r
 205                                         config_info2[5]=12;\r
 206                                         \r
 207                                         }else{\r
 208                                         \r
 209                                         double hhum=(1.0546-0.000216*TC)*(RH);\r
 210                                         DS2438_2_VAD=0.31*hhum +80;\r
 211                                         DS2438_2_TEMP=TC*25.6;\r
 212                                         config_info2[5]=7;\r
 213                                 }\r
 214                         }\r
 215                         DS2438_2_VDD=0x01F4;\r
 216                         ares[par]=ADmess();\r
 217                         par++;\r
 218                         if (par>15) par=0;\r
 219                         wdcounter=0;\r
 220                 }\r
 221         \r
 222                 if ((gcontrol&1)==1) {\r
 223                         gcontrol=0;\r
 224                         sum=0;\r
 225                         for(uint8_t i=0;i<16;i++) {\r
 226                                 sum+=ares[i];\r
 227                         }\r
 228                         V=sum/20.0/1024.0*1.18*1000.0/16.0;//Spannung in mV\r
 229                         //V=sum/20.0/1024.0*1.01*1000.0/16.0;\r
 230                         int16_t htemp;\r
 231                         ktemp=gettemp_rs(V);\r
 232                         //htemp=(ktemp*16)/10;\r
 233                         htemp=(ktemp*16+TC*1.6)/10;\r
 234 \r
 235                         int16_t w=htemp;\r
 236                         int8_t t8=w>>4;\r
 237                         int8_t af=0;\r
 238                         if (t8>pack1.TH) af=1;\r
 239                         if (t8<=pack1.TL) af=1; \r
 240                         cli();\r
 241                         pack1.temp=w;\r
 242                         //pack.temp++;\r
 243                         alarmflag=af;\r
 244                         sei();                  \r
 245                         EXTERN_SLEEP();         \r
 246                 }\r
 247                 \r
 248 \r
 249                 \r
 250 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)\r
 251                         if (((TIMSK & (1<<TOIE0))==0)&& (mode==0))\r
 252 #endif                  \r
 253 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) ||defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
 254                         if (((TIMSK0 & (1<<TOIE0))==0)&& (mode==0))\r
 255 #endif\r
 256                           {\r
 257 \r
 258                         MCUCR|=(1<<SE)|(1<<SM1);\r
 259                         MCUCR&=~(1<<ISC01);\r
 260                 } else {\r
 261                         MCUCR|=(1<<SE);\r
 262                         MCUCR&=~(1<<SM1);\r
 263                 }\r
 264                 asm("SLEEP");\r
 265    }\r
 266 \r
 267 \r
 268 }