1 |
#define VERSION "0.1" |
1 |
#define VERSION "0.1" |
2 |
#define ID "$Id: main.c 2916 2013-04-14 17:42:03Z kaklik $" |
2 |
#define ID "$Id: main.c 2916 2013-04-14 17:42:03Z kaklik $" |
3 |
|
3 |
|
4 |
#include "main.h" |
4 |
#include "main.h" |
5 |
#use i2c(SLAVE,Fast,sda=PIN_C4,scl=PIN_C3,force_hw,address=0xA2) // Motor 2 |
5 |
#use i2c(SLAVE,Fast,sda=PIN_C4,scl=PIN_C3,force_hw,address=0xA2) // Motor 2 |
6 |
|
6 |
|
7 |
//#include <time.h> //standard C time library |
- |
|
8 |
//#include <rtctimer.c> //library for time.h that uses timer2 as time base |
- |
|
9 |
|
- |
|
10 |
//#include <stdlib.h> |
- |
|
11 |
//#include <input.c> //needed for the rs232 input routines |
- |
|
12 |
|
- |
|
13 |
const int8 buf_len=8; |
7 |
const int8 buf_len=8; |
14 |
|
8 |
|
15 |
int8 buffer[buf_len]; // I2C buffer |
9 |
int8 buffer[buf_len]; // I2C buffer |
16 |
|
10 |
|
17 |
int8 address=0; |
11 |
int8 address=0; |
18 |
|
12 |
|
19 |
#include "..\common\dbloader.h" |
13 |
#include "..\common\dbloader.h" |
20 |
|
14 |
|
21 |
unsigned int16 timer0_overflow_count; |
15 |
unsigned int16 timer0_overflow_count; |
22 |
unsigned int16 anemo=0; |
16 |
unsigned int16 anemo=0; |
23 |
unsigned int16 rain=0; |
17 |
unsigned int16 rain=0; |
24 |
|
18 |
|
25 |
//we are using the rtctimer.c library, in which a counter is incremented |
19 |
//we are using the rtctimer.c library, in which a counter is incremented |
26 |
//every time the timer2 interrupt occurs (timer2 overflow). the time math |
20 |
//every time the timer2 interrupt occurs (timer2 overflow). the time math |
27 |
//needs to know what rate the timer2 interrupt occurs. this definition |
21 |
//needs to know what rate the timer2 interrupt occurs. this definition |
28 |
//must match the rate the timer2 is configured for. |
22 |
//must match the rate the timer2 is configured for. |
29 |
#define CLOCKS_PER_SECOND 1000 |
23 |
#define CLOCKS_PER_SECOND 1000 |
30 |
|
24 |
|
31 |
#INT_SSP |
25 |
#INT_SSP |
32 |
void ssp_interupt () |
26 |
void ssp_interupt () |
33 |
{ |
27 |
{ |
34 |
BYTE incoming, state; |
28 |
BYTE incoming, state; |
35 |
|
29 |
|
36 |
state = i2c_isr_state(); |
30 |
state = i2c_isr_state(); |
37 |
if(state < 0x80) //Master is sending data |
31 |
if(state < 0x80) //Master is sending data |
38 |
{ |
32 |
{ |
39 |
incoming = i2c_read(); |
33 |
incoming = i2c_read(); |
40 |
if(state == 1) //First received byte is address |
34 |
if(state == 1) //First received byte is address |
41 |
{ |
35 |
{ |
42 |
address = incoming; |
36 |
address = incoming; |
43 |
if (incoming == 2) |
37 |
if (incoming == 2) |
44 |
{ |
38 |
{ |
45 |
buffer[0]=make8(anemo,0); |
39 |
buffer[0]=make8(anemo,0); |
46 |
buffer[1]=make8(anemo,1); |
40 |
buffer[1]=make8(anemo,1); |
47 |
buffer[2]=make8(rain,0); |
41 |
buffer[2]=make8(rain,0); |
48 |
buffer[3]=make8(rain,1); |
42 |
buffer[3]=make8(rain,1); |
49 |
} |
43 |
} |
50 |
} |
44 |
} |
51 |
if(state == 2) //Second received byte is data |
45 |
if(state == 2) //Second received byte is data |
52 |
buffer[address] = incoming; |
46 |
buffer[address] = incoming; |
53 |
} |
47 |
} |
54 |
if(state == 0x80) //Master is requesting data |
48 |
if(state == 0x80) //Master is requesting data |
55 |
{ |
49 |
{ |
56 |
if(address <= buf_len) i2c_write(buffer[address]); |
50 |
if(address <= buf_len) i2c_write(buffer[address]); |
57 |
else i2c_write(ID[address - buf_len]); |
51 |
else i2c_write(ID[address - buf_len]); |
58 |
} |
52 |
} |
59 |
} |
53 |
} |
60 |
|
54 |
|
- |
|
55 |
|
- |
|
56 |
#int_TIMER0 //osetruje preteceni citace od anemometru (RA4) |
- |
|
57 |
void TIMER0_isr(void) |
- |
|
58 |
{ |
- |
|
59 |
timer0_overflow_count++; |
- |
|
60 |
} |
- |
|
61 |
|
61 |
#int_TIMER1 |
62 |
#int_TIMER1 |
62 |
void TIMER1_isr(void) |
63 |
void TIMER1_isr(void) |
63 |
{ |
64 |
{ |
64 |
// 32.768 kHz krystal pro timer1 oscilátor |
65 |
// 32.768 kHz krystal pro timer1 oscilátor |
65 |
anemo = ((timer0_overflow_count * 0xFF) + get_timer0()); // pocet pulzu za 1s |
66 |
anemo = ((timer0_overflow_count * 0xFF) + get_timer0()); // pocet pulzu za 1s |
66 |
|
67 |
|
67 |
timer0_overflow_count=0; //nulovani |
68 |
timer0_overflow_count=0; //nulovani |
68 |
set_timer0(0); |
69 |
set_timer0(0); |
69 |
set_timer1(0); |
70 |
set_timer1(0); |
70 |
output_toggle(PIN_E0); |
71 |
output_toggle(PIN_E0); |
71 |
} |
72 |
} |
72 |
|
73 |
|
73 |
#int_TIMER0 //osetruje preteceni citace od anemometru (RA4) |
74 |
#int_TIMER2 |
74 |
void TIMER0_isr(void) |
75 |
void TIMER2_isr(void) |
75 |
{ |
76 |
{ |
76 |
timer0_overflow_count++; |
- |
|
- |
|
77 |
|
77 |
} |
78 |
} |
78 |
|
79 |
|
79 |
#INT_EXT |
80 |
#INT_EXT |
80 |
void EXT_isr() //interrup from rain sensor clip. |
81 |
void EXT_isr() //interrup from rain sensor clip. |
81 |
{ |
82 |
{ |
82 |
rain++; |
83 |
rain++; |
83 |
// if (input(PIN_B0)) ext_int_edge( H_TO_L ); osetreni pro pripad, ze by bylo treba cist obe hrany impulzu |
84 |
// if (input(PIN_B0)) ext_int_edge( H_TO_L ); osetreni pro pripad, ze by bylo treba cist obe hrany impulzu |
84 |
// if (!input(PIN_B0)) ext_int_edge( L_TO_H ); |
85 |
// if (!input(PIN_B0)) ext_int_edge( L_TO_H ); |
85 |
} |
86 |
} |
86 |
|
87 |
|
87 |
|
88 |
|
88 |
void welcome(void) // uvodni zprava |
89 |
void welcome(void) // uvodni zprava |
89 |
{ |
90 |
{ |
90 |
printf("\r\n\r\n# Meteorologicka stanice %s (C) 2013 www.mlab.cz \r\n",VERSION); |
91 |
printf("\r\n\r\n# Meteorologicka stanice %s (C) 2013 www.mlab.cz \r\n",VERSION); |
91 |
printf("\r\n %s \r\n",ID);// Welcome message |
92 |
printf("\r\n %s \r\n",ID);// Welcome message |
92 |
printf("# ver poradi "); |
93 |
printf("# ver poradi "); |
93 |
printf("check\r\n\r\n"); |
94 |
printf("check\r\n\r\n"); |
94 |
} |
95 |
} |
95 |
|
96 |
|
96 |
/*void InitTime(void) |
- |
|
97 |
{ |
- |
|
98 |
struct_tm t; |
- |
|
99 |
|
- |
|
100 |
//tm_year is years since 1900. |
- |
|
101 |
printf("\r\nYear (0-99): "); |
- |
|
102 |
t.tm_year = (int16)get_int() + (int16)100; //add 100 to put is into 2000 |
- |
|
103 |
|
- |
|
104 |
printf("\r\nMonth (1-12): "); |
- |
|
105 |
t.tm_mon = get_int() - 1; |
- |
|
106 |
|
- |
|
107 |
printf("\r\nDay (1-31): "); |
- |
|
108 |
t.tm_mday = get_int() - 1; |
- |
|
109 |
|
- |
|
110 |
printf("\r\nHour (0-23): "); |
- |
|
111 |
t.tm_hour = get_int(); |
- |
|
112 |
|
- |
|
113 |
printf("\r\nMinute (0-59): "); |
- |
|
114 |
t.tm_min = get_int(); |
- |
|
115 |
|
- |
|
116 |
SetTime(&t); |
- |
|
117 |
|
- |
|
118 |
printf("\r\n\n"); |
- |
|
119 |
} |
- |
|
120 |
*/ |
- |
|
121 |
|
- |
|
122 |
void main() |
97 |
void main() |
123 |
{ |
98 |
{ |
124 |
|
- |
|
125 |
// char tString[32]; |
- |
|
126 |
// unsigned int32 t; |
- |
|
127 |
// time_t tTime = 0; |
- |
|
128 |
|
- |
|
129 |
|
- |
|
130 |
setup_adc_ports(NO_ANALOGS|VSS_VDD); |
99 |
setup_adc_ports(NO_ANALOGS|VSS_VDD); |
131 |
// setup_adc(ADC_CLOCK_DIV_2); |
100 |
// setup_adc(ADC_CLOCK_DIV_2); |
132 |
setup_adc(ADC_OFF); |
101 |
setup_adc(ADC_OFF); |
133 |
// setup_spi(SPI_SS_DISABLED); //must not be set if I2C are in use! |
102 |
// setup_spi(SPI_SS_DISABLED); //must not be set if I2C are in use! |
134 |
setup_timer_0(RTCC_EXT_L_TO_H|RTCC_DIV_1); |
103 |
setup_timer_0(RTCC_EXT_L_TO_H|RTCC_DIV_1); |
135 |
// setup_timer_0(RTCC_INTERNAL);setup_wdt(WDT_144MS); |
104 |
// setup_timer_0(RTCC_INTERNAL);setup_wdt(WDT_144MS); |
136 |
setup_timer_1(T1_EXTERNAL|T1_DIV_BY_1|T1_CLK_OUT); |
105 |
setup_timer_1(T1_EXTERNAL|T1_DIV_BY_1|T1_CLK_OUT); |
137 |
// setup_timer_2(T2_DISABLED,0,1); |
106 |
// setup_timer_2(T2_DISABLED,0,1); |
138 |
setup_comparator(NC_NC_NC_NC); |
107 |
setup_comparator(NC_NC_NC_NC); |
139 |
setup_vref(FALSE); |
108 |
setup_vref(FALSE); |
140 |
// setup_oscillator(OSC_8MHZ|OSC_INTRC); |
109 |
// setup_oscillator(OSC_8MHZ|OSC_INTRC); |
141 |
|
110 |
|
142 |
|
111 |
|
143 |
// InitTime(); |
- |
|
144 |
|
- |
|
145 |
/* Setup timer 2 |
112 |
/* Setup timer 2 |
146 |
* On a 4 Mhz clock, this will trigger a timer2 interrupt every 1.0 ms |
113 |
* On a 4 Mhz clock, this will trigger a timer2 interrupt every 1.0 ms |
147 |
* For time.h to work properly, Timer2 must overflow every millisecond |
114 |
* For time.h to work properly, Timer2 must overflow every millisecond |
148 |
* OverflowTime = 4 * (1/OscFrequency) * Prescale * Period * Postscale |
115 |
* OverflowTime = 4 * (1/OscFrequency) * Prescale * Period * Postscale |
149 |
* For 4 Mhz: .001 seconds = 4 * (1/4000000 seconds) * 4 * 250 * 1 |
116 |
* For 4 Mhz: .001 seconds = 4 * (1/4000000 seconds) * 4 * 250 * 1 |
150 |
*/ |
117 |
*/ |
151 |
/* #if getenv("CLOCK")==4000000) |
118 |
#if getenv("CLOCK")==4000000) |
152 |
setup_timer_2(T2_DIV_BY_1,250,4); |
119 |
setup_timer_2(T2_DIV_BY_1,250,4); |
153 |
#elif getenv("CLOCK")==20000000) |
120 |
#elif getenv("CLOCK")==20000000) |
154 |
setup_timer_2(T2_DIV_BY_4,250,5); |
121 |
setup_timer_2(T2_DIV_BY_4,250,5); |
155 |
#else |
122 |
#else |
156 |
#error Configure TIMER2 so it interrupts at a rate defined by CLOCKS_PER_SECOND |
123 |
#error Configure TIMER2 so it interrupts at a rate defined by CLOCKS_PER_SECOND |
157 |
#endif |
124 |
#endif |
158 |
|
125 |
|
159 |
/* Enable the timer 2 interrupt, or it will not fire */ |
- |
|
160 |
// enable_interrupts(INT_TIMER2); |
- |
|
161 |
/* Enable interrupts globally too, otherwise no interrupt will fire */ |
- |
|
162 |
|
- |
|
163 |
|
- |
|
164 |
|
126 |
|
165 |
enable_interrupts(INT_SSP); |
127 |
enable_interrupts(INT_SSP); |
166 |
// enable_interrupts(INT_TIMER2); |
128 |
enable_interrupts(INT_TIMER2); |
167 |
enable_interrupts(INT_TIMER1); |
129 |
enable_interrupts(INT_TIMER1); |
168 |
enable_interrupts(INT_TIMER0); |
130 |
enable_interrupts(INT_TIMER0); |
169 |
enable_interrupts(INT_EXT); |
131 |
enable_interrupts(INT_EXT); |
170 |
enable_interrupts(GLOBAL); |
132 |
enable_interrupts(GLOBAL); |
171 |
|
133 |
|
172 |
|
134 |
|
173 |
set_timer0(0); |
135 |
set_timer0(0); |
174 |
set_timer1(0); |
136 |
set_timer1(0); |
175 |
timer0_overflow_count=0; |
137 |
timer0_overflow_count=0; |
176 |
|
138 |
|
177 |
buffer[2]=0; |
139 |
buffer[2]=0; |
178 |
buffer[3]=0; |
140 |
buffer[3]=0; |
179 |
buffer[4]=0; |
141 |
buffer[4]=0; |
180 |
buffer[5]=0; |
142 |
buffer[5]=0; |
181 |
|
143 |
|
182 |
welcome(); |
144 |
welcome(); |
183 |
|
145 |
|
184 |
while(true) |
146 |
while(true) |
185 |
{ |
147 |
{ |
186 |
printf("count: %X %X %X %X\r\n", buffer[0],buffer[1],buffer[2],buffer[3]); |
148 |
printf("count: %X %X %X %X\r\n", buffer[0],buffer[1],buffer[2],buffer[3]); |
187 |
printf("%Lu %Lu \n\r", anemo, rain); |
149 |
printf("%Lu %Lu \n\r", anemo, rain); |
188 |
|
150 |
|
189 |
delay_ms(1000); |
151 |
delay_ms(1000); |
190 |
|
152 |
|
191 |
} |
153 |
} |
192 |
} |
154 |
} |
193 |
|
155 |
|
194 |
|
156 |
|
195 |
|
157 |
|