2752 |
kaklik |
1 |
/**** Automatic weather station 01A ****/ |
|
|
2 |
#define VERSION "0.1" |
|
|
3 |
#define ID "$Id: irmrak4.c 2177 2011-09-05 18:56:16Z 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 |
|
2751 |
kaklik |
13 |
#define ONE_WIRE_PIN PIN_C7 |
|
|
14 |
#include "..\ds1820.c" |
|
|
15 |
|
2779 |
kaklik |
16 |
#define sht_data_pin PIN_D0 |
|
|
17 |
#define sht_clk_pin PIN_D1 |
2768 |
kaklik |
18 |
#include "..\SHT.c" |
|
|
19 |
|
2779 |
kaklik |
20 |
#define CSN_SPI PIN_C2 |
|
|
21 |
#include "..\MPL115A1.c" |
2768 |
kaklik |
22 |
|
2752 |
kaklik |
23 |
void welcome(void) // Welcome message |
|
|
24 |
{ |
|
|
25 |
char REV[50]=ID; // Buffer for concatenate of a version string |
|
|
26 |
|
|
|
27 |
if (REV[strlen(REV)-1]=='$') REV[strlen(REV)-1]=0; |
2780 |
kaklik |
28 |
printf("\r\n\r\n# AWS01A %s (C) 2013 www.mlab.cz \r\n",VER); // Welcome message |
2752 |
kaklik |
29 |
printf("#%s\r\n",&REV[4]); |
|
|
30 |
// printf("#\r\n"); |
|
|
31 |
// printf("# commands: h, c, o, l, x, i, r, a, s, u\r\n"); |
|
|
32 |
// printf("# h_eat, c_old, o_pen, l_ock, x_open, "); |
|
|
33 |
// printf("i_nfo, r_epeat, a_uto, s_single, u_pdate\r\n"); |
|
|
34 |
// printf("#\r\n"); |
|
|
35 |
// printf("# ver seq in[1/100 C] sky[1/100 C] sky[1/100 C] "); |
|
|
36 |
// printf("out[1/100 C] heat[s] dome[s] check\r\n\r\n"); |
|
|
37 |
|
|
|
38 |
//---WDT |
|
|
39 |
restart_wdt(); |
|
|
40 |
} |
|
|
41 |
|
2751 |
kaklik |
42 |
void main() |
|
|
43 |
{ |
2752 |
kaklik |
44 |
unsigned int16 seq=0; |
2751 |
kaklik |
45 |
|
|
|
46 |
setup_adc_ports(NO_ANALOGS|VSS_VDD); |
|
|
47 |
setup_adc(ADC_CLOCK_DIV_2); |
|
|
48 |
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1); |
|
|
49 |
setup_timer_1(T1_DISABLED); |
|
|
50 |
setup_timer_2(T2_DISABLED,0,1); |
|
|
51 |
setup_ccp1(CCP_OFF); |
|
|
52 |
setup_comparator(NC_NC_NC_NC); // This device COMP currently not supported by the PICWizard |
|
|
53 |
setup_oscillator(OSC_8MHZ); |
2779 |
kaklik |
54 |
setup_spi(SPI_MASTER | SPI_MODE_0 | SPI_CLK_DIV_64); |
|
|
55 |
output_high(CSN_SPI); |
|
|
56 |
delay_ms(100); |
2751 |
kaklik |
57 |
|
2779 |
kaklik |
58 |
welcome(); |
2752 |
kaklik |
59 |
|
2768 |
kaklik |
60 |
sht_init(); |
2779 |
kaklik |
61 |
MPL_init(); // get correction coefficients from the sensor |
2768 |
kaklik |
62 |
|
2751 |
kaklik |
63 |
while (TRUE) |
|
|
64 |
{ |
2768 |
kaklik |
65 |
char output[8]; // Output buffer |
|
|
66 |
int8 j; // String pointer |
|
|
67 |
int8 check=0; // Checksum is calculated between '$' and '*' |
|
|
68 |
float SHT_temp,SHT_hum; |
2779 |
kaklik |
69 |
float local_temp; |
|
|
70 |
float barometer_temperature, barometer_pressure; |
2768 |
kaklik |
71 |
|
2752 |
kaklik |
72 |
delay_ms(100); |
|
|
73 |
{ // printf |
|
|
74 |
|
2768 |
kaklik |
75 |
sht_rd(SHT_temp,SHT_hum); |
2779 |
kaklik |
76 |
local_temp = ds1820_read()+273.15; |
|
|
77 |
SHT_temp += 273.15; |
|
|
78 |
barometer_temperature = MPL_get_temperature() + 273.15; |
|
|
79 |
barometer_pressure = MPL_get_pressure() * 10.0; // conversion to hectopascals |
|
|
80 |
|
2752 |
kaklik |
81 |
delay_us(SEND_DELAY); |
|
|
82 |
putc('$'); |
|
|
83 |
delay_us(SEND_DELAY); |
|
|
84 |
sprintf(output,"AWS%s \0",VER); |
|
|
85 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } |
|
|
86 |
sprintf(output,"%Lu \0", seq); |
|
|
87 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } |
2779 |
kaklik |
88 |
sprintf(output,"%f \0", local_temp ); |
2752 |
kaklik |
89 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } |
2779 |
kaklik |
90 |
sprintf(output,"%f \0", SHT_temp); |
2768 |
kaklik |
91 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } |
2779 |
kaklik |
92 |
sprintf(output,"%3.1f \0", SHT_hum); |
2768 |
kaklik |
93 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } |
2779 |
kaklik |
94 |
sprintf(output,"%f \0", barometer_temperature); |
|
|
95 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } |
|
|
96 |
sprintf(output,"%5.1f \0", barometer_pressure); |
|
|
97 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; } |
2752 |
kaklik |
98 |
sprintf(output,"*%X\r\n\0", check); |
|
|
99 |
j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j++]); } |
|
|
100 |
delay_us(SEND_DELAY); |
|
|
101 |
} |
|
|
102 |
|
|
|
103 |
//---WDT |
|
|
104 |
restart_wdt(); |
|
|
105 |
seq++; // Increment the number of measurement |
2751 |
kaklik |
106 |
} |
|
|
107 |
} |
2752 |
kaklik |
108 |
|
|
|
109 |
//#include "dbloader.c" // Space reservation for the BootLoader |