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