09b528d20d4c09c06ec0485e14fc0b354692d962
[owSlave2.git] / 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/SHT2xV2.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,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 extern uint8_t cpsp;\r
66 volatile uint8_t wdcounter=1;\r
67 \r
68 \r
69 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
70 ISR(WATCHDOG_vect) {\r
71 #else\r
72 ISR(WDT_vect) {\r
73 #endif \r
74         wdcounter++;\r
75         if (reset_indicator==1) reset_indicator++;\r
76         else if (reset_indicator==2) mode=0;\r
77 \r
78 \r
79 }\r
80 \r
81 \r
82 typedef union {\r
83         volatile uint8_t bytes[8];\r
84         struct {\r
85                 uint16_t temp;  //0\r
86                 uint8_t TH;  //2\r
87                 uint8_t TL;  //3\r
88                 uint8_t config;  //4\r
89                 uint8_t rrFF; //5\r
90                 uint8_t rr00; //6\r
91                 uint8_t rr10; //7\r
92         };\r
93 } pack1_t;\r
94 volatile pack1_t pack1;\r
95 \r
96 \r
97 \r
98 typedef union {\r
99         #if  defined(__AVR_ATtiny25__)\r
100         volatile uint8_t bytes[16];\r
101         #else\r
102         volatile uint8_t bytes[64];\r
103         #endif\r
104         struct {\r
105                 uint8_t status;  //1\r
106                 int16_t temp;  //2\r
107                 uint16_t voltage;  //4\r
108                 int16_t current;  //6\r
109                 uint8_t threshold; //8\r
110                 \r
111                 uint8_t page1[8]; //9\r
112                 \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                 union{\r
134                         uint8_t page5[8];  //41\r
135                         struct {\r
136                                 uint8_t codeVOC; // immer 0x37 nach Neustart\r
137                                 uint8_t days_of_r0; //Anzahl der Tage fuer die r0 ermittelt wird\r
138                                 int8_t corr_VOC_mult; //r0 corr\r
139                                 int8_t corr_VOC_div;\r
140                                 uint16_t vv3;\r
141                                 uint8_t time_corr; //Wiregate;\r
142                                 uint8_t reset_code;\r
143                         };\r
144                         uint16_t page5d[4];\r
145                 };\r
146                         uint8_t page6[8];  //49\r
147                 uint8_t page7[8];  //57\r
148                 \r
149         };\r
150 } pack2_t;\r
151 volatile pack2_t pack2;\r
152 \r
153 \r
154 \r
155 \r
156 volatile int16_t am2302_temp;\r
157 volatile uint16_t am2302_hum;\r
158 \r
159 \r
160 uint8_t userRegister[1];\r
161 int16_t sRH,sT;\r
162 double temperatureC,humidityRH,hhum;\r
163 double l;\r
164 \r
165 uint8_t max_adr=0;\r
166 #define CH0_M MAX1164x_C_SCAN0|MAX1164x_C_SGL\r
167 #define CH1_M MAX1164x_C_SCAN0|MAX1164x_C_SGL|MAX1164x_C_CS0\r
168 #define CH0_CH1 MAX1164x_C_SCAN0\r
169 //|MAX1164x_C_CS0\r
170 \r
171 uint16_t weekmaxarr[33];\r
172 \r
173 //Kompensieren der Abhänigkeit von RS/RO von Temperatur und Luftfeuchte\r
174 inline double interp(double t, double h) {\r
175         double h2;\r
176          double t2;\r
177         h2=h*h;\r
178         t2=t*t;\r
179         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
180 }\r
181 \r
182 double R0;\r
183 uint16_t mr;\r
184 uint8_t startup=10;\r
185 double ip;\r
186 \r
187 \r
188 int testSW(void) {\r
189         uint8_t r;\r
190         DDRB&=~(1<<PORTB0);  //Eingang\r
191          __asm__ __volatile__ ("nop"); \r
192          PORTB|=(1<<PORTB0); //Pullup\r
193          __asm__ __volatile__ ("nop"); \r
194          __asm__ __volatile__ ("nop"); \r
195          __asm__ __volatile__ ("nop"); \r
196          __asm__ __volatile__ ("nop"); \r
197          __asm__ __volatile__ ("nop"); \r
198          r=PINB&(1<<PORTB0);\r
199          __asm__ __volatile__ ("nop"); \r
200          PORTB&=~(1<<PORTB0); \r
201          __asm__ __volatile__ ("nop"); \r
202         DDRB|=(1<<PORTB0);  //Eingang\r
203         return (r==0);  //Offen mal HIH4030\r
204          \r
205          \r
206 }\r
207 \r
208 #define EEPROM_R0 0\r
209 #define EEPROM_R0d 2\r
210 #define EEPROM_R0w 4\r
211 #define EEPROM_dol 6\r
212 \r
213 #define EEPROM_CODE_DAYOFR0 8\r
214 #define EEPROM_CORR 10\r
215 #define EEPROM_FREE 12\r
216 #define EEPROM_TCORR_RESET 14\r
217 \r
218 \r
219 \r
220 uint16_t readEEPROM(uint8_t addr,uint16_t def) {\r
221         uint16_t hr;\r
222         while(EECR & (1<<EEPE));\r
223         EEARL=addr+1;\r
224         EECR |= (1<<EERE);\r
225         hr=EEDR;\r
226         if (hr!=0xFF) {\r
227                 hr=hr<<8;\r
228                 while(EECR & (1<<EEPE));\r
229                 EEARL=addr;\r
230                 EECR |= (1<<EERE);\r
231                 hr|=EEDR;\r
232                 return hr;\r
233         }\r
234         return def;\r
235 }\r
236 \r
237 void writeEEPROM(uint8_t addr,uint16_t val) {\r
238         while(EECR & (1<<EEPE));\r
239         EECR = (0<<EEPM1)|(0<<EEPM0);\r
240         EEARL = addr;\r
241         EEDR = val&0xFF;\r
242         EECR |= (1<<EEMPE);\r
243         EECR |= (1<<EEPE);\r
244         while(EECR & (1<<EEPE));\r
245         EECR = (0<<EEPM1)|(0<<EEPM0);\r
246         EEARL = addr+1;\r
247         EEDR = val>>8;\r
248         EECR |= (1<<EEMPE);\r
249         EECR |= (1<<EEPE);\r
250 }\r
251 \r
252 int main(void){\r
253     PRR|=(1<<PRADC);  // adc for save Power\r
254         PORTA=0xFF;\r
255         PORTB=0xFF-(1<<PORTB0); //Schalter kann gegen Masse sein und zieht dann immer Strom\r
256         DDRB|=(1<<PORTB0); //Als Ausgang und 0\r
257         OWINIT();\r
258         DDRB|=(1<<PINB1);//Ausgang und 1\r
259         DDRA|=(1<<PINA0);\r
260         \r
261         WDTCSR |= ((1<<WDCE) );   // Enable the WD Change Bit//| (1<<WDE)\r
262         WDTCSR |=   (1<<WDIE) |              // Enable WDT Interrupt\r
263         //(1<<WDP0) |(1<<WDP2) | (1<<WDP1);    // Set Timeout to ~2 seconds\r
264         (1<<WDP3) | (1<<WDP0);    // Set Timeout to ~8 seconds\r
265 \r
266         MCUSR=0;\r
267 \r
268         pack1.temp=0x0550;\r
269         pack1.config=0x7F;\r
270         pack1.TH=75;\r
271         pack1.TL=70;\r
272         pack1.rrFF=0xFF;\r
273         pack1.rr00=0;\r
274         pack1.rr10=0x10;\r
275 \r
276         pack2.cmode=0;\r
277         pack2.R0=readEEPROM(EEPROM_R0,1);\r
278         R0=pack2.R0/100.0;\r
279                 \r
280         pack2.r_day_max=readEEPROM(EEPROM_R0d,1);\r
281         pack2.r_week_max=readEEPROM(EEPROM_R0w,1);\r
282         pack2.tol_d=readEEPROM(EEPROM_dol,0); \r
283         pack2.tol_s8=0;  //Tag faengt mit Einschalten an\r
284         for(uint8_t i=0;i<32;i++) {\r
285                 weekmaxarr[i]=pack2.r_week_max;\r
286         }\r
287 \r
288         pack2.page5d[0]=readEEPROM(EEPROM_CODE_DAYOFR0,0x0437);\r
289         pack2.page5d[1]=readEEPROM(EEPROM_CORR,0x0101);\r
290         pack2.page5d[2]=readEEPROM(EEPROM_FREE,0x0);\r
291         pack2.page5d[3]=readEEPROM( EEPROM_TCORR_RESET,0x0005);\r
292         if (testSW()) {\r
293                 config_info2[5]=12;\r
294         }else{\r
295                 config_info2[5]=7;\r
296         }\r
297         \r
298 \r
299         USI_TWI_Master_Initialise();\r
300         \r
301         initSHT2x();\r
302         _delay_ms(100);\r
303         MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_M);//#define MAX1164x_C_CS0\r
304         _delay_ms(30); //Internal Referenz start\r
305         //2970 -> 1,5V  \r
306         gcontrol=1;\r
307         sei();\r
308         //DDRB|=(1<<PINB1);\r
309     while(1)   {\r
310                 if ((cpsp&0x80)!=0) {\r
311                         if ((cpsp&0x0F)==5) {\r
312                                 if (pack2.reset_code==0x01) {\r
313                                         pack1.config=0x7F;\r
314                                         R0=1;\r
315                                         pack2.R0=0;\r
316                                         writeEEPROM(EEPROM_R0,0);\r
317                                 } else if (pack2.reset_code==0x05) {\r
318                                         pack1.config=0x7F;\r
319                                         pack2.r_day_max=1;\r
320                                         pack2.r_week_max=1;\r
321                                         pack2.tol_d=0;\r
322                                         pack2.tol_s8=0;  //Tag faengt mit Einschalten an\r
323                                         R0=1;\r
324                                         writeEEPROM(EEPROM_R0,0xFF);\r
325                                         writeEEPROM(EEPROM_R0d,0xFF);  //Maximum des Tages\r
326                                         writeEEPROM(EEPROM_R0w,0xFF); //Maximum der Letzten 7 Tage\r
327                                         writeEEPROM(EEPROM_dol,0xFF); //Anzahl der Betriebstage\r
328                                         for(uint8_t i=0;i<pack2.days_of_r0;i++) {\r
329                                                 weekmaxarr[i]=1;\r
330                                         }\r
331 \r
332                                 } else {\r
333                                         writeEEPROM(EEPROM_CODE_DAYOFR0,0x0037|(pack2.days_of_r0<<8));\r
334                                         writeEEPROM(EEPROM_CORR,pack2.page5d[1]);\r
335                                         writeEEPROM(EEPROM_FREE,pack2.page5d[2]);\r
336                                         writeEEPROM(EEPROM_TCORR_RESET,pack2.time_corr);\r
337                                 }\r
338                         }\r
339                         cpsp=0;\r
340                 }\r
341                 /*if (pack1.config==0x1F) {  //Reset R0\r
342                         pack1.config=0x7F;\r
343                         R0=1;\r
344                         pack2.R0=0;\r
345                         writeEEPROM(EEPROM_R0,0);\r
346                 } \r
347                 if (pack1.config==0x05) {  //Reset all Data\r
348                 } */\r
349                 if (wdcounter>0) {  //8s\r
350                         pack2.tol_s8++;\r
351                         if (pack2.tol_s8>(10000))  {//10800 ist theortisch der Tag aber meistens zu lang\r
352                                 pack2.tol_s8=0;\r
353                                 pack2.tol_d++;  //rund 180 Jahre :-)\r
354                                 pack2.r_week_max=0;\r
355                                 weekmaxarr[pack2.days_of_r0]=pack2.r_day_max;\r
356                                 for(uint8_t i=0;i<pack2.days_of_r0;i++) {\r
357                                         weekmaxarr[i]=weekmaxarr[i+1];\r
358                                         //maximum of week\r
359                                         if (weekmaxarr[i]>pack2.r_week_max) pack2.r_week_max=weekmaxarr[i];\r
360                                 }\r
361                                 if (pack2.tol_d>pack2.days_of_r0) {\r
362                                         pack2.R0=pack2.r_week_max;\r
363                                 } else {\r
364                                         pack2.R0=pack2.r_day_max;\r
365                                 }\r
366                                 //R0=//R0-0.5*(pack2.R0/100-R0);\r
367                                 R0=pack2.R0/100.0;\r
368                                 pack2.R0=R0*100;\r
369                                 writeEEPROM(EEPROM_R0,pack2.R0);\r
370                                 writeEEPROM(EEPROM_R0d,pack2.r_day_max);  //Maximum des Tages\r
371                                 writeEEPROM(EEPROM_R0w,pack2.r_week_max); //Maximum der Letzten 7 Tage\r
372                                 writeEEPROM(EEPROM_dol,pack2.tol_d); //Anzahl der Betriebstage\r
373                                 pack2.r_day_max=0;\r
374                         }\r
375                         if (startup!=0) startup--;\r
376                         getSHT2xHumTemp(&temperatureC,&humidityRH);\r
377                         ip=interp(temperatureC,humidityRH);\r
378                         pack2.ip=ip*1000;\r
379                         double RH=calibr_hum(temperatureC,-0.2,humidityRH)*10.0;\r
380                         double TC =temperatureC *10.0-2;\r
381 \r
382 \r
383                         if (testSW()) {\r
384                                  am2302_hum=RH;\r
385                                  am2302_temp=TC*25.6;\r
386                                  config_info2[5]=12;    //10V = 100%\r
387                         }else{\r
388                                 hhum=(1.0546-0.000216*TC)*(RH);\r
389                                 //am2302_hum=0.318*hhum +76.0;\r
390                                 am2302_hum=0.31*hhum +80;\r
391                                 am2302_temp=TC*25.6;\r
392                                 config_info2[5]=7;\r
393                         }\r
394                         mr=0;\r
395 //Kritische Sektion !___Ein Breakpoint in dieser Section kann den TGS8100 zerstoeren!___________________________\r
396                         PORTB&=~(1<<PINB1); //Auf 0 Ziehen\r
397                         _delay_us(150);\r
398                         mr+=MAX1164x_read();\r
399                         _delay_us(150);\r
400                         mr+=MAX1164x_read();\r
401                         PORTB|=(1<<PINB1);\r
402 //ENDE Kritische Sektion !______________________________\r
403                         //l=mr/2.0*2.048/4096; \r
404                         // l maximal 2  mr max 4096  //mr 2V=8000 \r
405                         \r
406                         if (pack2.cmode) { //cmode=0 V 0..2 V cmode=1 V 1.5..3.5V\r
407                                 //l+=1.5; //Spannung real\r
408                                 mr+=6000;\r
409                         } \r
410                         //if (l>1.8) {\r
411                         if (mr>7200) {                          \r
412                                 if (pack2.cmode==0) {\r
413                                         MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_CH1);\r
414                                         pack2.cmode=1;\r
415                                 }\r
416                         }\r
417                         //if (l<1.6) {\r
418                         if (mr<6400) {  \r
419                                 if (pack2.cmode==1) {\r
420                                         MAX1164x_config(MAX1164x_S_SEL2|MAX1164x_S_SEL0,CH0_M);\r
421                                         pack2.cmode=0;\r
422                                 }\r
423                                 \r
424                                 \r
425                         }\r
426                         pack2.VS=mr*5/2;\r
427                         l=mr/4000.0;\r
428                         l=( 3/l- 1) *30;\r
429                         pack2.current=l*100;\r
430                         \r
431                         l=l/ip;\r
432                         \r
433                         if (startup==0){\r
434                                 if (l>R0) {\r
435                                         R0=l;\r
436                                         pack2.R0=R0*100;\r
437                                         writeEEPROM(EEPROM_R0,pack2.R0);\r
438 \r
439                                 }\r
440                                 if (l*100>pack2.r_day_max) {\r
441                                         pack2.r_day_max=l*100;\r
442                                 }\r
443                         } else if (l<R0) l=R0; //negative Werte am Anfang verhintern\r
444                         //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
445                         //l=l*(double)pack2.corr_VOC_mult/(double)pack2.corr_VOC_div;\r
446                         //l=pow(R0/l,1.8)*3-3;\r
447                         if (l!=0) {\r
448                                 l=R0/l;\r
449                                 l=l*l*12-12;\r
450                                 l=l*(double)pack2.corr_VOC_mult/(double)pack2.corr_VOC_div;\r
451                                 l=l*8.0; //fuer DS18B20*/\r
452                         }\r
453 \r
454                         //l=(l/R0*100.0); \r
455                         wdcounter=0;\r
456                         \r
457                 }\r
458         \r
459                 if (gcontrol==1) {\r
460                         uint16_t w=l;\r
461                         uint8_t t8=w>>4;\r
462                         uint8_t af=0;\r
463                         if (t8>pack1.TH) af=1;\r
464                         if (t8<=pack1.TL) af=1; \r
465                         cli();\r
466                         pack1.temp=w;\r
467                         //pack.temp++;\r
468                         alarmflag=af;\r
469                         sei();                  \r
470                         EXTERN_SLEEP();         \r
471                 }\r
472                 if ((gcontrol==2)||(gcontrol==3)) {\r
473                         gcontrol=0;\r
474                         \r
475                 }\r
476 \r
477                 \r
478 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)\r
479                         if (((TIMSK & (1<<TOIE0))==0)&& (mode==0))\r
480 #endif                  \r
481 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) ||defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)\r
482                         if (((TIMSK0 & (1<<TOIE0))==0)&& (mode==0))\r
483 #endif\r
484                           {\r
485 \r
486                         MCUCR|=(1<<SE)|(1<<SM1);\r
487                         MCUCR&=~(1<<ISC01);\r
488                 } else {\r
489                         MCUCR|=(1<<SE);\r
490                         MCUCR&=~(1<<SM1);\r
491                 }\r
492                 asm("SLEEP");\r
493    }\r
494 \r
495 \r
496 }\r