Rev 2827 Rev 2828
1 /**** Automatic weather station 01A ****/ 1 /**** Automatic weather station 01A ****/
2 #define VERSION "0.1" 2 #define VERSION "0.1"
3 #define ID "$Id: main.c 2827 2013-03-10 15:45:11Z kaklik $" 3 #define ID "$Id: main.c 2828 2013-03-10 15:49:54Z kaklik $"
4 #include "main.h" 4 #include "main.h"
-   5 #include ".\common\dbloader.h"
5 #include <string.h> 6 #include <string.h>
6   7  
7 #CASE // Case sensitive compiler 8 #CASE // Case sensitive compiler
8   9  
9 #define SEND_DELAY 50 // Time between two characters on RS232 10 #define SEND_DELAY 50 // Time between two characters on RS232
10   11  
11 char VER[4]=VERSION; // Buffer for concatenate of a version string 12 char VER[4]=VERSION; // Buffer for concatenate of a version string
12   13  
13 #define ONE_WIRE_PIN PIN_B1 // DS18B20 sensor connection 14 #define ONE_WIRE_PIN PIN_B1 // DS18B20 sensor connection
14 #include "..\ds1820.c" 15 #include "..\ds1820.c"
15   16  
16 #define sht_data_pin PIN_D0 // SHT11 sensor connection 17 #define sht_data_pin PIN_D0 // SHT11 sensor connection
17 #define sht_clk_pin PIN_D1 18 #define sht_clk_pin PIN_D1
18 #include "..\SHT.c" 19 #include "..\SHT.c"
19   20  
20 #define CSN_SPI PIN_C2 // preassure sensor connection 21 #define CSN_SPI PIN_C2 // preassure sensor connection
21 #include "..\MPL115A1.c" 22 #include "..\MPL115A1.c"
22   23  
23 unsigned int16 timer0_overflow_count=0; 24 unsigned int16 timer0_overflow_count=0;
24 float anemo=0; 25 float anemo=0;
25   26  
26   27  
27 #int_TIMER1 28 #int_TIMER1
28 void TIMER1_isr(void) 29 void TIMER1_isr(void)
29 { 30 {
30 output_toggle(PIN_D1); 31 output_toggle(PIN_D1);
31 anemo = ((timer0_overflow_count * 0xFF) + get_timer0())/(32768.0/0xFFFF); 32 anemo = ((timer0_overflow_count * 0xFF) + get_timer0())/(32768.0/0xFFFF);
32 timer0_overflow_count=0; 33 timer0_overflow_count=0;
33 set_timer0(0); 34 set_timer0(0);
34 } 35 }
35   36  
36 #int_TIMER0 37 #int_TIMER0
37 void TIMER0_isr(void) 38 void TIMER0_isr(void)
38 { 39 {
39 timer0_overflow_count++; 40 timer0_overflow_count++;
40 } 41 }
41   42  
42   43  
43   44  
44 void welcome(void) // Welcome message 45 void welcome(void) // Welcome message
45 { 46 {
46 char REV[50]=ID; // Buffer for concatenate of a version string 47 char REV[50]=ID; // Buffer for concatenate of a version string
47   48  
48 if (REV[strlen(REV)-1]=='$') REV[strlen(REV)-1]=0; 49 if (REV[strlen(REV)-1]=='$') REV[strlen(REV)-1]=0;
49 printf("\r\n\r\n# AWS01A %s (C) 2013 www.mlab.cz \r\n",VER); // Welcome message 50 printf("\r\n\r\n# AWS01A %s (C) 2013 www.mlab.cz \r\n",VER); // Welcome message
50 printf("#%s\r\n",&REV[4]); 51 printf("#%s\r\n",&REV[4]);
51 printf("# ver seq temp[K] hum_temp[K] hum[%%] "); 52 printf("# ver seq temp[K] hum_temp[K] hum[%%] ");
52 printf("bar_temp[K] pressure[hPa] check\r\n\r\n"); 53 printf("bar_temp[K] pressure[hPa] check\r\n\r\n");
53   54  
54 restart_wdt(); //---WDT 55 restart_wdt(); //---WDT
55 } 56 }
56   57  
57 void main() 58 void main()
58 { 59 {
59 unsigned int16 seq=0; 60 unsigned int16 seq=0;
60   61  
61 setup_adc_ports(NO_ANALOGS|VSS_VDD); 62 setup_adc_ports(NO_ANALOGS|VSS_VDD);
62 setup_adc(ADC_CLOCK_DIV_2); 63 setup_adc(ADC_CLOCK_DIV_2);
63 setup_timer_0(RTCC_EXT_L_TO_H|RTCC_DIV_1); 64 setup_timer_0(RTCC_EXT_L_TO_H|RTCC_DIV_1);
64 setup_timer_1(T1_EXTERNAL|T1_DIV_BY_1|T1_CLK_OUT); 65 setup_timer_1(T1_EXTERNAL|T1_DIV_BY_1|T1_CLK_OUT);
65 setup_timer_2(T2_DISABLED,0,1); 66 setup_timer_2(T2_DISABLED,0,1);
66 setup_ccp1(CCP_OFF); 67 setup_ccp1(CCP_OFF);
67 setup_comparator(NC_NC_NC_NC); // This device COMP currently not supported by the PICWizard 68 setup_comparator(NC_NC_NC_NC); // This device COMP currently not supported by the PICWizard
68 setup_oscillator(OSC_8MHZ); 69 setup_oscillator(OSC_8MHZ);
69 setup_wdt(WDT_1152MS|WDT_DIV_16); 70 setup_wdt(WDT_1152MS|WDT_DIV_16);
70 setup_spi(SPI_MASTER | SPI_MODE_0 | SPI_CLK_DIV_64); 71 setup_spi(SPI_MASTER | SPI_MODE_0 | SPI_CLK_DIV_64);
71 output_high(CSN_SPI); 72 output_high(CSN_SPI);
72   73  
73   74  
74 delay_ms(100); 75 delay_ms(100);
75   76  
76 welcome(); 77 welcome();
77   78  
78 sht_init(); 79 sht_init();
79 MPL_init(); // get correction coefficients from the sensor 80 MPL_init(); // get correction coefficients from the sensor
80   81  
81 enable_interrupts(INT_TIMER1); // interrupts used for anemometer readings 82 enable_interrupts(INT_TIMER1); // interrupts used for anemometer readings
82 enable_interrupts(INT_TIMER0); 83 enable_interrupts(INT_TIMER0);
83 enable_interrupts(GLOBAL); 84 enable_interrupts(GLOBAL);
84   85  
85 while (TRUE) 86 while (TRUE)
86 { 87 {
87 char output[8]; // Output buffer 88 char output[8]; // Output buffer
88 int8 j; // String pointer 89 int8 j; // String pointer
89 int8 check=0; // Checksum is calculated between '$' and '*' 90 int8 check=0; // Checksum is calculated between '$' and '*'
90 float SHT_temp,SHT_hum; 91 float SHT_temp,SHT_hum;
91 float local_temp; 92 float local_temp;
92 float barometer_temperature, barometer_pressure; 93 float barometer_temperature, barometer_pressure;
93   94  
94 delay_ms(100); 95 delay_ms(100);
95 { // printf 96 { // printf
96   97  
97 local_temp = ds1820_read()+273.15; 98 local_temp = ds1820_read()+273.15;
98 sht_rd(SHT_temp,SHT_hum); 99 sht_rd(SHT_temp,SHT_hum);
99 SHT_temp += 273.15; 100 SHT_temp += 273.15;
100 // barometer_temperature = MPL_get_temperature() + 273.15; 101 // barometer_temperature = MPL_get_temperature() + 273.15;
101 // barometer_pressure = MPL_get_pressure() * 10.0; // conversion to hectopascals 102 // barometer_pressure = MPL_get_pressure() * 10.0; // conversion to hectopascals
102 103
103 delay_us(SEND_DELAY); 104 delay_us(SEND_DELAY);
104 putc('$'); 105 putc('$');
105 delay_us(SEND_DELAY); 106 delay_us(SEND_DELAY);
106 sprintf(output,"AWS%s \0",VER); 107 sprintf(output,"AWS%s \0",VER);
107 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 108 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
108 sprintf(output,"%Lu \0", seq); 109 sprintf(output,"%Lu \0", seq);
109 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 110 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
110 sprintf(output,"%f \0", local_temp ); 111 sprintf(output,"%f \0", local_temp );
111 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 112 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
112 sprintf(output,"%f \0", SHT_temp); 113 sprintf(output,"%f \0", SHT_temp);
113 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 114 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
114 sprintf(output,"%3.1f \0", SHT_hum); 115 sprintf(output,"%3.1f \0", SHT_hum);
115 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 116 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
116 sprintf(output,"%f \0", barometer_temperature); 117 sprintf(output,"%f \0", barometer_temperature);
117 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 118 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
118 sprintf(output,"%5.1f \0", barometer_pressure); 119 sprintf(output,"%5.1f \0", barometer_pressure);
119 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 120 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
120 sprintf(output,"%3.1f \0", anemo); 121 sprintf(output,"%3.1f \0", anemo);
121 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } 122 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
122 sprintf(output,"*%X\r\n\0", check); 123 sprintf(output,"*%X\r\n\0", check);
123 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j++]); } 124 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j++]); }
124 delay_us(SEND_DELAY); 125 delay_us(SEND_DELAY);
125 } 126 }
126 127
127 //---WDT 128 //---WDT
128 restart_wdt(); 129 restart_wdt();
129 seq++; // Increment the number of measurement 130 seq++; // Increment the number of measurement
130 } 131 }
131 } 132 }
132 #include ".\common\dbloader.h" -  
133 //#include "dbloader.c" // Space reservation for the BootLoader -  
-   133