o: ActiveSupport::Cache::Entry :@compressedF:@value"t–"n–
| main.c | ||
|---|---|---|
| 1 |
#define VERSION "0.1" |
|
| 2 |
#define ID "$Id: main.c 2916 2013-04-14 17:42:03Z kaklik $" |
|
| 3 |
|
|
| 1 | 4 |
#include "main.h" |
| 2 |
#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
|
|
| 3 | 6 |
|
| 4 |
#define H1 PIN_A1 |
|
| 5 |
#define L1 PIN_A2 |
|
| 6 |
#define H2 PIN_A3 |
|
| 7 |
#define L2 PIN_A4 |
|
| 7 |
#include <time.h> //standard C time library |
|
| 8 |
#include <rtctimer.c> //library for time.h that uses timer2 as time base |
|
| 8 | 9 |
|
| 9 |
signed int8 command; // rozsah +-127 |
|
| 10 |
#include <stdlib.h> |
|
| 11 |
#include <input.c> //needed for the rs232 input routines |
|
| 10 | 12 |
|
| 13 |
|
|
| 14 |
int16 count=0xA5A5; |
|
| 15 |
const int8 buf_len=8; |
|
| 16 |
|
|
| 17 |
int8 buffer[buf_len]; // I2C buffer |
|
| 18 |
|
|
| 19 |
int8 address=0; |
|
| 20 |
|
|
| 21 |
#include "..\common\dbloader.h" |
|
| 22 |
|
|
| 23 |
unsigned int16 timer0_overflow_count; |
|
| 24 |
float anemo=0; |
|
| 25 |
unsigned int8 rain; |
|
| 26 |
|
|
| 27 |
//we are using the rtctimer.c library, in which a counter is incremented |
|
| 28 |
//every time the timer2 interrupt occurs (timer2 overflow). the time math |
|
| 29 |
//needs to know what rate the timer2 interrupt occurs. this definition |
|
| 30 |
//must match the rate the timer2 is configured for. |
|
| 31 |
#define CLOCKS_PER_SECOND 1000 |
|
| 32 |
|
|
| 11 | 33 |
#INT_SSP |
| 12 | 34 |
void ssp_interupt () |
| 13 | 35 |
{
|
| 14 |
BYTE incoming, state;
|
|
| 36 |
BYTE incoming, state; |
|
| 15 | 37 |
|
| 16 |
output_a(0); // vypnuti vsech budicu |
|
| 17 |
|
|
| 18 | 38 |
state = i2c_isr_state(); |
| 19 |
|
|
| 20 | 39 |
if(state < 0x80) //Master is sending data |
| 21 | 40 |
{
|
| 22 |
command = i2c_read(); |
|
| 41 |
incoming = i2c_read(); |
|
| 42 |
if(state == 1) //First received byte is address |
|
| 43 |
{
|
|
| 44 |
address = incoming; |
|
| 45 |
if (incoming == 2) |
|
| 46 |
{
|
|
| 47 |
buffer[0]=make8(count,0); |
|
| 48 |
buffer[1]=make8(count,1); |
|
| 49 |
} |
|
| 50 |
} |
|
| 51 |
if(state == 2) //Second received byte is data |
|
| 52 |
buffer[address] = incoming; |
|
| 23 | 53 |
} |
| 24 |
|
|
| 25 | 54 |
if(state == 0x80) //Master is requesting data |
| 26 | 55 |
{
|
| 27 |
i2c_write(command); |
|
| 56 |
if(address <= buf_len) i2c_write(buffer[address]); |
|
| 57 |
else i2c_write(ID[address - buf_len]); |
|
| 28 | 58 |
} |
| 29 | 59 |
} |
| 30 | 60 |
|
| 61 |
#int_TIMER1 |
|
| 62 |
void TIMER1_isr(void) |
|
| 63 |
{
|
|
| 64 |
// 32.768 kHz krystal pro timer1 oscil?tor |
|
| 65 |
anemo = ((timer0_overflow_count * 0xFF) + get_timer0())/(0xFFFF/32768.0); // pocet pulzu za 1s |
|
| 31 | 66 |
|
| 67 |
timer0_overflow_count=0; //nulovani |
|
| 68 |
set_timer0(0); |
|
| 69 |
set_timer1(0); |
|
| 70 |
output_toggle(PIN_E0); |
|
| 71 |
} |
|
| 72 |
|
|
| 73 |
#int_TIMER0 //pro preteceni \u010d?ta\u010de p\u016flz\u016f od anemometru (RA4) |
|
| 74 |
void TIMER0_isr(void) |
|
| 75 |
{
|
|
| 76 |
timer0_overflow_count++; |
|
| 77 |
} |
|
| 78 |
|
|
| 79 |
#INT_EXT |
|
| 80 |
void EXT_isr() //interrup from rain sensor clip. |
|
| 81 |
{
|
|
| 82 |
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( L_TO_H ); |
|
| 85 |
} |
|
| 86 |
|
|
| 87 |
|
|
| 88 |
void welcome(void) // uvodni zprava |
|
| 89 |
{
|
|
| 90 |
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("# ver poradi ");
|
|
| 93 |
printf("check\r\n\r\n");
|
|
| 94 |
} |
|
| 95 |
|
|
| 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 |
|
|
| 32 | 122 |
void main() |
| 33 | 123 |
{
|
| 34 |
int8 speed; |
|
| 35 | 124 |
|
| 125 |
char tString[32]; |
|
| 126 |
unsigned int32 t; |
|
| 127 |
time_t tTime = 0; |
|
| 128 |
|
|
| 129 |
|
|
| 36 | 130 |
setup_adc_ports(NO_ANALOGS|VSS_VDD); |
| 131 |
// setup_adc(ADC_CLOCK_DIV_2); |
|
| 37 | 132 |
setup_adc(ADC_OFF); |
| 38 |
setup_timer_0(RTCC_INTERNAL);setup_wdt(WDT_144MS); |
|
| 39 |
setup_timer_1(T1_DISABLED); |
|
| 40 |
setup_timer_2(T2_DISABLED,0,1); |
|
| 133 |
// 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); |
|
| 135 |
// setup_timer_0(RTCC_INTERNAL);setup_wdt(WDT_144MS); |
|
| 136 |
setup_timer_1(T1_EXTERNAL|T1_DIV_BY_1|T1_CLK_OUT); |
|
| 137 |
// setup_timer_2(T2_DISABLED,0,1); |
|
| 41 | 138 |
setup_comparator(NC_NC_NC_NC); |
| 42 | 139 |
setup_vref(FALSE); |
| 43 |
setup_oscillator(OSC_8MHZ|OSC_INTRC); |
|
| 140 |
// setup_oscillator(OSC_8MHZ|OSC_INTRC);
|
|
| 44 | 141 |
|
| 142 |
|
|
| 143 |
InitTime(); |
|
| 144 |
|
|
| 145 |
/* Setup timer 2 |
|
| 146 |
* 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 |
|
| 148 |
* OverflowTime = 4 * (1/OscFrequency) * Prescale * Period * Postscale |
|
| 149 |
* For 4 Mhz: .001 seconds = 4 * (1/4000000 seconds) * 4 * 250 * 1 |
|
| 150 |
*/ |
|
| 151 |
#if getenv("CLOCK")==4000000)
|
|
| 152 |
setup_timer_2(T2_DIV_BY_1,250,4); |
|
| 153 |
#elif getenv("CLOCK")==20000000)
|
|
| 154 |
setup_timer_2(T2_DIV_BY_4,250,5); |
|
| 155 |
#else |
|
| 156 |
#error Configure TIMER2 so it interrupts at a rate defined by CLOCKS_PER_SECOND |
|
| 157 |
#endif |
|
| 158 |
|
|
| 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 |
|
|
| 165 |
enable_interrupts(INT_SSP); |
|
| 166 |
// enable_interrupts(INT_TIMER2); |
|
| 167 |
enable_interrupts(INT_TIMER1); |
|
| 168 |
enable_interrupts(INT_TIMER0); |
|
| 169 |
enable_interrupts(INT_EXT); |
|
| 45 | 170 |
enable_interrupts(GLOBAL); |
| 46 |
enable_interrupts(INT_SSP); |
|
| 47 | 171 |
|
| 48 |
command=-128; // zastaveni po resetu |
|
| 49 | 172 |
|
| 173 |
set_timer0(0); |
|
| 174 |
set_timer1(0); |
|
| 175 |
timer0_overflow_count=0; |
|
| 176 |
rain=0; |
|
| 177 |
|
|
| 178 |
buffer[2]=0; |
|
| 179 |
buffer[3]=0; |
|
| 180 |
buffer[4]=0; |
|
| 181 |
buffer[5]=0; |
|
| 182 |
|
|
| 183 |
|
|
| 184 |
welcome(); |
|
| 185 |
|
|
| 186 |
set_timer1(0); |
|
| 187 |
|
|
| 50 | 188 |
while(true) |
| 51 | 189 |
{
|
| 190 |
|
|
| 191 |
set_timer1(0); |
|
| 192 |
delay_ms(999); |
|
| 193 |
delay_us(966); |
|
| 194 |
// count=get_timer1(); |
|
| 195 |
// Get the time |
|
| 196 |
tTime = time(NULL); |
|
| 197 |
// Get the string representation of the time */ |
|
| 52 | 198 |
|
| 53 |
if (command==-128) // prikaz na odpojeni mustku nebo chybna hodnota |
|
| 54 |
{
|
|
| 55 |
output_a(0); // volnobeh |
|
| 56 |
continue; |
|
| 57 |
}; |
|
| 199 |
ctime(&tTime, tString); |
|
| 58 | 200 |
|
| 59 |
speed=command+127; // posunuti 0 pro zaporna cisla |
|
| 201 |
|
|
| 202 |
/* Print the time to RS-232 */ |
|
| 203 |
printf("Time: %s\n\r", tString);
|
|
| 60 | 204 |
|
| 61 |
output_a(0b10010); // vpred |
|
| 62 |
delay_us(speed); |
|
| 63 |
output_a(0); // vypnuti vsech budicu |
|
| 64 |
delay_us(1); |
|
| 65 |
restart_wdt(); |
|
| 66 |
output_a(0b01100); // vzad |
|
| 67 |
delay_us(254-speed); |
|
| 68 |
output_a(0); // vypnuti vsech budicu |
|
| 69 |
delay_us(1); |
|
| 205 |
printf("count: %Lu %X %X %X %X\r\n",count, buffer[0],buffer[1],buffer[2],buffer[3]);
|
|
| 206 |
printf("%6.1f %u \n\r", anemo, rain);
|
|
| 207 |
|
|
| 208 |
delay_ms(1000); |
|
| 209 |
|
|
| 70 | 210 |
} |
| 71 | 211 |
} |
| 72 | 212 |
|