2 #include <avr/interrupt.h>
3 #include <util/delay.h>
8 #define ECHO_TIMEOUT (CLOCK_HZ/10) // 100 ms
9 #define MEASUREMENT_WAIT (2*ECHO_TIMEOUT)
10 #define MEASUREMENT_SHIFT 0 // running avg (1 << M_SHIFT)
14 #define N_TRIG_SENSORS 4
16 // static int16_t distances[N_SENSORS];
18 // hold_regs[0] is unit ID
19 #define thresholds (hold_regs+1)
20 #define led1_sensors (hold_regs[13])
21 #define led2_sensors (hold_regs[14])
23 #define led_bitmap (hold_regs[MB_N_HOLD_REGS_EEPROM])
24 #define distances (hold_regs+MB_N_HOLD_REGS_EEPROM+1)
25 #define free_bitmap (hold_regs[MB_N_HOLD_REGS_EEPROM+13])
26 #define err_bitmap (hold_regs[MB_N_HOLD_REGS_EEPROM+14])
27 #define max_distances (hold_regs+MB_N_HOLD_REGS_EEPROM+21)
29 static void pull_trigger(uint8_t trig)
32 case 0: PORTD |= _BV(PD7); _delay_us(10); PORTD &= ~_BV(PD7); break;
33 case 1: PORTB |= _BV(PB4); _delay_us(10); PORTB &= ~_BV(PB4); break;
34 case 2: PORTC |= _BV(PC4); _delay_us(10); PORTC &= ~_BV(PC4); break;
38 static uint16_t get_pin(uint8_t trig)
41 case 0: return (PIND & 0x78) >> 3;
42 case 1: return PINB & 0x0F;
43 default: return PINC & 0x0F;
47 static void do_measurement(unsigned char trig)
49 uint16_t starttimes[N_TRIG_SENSORS], starttime;
50 uint8_t to_start = (1 << N_TRIG_SENSORS) - 1;
51 uint8_t to_measure = 0, i;
56 starttime = get_clock();
58 while (to_start || to_measure) {
62 if (now-starttime >= ECHO_TIMEOUT)
67 for (i = 0; i < N_TRIG_SENSORS; i++) {
68 uint8_t mask = 1 << i;
70 if ((to_start & mask) && (bits & mask)) {
75 } else if ((to_measure & mask) && !(bits & mask)) {
76 #if MEASUREMENT_SHIFT > 0
80 uint8_t idx = trig*N_TRIG_SENSORS+i;
83 new_d = now - starttimes[i];
84 if (new_d > max_distances[idx])
85 max_distances[idx] = new_d;
87 #if MEASUREMENT_SHIFT > 0
88 old_d = distances[idx];
92 distances[idx] = new_d;
95 (old_d << MEASUREMENT_SHIFT)
98 ) >> MEASUREMENT_SHIFT;
101 distances[idx] = new_d;
107 for (i = 0; i < N_TRIG_SENSORS; i++)
108 if (to_start & (1 << i))
109 distances[trig*N_TRIG_SENSORS + i] = -1;
110 else if (to_measure & (1 << i))
112 * If the echo pulse is too long, do not treat it
113 * as error, just count it as maximum length.
115 distances[trig*N_TRIG_SENSORS + i]
116 = now - starttimes[i];
119 static void led_set(uint8_t led, uint8_t state)
152 static void leds_update()
154 if (led_bitmap & 1) {
160 if (led_bitmap & 2) {
166 if (led_bitmap & 4) {
172 if (led_bitmap & 8) {
179 static void eval_bitmaps()
181 uint16_t free_b = 0, err_b = 0, mask;
184 for (i = 0; i < N_SENSORS; i++) {
188 if (distances[i] == -1) {
190 } else if (distances[i] > thresholds[i]) {
196 free_bitmap = free_b;
200 if (led1_sensors & err_bitmap) {
202 } else if (led1_sensors & free_bitmap) {
210 if (led2_sensors & err_bitmap) {
212 } else if (led2_sensors & free_bitmap) {
220 uint8_t hold_reg_is_valid(uint16_t reg, uint16_t val)
222 if (reg == MB_HOLD_REGS_BASE)
223 return val > 0 && val <= 247;
233 DDRD |= _BV(PD7); // Trig D
234 DDRB |= _BV(PB4) | _BV(PB5); // Trig B, LED 2
235 DDRC |= _BV(PC4) | _BV(PC5); // Trig C, LED 1
239 TCCR1B = _BV(CS12)|_BV(CS10); // CLK/1024
246 for (trig = 0; trig < N_TRIGGERS; trig++) {
248 do_measurement(trig);
250 while (get_clock()-now < MEASUREMENT_WAIT)
255 leds_update(); // might be written from modbus
257 // distances[4] > 100 || distances[11] > 100);