Проекты на микроконтроллерах AVR

Направлятор

kestrel — Sun, 19 Apr 2020 07:19:12 GMT

всем привет, возникла проблемка, хотелось бы разобраться,
решил в железе прогнать код направлятора, и у меня появляется разница в расстоянии между двумя точками,
по координатам GPS приемника расстояние равно 584 метра, а расстояние между этими же точками по Google maps
495 метра, соответственно сам вопрос в коде есть строка Dist = Dist * 6372795, что это за число 6372795?

Энкодер и Bascom-AVR. Счетчик импульсов

Dumon — Fri, 22 Nov 2019 10:43:11 GMT

В статье "Энкодер и Bascom-AVR. Счетчик импульсов" для обнаружения вращения энкодера применяется этот код:

Код

Encod:  ' тут узнаем в каком направлении вращают ручку энкодера
  Waitms 2' ждем пока утихнет дребезг контактов
  If Pind.5 = 1 Then  ' если на ноге единица (импульс не пришел) тогда
  Incr W  ' инкременируем переменную (увеличиваем на 1)
  Else ' в обратном случае
  Decr W  ' декрементируем переменную (уменьшаем на 1)
  End If

  Gifr = 64 ' сбрасываем регистр хранения прерывания INT0

Я использую вот этот и хочу спросить кто что думает ?

Код

'=========================================================
'                    АнтиДребезг!!!
Enc_0 = 0
Do
Incr Enc_0 : Reset Watchdog
If Pind.2 = 0 And Pind.0 = 1 Then : Incr Enc_1 : Exit Do : End If
If Pind.2 = 0 And Pind.0 = 0 Then : Incr Enc_2 : Exit Do : End If
Loop Until Enc_0 > 20000
Enc_0 = 0
Do
Incr Enc_0 : Reset Watchdog
If Pind.2 = 1 And Pind.0 = 0 Then : Incr Enc_1 : Exit Do : End If
If Pind.2 = 1 And Pind.0 = 1 Then : Incr Enc_2 : Exit Do : End If
Loop Until Enc_0 > 20000
'=========================================================
If Enc_1 > Enc_2 Then                    ' вращение в право
Elseif Enc_1 < Enc_2 Then                    ' вращение в лево Код
End If
Gifr = 64
Return
'=====================================================

проблема с барометром на BMP085

bobfender — Thu, 20 Jun 2019 15:35:00 GMT

Всем доброго дня. Собрал барометр на BMP085 по материалам с етого сайта
http://avrproject.ru/publ/barometr_na_bmp085/1-1-0-102
и возникла проблема. В помещении где температура в пределах 15 - 20 градусов давление показывает нормально. Но при падении температуры (датчик на улице) начинает расти давление. Например при температуре в помещение 18 градусов - давление 745мм, а при температуре -1 давление 770мм.
Как компенсировать температуру при измерении давления ?
Прошивка и исходник с этого сайта.
Наверное нужна переделка программы для термокомпенсации показаний давления ?

Nrf24L01+ термометр и ещё всяко разно.

kip96 — Sat, 12 Jan 2019 07:06:57 GMT

Респект Китайцам! Пара модулей мне обошлись мене чем за 100 руб., а возможности открываются! Почитав статьи Valera18 и exersizze , решил и я их помучать. (Кстати, один уже замучал ) За основу взял тестовую прошивку Valera18 на три передатчика- подправил, привёл к удобному виду. Теперь легко работать!

Код

Eifr = 64
If Pind.2 = 0 Then                    'Ждёт приёма
Waitms 2
'''''''''''''''''''''''''''''
   Call R_register(rd_rx_pload , 5)                          'Читать 5 байт RX pload регистрации

  Call Tx(1 , Term_st , Term_ml , 4 , 5)                     'Передаём температуру на приёмник
Reset Led

Gosub Setup_rx                    'Включаем на приём                    'Set nRF20L01 в режиме приема
End If
Bitwait Pind.2 , Set
Powerdown                    'Спящий режим
Loop

Весь основной цикл. Просыпаемсяпринимаем, отправляем , засыпаем. Всё просто. Что мы делаем с тем что приняли, или что мы отпраляем, уже сами решаем. В принципе, уже два передатчика могут между собой общаться.
Но приёмник, должен знать , какова судьба передатчиков, по-этому в нём есть проверка связи.
Передатчики на меге48, термометр на LM35(кстати, по мне, так стабильность их показаний лучше чем у 18В20). Приёмник на Меге8. В прошивке реализован термостат, где приёмник сам решает, вкл. или выкл. и даёт команду передатчику. Но это так, для пробы возможностей. Прошивка сильно бета , поэтому исправляем, ругаем, коментируем не стесняемся.
Не забываем спасибо говорить Valera18 и exersizze

Программатор USBASP

Savel — Fri, 20 Oct 2017 02:43:47 GMT

Всех приветствую! Не могу сказать что в программировании авр'ок новичек, уже пару месяцев пытаю свои камни)) вполне удачно, но использую проггграмматор стк200 с ЛПТ порта и уже заинтересовался сборкой юсб аналога. Такой вопрос к автору вот этого программатора http://avrproject.ru/publ/instrument/usbasp_in_bascom/3-1-0-35 пойдет ли он для программирования ATmega8/88/168 и подобных камней с индексом А?

Термопара

m-mishel — Wed, 27 Jul 2016 07:15:57 GMT

существует написаная программа автором . http://avrproject.ru/publ....-1-0-70

если добавить к схеме реле ,то как им управлять?
если задача такова : включить реле если температура термопары 50 C или меньше, то работает реле покуда не достигнет до 200С и отключается реле и пошел отсчет времени 1 минута и снова сравниваем температуру если она составила снова 50 С или меньше,то включаем реле до 200С и т.д.

Таймер зайдествовать внутренний типа Timer или Waitms ?
какой код лучше тут использовать If и Else или же как-то лучше по другому ?
помогите дописать :-) а то застопарился и не знаю как запустить это дело хотя б без экрана(без меню программирования порогов срабатывания реле по температуре с помощью кнопок )

[code][/code]
$regfile = "m8535.dat" 'выбранный тип микроконтроллера атмега 8535
$crystal = 8000000 'частота 8 герц, от внутренего генератора атмеги
$hwstack=40
$swstack=16
$framesize=32
Dim T As Integer 'переменная T в которую будет записыватся показания

Config Portd.0 = Output 'выход для реле
Reley Alias Portd.0 'Даем имя порту Reley чтоб было чуть проще

'Подключение двухстрочного диспелея

Config Lcdpin = Pin , Rs = Portb.0 , E = Portd.7 , Db4 = Portd.6 , Db5 = Portd.5 , Db6 = Portb.7 , Db7 = Portb.6 'указаные порты LCD
Config Lcd = 16 * 2 'Тип матрицы экрана
Cursor Off 'выключаем мигание курсора на экране
Cls 'Чистим экран

'Считывание значений с Аналогово-цифрового Преобразователя(АЦП) по прериваниванию по таймеру

Config Timer1 = Timer , Prescale = 64
On Timer1 Acp

'Конфигурация АЦП

Config Adc = Single , Prescaler = Auto , Reference = Avcc 'Adc-режим считывание . Single- единичное считывание . Prescaler-чистата дискретизации=64 .
'Reference -выбор Источника Опорного Напряжения =Avcc - напряжение питания схемы у нас это 5 вольт

Enable Interrupts
Enable Timer1
'Выводим простую информацию для проверки экрана
Lcd "temp. control" 'наше устройство
Lowerline 'вторая строка
Lcd "AVRproject.ru" 'наш любимый сайт
Wait 3
Cls 'чистим экран заново после нашего текста

Do 'вечное выполнение нашей нижней программы
If T > = 50 Then 'условие
Reley = 1

Else

Reley = 0 'иначе, если это условие не выполняется

Waitms 1000
End If

Cls

Lcd "Temp.:"
Lowerline
Lcd T ; "C"

Waitms 200

Loop

Acp:

Start Adc
'этой командой на преобразователь поступает питание
'работу преобразователя также можно остановить в любой момент
'для этого пишем команду:
'Stop Adc
T = Getadc(1) 'считываем первый канал PC1/ADC1 АЦП и записываем в переменную
T = T / 1.28 'подгоняем замеры под действительность температуры
Return

End

Регулятор температуры и влажности

lex1988 — Sat, 14 Nov 2015 06:29:26 GMT

Форум: Обсуждение материалов сайта
Автор темы: lex1988
Автор последнего сообщения: max
Количество ответов: 6

ШИМ MG996r

Wip85 — Fri, 12 Dec 2014 06:14:16 GMT

Форум: Обсуждение материалов сайта
Описание темы: Сколько вольт на управляющим сигнале ШИМ
Автор темы: Wip85
Автор последнего сообщения: exersizze
Количество ответов: 1

УПРАВЛЯЕМ МИКРОКОНТРОЛЛЕРОМ С ПК ПО UART

vitge — Tue, 26 Aug 2014 06:06:51 GMT

С микроконтроллерами работаю относительно продолжительное время, есть опыт програмирования. Появилась задача связать ПК с контроллером. Собрал схему в качестве основы для будущих проектов. Прошил МК. Запустил прогу на компе. Пробывал сначала на MAX232 на COM порт, нет никакой реакции. Потом приобрел USB-TTL готовый преобразователь. Там по морганию светодиодов можно видеть прием-передачу данных. Передачу с компа вижу. Но контролер принципиально не хочет принимать байт. Процес контролирую через терминальную прогу, и вижу, что контролер, никак не реагирует. Пробывал прописывать в МК элементарный код типа input a. Потом принятый код отправить обратно через принт. Стандартные параметры передачи устанавливаю. Тишина. Я тут колдую уже пару дней, но результата нет. Ошибок в монтаже нет. Причина должна быть простой. Пробывал различные варианты. Преобразователь работает точно, при соединении Rx Tx идет эхо. Предполагаю, что комп очень быстрый для такого порта, но МК прошываю через СОМ, на ура, без проблем. Я думаю, что кто-то сталкивался с такой проблемой. Спасибо за помощь.

ovc3860-command-list

AlekS — Sun, 22 Jun 2014 11:06:02 GMT

Форум: Обсуждение материалов сайта
Описание темы: ovc3860-command-list
Автор темы: AlekS
Автор последнего сообщения: AlekS
Количество ответов: 0

SIM 900D не запустился

leftmails — Wed, 12 Feb 2014 03:06:14 GMT

Всем привет!
по материалам сайта сделал плату с SIM 900D
http://avrproject.ru/publ/plata_dlja_modulja_sim900d/1-1-0-79
Но SIM 900D так и не запустился:(
Процесс монтажа: плату пролудил, прозвонил дорожки - с двух сторон в том числе, все норм
Припаял резисторы, конденсаторы, разъемы, затем транзисторы и в самом конце сам модуль
Подключаю к LiTion батарейки, питание 3,76В.
Подключаю UART через ADM202 к виртуальному ком порту - откликов нет
В процессе прозвонки при включеном питании выяснилось, что PWKEY в нуле, убрал транзистор U5 (который с кнопки идет), напряжение 0,6В, прямое замыкание не дало результатов
UART молчит.

Притом все светодиоды горят.

PS: транзистор U3 нечайно подпалил, но это только что.

Пожалуйста подскажите, что мог сделать не так? вроде все делал как описано

Фото SIM 9000D

Якудза — Mon, 01 Jul 2013 04:14:45 GMT

Всем привет!В процессе отладки случайно убил SIM 900D(Заменил его благо в запасе еще один был. Решил опубликовать фото внутренностей.
Надеюсь форумчанам будет полезно.

Крутим шаговый двигатель

Shamanches — Tue, 04 Dec 2012 10:12:35 GMT

http://avrproject.ru/publ....-1-0-27

собрал схему - у нее есть недостаток, не пойму как исправить?
суть: если нажать одну из кнопок, то двигатель крутится если отпустить, то одна из обмоток шаговика остается включеной(какая обмотка - зависит от того на каком шаге выключаешь кнопку), надо включить и выключить питание тогда сбрасывает

Измеряем частоту сигнала

Aleks8383 — Thu, 29 Nov 2012 10:54:48 GMT

Народ подскажите ,кто реально измерял частоту на Atmega8.Пробывал статью с сайта в Протоусе врёт безбожно,что мне негодится совсем.Если по простому сказать делаю девайс к радиостанции, всё готово но нужно ещё измерять частоту.Надо хотябы что бы до 1 мГц мерил нормально,а там делитель на вход поставлю(макс частота до 8 мГц).Конечно можно на макетки собрать и испытать, но уменя все Atmege 8 в СМД копусе ,а травить плату ради испытаний ,честно лень,тем более под девайс печатка готова ,осталась определится куда сигнал подавать и будет ли всё нормально работать.Вот набрёл на частотомер но там код на С.Но в Протусе мериет до 8 Мгц.Подскажите как лучше это сделать.
С уважением Александр.