Урок 19. Работа с ультразвуковым датчиком расстояния HC-SR04 в BASCOM-AVR

Часто бывают ситуации, когда нужно измерять расстояние до какого либо объекта электронными способами. Для этого существует много различных датчиков и электронных устройств. Один из таких датчиков HC-SR04, способен измерять расстояние до 4 метров с помощью ультразвука. Он достаточно распространён и дешёв, я купил его примерно за 4$.

Ультразвуковой датчик расстояния HC-SR04 (Вид сверху):

Ультразвуковой датчик расстояния HC-SR04 (Вид снизу):

Принцип работы датчика следующий: один из пьезоэлементов излучает ультразвуковую волну при подачи импульса длительностью 15 микросекунд, а другой пьезоэлемент принимает эту же отражённую волну от препятствия. Затем замеряется время задержки от передачи до приёма волны, далее вычисляется расстояние и передаётся сигнал на ногу Echo датчика, длительностью пропорциональной расстоянию до препятствия. Нам остаётся лишь подавать импульс на датчик, принять его и вычислить расстояние. Сегодня мы научимся работать с HC-SR04 на BASCOM-AVR.

Поставим перед собой задачу: собрать устройство, которое должно замерять расстояние до какого либо объекта с помощью датчика HC-SR04 и передавать данные через UART на ПК.

Для этой цели можно использовать практически любой AVR микроконтроллер, потому что алгоритм очень простой. Я взял Atmega8, в итоге получилась следующая принципиальная схема устройства:

В качестве связующего звена с ПК используем USB — UART (COM — UART) переходник и любую терминальную программу на стороне ПК, например Terminal Emulator в BASCOM-AVR. Не забываем также выставить скорость (Baud) на 9600.

Я собрал схему на макетной плате с механическими контактами. Вот что получилось:

С «железной» частью разобрались, теперь приступим к программной.

На BASCOM-AVR я написал следующую программу для работы с датчиком:

$regfile = «m8def.dat»
$crystal = 8000000
$baud = 9600

Config Portc.5 = Output
Trig Alias Portc.5
Config Portc.4 = Input

Dim S As Word
Dim R As Single

Do
Trig = 1
Waitus 15
Trig = 0
Waitus 10
Pulsein S , Pinc , 4 , 1
R = S * 0.1725
Print R
Waitms 50
Loop

End

В трёх первых строках программы мы назначаем микроконтроллер и его тактовую частоту, а также скорость работы UART (в данном случае 9600 бод). Далее мы конфигурируем порт PORTC.5 микроконтроллера на выход, потому что сюда у нас подключен пин Trig датчика расстояния. Порту PORTC.5 мы назначили имя Trig чтобы нам было легче писатьчитать код, при обращении к этому имени мы обращаемся к PORTC.5. Также мы сконфигурировали PORTC.4 на вход, поскольку сюда мы подключили Echo датчика. Потом мы задаём переменные в которых будем хранить данные для расчёта и отображения. И тут начинается самое интересное, открываем операторные скобки бесконечного цикла (Do, Loop) и видим следующий код:

Trig = 1
Waitus 15
Trig = 0
Waitus 10

Здесь мы подаём кратковременный импульс длительностью 15 микросекунд на Trig и ждём 10 микросекунд.

Командой Pulsein S , Pinc , 4 , 1 мы замеряем длительность импульса на PINC.4 и заносим эту длительность в переменную S. Дальше вычисляем длину и записываем её в переменную R (R = S * 0.1725). 0.1725 — коэффициент для расчёта расстояния из длинны импульса. Командой Print R выводим в UART расстояние до препятствия. 

Работа устройства в «железе»:

При прошивке микроконтроллера не забываем установить фьюз-биты на работу от внутреннего тактового генератора на 8 МГц.

Вот скрин фьюз-битов:


Список радиоэлементовОбозначение
Тип
Номинал
Количество
ПримечаниеМагазинМой блокнот

МК AVR 8-битATmega8A-AU1

Ультразвуковой дальномерHC-SR041
Добавить все

Скачать список элементов (PDF)

Прикрепленные файлы:

Добавить комментарий

Ваш адрес email не будет опубликован.