1 // Copyright (c) 2017, Tobias Mueller tm(at)tm3d.de
\r
2 // All rights reserved.
\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
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
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
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
33 //!!!!!Max Program size 7551 Byte
\r
35 #define F_CPU 8000000UL
\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
46 extern void OWINIT(void);
\r
47 extern void EXTERN_SLEEP(void);
\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
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
58 #error "Variable not correct"
\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 extern uint8_t cpsp;
\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
75 if (reset_indicator==1) reset_indicator++;
\r
76 else if (reset_indicator==2) mode=0;
\r
82 volatile uint8_t bytes[8];
\r
93 volatile pack1_t pack1;
\r
98 #if defined(__AVR_ATtiny25__)
\r
99 volatile uint8_t bytes[16];
\r
101 volatile uint8_t bytes[64];
\r
104 uint8_t status; //1
\r
106 uint16_t voltage; //4
\r
107 int16_t current; //6
\r
108 uint8_t threshold; //8
\r
110 uint8_t page1[8]; //9
\r
111 #if defined(__AVR_ATtiny25__)
\r
113 uint8_t page2[8]; //17
\r
115 uint8_t page3[8]; //25
\r
126 uint8_t page4[8]; //33
\r
130 uint16_t r_day_max;
\r
131 uint16_t r_week_max;
\r
135 uint8_t page5[8]; //41
\r
137 uint8_t codeVOC; // immer 0x37 nach Neustart
\r
138 uint8_t days_of_r0; //Anzahl der Tage fuer die r0 ermittelt wird
\r
139 int8_t corr_VOC_mult; //r0 corr
\r
140 int8_t corr_VOC_div;
\r
142 uint8_t time_corr; //Wiregate;
\r
143 uint8_t reset_code;
\r
145 uint16_t page5d[4];
\r
147 uint8_t page6[8]; //49
\r
148 uint8_t page7[8]; //57
\r
153 volatile pack2_t pack2;
\r
158 volatile int16_t am2302_temp;
\r
159 volatile uint16_t am2302_hum;
\r
162 uint8_t userRegister[1];
\r
164 double temperatureC,humidityRH,hhum;
\r
168 uint16_t weekmaxarr[33];
\r
170 //Kompensieren der Abhänigkeit von RS/RO von Temperatur und Luftfeuchte
\r
171 inline double interp(double t, double h) {
\r
176 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
181 uint8_t startup=10;
\r
188 DDRB&=~(1<<PORTB0); //Eingang
\r
189 __asm__ __volatile__ ("nop");
\r
190 PORTB|=(1<<PORTB0); //Pullup
\r
191 __asm__ __volatile__ ("nop");
\r
192 __asm__ __volatile__ ("nop");
\r
193 __asm__ __volatile__ ("nop");
\r
194 __asm__ __volatile__ ("nop");
\r
195 __asm__ __volatile__ ("nop");
\r
196 r=PINB&(1<<PORTB0);
\r
197 __asm__ __volatile__ ("nop");
\r
198 PORTB&=~(1<<PORTB0);
\r
199 __asm__ __volatile__ ("nop");
\r
200 DDRB|=(1<<PORTB0); //Eingang
\r
201 return (r==0); //Offen mal HIH4030
\r
207 #define EEPROM_R0 0
\r
208 #define EEPROM_R0d 2
\r
209 #define EEPROM_R0w 4
\r
210 #define EEPROM_dol 6
\r
211 #define EEPROM_CODE_DAYOFR0 8
\r
212 #define EEPROM_CORR 10
\r
213 #define EEPROM_FREE 12
\r
214 #define EEPROM_TCORR_RESET 14
\r
216 uint16_t readEEPROM(uint8_t addr,uint16_t def) {
\r
218 while(EECR & (1<<EEPE));
\r
224 while(EECR & (1<<EEPE));
\r
233 void writeEEPROM(uint8_t addr,uint16_t val) {
\r
234 while(EECR & (1<<EEPE));
\r
235 EECR = (0<<EEPM1)|(0<<EEPM0);
\r
238 EECR |= (1<<EEMPE);
\r
240 while(EECR & (1<<EEPE));
\r
241 EECR = (0<<EEPM1)|(0<<EEPM0);
\r
244 EECR |= (1<<EEMPE);
\r
249 PORTA=0xFF-(1<<PINA1);
\r
250 PORTB=0xFF-(1<<PORTB0); //Schalter kann gegen Masse sein und zieht dann immer Strom
\r
251 DDRB|=(1<<PORTB0); //Als Ausgang und 0
\r
253 DDRB|=(1<<PINB1);//Ausgang und 1
\r
256 WDTCSR |= ((1<<WDCE) ); // Enable the WD Change Bit//| (1<<WDE)
\r
257 WDTCSR |= (1<<WDIE) | // Enable WDT Interrupt
\r
258 //(1<<WDP0) |(1<<WDP2) | (1<<WDP1); // Set Timeout to ~2 seconds
\r
259 (1<<WDP3) | (1<<WDP0); // Set Timeout to ~8 seconds
\r
263 //ADMUX=0b00001110; //ADC1 + ADC3 -
\r
264 ADMUX=0x01 ; //PA3 single and 3V
\r
265 ADCSRA = (1<<ADEN)|(1<<ADPS1)|(1<<ADPS0);//|
\r
274 pack2.page3[0]=0xF1;
\r
276 pack2.R0=readEEPROM(EEPROM_R0,1);
\r
279 pack2.r_day_max=readEEPROM(EEPROM_R0d,1);
\r
280 pack2.r_week_max=readEEPROM(EEPROM_R0w,1);
\r
281 pack2.tol_d=readEEPROM(EEPROM_dol,0);
\r
282 pack2.tol_s8=0; //Tag faengt mit Einschalten an
\r
284 pack2.page5d[0]=readEEPROM(EEPROM_CODE_DAYOFR0,0x0437);
\r
285 pack2.page5d[1]=readEEPROM(EEPROM_CORR,0x0101);
\r
286 pack2.page5d[2]=readEEPROM(EEPROM_FREE,0x0);
\r
287 pack2.page5d[3]=readEEPROM( EEPROM_TCORR_RESET,0x0005);
\r
289 for(uint8_t i=0;i<pack2.days_of_r0;i++) {
\r
290 weekmaxarr[i]=pack2.r_week_max;
\r
295 config_info2[5]=12;
\r
300 USI_TWI_Master_Initialise();
\r
307 /*if (pack1.config==0x1F) { //Reset R0
\r
311 writeEEPROM(EEPROM_R0,0);
\r
313 if (pack1.config==0x05) { //Reset all Data
\r
316 pack2.r_week_max=1;
\r
318 pack2.tol_s8=0; //Tag faengt mit Einschalten an
\r
320 writeEEPROM(EEPROM_R0,0xFF);
\r
321 writeEEPROM(EEPROM_R0d,0xFF); //Maximum des Tages
\r
322 writeEEPROM(EEPROM_R0w,0xFF); //Maximum der Letzten 7 Tage
\r
323 writeEEPROM(EEPROM_dol,0xFF); //Anzahl der Betriebstage
\r
324 for(uint8_t i=0;i<7;i++) {
\r
328 if ((cpsp&0x80)!=0) {
\r
329 if ((cpsp&0x0F)==5) {
\r
330 if (pack2.reset_code==0x01) {
\r
333 writeEEPROM(EEPROM_R0,0);
\r
334 } else if (pack2.reset_code==0x05) {
\r
336 pack2.r_week_max=1;
\r
338 pack2.tol_s8=0; //Tag faengt mit Einschalten an
\r
340 writeEEPROM(EEPROM_R0,0xFF);
\r
341 writeEEPROM(EEPROM_R0d,0xFF); //Maximum des Tages
\r
342 writeEEPROM(EEPROM_R0w,0xFF); //Maximum der Letzten 7 Tage
\r
343 writeEEPROM(EEPROM_dol,0xFF); //Anzahl der Betriebstage
\r
344 for(uint8_t i=0;i<7;i++) {
\r
348 writeEEPROM(EEPROM_CODE_DAYOFR0,0x0037|(pack2.days_of_r0<<8));
\r
349 writeEEPROM(EEPROM_CORR,pack2.page5d[1]);
\r
350 writeEEPROM(EEPROM_FREE,pack2.page5d[2]);
\r
351 writeEEPROM(EEPROM_TCORR_RESET,pack2.time_corr);
\r
356 if (wdcounter>0) { //8s
\r
358 if (pack2.tol_s8>(10000)) {//10800 ist theortisch der Tag aber meistens zu lang
\r
360 pack2.tol_d++; //rund 180 Jahre :-)
\r
361 pack2.r_week_max=0;
\r
362 weekmaxarr[pack2.days_of_r0]=pack2.r_day_max;
\r
363 for(uint8_t i=0;i<pack2.days_of_r0;i++) {
\r
364 weekmaxarr[i]=weekmaxarr[i+1];
\r
366 if (weekmaxarr[i]>pack2.r_week_max) pack2.r_week_max=weekmaxarr[i];
\r
368 if (pack2.tol_d>7) {
\r
369 pack2.R0=pack2.r_week_max;
\r
371 pack2.R0=pack2.r_day_max;
\r
373 //R0=//R0-0.5*(pack2.R0/100-R0);
\r
374 R0=R0-(R0-pack2.R0/100.0)*0.5 ;
\r
376 writeEEPROM(EEPROM_R0,pack2.R0);
\r
377 writeEEPROM(EEPROM_R0d,pack2.r_day_max); //Maximum des Tages
\r
378 writeEEPROM(EEPROM_R0w,pack2.r_week_max); //Maximum der Letzten 7 Tage
\r
379 writeEEPROM(EEPROM_dol,pack2.tol_d); //Anzahl der Betriebstage
\r
382 if (startup!=0) startup--;
\r
383 getSHT2xHumTemp(&temperatureC,&humidityRH);
\r
384 ip=interp(temperatureC,humidityRH);
\r
386 //double RH=calibr_hum(temperatureC,-0.2,humidityRH)*10.0;
\r
387 //double TC =temperatureC *10.0-2;
\r
388 double RH=humidityRH*10.0;
\r
389 double TC=temperatureC*10.0;
\r
394 am2302_temp=TC*25.6;
\r
395 config_info2[5]=12; //10V = 100%
\r
397 hhum=(1.0546-0.000216*TC)*(RH);
\r
398 //am2302_hum=0.318*hhum +76.0;
\r
399 am2302_hum=0.31*hhum +80;
\r
400 am2302_temp=TC*25.6;
\r
404 //Kritische Sektion !___Ein Breakpoint in dieser Section kann den TGS8100 zerstoeren!___________________________
\r
405 PORTB&=~(1<<PINB1); //Auf 0 Ziehen
\r
407 for(uint8_t i=0;i<32;i++) {
\r
409 while ((ADCSRA&(1<<ADSC)));
\r
413 //ENDE Kritische Sektion !______________________________
\r
415 pack2.VS=mr*3/128; //VS in Volt = VS/256
\r
416 l=mr*3.0/32768.0; //Spannung in v
\r
417 l=( 3/l- 1) *30; //l is resistance
\r
419 la[0]=la[1]=la[2]=la[3]=l; //smaller code
\r
427 double lasum=la[0]+la[1]+la[2]+la[3];
\r
430 pack2.current=l*100;
\r
438 writeEEPROM(EEPROM_R0,pack2.R0);
\r
441 if (l*100>pack2.r_day_max) {
\r
442 pack2.r_day_max=l*100;
\r
444 } else if (l<R0) l=R0; //negative Werte am Anfang verhintern
\r
445 //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
446 //l=pow(R0/l,1.8)*3-3;
\r
450 l=exp((1-(1/l))*6.05)-1;
\r
451 l=l*(double)pack2.corr_VOC_mult/(double)pack2.corr_VOC_div;
\r
452 l=l*8.0; //fuer DS18B20*/
\r
463 if (t8>pack1.TH) af=1;
\r
464 if (t8<=pack1.TL) af=1;
\r
472 if ((gcontrol==2)||(gcontrol==3)) {
\r
478 #if defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__) || defined(__AVR_ATtiny85__)
\r
479 if (((TIMSK & (1<<TOIE0))==0)&& (mode==0))
\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
486 MCUCR|=(1<<SE)|(1<<SM1);
\r
487 MCUCR&=~(1<<ISC01);
\r