Rev Author Line No. Line
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  
2781 kaklik 13 #define ONE_WIRE_PIN PIN_C7 // 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);
32 }
33  
34 #int_TIMER0
35 void TIMER0_isr(void)
36 {
37 timer0_overflow_count++;
38 }
39  
40  
41  
2752 kaklik 42 void welcome(void) // Welcome message
43 {
44 char REV[50]=ID; // Buffer for concatenate of a version string
45  
46 if (REV[strlen(REV)-1]=='$') REV[strlen(REV)-1]=0;
2780 kaklik 47 printf("\r\n\r\n# AWS01A %s (C) 2013 www.mlab.cz \r\n",VER); // Welcome message
2752 kaklik 48 printf("#%s\r\n",&REV[4]);
49 // printf("#\r\n");
50 // printf("# commands: h, c, o, l, x, i, r, a, s, u\r\n");
51 // printf("# h_eat, c_old, o_pen, l_ock, x_open, ");
52 // printf("i_nfo, r_epeat, a_uto, s_single, u_pdate\r\n");
53 // printf("#\r\n");
2781 kaklik 54 printf("# ver seq temp[K] hum_temp[K] hum[%%] ");
55 printf("bar_temp[K] pressure[hPa] check\r\n\r\n");
2752 kaklik 56  
57 //---WDT
58 restart_wdt();
59 }
60  
2751 kaklik 61 void main()
62 {
2752 kaklik 63 unsigned int16 seq=0;
2751 kaklik 64  
65 setup_adc_ports(NO_ANALOGS|VSS_VDD);
66 setup_adc(ADC_CLOCK_DIV_2);
2782 kaklik 67 setup_timer_0(RTCC_EXT_L_TO_H|RTCC_DIV_1);
68 setup_timer_1(T1_EXTERNAL|T1_DIV_BY_1|T1_CLK_OUT);
2751 kaklik 69 setup_timer_2(T2_DISABLED,0,1);
70 setup_ccp1(CCP_OFF);
71 setup_comparator(NC_NC_NC_NC); // This device COMP currently not supported by the PICWizard
72 setup_oscillator(OSC_8MHZ);
2782 kaklik 73 setup_wdt(WDT_1152MS|WDT_DIV_16);
2779 kaklik 74 setup_spi(SPI_MASTER | SPI_MODE_0 | SPI_CLK_DIV_64);
75 output_high(CSN_SPI);
2782 kaklik 76 enable_interrupts(INT_TIMER1);
77 enable_interrupts(INT_TIMER0);
78 enable_interrupts(GLOBAL);
79  
80  
2779 kaklik 81 delay_ms(100);
2751 kaklik 82  
2779 kaklik 83 welcome();
2752 kaklik 84  
2768 kaklik 85 sht_init();
2779 kaklik 86 MPL_init(); // get correction coefficients from the sensor
2768 kaklik 87  
2751 kaklik 88 while (TRUE)
89 {
2768 kaklik 90 char output[8]; // Output buffer
91 int8 j; // String pointer
92 int8 check=0; // Checksum is calculated between '$' and '*'
93 float SHT_temp,SHT_hum;
2779 kaklik 94 float local_temp;
95 float barometer_temperature, barometer_pressure;
2768 kaklik 96  
2752 kaklik 97 delay_ms(100);
98 { // printf
99  
2768 kaklik 100 sht_rd(SHT_temp,SHT_hum);
2779 kaklik 101 local_temp = ds1820_read()+273.15;
102 SHT_temp += 273.15;
103 barometer_temperature = MPL_get_temperature() + 273.15;
104 barometer_pressure = MPL_get_pressure() * 10.0; // conversion to hectopascals
105  
2752 kaklik 106 delay_us(SEND_DELAY);
107 putc('$');
108 delay_us(SEND_DELAY);
109 sprintf(output,"AWS%s \0",VER);
110 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
111 sprintf(output,"%Lu \0", seq);
112 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
2779 kaklik 113 sprintf(output,"%f \0", local_temp );
2752 kaklik 114 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
2779 kaklik 115 sprintf(output,"%f \0", SHT_temp);
2768 kaklik 116 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
2779 kaklik 117 sprintf(output,"%3.1f \0", SHT_hum);
2768 kaklik 118 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
2779 kaklik 119 sprintf(output,"%f \0", barometer_temperature);
120 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
121 sprintf(output,"%5.1f \0", barometer_pressure);
122 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
2782 kaklik 123 sprintf(output,"%3.1f \0", anemo);
124 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j]); check^=output[j++]; }
2752 kaklik 125 sprintf(output,"*%X\r\n\0", check);
126 j=0; while(output[j]!=0) { delay_us(SEND_DELAY); putc(output[j++]); }
127 delay_us(SEND_DELAY);
128 }
129  
130 //---WDT
131 restart_wdt();
132 seq++; // Increment the number of measurement
2751 kaklik 133 }
134 }
2752 kaklik 135  
136 //#include "dbloader.c" // Space reservation for the BootLoader