Many changes from 2018
[owSlave2.git] / DS2450_ADC / DS2450.c
diff --git a/DS2450_ADC/DS2450.c b/DS2450_ADC/DS2450.c
new file mode 100644 (file)
index 0000000..2dc7006
--- /dev/null
@@ -0,0 +1,305 @@
+\r
+// Copyright (c) 2017, Tobias Mueller tm(at)tm3d.de\r
+// All rights reserved.\r
+//\r
+// Redistribution and use in source and binary forms, with or without\r
+// modification, are permitted provided that the following conditions are\r
+// met:\r
+//\r
+//  * Redistributions of source code must retain the above copyright\r
+//    notice, this list of conditions and the following disclaimer.\r
+//  * Redistributions in binary form must reproduce the above copyright\r
+//    notice, this list of conditions and the following disclaimer in the\r
+//    documentation and/or other materials provided with the\r
+//    distribution.\r
+//  * All advertising materials mentioning features or use of this\r
+//    software must display the following acknowledgement: This product\r
+//    includes software developed by tm3d.de and its contributors.\r
+//  * Neither the name of tm3d.de nor the names of its contributors may\r
+//    be used to endorse or promote products derived from this software\r
+//    without specific prior written permission.\r
+//\r
+// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS\r
+// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT\r
+// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR\r
+// A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT\r
+// OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,\r
+// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT\r
+// LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,\r
+// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\r
+// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT\r
+// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE\r
+// OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.\r
+\r
+#define F_CPU 8000000UL\r
+#include <avr/io.h>\r
+#include <avr/interrupt.h>\r
+#include <util/delay.h>\r
+#include <avr/wdt.h>\r
+#include <avr/sleep.h>\r
+#include <avr/pgmspace.h>\r
+#include "../common/owSlave_tools.h"\r
+\r
+\r
+OWST_EXTERN_VARS\r
+\r
+uint8_t owid[8]={0x20, 0xA2, 0xD9, 0x84, 0x00, 0x16, 0x02, 0x5D};/**/\r
+uint8_t config_info[26]={0x06,0x09,0x06,9,0x06,9,0x06,9,0x02,20,20,20,20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};\r
+\r
+OWST_WDT_ISR\r
+\r
+\r
+typedef union {\r
+       volatile uint8_t bytes[0x20];\r
+       struct {\r
+               //Page0\r
+               uint16_t A;  //0\r
+               uint16_t B;  //2\r
+               uint16_t C;  //4\r
+               uint16_t D;  //6\r
+               //Page1\r
+               uint8_t CSA1;\r
+               uint8_t CSA2;\r
+               uint8_t CSB1;\r
+               uint8_t CSB2;\r
+               uint8_t CSC1;\r
+               uint8_t CSC2;\r
+               uint8_t CSD1;\r
+               uint8_t CSD2;\r
+               //Page2\r
+               uint8_t LA;\r
+               uint8_t HA;\r
+               uint8_t LB;\r
+               uint8_t HB;\r
+               uint8_t LC;\r
+               uint8_t HC;\r
+               uint8_t LD;\r
+               uint8_t HD;\r
+               //Page3\r
+               uint8_t FC1;\r
+               uint8_t FC2;\r
+               uint8_t FC3;\r
+               uint8_t FC4;\r
+               uint8_t VCCP;\r
+               uint8_t FC5;\r
+               uint8_t FC6;\r
+               uint8_t FC7;\r
+               uint8_t convc1;\r
+               uint8_t convc2;\r
+               \r
+               \r
+       };\r
+} pack_t;\r
+volatile pack_t pack;\r
+\r
+OWST_ADC_CONF16_FUNC\r
+OWST_ADC_CONF16_OSS_FUNC\r
+OWST_TESTSW\r
+\r
+#define LPIN_CH2 (1<<PINB1)\r#define LDD_CH2 DDRB\r#define LPORT_CH2 PORTB\r#define LED2_ON LPORT_CH2&=~LPIN_CH2;\r
+#define LED2_OFF LPORT_CH2|=LPIN_CH2;\r
+\r
+int main(void){\r
+       pack.A=0;\r
+       pack.B=0;\r
+       pack.C=0;\r
+       pack.D=0;\r
+       pack.CSA1=0x08;\r
+       pack.CSA2=0x8C;\r
+       pack.CSB1=0x08;\r
+       pack.CSB2=0x8C;\r
+       pack.CSC1=0x08;\r
+       pack.CSC2=0x8C;\r
+       pack.CSD1=0x08;\r
+       pack.CSD2=0x8C;\r
+       pack.HA=0xFF;\r
+       pack.LA=0x00;\r
+       pack.HB=0xFF;\r
+       pack.LB=0x00;\r
+       pack.HC=0xFF;\r
+       pack.LC=0x00;\r
+       pack.HD=0xFF;\r
+       pack.LD=0x00;\r
+       pack.VCCP=0;\r
+       OWST_INIT_ADC_ON\r
+       OWINIT();\r
+\r
+       OWST_WDR_CONFIG8\r
+       gcontrol=1;\r
+       OWST_INIT_ADC\r
+       AD_DDR&=~(1<<PINA0);\r
+       AD_PORT&=~(1<<PINA0);\r
+       AD_DDR&=~(1<<PINA1);\r
+       AD_PORT&=~(1<<PINA1);\r
+       AD_DDR&=~(1<<PINA3);\r
+       AD_PORT&=~(1<<PINA3);\r
+       AD_DDR&=~(1<<PINA7);\r
+       AD_PORT&=~(1<<PINA7);\r
+       DIDR0|=((1<<ADC7D)|(1<<ADC3D)|(1<<ADC1D)|(1<<ADC0D));\r
+       sei();\r
+       wdcounter=5;\r
+       //DDRB|=(1<<PINB1);\r
+       LDD_CH2 |=LPIN_CH2;\r
+       volatile double VCC;\r
+       volatile double VAD_A,VAD_B,VAD_C,VAD_D;\r
+    while(1)   {\r
+               if (wdcounter>3) {\r
+                       LED2_ON\r
+                       wdcounter=0;\r
+                       ADMUX=OWST_ADCIN_REFINT;\r
+                       _delay_us(100);\r
+                       VCC=owst_ADC_runf();\r
+                       VCC=(1.079*65472.0)/VCC;\r
+                       //if (VCC>5.1) VCC=5.1;\r
+                       //VAD=VCC*65535.0/5.1;\r
+                       //if (VAD>65535) VAD=65535;\r
+                       if (testSW()) {  //Zwei differential Eingaenge\r
+                               VAD_C=0;\r
+                               ADMUX=0b001000; //ADC0 + ADC1 - Gain 1\r
+                               _delay_us(100);\r
+                               VAD_A=owst_ADC_runf();\r
+                               if (VAD_A<3100) {\r
+                                       ADMUX=0b001001; //ADC0 + ADC1 - Gain 20\r
+                                       _delay_us(100);\r
+                                       VAD_A=owst_ADC_runf();\r
+                                       VAD_A=VCC/20.0*VAD_A/65472.0;\r
+                                       //VAD_A=VCC/20.0;\r
+                                       VAD_C+=12850;\r
+                               } else {\r
+                                       VAD_A=owst_ADC_OSS_runf();\r
+                                       VAD_A=VCC*VAD_A/65472.0;\r
+                                       VAD_C+=0;\r
+                               }\r
+                               if (pack.CSA2&0x01) VAD_A=VAD_A*65535.0/5.1; else VAD_A=VAD_A*65535.0/2.55;\r
+                               if (VAD_A>65535) VAD_A=65535;\r
+                               ///_------------------------ B---------------------\r
+                               ADMUX=0b011000; //ADC3 + ADC7 - Gain 1\r
+                               _delay_us(100);\r
+                               VAD_B=owst_ADC_runf();\r
+                               if (VAD_B<3100) {\r
+                                       ADMUX=0b011001; //ADC3 + ADC7 - Gain 20\r
+                                       _delay_us(100);\r
+                                       VAD_B=owst_ADC_runf();\r
+                                       VAD_B=VCC/20.0*VAD_B/65472.0;\r
+                                       //VAD_B=VAD_B20.0;\r
+                                       VAD_C+=12850*2;\r
+                               } else {\r
+                                       VAD_B=owst_ADC_OSS_runf();\r
+                                       VAD_B=VCC*VAD_B/65472.0;\r
+                                       VAD_C+=0;\r
+                               }\r
+                               if (pack.CSB2&0x01) VAD_B=VAD_B*65535.0/5.1; else VAD_B=VAD_B*65535.0/2.55;\r
+                               //VAD_B=VAD_B*65535.0/5.1;\r
+                               if (VAD_B>65535) VAD_B=65535;\r
+                               VAD_D=VCC*65535.0/5.1;\r
+                               if (VAD_D>65535) VAD_D=65535;\r
+\r
+                       } else { // 4 Eingaenge gegen Masse\r
+                               ADMUX=OWST_ADCIN_PA0;\r
+                               _delay_us(100);\r
+                               VAD_A=owst_ADC_OSS_runf();\r
+                               VAD_A=VCC*VAD_A/65472.0;\r
+                               if (pack.CSA2&0x01) VAD_A=VAD_A*65535.0/5.1; else VAD_A=VAD_A*65535.0/2.55;\r
+                               if (VAD_A>65535) VAD_A=65535;\r
+\r
+                               ADMUX=OWST_ADCIN_PA1;\r
+                               _delay_us(100);\r
+                               VAD_B=owst_ADC_OSS_runf();\r
+                               VAD_B=VCC*VAD_B/65472.0;\r
+                               if (pack.CSB2&0x01) VAD_B=VAD_B*65535.0/5.1; else VAD_B=VAD_B*65535.0/2.55;\r
+                               if (VAD_B>65535) VAD_B=65535;\r
+\r
+                               ADMUX=OWST_ADCIN_PA3;\r
+                               _delay_us(100);\r
+                               VAD_C=owst_ADC_OSS_runf();\r
+                               VAD_C=VCC*VAD_C/65472.0;\r
+                               if (pack.CSC2&0x01) VAD_C=VAD_C*65535.0/5.1; else VAD_C=VAD_C*65535.0/2.55;\r
+                               if (VAD_C>65535) VAD_C=65535;\r
+\r
+                               ADMUX=OWST_ADCIN_PA7;\r
+                               _delay_us(100);\r
+                               VAD_D=owst_ADC_OSS_runf();\r
+                               VAD_D=VCC*VAD_D/65472.0;\r
+                               if (pack.CSD2&0x01) VAD_D=VAD_D*65535.0/5.1; else VAD_D=VAD_D*65535.0/2.55;\r
+                               if (VAD_D>65535) VAD_D=65535;\r
+                       }\r
+                       LED2_OFF\r
+\r
+\r
+               }\r
+\r
+               if (gcontrol) {\r
+                       //PORTB|=(1<<PINB1);\r
+                       uint8_t bb=1;\r
+                       uint8_t bb1=1;\r
+                       for(uint8_t i=0;i<4;i++){ //Initialisieren mit 0 oder FF oder letzter Wert\r
+                               if (pack.convc1&bb1) {\r
+                                       if (pack.convc2&(bb)) {pack.bytes[i*2]=0;pack.bytes[i*2+1]=0;}\r
+                                       bb=bb<<1;\r
+                                       if (pack.convc2&(bb)) {pack.bytes[i*2]=0xFF;pack.bytes[i*2+1]=0xFF;}\r
+                                       bb=bb<<1;\r
+                               } else bb=bb<<2;\r
+                               bb1=bb1<<1;                             \r
+                       }\r
+                       //CHanel A\r
+                       if (pack.convc1&1) {\r
+                               //if (pack.CSA2&0x01)   ADMUX=0; else ADMUX=0x80;\r
+                               cli();pack.A=VAD_A;sei();\r
+                               alarmflag=0;\r
+                               if (pack.CSA2&0x08)  //AEH\r
+                                       if (pack.bytes[1]>pack.HA) {alarmflag=1;pack.CSA2|=0x20;}\r
+                               if (pack.CSA2&0x04)  //AEL\r
+                                       if (pack.bytes[1]<pack.LA) {alarmflag=1;pack.CSA2|=0x10;}\r
+                       }\r
+\r
+                       if (pack.convc1&2) {\r
+                               //if (pack.CSB2&0x01)   ADMUX=1; else ADMUX=0x81;\r
+                               cli();pack.B=VAD_B;sei();\r
+                               if (pack.CSB2&0x08)  //AEH\r
+                                       if (pack.bytes[1]>pack.HB) {alarmflag=1;pack.CSB2|=0x20;}\r
+                               if (pack.CSB2&0x04)  //AEL\r
+                                       if (pack.bytes[1]<pack.LB) {alarmflag=1;pack.CSB2|=0x10;}\r
+                       }\r
+\r
+                       if (pack.convc1&4) {\r
+                               //if (pack.CSC2&0x01)   ADMUX=2; else ADMUX=0x82;\r
+                               cli();pack.C=VAD_C;sei();\r
+                               if (pack.CSC2&0x08)  //AEH\r
+                                       if (pack.bytes[1]>pack.HC) {alarmflag=1;pack.CSC2|=0x20;}\r
+                               if (pack.CSC2&0x04)  //AEL\r
+                                       if (pack.bytes[1]<pack.LC) {alarmflag=1;pack.CSC2|=0x10;}\r
+                       } \r
+                       if (pack.convc1&8) {\r
+                               cli();pack.D=VAD_D;sei();\r
+                               if (pack.CSD2&0x08)  //AEH\r
+                                       if (pack.bytes[1]>pack.HD) {alarmflag=1;pack.CSD2|=0x20;}\r
+                               if (pack.CSD2&0x04)  //AEL\r
+                                       if (pack.bytes[1]<pack.LD) {alarmflag=1;pack.CSD2|=0x10;}\r
+                       }\r
+                       \r
+                       EXTERN_SLEEP();\r
+                       //PORTB&=~(1<<PINB1);\r
+               }\r
+\r
+               uint8_t bb=1;\r
+               for(volatile uint8_t i=0;i<4;i++) {\r
+                       if (pack.bytes[8+i*2]&0x80) {  //Chanel as output\r
+                               if (pack.bytes[8+i*2]&0x40) {\r
+                               //      AD_DDR|=bb;\r
+                               } else {\r
+                                       cli();\r
+                               //      AD_DDR&=~bb;\r
+                                       sei();\r
+                               }\r
+                       } else {\r
+                               cli();\r
+                       //      AD_DDR&=~bb;\r
+                               sei();\r
+                       }\r
+                       bb=bb*2;\r
+               }\r
+               OWST_MAIN_END \r
+   }\r
+\r
+\r
+}
\ No newline at end of file